shulgahome 1.5 KB

12345678910111213141516171819202122232425262728293031323334353637383940
  1. # shulgahome
  2. !============================!
  3. !----FAMILY HUT Shulgin----!
  4. !============================!
  5. CLOSE ALL
  6. $metkaM = $ARGS[0]
  7. $locM = $CURLOC
  8. $metka = $ARGS[0]
  9. $loc = $CURLOC
  10. !podgruzhaem dynamics which "gopsex"
  11. gs'gopsex'
  12. gs'stat'
  13. !appeal to Sergei Shulgin
  14. if serge_shulgin < 30:$serg_obr = ' uncle'
  15. if serge_shulgin >= 30:$serg_obr = ''
  16. 'You are at the door to Shulgas apartment.'
  17. !Entry conditions:
  18. if week < 6 and hour >= 10 and hour < 16:
  19. 'No one opens the door. Apparently there is no one home.'
  20. if serge_shulgin >=70: 'However, you have the key that Sergey gave you.' & act 'Unlock the door and enter':gt 'shulgahall'
  21. elseif hour >= 16 and hour <= 23:
  22. '<center><img src="images/zsoft/pod_ezd/shulgahome/serge2.jpg"></center>'
  23. 'The door is opened by<<$serg_obr>> Sergey who tells you that his son is not home.'
  24. if serge_shulgin >=30: 'He doesn''t mind if you want to come in anyway.' & act 'Enter':gt 'shulgahall'
  25. elseif hour >= 2 and hour < 5:
  26. 'It''s too late to visit, you don''t want to wake everyone up.'
  27. if serge_shulgin >=70: 'However, you have the key that Sergey gave you.' & act 'Unlock the door and enter':gt 'shulgahall'
  28. elseif hour >= 5 and hour < 10:
  29. 'It''s too early, they wont be out of bed yet.'
  30. if serge_shulgin >=70: 'However, you have the key that Sergey gave you.' & act 'Unlock the door and enter':gt 'shulgahall'
  31. else
  32. 'The door is opened by <<$shulga_name_rnd>> and you are invited in.' & act 'Enter':gt 'shulgahall'
  33. end
  34. act 'Escape':minut += 1 & gt'pod_ezd','etaj_3'
  35. --- shulgahome ---------------------------------