1
0

liames.qsrc 6.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188
  1. # liames
  2. $metka = ''
  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 exhibitionQW > 3:
  39. if week < 7 and hour >= 8 and hour <= 18:
  40. '<a href="exec:gt ''exhibitionistshop'',''start''">Expression of You</a> is just down a small side street from here.'
  41. else
  42. '<b>Expression of You,</b> is open Mon - Sat, 8:00 - 18:00'
  43. end
  44. end
  45. if hour >= 18 and hour <= 22:
  46. if pcs_inhib > 30:
  47. 'There is a <a href="exec:gt ''burlesque'',''start''">burlesque club</a> with shows running until 22:00, that was once an old theatre.'
  48. else
  49. 'There is a burlesque club in an old theatre here. It makes you self-conscious about your looks and you cannot bring yourself to go there.'
  50. end
  51. else
  52. 'The old theatre housing a burlesque club is closed now. It is open every day 18:00 - 22:00'
  53. end
  54. if home_owned[4] = 1: act '<b>Go home</b>':gt'korr2x'
  55. if hour >= 8 and hour <= 17 and exhibitionQW = 3: act 'Search for the shop on the card from Kseniya': gt 'exhibitionistshop', 'start'
  56. act 'wait':gs 'obj_din', 'wait'
  57. if home_owned[4] = 1 and hour = meethour:
  58. if svidanie[0] = 1:'<b>Near the entrance you expect <a href="exec:lover_number = 0 & gt ''lover_meet'',''start''"><<$loverdesc[0]>></a></b>'
  59. if svidanie[1] = 1:'<b>Near the entrance you expect <a href="exec:lover_number = 1 & gt ''lover_meet'',''start''"><<$loverdesc[1]>></a></b>'
  60. if svidanie[2] = 1:'<b>Near the entrance you expect <a href="exec:lover_number = 2 & gt ''lover_meet'',''start''"><<$loverdesc[2]>></a></b>'
  61. end
  62. if rand(0,100) >= 60 and pcs_lover < 3 and rand(0,1200) <= pcs_apprnc:
  63. gs 'boy'
  64. 'To you came <<$boybody>> <<$boybod>> <<$boyface>>. It <<$boyClo>>'
  65. 'The guy introduced himself as <<$boydesc>> and asks you for your telephone number.'
  66. act 'Walk away': gt 'liames'
  67. act 'Tell him your telephone number.':
  68. cla
  69. gs'boyfrend', 'start'
  70. stopboy = 0
  71. '<<$boydesc>> saved your phone number and left.'
  72. act 'Continue': gt 'liames'
  73. end
  74. end
  75. if rand(1,100) >= 95:
  76. *clr & cla
  77. minut += 5
  78. gs'stat'
  79. '<center><img <<$set_imgh>> src="images/locations/oldtown/liamhud1.jpg"></center>'
  80. 'Making your way down High Street, you see a woman waiting patiently while an artist paints her portrait.'
  81. act 'Continue': gt'liames'
  82. end
  83. if hour >= 8 and hour <= 20 and sunWeather = 1 and temper >= 15 and ml_guitarWithMe = 1 and ml_performed_minutes <= ml_maxperform_minutes:
  84. *nl
  85. '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.'
  86. if pcs_inhib < 30:
  87. if pcs_inhib < 10:
  88. $diff = 'hard'
  89. elseif pcs_inhib < 20:
  90. $diff = 'medium'
  91. else
  92. $diff = 'easy'
  93. end
  94. gs 'willpower', 'skill', 'self', $diff
  95. will_cost = (will_cost * 3) - (pcs_perform)
  96. if will_cost <= pcs_willpwr:
  97. act 'Start busking (1 hour) (<<will_cost>> Willpower)':
  98. inhib_exp += rand(1,3)
  99. gs 'willpower', 'pay', 'self'
  100. gs 'stat'
  101. gs 'music_buskingevents', 'busking', 'oldtown'
  102. end
  103. else
  104. act 'Start busking (1 hour) (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  105. end
  106. else
  107. act 'Start busking (1 hour)': gs 'music_buskingevents', 'busking', 'oldtown'
  108. end
  109. end
  110. if hour >= 15 and hour <= 22 and tusa = 0:
  111. act 'Go to the local hangout':
  112. *clr & cla
  113. menu_off = 1
  114. minut += 20
  115. tusa = 1
  116. gs 'dibodi'
  117. gs'stat'
  118. '<center><img <<$set_imgh>> src="images/locations/oldtown/photo.jpg"></center>'
  119. 'Local youth get-together.'
  120. act 'Explore it': gt 'dibodi', 'sgtusa'
  121. end
  122. elseif hour >= 15 and hour <= 22 and tusa = 1 and tusnyakday ! daystart:
  123. act 'Go to the local hangout':
  124. *clr & cla
  125. menu_off = 1
  126. minut += 20
  127. gs'dibodi'
  128. gs'stat'
  129. '<center><img <<$set_imgh>> src="images/locations/oldtown/photo.jpg"></center>'
  130. 'The girls and boys at the local hangout happily greet you.'
  131. act'Leave': gt 'liames'
  132. if $pantyworntype = 'none' and sttan = 0:
  133. cla
  134. '"Hey guys, <<$pcs_nickname>> is going commando," one of the boys says.'
  135. act 'Continue':gt 'dibodi', 'sotusa'
  136. end
  137. !! if sttan = 1 and $pantyworntype = 'none':
  138. !! '- <<$pcs_nickname>>, and again without panties, - said one of the boys - Pussy pokezh?'
  139. !! '- And yet to show? - you said - How do I want and go.'
  140. !! act 'Further':gt'etoexhib','pos2'
  141. !! end
  142. !! if sttan = 1 and $pantyworntype ! 'none':
  143. !! '- Vav <<$pcs_nickname>> truselya put.'
  144. !! act 'Answer':gt'etoexhib','pos3'
  145. !! end
  146. end
  147. end
  148. if stallionQ = 3:
  149. *clr & cla
  150. '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."'
  151. gs 'willpower', 'misc', 'resist', 'easy'
  152. if will_cost <= pcs_willpwr:
  153. act 'Hold it (<<will_cost>> Willpower)':
  154. gs 'willpower', 'pay', 'resist'
  155. stallionQ = 1
  156. gt 'liames'
  157. end
  158. else
  159. 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>'
  160. end
  161. act 'Use the Men''s Restroom': gt 'stallion','start'
  162. end
  163. --- liames ---------------------------------