kazinosvid.tw 8.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211
  1. :: kazinosvid
  2. <<set $here = 'kazinosvid'>>
  3. <<set $ARGS = $location_var[$here]>>
  4. <<if !$location_var[$here][0]>>
  5. <<set $menu_off = 1>>
  6. <<set $location_type = 'event'>>
  7. <<set $time.minutes += 60>>
  8. <<set $kisvrand = 0>>
  9. <<set $pc.mood += 10>>
  10. <center><b>Cinema</b></center>
  11. <<image "characters/city/boyfriend/sex/event/cards/0.jpg">>
  12. <p>You sit down with $telsob to have some drinks, and play some cards.</p>
  13. <<actCLA 'Play'>>
  14. <<if $telsob == 'Alla'>>
  15. <<set $alla += 1>>
  16. <<if getvar("$alla") >= 20>>
  17. <<set $kisvrand = rand(0, 8)>>
  18. <<if getvar("$kisvrand") < 2>>
  19. <<gt 'kazinosvid' '1'>>
  20. <<elseif getvar("$kisvrand") < 4>>
  21. <<gt 'kazinosvid' '2'>>
  22. <<else>>
  23. <<gt 'kazinosvid' '3'>>
  24. <</if>>
  25. <<else>>
  26. <<gt 'kazinosvid' '3'>>
  27. <</if>>
  28. <<elseif $telsob == 'Masha'>>
  29. <<set $masha += 1>>
  30. <<if getvar("$masha") >= 20>>
  31. <<set $kisvrand = rand(0, 8)>>
  32. <<if getvar("$kisvrand") < 2>>
  33. <<gt 'kazinosvid' '1'>>
  34. <<elseif getvar("$kisvrand") < 4>>
  35. <<gt 'kazinosvid' '2'>>
  36. <<else>>
  37. <<gt 'kazinosvid' '3'>>
  38. <</if>>
  39. <<else>>
  40. <<gt 'kazinosvid' '3'>>
  41. <</if>>
  42. <<elseif $telsob == 'Kate'>>
  43. <<set $npc('A219').rel += 1>>
  44. <<if $npc('A219').rel >= 20>>
  45. <<set $kisvrand = rand(0, 8)>>
  46. <<if getvar("$kisvrand") < 2>>
  47. <<gt 'kazinosvid' '1'>>
  48. <<elseif getvar("$kisvrand") < 4>>
  49. <<gt 'kazinosvid' '2'>>
  50. <<else>>
  51. <<gt 'kazinosvid' '3'>>
  52. <</if>>
  53. <<else>>
  54. <<gt 'kazinosvid' '3'>>
  55. <</if>>
  56. <<elseif $telsob == $loverdesc[$lover_number]>>
  57. <!-- !! date with girlfriend-->
  58. <<setinit $loverrelation[$lover_number] += 1>>
  59. <<if getvar("$loverrelation["+$lover_number+"]") >= 20>>
  60. <<set $kisvrand = rand(0, 8)>>
  61. <<if getvar("$kisvrand") > 0 and getvar("$kisvrand") < 3>>
  62. <<gt 'kazinosvid' '1'>>
  63. <</if>>
  64. <<if getvar("$kisvrand") > 2 and getvar("$kisvrand") < 5>>
  65. <<gt 'kazinosvid' '2'>>
  66. <</if>>
  67. <<if getvar("$kisvrand") == 0 or getvar("$kisvrand") > 4>>
  68. <<gt 'kazinosvid' '3'>>
  69. <</if>>
  70. <<else>>
  71. <<gt 'kazinosvid' '3'>>
  72. <</if>>
  73. <</if>>
  74. <</actCLA>>
  75. <</if>>
  76. <<if $location_var[$here][0] == '1'>>
  77. <<image "characters/city/boyfriend/sex/event/cards/0.jpg">>
  78. <p>While playing with $telsob, two guys walk up your table.</p>
  79. "Would you lovely ladies care to join us in our room for a game of cards," one man offers.
  80. <p>$telsob says she does't mind, and looks at you for an answer.</p>
  81. <<act 'Refuse'>>
  82. <<gt 'kazinosvid' '3'>>
  83. <</act>>
  84. <<actCLA 'Agree'>>
  85. <<set $picrand = rand(14, 15)>>
  86. <<image 'characters/city/boyfriend/sex/event/cards/<<picrand>>.jpg'>>
  87. <<set $randkazinv = rand(0, 1)>>
  88. <<set $randkazinvsum = rand(100, 10000)>>
  89. <<if getvar("$randkazinv") == 1>>
  90. <<set $finances.cash += $randkazinvsum>>
  91. <p>These guys didn't stand a chance. You won randkazinvsum rubles. As you and $telsob are about to leave, the guys beg you stay: "Come on girls, you can't just take our money and run. Sit down have another drink. We have entertainments other than cards to offer."<br>From the bulge is his pants, It's pretty clear what kind of entertainment he has in mind.</p>
  92. <<set $telsobnastr = rand(0, 10)>>
  93. <<if getvar("$telsobnastr") < 4>>
  94. <p>No, it's time we were on our way," says $telsob. She takes you by the hand, and leads you out of the room.</p>
  95. <<act 'Finish'>>
  96. <<gt 'kazinosvid' '3'>>
  97. <</act>>
  98. <<else>>
  99. <p>"I wouldn't mind consoling the losers," says $telsob, with a lustful look in her eye. One of the men starts to unbutton his fly.</p>
  100. <<act 'Take $telsob and leave.'>>
  101. <<gt 'kazinosvid' '3'>>
  102. <</act>>
  103. <<actCLA 'Console the losers'>>
  104. <<set $kazsexdva = 1>>
  105. <<set $guy += 2>>
  106. <<set $gang += 1>>
  107. <<xgt 'sexdvanadva' 'var'>>
  108. <</actCLA>>
  109. <</if>>
  110. <<else>>
  111. Those guys were better card players than they looked. You lost <<randkazinvsum>> rubles to them.
  112. <<if $finances.cash < $randkazinvsum>>
  113. <p>You and $telsob don't even have enough money to pay them. It looks like you have no choice other than spreading your legs for them.</p>
  114. <<actCLA 'Pay them'>>
  115. <<set $kazsexdva = 1>>
  116. <<set $guy += 2>>
  117. <<set $gang += 1>>
  118. <<xgt 'sexdvanadva' 'var'>>
  119. <</actCLA>>
  120. <<else>>
  121. You have enough money to pay them, but the guys are obviously hinting that they would rather take another form of payment from you.
  122. <<if getvar("$telsobnastr") < 4>>
  123. <<set $finances.cash -= $randkazinvsum>>
  124. <p>"Here's your money, we are leaving," says $telsob. She takes you by the hand, and leads you out of the room.</p>
  125. <<act 'Finish'>>
  126. <<gt 'kazinosvid' '3'>>
  127. <</act>>
  128. <<else>>
  129. <p>"I wouldn't mind an alternative payment plan," says $telsob, smiling lasciviously.</p>
  130. <<actCLA 'Give them the money, and leave with $telsob.'>>
  131. <<set $finances.cash -= $randkazinvsum>>
  132. <<gt 'kazinosvid' '3'>>
  133. <</actCLA>>
  134. <<actCLA 'Use an alternative form of payment' undefined `{willpower:['misc','self','hard']}`>>
  135. <<set $kazsexdva = 1>>
  136. <<set $guy += 2>>
  137. <<set $gang += 1>>
  138. <<xgt 'sexdvanadva' 'var'>>
  139. <</actCLA>>
  140. <</if>>
  141. <</if>>
  142. <</if>>
  143. <</actCLA>>
  144. <</if>>
  145. <<if $location_var[$here][0] == '2'>>
  146. <<image "characters/city/boyfriend/sex/event/cards/0.jpg">>
  147. <p>While you are playing with $telsob, you attract the attention of a man.</p>
  148. <p>"Would you lovely ladies like to join me in my room for a private game?" he asks.</p>
  149. <p>$telsob says she does't mind, and looks at you for an answer.</p>
  150. <<act 'Refuse'>>
  151. <<gt 'kazinosvid' '3'>>
  152. <</act>>
  153. <<actCLA 'Agree'>>
  154. <<image "characters/city/boyfriend/sex/event/cards/3.jpg">>
  155. After arriving in his room, everyone sits on the bed and begins to play cards.
  156. A few minutes later the man says: "Let''s up the stakes. I'm willing to gamble with my clothing if you ladies are."
  157. <p>$telsob giggled, "You may end up naked and ashamed, $pc.name_nick and I haven't lost a hand yet."</p>
  158. "I have nothing to be ashamed of," the man grins.
  159. <<gs 'willpower' 'misc' 'self' 'medium'>>
  160. <<if $will_cost <= $pc.willpower>>
  161. <<actCLA 'Take $telsob and leave (will_cost Willpower)'>>
  162. <<gs 'willpower' 'pay' 'self'>>
  163. <<gt 'kazinosvid' '3'>>
  164. <</actCLA>>
  165. <<else>>
  166. <<actCLA `'Take <<$telsob>> and leave ('+$will_cost+')'`>><font color=red><br/>You don`t have enough willpower to use this action.</font><</actCLA>>
  167. <</if>>
  168. <<actCLA 'Play strip poker'>>
  169. <<image "characters/city/boyfriend/sex/event/cards/4.jpg">>
  170. <p>It's not until you and $telsob are down to your panties that you think this guy might have been sandbagging. He still has all his clothes!</p>
  171. <p>$telsob pouts, "I know we agreed, but you have to cheating."</p>
  172. The man replies: "Be a good girl and get those panties off. For the next round I'll even let you change cards, either way I feel like I've already won."
  173. <p>"Fine," $telsob says, with an exaggerated sigh. "$pc.name_nick help me remove my panties."</p>
  174. <<actCLA 'Keep playing'>>
  175. <<image "characters/city/boyfriend/sex/event/cards/5.jpg">>
  176. Minutes later, you are both naked, and he is standing in front of you with his pants down. It must''ve been the wine that lead you to this predicament.
  177. "Well ladies, it looks you're all out of clothes. There is only one thing you have left to offer as payment," he says, while slowly stroking himself.
  178. <<actCLA 'Go for it'>>
  179. <<set $guy += 1>>
  180. <<set $picrand = 23>>
  181. <<set $kazsexdva = 1>>
  182. <<gt 'podrsex' 'suck'>>
  183. <</actCLA>>
  184. <</actCLA>>
  185. <</actCLA>>
  186. <</actCLA>>
  187. <</if>>
  188. <<if $location_var[$here][0] == '3'>>
  189. <<set $pc.horny = 10>>
  190. <<set $time.minutes += 90>>
  191. <<image "characters/city/boyfriend/sex/event/cards/0.jpg">>
  192. <<if $telsob == $loverdesc[$lover_number]>>
  193. <p>After your fun, $telsob looks at you and waits for your next move.</p>
  194. <<act 'Say goodbye'>>
  195. <<gt 'city_industrial'>>
  196. <</act>>
  197. <<act 'Invite her to your home'>>
  198. <<gt 'lezbsex' 'startloverhome'>>
  199. <</act>>
  200. <<else>>
  201. <p>After your fun, $telsob says she has to go. She leaves you with a little kiss on the cheek.</p>
  202. <<act 'Leave'>>
  203. <<gt 'city_industrial'>>
  204. <</act>>
  205. <</if>>
  206. <</if>>