shulgahome 1.9 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243
  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. $location_type = 'event'
  11. !Vasily/Shulga''s dynamic name is randomly chosen in "gopsex"
  12. gs'gopsex'
  13. gs'stat'
  14. !appeal to Sergei Shulgin
  15. if serge_shulgin < 30:$serg_obr = ' uncle'
  16. if serge_shulgin >= 30:$serg_obr = ''
  17. 'You''re at the door to the Shulgin apartment.'
  18. !Entry conditions:
  19. if week < 6 and hour >= 10 and hour < 16:
  20. 'When you ring the doorbell, no one comes to answer the door. Apparently both <<$shulga_name_rnd>> and Sergey are not at home.'
  21. if serge_shulgin >=70: 'You could still enter with the key that Sergey gave you.' & act 'Unlock the door and enter':gt 'shulgahall'
  22. elseif hour >= 16 and hour <= 23:
  23. '<center><img src="images/zsoft/pod_ezd/shulgahome/serge2.jpg"></center>'
  24. 'When you ring the doorbell,<<$serg_obr>> Sergey comes to answer the door.'
  25. '"Oh, hello <<$nickname>>", he shrugs. "If you''re looking for Vasily: he''s not here, and I don''t know when he''ll be back."'
  26. if serge_shulgin >=30: 'He offers: "You can come in anyway, if you want?"' & act 'Enter':gt 'shulgahall'
  27. elseif hour >= 2 and hour < 5:
  28. 'You move your hand to ring the bell, but stop yourself. It''s too late to go visit them, you''d wake everyone up!'
  29. if serge_shulgin >=70: 'You could use the key that Sergey gave you to enter the apartment quietly.' & act 'Unlock the door and enter':gt 'shulgahall'
  30. elseif hour >= 5 and hour < 10:
  31. 'You move your hand to ring the bell, but stop yourself. It''s too early, they won''t be out of bed yet.'
  32. if serge_shulgin >=70: 'You could use the key that Sergey gave you to enter the apartment quietly.' & act 'Unlock the door and enter':gt 'shulgahall'
  33. else
  34. 'The door is opened by <<$shulga_name_rnd>> and you are invited in.' & act 'Enter':gt 'shulgahall'
  35. end
  36. act 'Leave':minut += 1 & gt'pod_ezd','etaj_3'
  37. --- shulgahome ---------------------------------