1
0

lakecafe 6.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239
  1. # lakecafe
  2. if $ARGS[0] = 'main':
  3. cla
  4. *clr
  5. fcolor = rgb(0, 0, 0)
  6. bcolor = rgb(255, 255, 255)
  7. gs 'stat'
  8. set barrnd = rand(1, 3)
  9. !!LCWorkRand = rand(1, 6)
  10. '<center><img src="images/LakeCafe/LakeCafe.jpg"></center>'
  11. *nl
  12. *nl
  13. 'Naiobyknovenneyshaya barbecue, of which there are many in the vast country.'
  14. 'The cost of lunch - 75 rubles'
  15. 'Opening hours cafe - 14:00 to 04:00'
  16. *nl
  17. if hour >= 14 or hour < 4:
  18. if barmenshameet = 0:
  19. if barrnd = 1:'Over the bar stands smiling <a href="exec:gt ''lakecafe'', ''barmensha''">barmaid</a> and polishes glasses'
  20. if barrnd = 2:'Over the bar stands smiling <a href="exec:gt ''lakecafe'', ''barmensha''">barmaid</a> and wipes the table'
  21. if barrnd = 3:'Over the bar stands smiling <a href="exec:gt ''lakecafe'', ''barmensha''">barmaid</a> and something mixes'
  22. end
  23. if barmenshameet = 1:
  24. if barrnd = 1:'Over the bar stands <a href="exec:gt ''lakecafe'', ''barmensha''">Gene</a> and polishes glasses'
  25. if barrnd = 2:'Over the bar stands <a href="exec:gt ''lakecafe'', ''barmensha''">Gene</a> table and rubs'
  26. if barrnd = 3:'Over the bar stands <a href="exec:gt ''lakecafe'', ''barmensha''">Gene</a> and something mixes'
  27. end
  28. if week = 1 and hour = 22:
  29. if LCWorkRand = 1:
  30. randguycafe = rand(3, 6)
  31. if LCwork = 0:'One of the tables sits a group of men and drinks, talking loudly and laughing.'
  32. if LCwork = 1:'One of the tables sitting <a href="exec:gt ''LCwork'', ''start1''"><<randguycafe>> men</a> and drinks, talking loudly and laughing.'
  33. end
  34. if LCWorkRand = 2:
  35. if LCwork = 0:'One of the tables sits an older man and eating barbecue.'
  36. if LCwork = 1:'One of the tables sitting <a href="exec:gt ''LCwork'', ''start2''">an older man</a> and eating barbecue.'
  37. end
  38. if LCWorkRand = 3:
  39. if LCwork = 0:'One of the tables sit two men and a drink.'
  40. if LCwork = 1:'One of the tables sit <a href="exec:gt ''LCwork'', ''start3''">two men</a> and drink.'
  41. end
  42. if LCWorkRand = 4:
  43. if LCwork = 0:'One of the tables sit a guy with a girl and talk about something.'
  44. if LCwork = 1:'One of the tables sit <a href="exec:gt ''LCwork'', ''start4''">boy and girl</a> and talk about something.'
  45. end
  46. if LCWorkRand = 5:
  47. if LCwork = 0:'One of the tables sits a girl, and dining.'
  48. if LCwork = 1:'One of the tables sitting <a href="exec:gt ''LCwork'', ''start5''">girl</a>, and dining.'
  49. end
  50. if LCWorkRand = 6:
  51. if LCwork = 0:'One of the tables sits a fat man and talking on the phone.'
  52. if LCwork = 1:'One of the tables sitting <a href="exec:gt ''LCwork'', ''start6''">fat man</a> and talking on the phone.'
  53. end
  54. end
  55. *nl
  56. '- <a href="exec:gt ''laketoilet'', ''main''">Toilet</a>'
  57. if money >= 75:
  58. act 'Eat 75 rubles':
  59. cla
  60. *clr
  61. act 'Get up from the table':set minut += 20 & gt 'lakecafe', 'main'
  62. '<center><img src="images/pics/food.jpg"></center>'
  63. set minut += 30
  64. set health += 10
  65. set money -= 75
  66. set manna += 5
  67. set willpower += 5
  68. if energy >= 30:
  69. set fat += 5
  70. 'You can no longer have.'
  71. end
  72. if energy >= 20 and energy < 30:
  73. set fat += 3
  74. set energy += 10
  75. 'You pushed through the power of a meal.'
  76. end
  77. if energy < 20:
  78. set energy += 20
  79. set fat += 1
  80. 'You gladly ate the food.'
  81. end
  82. if water >= 20:'Tea in you no longer climbs.'
  83. if water < 20:
  84. 'You gladly drank a mug of tea.'
  85. set water += 20
  86. end
  87. end
  88. end
  89. end
  90. if LCwork2 >= 1 and LCwork2day ! day and hour = 18:
  91. act 'Help in the kitchen':gt 'LCwork', 'Kitchen'
  92. end
  93. act 'Leave':set minut += 2 & gt 'nord'
  94. end
  95. if $ARGS[0] = 'barmensha':
  96. cls
  97. gs 'stat'
  98. '<center><img src="images/LakeCafe/LakeBarmensha.jpg"></center>'
  99. *nl
  100. *nl
  101. if barmenshameet = 0:
  102. 'The bartender looked at your eyes and, with a smile, asked:'
  103. '-Would that something?'
  104. end
  105. if barmenshameet = 1:
  106. 'Eugene smiled, when you come to it'
  107. 'Hi! - She said with a smile'
  108. end
  109. if hour >= 14 or hour < 4:
  110. if barmenshameet = 0:
  111. act 'Chat':
  112. cla
  113. *clr
  114. set barmenshameet = 1
  115. set JenyaLC = 10
  116. set minut += 30
  117. gs 'stat'
  118. '<center><img src="images/LakeCafe/LakeBarmensha.jpg"></center>'
  119. 'You chatted with bartender. During the conversation, you found out that her name is Eugene and it works here with his girlfriend, Angela, in which a cook on the barbecue.'
  120. act '...':gt 'lakecafe', 'barmensha'
  121. end
  122. end
  123. if barmenshameet = 1:
  124. act 'Chat':
  125. cla
  126. *clr
  127. if JenyaLC < 60:set JenyaLC += 3
  128. set minut += 30
  129. gs 'stat'
  130. '<center><img src="images/LakeCafe/LakeBarmensha.jpg"></center>'
  131. 'You talk about the affairs of Zhenya, work, life and all sorts of trivia.'
  132. act '...':gt 'lakecafe', 'barmensha'
  133. end
  134. end
  135. if JenyaLC >= 60 and horny > 50:
  136. act 'Flirt':
  137. cla
  138. *clr
  139. set minut += 10
  140. gs 'stat'
  141. '<center><img src="images/LakeCafe/LakeBarmensha.jpg"></center>'
  142. 'You chat with Eugene, making it ambiguous hints. Eugene seems to understand you and invites you to go for it. You agree to abide with her to the kitchen.'
  143. act '...':
  144. if JenyaLCfirst = 0:gt 'LCporn', 'firsttime'
  145. if JenyaLCfirst = 1:gt 'LCporn', 'sex'
  146. end
  147. end
  148. end
  149. if JenyaLC >= 35:
  150. act 'Ask about work':
  151. cla
  152. *clr
  153. '<center><img src="images/LakeCafe/LakeBarmensha.jpg"></center>'
  154. if LCworkwork2 < 1:
  155. 'You ask about the work of Eugene. She tells you that her sister needed help in the kitchen, come in 18 hours you need to work half an hour, during which you will be paid 175 rubles.'
  156. set LCworkwork2 = 1
  157. set LCwork2 = 1
  158. act '...':
  159. set minut += 4
  160. gt 'lakecafe', 'barmensha'
  161. end
  162. else
  163. 'You ask about the work of Eugene. It reminds you that her sister needed help in the kitchen, come in 18 hours you need to work half an hour, get paid 175 rubles.'
  164. act '...':
  165. set minut += 4
  166. gt 'lakecafe', 'barmensha'
  167. end
  168. end
  169. end
  170. end
  171. if JenyaLC >= 80:
  172. act 'Ask about the "special" work':
  173. cla
  174. *clr
  175. '<center><img src="images/LakeCafe/LakeBarmensha.jpg"></center>'
  176. if LCworkwork = 0:
  177. 'You ask Zhenyu about the "special" work. It tells you that on Monday, at 22 o´clock, in the cafe visitors who need quality "service." Pay from 500 to 2, 000 rubles.'
  178. act '...':
  179. set LCworkwork = 1
  180. set LCwork = 1
  181. set minut += 4
  182. gt 'lakecafe', 'barmensha'
  183. end
  184. end
  185. if LCworkwork = 1:
  186. 'You ask about the work of Eugene. It reminds you of conditions:on Mondays, at 22 o´clock, you will need to "serve" certain visitors. Paid for it from 500 to 2000 rubles.'
  187. act '...':
  188. set minut += 3
  189. gt 'lakecafe', 'barmensha'
  190. end
  191. end
  192. end
  193. end
  194. end
  195. act 'Move away':gt 'lakecafe', 'main'
  196. end
  197. --- lakecafe ---------------------------------