liames 4.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144
  1. # liames
  2. $metka = ''
  3. $loc = 'liames'
  4. $location_type = 'public_outdoors'
  5. CLOSE ALL
  6. clr
  7. gs'stat'
  8. set palMir=0
  9. set bordysh=0
  10. set housrA=0
  11. set palMir=0
  12. set obdysh=0
  13. set tanhouse1=0
  14. set obMir=0
  15. set obLoker=0
  16. set houseob=0
  17. set borMir=0
  18. set borLoker=0
  19. set minut+=10
  20. '<center><B>High street</B></center>'
  21. '<center><img <<$set_imgh>> src="images/locations/oldtown/liames.jpg" ></center>'
  22. 'Not so much of a street, more of a connection of several streets including cafes and shops.'
  23. 'A street runs straight to the <a href="exec:GT ''liam'',''start''">Town center</a>.'
  24. 'Street leads to the Old Town <a href="exec:GT ''parks'',''start''">park</a>.'
  25. if hour >= 8 and hour <= 20:'A small <a href="exec:GT ''larek'',''start''">shop</a> is currently open.'
  26. if hour >= 10 and hour <= 22: 'A <a href="exec:GT ''liamelkafe'',''start''">tiny cafe</a> displays a street sign outside it''s door.'
  27. if hour >= 8 and hour <= 17 and exhibitionQW > 3:'The <a href="exec:GT ''exhibitionistshop'',''start''">exhibitionist shop</a> is just down a small side street from here.'
  28. if housr = 2:
  29. act '<b>Go home</b>':gt'korr2x'
  30. end
  31. if hour >= 8 and hour <= 17 and exhibitionQW = 3:
  32. act 'Search for the shop on the card from Kseniya': gt 'exhibitionistshop', 'start'
  33. end
  34. act 'Kill some time looking at the shops':
  35. cla
  36. waiting = input ("How many minutes do you wish to spend looking around the shops? (Not more 120 minutes)")
  37. if waiting <= 0 or waiting > 120:
  38. minut = minut + 15
  39. elseif waiting > 0 and waiting <= 120:
  40. minut = minut + waiting
  41. end
  42. act 'Consult a watch':gt curloc
  43. end
  44. if housr = 2 and hour = meethour:
  45. if svidanieA = 1:'<b>Near the entrance you expect <a href="exec:GT ''meet'',''start''"><<$boydescA>></a></b>'
  46. if svidanieB = 1:'<b>Near the entrance you expect <a href="exec:GT ''svidan'',''start''"><<$boydescB>></a></b>'
  47. if svidanieC = 1:'<b>Near the entrance you expect <a href="exec:GT ''svidan'',''start''"><<$boydescC>></a></b>'
  48. end
  49. streetrand = RAND(0,100)
  50. if streetrand >= 10 and bfa < 1:
  51. vnerand = RAND(0,1200)
  52. if vnerand <= pcs_apprnc:
  53. gs'boy'
  54. 'To you came <<$boybody>> <<$boybod>> <<$boyface>>. It <<$boyClo>>'
  55. 'The guy introduced himself as <<$boydesc>> and I asked for your telephone number.'
  56. act 'Tell him your telephone number':
  57. cla
  58. gs'boyfrend','start'
  59. stopboy = 0
  60. '<<$boydescA>> record your phone and left.'
  61. act 'Complete outing':gt 'liames'
  62. end
  63. end
  64. end
  65. if stallionQ = 3:
  66. *clr
  67. cla
  68. 'There is a rumbling in your stomach, you need to use the restroom. Luckily there appears to be a public restroom tucked into the corner of a building. Unluckily, the female one has a sign saying it is out of order.'
  69. act 'Use the Men''s Restroom':GT 'stallion','start'
  70. act 'Hold it':stallionQ = 1 & gt 'liames'
  71. end
  72. temp = RAND(1,100)
  73. if temp >= 90:
  74. cls
  75. minut += 5
  76. gs'stat'
  77. '<center><img <<$set_imgh>> src="images/locations/oldtown/liamhud1.jpg"></center>'
  78. 'You have seen both a sitting area-the artist, here the artist girl came and sat opposite him,and the artist began to paint it'
  79. act 'Further':gt'liames'
  80. end
  81. if hour >= 15 and hour <= 22 and tusa = 0:
  82. act'Local Hangout':
  83. cls
  84. gs'stat'
  85. gs'dibodi'
  86. minut += 20
  87. tusa = 0
  88. '<center><img <<$set_imgh>> src="images/locations/oldtown/photo.jpg"></center>'
  89. 'Local youth get-together.'
  90. act 'Discovering':gt 'dibodi', 'sgtusa'
  91. end
  92. end
  93. if hour >= 15 and hour <= 22 and tusa = 1 and tusnyakday ! daystart:
  94. act'Local Hangout':
  95. cls
  96. gs'stat'
  97. gs'dibodi'
  98. minut += 20
  99. '<center><img <<$set_imgh>> src="images/locations/oldtown/photo.jpg"></center>'
  100. 'You came to talking to girls and boys and greeted you.'
  101. 'In response you too greeted them.'
  102. if tanga = 0 and sttan = 0:
  103. '- A <<$pcs_nickname>> campaign wears panties - said one of the boys.'
  104. act 'And she trusted you with this?':gt 'dibodi', 'sotusa'
  105. end
  106. !! if sttan = 1 and tanga = 0:
  107. !! '- <<$pcs_nickname>>, and you again without panties, - said one of the boys - Pussy pokezh?'
  108. !! '- And yet to show? - you said - How do I want and go.'
  109. !! act 'Further':gt'etoexhib','pos2'
  110. !! end
  111. !! if sttan = 1 and tanga = 1:
  112. !! '- Vav <<$pcs_nickname>> truselya put.'
  113. !! act 'Answer':gt'etoexhib','pos3'
  114. !! end
  115. act'Escape':gt 'liames'
  116. end
  117. end
  118. --- liames ---------------------------------