cafe2.qsrc 9.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333
  1. # cafe2
  2. menu_off = 1
  3. if $ARGS[0] = 'beginning':
  4. *clr & cla
  5. '<<$boybody>> <<$boybod>> <<$boyface>>, introduces himself as <<$boydesc>>.'
  6. deyst = rand(1, 100)
  7. if deyst <= 25:
  8. '<<$boydesc>> asks you to dance.'
  9. act 'Dance':gt 'Cafe2', 'dance'
  10. act 'Leave':gt 'street'
  11. elseif deyst > 25 and deyst <= 50:
  12. '<<$boydesc>> sits down at your table and orders a drink and a snack.'
  13. act 'Drink':gt 'Cafe2', 'booze'
  14. act 'Leave':gt 'street'
  15. elseif deyst > 50 and deyst <= 75:
  16. '<<$boydesc>> invites you to join a party nearby.'
  17. act 'Agree':gt 'Cafe2', 'kompashka'
  18. if pcs_horny < 75:
  19. act 'Leave':gt 'street'
  20. end
  21. elseif deyst > 75:
  22. '<<$boydesc>> begins to flirt with you and tries to take pictures. <<$boydesc>> asks you to go with him to the toilet.'
  23. act 'Agree':gt 'Cafe3', 'toilet'
  24. if pcs_horny < 75:
  25. act 'Leave':gt 'street'
  26. end
  27. end
  28. end
  29. if $ARGS[0] = 'dance':
  30. cla
  31. if pcs_danc < 50 and pcs_agil >= pcs_danc:danc_exp += 1
  32. minut += 3
  33. gs 'stat'
  34. '<center><img <<$set_imgh>> src="images/pc/activities/dance.jpg"></center>'
  35. deyst = rand(1, 100)
  36. if deyst <= 25:
  37. 'During the dance <<$boydesc>> conducts himself confidently and correctly, his strong hands hold your waist tightly. Finally the song ends.'
  38. act 'Finish the dance':gt 'Cafe2', 'dance2'
  39. elseif deyst > 25 and deyst <= 80:
  40. pcs_horny += 5
  41. clr
  42. gs 'stat'
  43. if dick > 15 and dick < 18:
  44. $didanc = 'During the dance you feel like something hard between his legs presses against your stomach. '
  45. elseif dick >= 18:
  46. $didanc = 'During the dance you feel his cock pushing against your stomach as it hardens and grows, you feel that he has a monster cock about <<dick>> centimeters. '
  47. elseif dick <= 15:
  48. $didanc = ''
  49. end
  50. 'During the dance <<$boydesc>> gently hugs you and strokes your back down to the hips. His strong hands press your fragile body to his, pressing your soft <<$titsize>> breasts against his body. <<$didanc>>Finally, the song ends.'
  51. act 'Finish the dance':gt 'Cafe2', 'dance2'
  52. elseif deyst > 80:
  53. pcs_horny += 8
  54. gs 'stat'
  55. 'During the dance <<$boydesc>> paws at your ass, you cling to his body your tender flesh on his and he wants to kiss you.'
  56. act 'Kiss':
  57. cla
  58. if pcs_lip = 0:$lipdance = 'thin lips'
  59. if pcs_lip = 1:$lipdance = 'lips'
  60. if pcs_lip = 2:$lipdance = 'plump lips'
  61. if pcs_lip = 3:$lipdance = 'plump lips'
  62. if pcs_lip = 4:$lipdance = 'thick lips'
  63. '<<$boydesc>> kisses your <<$lipdance>> pushing them and poking his wet tongue in your mouth.'
  64. gs 'arousal', 'kiss', 5
  65. gs 'stat'
  66. act 'French kiss':
  67. cla
  68. if pcs_lip = 0:$lipdance = 'thin lips'
  69. if pcs_lip = 1:$lipdance = 'lips'
  70. if pcs_lip = 2:$lipdance = 'plump lips'
  71. if pcs_lip = 3:$lipdance = 'plump lips'
  72. if pcs_lip = 4:$lipdance = 'thick lips'
  73. if dick > 15 and dick < 18:
  74. $didanc = 'in his pants he is becoming firm and <<$boydesc>> is pressing his member to your stomach.'
  75. elseif dick >= 18:
  76. $didanc = 'his massive cock is pushing against your stomach, it''s really big, about <<dick>> centimeters.'
  77. elseif dick <= 15:
  78. $didanc = 'there is something moving in his pants.'
  79. end
  80. 'You start passionately sucking his tongue and kissing the guy with your <<$lipdance>>. You feel like <<$didanc>>'
  81. 'Finally the song ends and you break the kiss.'
  82. gs 'arousal', 'kiss', 5
  83. gs 'stat'
  84. deyst = rand(1, 100)
  85. if deyst <= 75:
  86. 'Keeping your waist held <<$boydesc>> invites you back to his home.'
  87. act 'Agree':gt 'Cafe3', 'house'
  88. if pcs_horny < 75:
  89. act 'Leave':gt 'street'
  90. end
  91. elseif deyst > 75:
  92. 'Keeping your waist held <<$boydesc>> asks you to go to the toilet and continue.'
  93. act 'Agree':gt 'Cafe3', 'toilet'
  94. if pcs_horny < 75:
  95. act 'Leave':gt 'street'
  96. end
  97. end
  98. end
  99. gs 'willpower', 'kiss', 'resist', 'medium'
  100. if will_cost <= pcs_willpwr:
  101. act 'Avoid kissing (<<will_cost>> Willpower)':
  102. *clr & cla
  103. gs 'willpower', 'pay', 'resist'
  104. gs 'stat'
  105. pcs_horny += 8
  106. if pcs_lip = 0:$lipdance = 'thin lips'
  107. if pcs_lip = 1:$lipdance = 'lips'
  108. if pcs_lip = 2:$lipdance = 'plump lips'
  109. if pcs_lip = 3:$lipdance = 'plump lips'
  110. if pcs_lip = 4:$lipdance = 'thick lips'
  111. if dick > 15 and dick < 18:
  112. $didanc = 'in his pants he is becoming firm and <<$boydesc>> is pressing his member to your stomach.'
  113. elseif dick >= 18:
  114. $didanc = 'his massive cock is pushing against your stomach, it''s really big, about <<dick>> centimeters.'
  115. elseif dick <= 15:
  116. $didanc = 'there is something moving in his pants.'
  117. end
  118. 'You behave passively and try to pull your mouth away from the annoying guy first, it doesn''t make too much difference as you feel his hands firmly squeeze your ass, then his hands raised above and he pulls you to his chest. You feel like <<$didanc>>'
  119. 'Finally the song ends and gain a little breathing space.'
  120. deyst = rand(1, 100)
  121. if deyst <= 75:
  122. 'Keeping your waist held <<$boydesc>> invites you back to his home.'
  123. act 'Agree':gt 'Cafe3', 'house'
  124. gs 'willpower', 'sex', 'resist', 'medium'
  125. if will_cost <= pcs_willpwr:
  126. act 'Leave (<<will_cost>> Willpower)':
  127. *clr & cla
  128. gs 'willpower', 'pay', 'resist'
  129. gs 'stat'
  130. gt 'street'
  131. end
  132. else
  133. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  134. end
  135. elseif deyst > 75:
  136. 'Keeping your waist held <<$boydesc>> asks you to go to the toilet and continue.'
  137. act 'Agree':gt 'Cafe3', 'toilet'
  138. gs 'willpower', 'sex', 'resist', 'medium'
  139. if will_cost <= pcs_willpwr:
  140. act 'Leave (<<will_cost>> Willpower)':
  141. *clr & cla
  142. gs 'willpower', 'pay', 'resist'
  143. gs 'stat'
  144. gt 'street'
  145. end
  146. else
  147. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  148. end
  149. end
  150. end
  151. else
  152. act 'Avoid kissing (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  153. end
  154. end
  155. if pcs_horny < 75:
  156. act 'Stop dancing and leave':gt 'street'
  157. end
  158. end
  159. end
  160. if $ARGS[0] = 'dance2':
  161. cla
  162. deyst = rand(1, 280)
  163. if deyst >= pcs_apprnc:
  164. 'The dance ends and <<$boydesc>> kisses you goodbye.'
  165. act 'Say goodbye':gt 'kafe', 'start'
  166. elseif deyst < pcs_apprnc:
  167. 'The dance ends and <<$boydesc>> suggests going to his place.'
  168. act 'Agree':gt 'Cafe3', 'house'
  169. gs 'willpower', 'sex', 'resist', 'medium'
  170. if will_cost <= pcs_willpwr:
  171. act 'Leave (<<will_cost>> Willpower)':
  172. *clr & cla
  173. gs 'willpower', 'pay', 'resist'
  174. gs 'stat'
  175. gt 'street'
  176. end
  177. else
  178. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  179. end
  180. end
  181. end
  182. if $ARGS[0] = 'booze':
  183. cla
  184. minut += 30
  185. gs 'stat'
  186. 'You drink with a guy and <<$boydesc>> is interesting and shows an interest in you.'
  187. deyst = rand(1, 100)
  188. if deyst < 75:
  189. 'It seems you''ve had enough and should go home, <<$boydesc>> kisses you goodbye.'
  190. act 'Say goodbye':gt 'kafe', 'start'
  191. elseif deyst >= 75 and deyst < 95:
  192. 'It seems you''ve had enough and should go home, <<$boydesc>> suggests you should go to him.'
  193. act 'Agree':gt 'Cafe3', 'house'
  194. gs 'willpower', 'sex', 'resist', 'medium'
  195. if will_cost <= pcs_willpwr:
  196. act 'Leave (<<will_cost>> Willpower)':
  197. *clr & cla
  198. gs 'willpower', 'pay', 'resist'
  199. gs 'stat'
  200. gt 'street'
  201. end
  202. else
  203. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  204. end
  205. elseif deyst >= 95:
  206. 'You''re drunk and <<$boydesc>> begins to stick to you. He kisses and caresses you and then offers to take you with him to the toilet.'
  207. gs 'arousal', 'kiss', 5
  208. gs 'arousal', 'foreplay', 5
  209. minut -5
  210. gs 'stat'
  211. act 'Agree':gt 'Cafe3', 'toilet'
  212. gs 'willpower', 'sex', 'resist', 'medium'
  213. if will_cost <= pcs_willpwr:
  214. act 'Leave (<<will_cost>> Willpower)':
  215. *clr & cla
  216. gs 'willpower', 'pay', 'resist'
  217. gs 'stat'
  218. gt 'street'
  219. end
  220. else
  221. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  222. end
  223. end
  224. end
  225. if $ARGS[0] = 'kompashka':
  226. cla
  227. minut += 30
  228. gs 'stat'
  229. 'You drink and socialize with guys and girls, <<$boydesc>> chats and flirts with you.'
  230. deyst = rand(1, 100)
  231. if deyst < 60:
  232. 'You think you''ve had enough and should go home, <<$boydesc>> kisses you goodbye.'
  233. act 'Say goodbye':gt 'kafe', 'start'
  234. elseif deyst >= 60 and deyst < 90:
  235. 'You think you''ve had enough and should go home, <<$boydesc>> suggests you go to his place.'
  236. act 'Agree':gt 'Cafe3', 'house'
  237. gs 'willpower', 'sex', 'resist', 'medium'
  238. if will_cost <= pcs_willpwr:
  239. act 'Leave (<<will_cost>> Willpower)':
  240. *clr & cla
  241. gs 'willpower', 'pay', 'resist'
  242. gs 'stat'
  243. gt 'street'
  244. end
  245. else
  246. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  247. end
  248. elseif deyst >= 90:
  249. 'You''re drunk and <<$boydesc>> begins to stick to you. He kisses and caresses you and then offers to go join with some company.'
  250. gs 'arousal', 'kiss', 5
  251. gs 'arousal', 'foreplay', 5
  252. minut -5
  253. gs 'stat'
  254. act 'Agree':gt 'Cafe3', 'kompashka'
  255. gs 'willpower', 'sex', 'resist', 'medium'
  256. if will_cost <= pcs_willpwr:
  257. act 'Leave (<<will_cost>> Willpower)':
  258. *clr & cla
  259. gs 'willpower', 'pay', 'resist'
  260. gs 'stat'
  261. gt 'street'
  262. end
  263. else
  264. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  265. end
  266. end
  267. end
  268. --- cafe2 ---------------------------------