placer_gskver 4.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139
  1. # placer_gskver
  2. if hour >= 22 or hour < 8:
  3. encounter = 0
  4. else
  5. encounter = rand(0, 5)
  6. end
  7. if encounter = 0:
  8. !!no one in the park
  9. $textEvent = 'In the park is quiet and deserted. No one in sight.'
  10. elseif encounter = 1:
  11. !!people in the park 1mother walking with a baby 2old_man 3woman with shopping bags 4two young girls
  12. encrand = rand(0, 4)
  13. if encrand = 0:$textEvent = 'In the park on the sidewalk strolls a young mother with a stroller.'
  14. if encrand = 1 and cloth_vid = 0:$textEvent = 'In the park on the sidewalk walks a lonely old man with a newspaper in his hand.'
  15. if encrand = 1 and cloth_vid = 1:
  16. $textEvent='In a park on the sidewalk walking a lonely old man with a newspaper in his hand. The old man came up to you and said: "Look, young lady, I have something for you-whats is"'
  17. act 'see':gt 'parkBimbo','pos1'
  18. end
  19. if encrand = 2:$textEvent = 'In the park on the sidewalk is a woman with shopping bags who decided to shorten the path passing through the square.'
  20. if encrand = 3:$textEvent = 'In the park on the sidewalk stroll two young girls.'
  21. if encrand = 4:
  22. kol_man = rand(1, 5)
  23. if kol_man = 1:$textSub = 'is a guy'
  24. if kol_man = 2:$textSub = 'are two guys'
  25. if kol_man = 3:$textSub = 'are three guys'
  26. if kol_man = 4:$textSub = 'four guys'
  27. if kol_man = 5:$textSub = 'five guys'
  28. $textEvent = 'In the park on the sidewalk <<$textSub>>.'
  29. mass_ver_zn = 1
  30. know_status = 1
  31. end
  32. elseif encounter = 2:
  33. !!dog in the park
  34. $textEvent = 'In the park is quiet and deserted only lonely dog ​​sniffs to something near the boardwalk.'
  35. elseif encounter = 3:
  36. !!young people in the park company
  37. $textEvent = 'In the park on a bench sits youth campaign.'
  38. kol_man = rand(2, 6)
  39. mass_ver_zn = 1
  40. know_status = 1
  41. elseif encounter = 4:
  42. !!Gopnik in the park
  43. kol_man = rand(3, 6)
  44. $textEvent = 'In the park sitting on his haunches Gopnik and drink beer.'
  45. mass_ver_zn = 1
  46. know_status = 2
  47. elseif encounter = 5:
  48. !!couple in love in the park
  49. $textEvent = 'In the park walks a couple in love.'
  50. elseif encounter = 6:
  51. !!in the square of the familiar class
  52. end
  53. ! WD: Uninitialised ~ 'dickfrend' use 'dick'
  54. if dick > 0:ver_zn = 0
  55. gs 'placer_man'
  56. if hour >= 8 and hour < 22:'<center><img src="images/gevent/skver.jpg"></center>'
  57. if hour >= 22 or hour < 8:'<center><img src="images/gevent/skver.jpg"></center>'
  58. if Frend_num > 0:
  59. 'together with <<$ev_name_om>> you have come to a quiet garden square. <<$textEvent>>'
  60. ! WD: Uninitialised ~ 'dickfrend' use 'dick'
  61. if dick > 0:
  62. !!your friend guy
  63. if kol_man = 1 and $text_znak = '':$kol_man_text_no = 'After the guy looked at you, he turned away.'
  64. if kol_man > 1 and $text_znak = '':$kol_man_text_no = 'Once you guys are inspected, they turned their backs.'
  65. if kol_man > 0:'You looked <<$kol_man_prefiks>> appreciatively <<$kol_man_text>>. <<$kol_man_text_no>>.'+$text_znak
  66. !!action with a guy whom came to the square
  67. ! WD: Uninitialised ~ 'dickfrend' use 'dick'
  68. elseif dick = 0:
  69. !!your friend girl
  70. if ver_zn = 1:
  71. 'At you with his girlfriend looked <<$kol_man_prefiks>> appreciatively <<$kol_man_text>>.'
  72. if kol_man = 1:'A guy came up to you and said, "<<$text_znak>>"'
  73. if kol_man > 1:'Guys come to you and one of the guys said "<<$text_znak>>"'
  74. act 'meet':
  75. cls
  76. if p_dom < 80:
  77. gt 'placer_act'
  78. elseif p_dom >= 80:
  79. gs 'stat'
  80. '<<$ev_name>> hissed in your ear "I''m not acquainted with someone on the street. If you want to, stay, and I will go."'
  81. act 'Go with a friend':gt 'placer_end'
  82. act 'can you go, and I''ll stay':
  83. Frend_num = 0
  84. gt 'placer_act'
  85. end
  86. end
  87. end
  88. elseif ver_zn = 0 and kol_man > 0:
  89. if kol_man = 1:$kol_man_text_no = 'After the guy looked at you, he turned away.'
  90. if kol_man > 1:$kol_man_text_no = 'Once you guys are inspected, they turned their backs.'
  91. 'At you with his girlfriend looked <<$kol_man_prefiks>> appreciatively <<$kol_man_text>>. <<$kol_man_text_no>>.'
  92. end
  93. !!acts with the girl you came
  94. end
  95. act 'Continue to walk':gt 'placer_end'
  96. elseif Frend_num = 0:
  97. 'You stroll through the quiet park. <<$textEvent>>'
  98. if ver_zn = 1:
  99. 'You looked <<$kol_man_prefiks>> appreciatively <<$kol_man_text>>.'
  100. if kol_man = 1:'The guy came up to you and said, "<<$text_znak>>"'
  101. if kol_man > 1:'Guys come to you and one of the guys said "<<$text_znak>>"'
  102. act 'meet':gt 'placer_act'
  103. elseif ver_zn = 0 and kol_man > 0:
  104. if kol_man = 1:$kol_man_text_no = 'After the guy looked at you, he turned away.'
  105. if kol_man > 1:$kol_man_text_no = 'Once you guys are inspected, they turned their backs.'
  106. 'You looked <<$kol_man_prefiks>> appreciatively <<$kol_man_text>>. <<$kol_man_text_no>>.'
  107. end
  108. act 'Leave':gt 'gskver'
  109. end
  110. gs 'stat'
  111. --- placer_gskver ---------------------------------