1
0

liames.qsrc 6.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196
  1. # liames
  2. $loc_arg = ''
  3. $loc = 'liames'
  4. $location_type = 'public_outdoors'
  5. $menu_loc = 'liames'
  6. $menu_arg = ''
  7. menu_off = 0
  8. CLOSE ALL
  9. clr
  10. gs'stat'
  11. set palMir=0
  12. set bordysh=0
  13. set housrA=0
  14. set palMir=0
  15. set obdysh=0
  16. set tanhouse1=0
  17. set obMir=0
  18. set obLoker=0
  19. set houseob=0
  20. set borMir=0
  21. set borLoker=0
  22. set minut+=10
  23. '<center><B>High Street</B></center>'
  24. '<center><img <<$set_imgh>> src="images/locations/oldtown/liames.jpg" ></center>'
  25. 'High Street is a square serving as the joining point of several smaller streets. There are many small cafes and shops.'
  26. 'Another street runs straight to the <a href="exec:gt ''liam'',''start''">Town Center</a>.'
  27. 'High Street itself leads to the Old Town <a href="exec:gt ''parks'',''start''">Park</a>.'
  28. if hour >= 8 and hour <= 20:
  29. 'A small <a href="exec:gt ''larek'',''start''">grocery store</a> is currently open.'
  30. else
  31. 'There is a small whole foods store that is open from 8:00 - 20:00 everyday. It is currently closed.'
  32. end
  33. if hour >= 10 and hour <= 22:
  34. 'A quaint little restaurant has put a sign outside of its door, reading, "<a href="exec:gt ''liamelkafe'',''start''">Liamel Cafe</a>."'
  35. else
  36. 'Liamel Cafe is current closed, it is open every day 10:00 - 22:00'
  37. end
  38. if week < 7 and hour >= 9 and hour <= 17:
  39. 'The long standing alternative clothing shop "<a href="exec:gt ''shop_tsar_bomba'',''start''">`Tsar Bomba</a> is unmistakable amongst the tourist shops on the main square."'
  40. 'Clothing for younger women is catered for in, "<a href="exec:gt ''liamelkafe'',''start''">Flamingos</a>."'
  41. else
  42. 'Tsar Bomba is current closed, it is open Mon - Sat day 9:00 - 18:00'
  43. 'Flamingos is current closed, it is open Mon - Sat 9:00 - 18:00'
  44. end
  45. if exhibitionQW > 3:
  46. if week < 7 and hour >= 8 and hour <= 17:
  47. '<a href="exec:gt ''exhibitionistshop'',''start''">Expression of You</a> is just down a small side street from here.'
  48. else
  49. '<b>Expression of You,</b> is open Mon - Sat, 8:00 - 18:00'
  50. end
  51. end
  52. if hour >= 18 and hour <= 22:
  53. if pcs_inhib > 30:
  54. 'There is a <a href="exec:gt ''burlesque'',''start''">burlesque club</a> with shows running until 23:00, that was once an old theatre.'
  55. else
  56. 'There is a burlesque club in an old theatre here. Such perversion is unhealthy and you cannot bring yourself to go there.'
  57. end
  58. else
  59. 'The old theatre housing a burlesque club is closed now. It is open every day 18:00 - 23:00'
  60. end
  61. if home_owned[4] = 1: act '<b>Go home</b>':gt'korr2x'
  62. if hour >= 8 and hour <= 17 and exhibitionQW = 3: act 'Search for the shop on the card from Kseniya': gt 'exhibitionistshop', 'start'
  63. act 'wait':gs 'obj_din', 'wait'
  64. if home_owned[4] = 1 and hour = meethour:
  65. if svidanie[0] = 1:'<b>Near the entrance you expect <a href="exec:lover_number = 0 & gt ''lover_meet'',''start''"><<$loverdesc[0]>></a></b>'
  66. if svidanie[1] = 1:'<b>Near the entrance you expect <a href="exec:lover_number = 1 & gt ''lover_meet'',''start''"><<$loverdesc[1]>></a></b>'
  67. if svidanie[2] = 1:'<b>Near the entrance you expect <a href="exec:lover_number = 2 & gt ''lover_meet'',''start''"><<$loverdesc[2]>></a></b>'
  68. end
  69. if rand(0,100) >= 60 and pcs_lover < 3 and rand(0,1200) <= pcs_apprnc:
  70. gs 'boy'
  71. 'To you came <<$boybody>> <<$boybod>> <<$boyface>>. It <<$boyClo>>'
  72. 'The guy introduced himself as <<$boydesc>> and asks you for your telephone number.'
  73. act 'Walk away': gt 'liames'
  74. act 'Tell him your telephone number.':
  75. cla
  76. gs'boyfrend', 'start'
  77. stopboy = 0
  78. '<<$boydesc>> saved your phone number and left.'
  79. act 'Continue': gt 'liames'
  80. end
  81. end
  82. if rand(1,100) >= 95:
  83. *clr & cla
  84. minut += 5
  85. gs'stat'
  86. '<center><img <<$set_imgh>> src="images/locations/oldtown/liamhud1.jpg"></center>'
  87. 'Making your way down High Street, you see a woman waiting patiently while an artist paints her portrait.'
  88. act 'Continue': gt'liames'
  89. end
  90. if hour >= 8 and hour <= 20 and sunWeather = 1 and temper >= 15 and ml_guitar['carried'] = 1 and ml_performance['performed_minutes'] < ml_performance['max_perform_minutes'] and ml_performance['max_perform_minutes'] >= 15:
  91. *nl
  92. 'With the weather being pleasant and sunny, there are groups of people moving around the streets. You could play some music, practice performing songs and maybe make some money too.'
  93. ml_buskingtime = min((ml_performance['max_perform_minutes']-ml_performance['performed_minutes']), 60)
  94. if pcs_inhib < 30:
  95. if pcs_inhib < 10:
  96. $diff = 'hard'
  97. elseif pcs_inhib < 20:
  98. $diff = 'medium'
  99. else
  100. $diff = 'easy'
  101. end
  102. gs 'willpower', 'skill', 'self', $diff
  103. will_cost = (will_cost * 3) - (pcs_perform)
  104. if will_cost <= pcs_willpwr:
  105. act 'Start busking (<<ml_buskingtime>> minutes) (<<will_cost>> Willpower)':
  106. inhib_exp += rand(1,3)
  107. gs 'willpower', 'pay', 'self'
  108. gs 'stat'
  109. gs 'music_buskingevents', 'busking', 'oldtown'
  110. end
  111. else
  112. act 'Start busking (<<ml_buskingtime>> minutes) (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  113. end
  114. else
  115. act 'Start busking (<<ml_buskingtime>> minutes)': gs 'music_buskingevents', 'busking', 'oldtown'
  116. end
  117. end
  118. if hour >= 15 and hour <= 22 and tusa = 0:
  119. act 'Go to the local hangout':
  120. *clr & cla
  121. menu_off = 1
  122. minut += 20
  123. tusa = 1
  124. gs 'dibodi'
  125. gs'stat'
  126. '<center><img <<$set_imgh>> src="images/locations/oldtown/photo.jpg"></center>'
  127. 'Local youth get-together.'
  128. act 'Explore it': gt 'dibodi', 'sgtusa'
  129. end
  130. elseif hour >= 15 and hour <= 22 and tusa = 1 and tusnyakday ! daystart:
  131. act 'Go to the local hangout':
  132. *clr & cla
  133. menu_off = 1
  134. minut += 20
  135. gs'dibodi'
  136. gs'stat'
  137. '<center><img <<$set_imgh>> src="images/locations/oldtown/photo.jpg"></center>'
  138. 'The girls and boys at the local hangout happily greet you.'
  139. act'Leave': gt 'liames'
  140. if $pantyworntype = 'none' and sttan = 0:
  141. cla
  142. '"Hey guys, <<$pcs_nickname>> is going commando," one of the boys says.'
  143. act 'Continue':gt 'dibodi', 'sotusa'
  144. end
  145. !! if sttan = 1 and $pantyworntype = 'none':
  146. !! '- <<$pcs_nickname>>, and again without panties, - said one of the boys - Pussy pokezh?'
  147. !! '- And yet to show? - you said - How do I want and go.'
  148. !! act 'Further':gt'etoexhib','pos2'
  149. !! end
  150. !! if sttan = 1 and $pantyworntype ! 'none':
  151. !! '- Vav <<$pcs_nickname>> truselya put.'
  152. !! act 'Answer':gt'etoexhib','pos3'
  153. !! end
  154. end
  155. end
  156. if stallionQ = 3:
  157. *clr & cla
  158. 'There is a rumbling in your stomach, you need to use the restroom. There appears to be a public restroom tucked into the corner of a building. Unfortunately, the female one has a sign reading, "Out of order."'
  159. gs 'willpower', 'misc', 'resist', 'easy'
  160. if will_cost <= pcs_willpwr:
  161. act 'Hold it (<<will_cost>> Willpower)':
  162. gs 'willpower', 'pay', 'resist'
  163. stallionQ = 1
  164. gt 'liames'
  165. end
  166. else
  167. act 'Hold it (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  168. end
  169. act 'Use the Men''s Restroom': gt 'stallion','start'
  170. end
  171. --- liames ---------------------------------