216_gskver 1.2 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243
  1. # gskver
  2. $metka = $ARGS[0]
  3. $loc = $CURLOC
  4. cls
  5. gs 'stat'
  6. gs 'time'
  7. '<center><img src="images\gevent\skver.jpg"></center>'
  8. 'Small park where people often rest, walk a couple, played by kids.'
  9. *nl
  10. if hour > 8 and hour < 19: 'Here is a small <a href="exec: minut += 5 & GT ''gskino''">Theater</a>'
  11. if GvstreBoy = 1: 'You can see that in the park walks <a href="exec: numnpc = SkverBoy & GT ''Gnpc''"><<$nameBoyfrend[SkverBoy]>></a>.'
  12. if kotovLoveQW > 0 and hour >= 18 and hour < 20 and week < 6 or week >= 6 and kotovLoveQW > 0 and hour >= 9 and hour < 20:
  13. 'You see in the park sitting on the bench <a href="exec:minut += 3 & GT ''kotovEv''">Vitek Kotov</a> with Druganov and beer.'
  14. end
  15. act 'Walk (0:15)':
  16. cla
  17. *clr
  18. set minut += 15
  19. place = 1
  20. Frend_num = 0
  21. gt 'placer'
  22. end
  23. if hour >= 8 and hour < 22:
  24. act 'Distributing flyers to earn money 10 rubles (1:00)':
  25. cla
  26. *clr
  27. '<center><img src="images\etogame\flaer.jpg"></center>'
  28. 'You an hour handing out flyers park visitors. Then you got 10 rubles.'
  29. set minut += 60
  30. set money += 10
  31. set manna -= 5
  32. gs 'stat'
  33. act 'Move away': gt 'gskver'
  34. end
  35. end
  36. act 'Get out of the park': minut += 5 & gt 'gorodok'
  37. --- gskver ---------------------------------