1
0

vecher.qsrc 14 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340
  1. # vecher
  2. if $ARGS[0] = 'start':
  3. *clr & cla
  4. $menu_loc = 'vecher'
  5. $menu_arg = 'start'
  6. menu_off = 0
  7. gs 'stat'
  8. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/vecher.jpg"></center>'
  9. 'You turn up to a Friday night party.'
  10. 'A large crowd gathers on the senior''s floor, some people looking for others to play<a href="exec:gt ''vecher'',''twister''">twister</a>.'
  11. gs 'willpower', 'drink', 'resist'
  12. if will_cost <= pcs_willpwr:
  13. act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'dorm', 'korr'
  14. else
  15. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  16. end
  17. act 'Dance':
  18. cla
  19. hour = 23
  20. gs 'drugs', 'alcohol', 'wine'
  21. gs 'drugs', 'alcohol', 'vodka'
  22. gs 'drugs', 'alcohol', 'beer'
  23. 'You have fun, drinking and dancing.'
  24. itrand = rand(1, 12)
  25. gt 'vecher', 'end<<itrand>>'
  26. end
  27. end
  28. if $ARGS[0] = 'end1':
  29. *clr & cla
  30. '<center><img <<$set_imgh>> src="images/locations/shared/party/itog.jpg"></center>'
  31. 'Gradually your steady alcohol intake gets the better of you and you spend the rest of the night in the bathroom, hugging the toilet'
  32. act 'Leave':gt 'dorm', 'korr'
  33. end
  34. if $ARGS[0] = 'end2':
  35. *clr & cla
  36. '<center><img <<$set_imgh>> src="images/shared/sex/kiss/kiss2.jpg"></center>'
  37. 'You danced and drank for a while before you had the idea to dance with Vika. Soon you ended up having a deep lesbian kiss under the flashing lights of the dance.'
  38. gs 'willpower', 'cuni', 'resist'
  39. if will_cost <= pcs_willpwr:
  40. act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'dorm', 'korr'
  41. else
  42. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  43. end
  44. act 'Get a room with Vika':
  45. cla
  46. if vikasex = 0: vikasex = 1
  47. $sexloc = 'obroom'
  48. gt 'lezbsex', 'start'
  49. end
  50. end
  51. if $ARGS[0] = 'end3':
  52. *clr & cla
  53. if pcs_apprnc < 80:
  54. '<center><img <<$set_imgh>> src="images/locations/shared/party/itog3.jpg"></center>'
  55. 'You stumbled into an open room and slept it off, listening to the sounds of hardcore sex from down the hall.'
  56. act 'Leave': gt 'dorm', 'korr'
  57. else
  58. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/vechend1.jpg"></center>'
  59. 'You stumbled into an open room and slept it off, listening to the sounds of hardcore sex from down the hall. You dream about fucking Vika, the fantasy so real that you can feel your legs spreading, the tongue on your clitoris. Opening your eyes you can see a few girls bent over your body, hands busy caressing you, while between your legs Vika skillfully used her tongue. "This needs to become reality," you think as you awake.'
  60. act 'Leave': gt 'dorm', 'korr'
  61. act 'Enjoy':
  62. *clr & cla
  63. if vikasex = 0: vikasex = 1
  64. orgasm += 1
  65. girl += 4
  66. lesbian += 1
  67. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/vechend2.jpg"></center>'
  68. 'You relax, allowing the girls to caress your body, periodically changing positions so another can take post at your pussy. Each of the girls settle into a rotation, trying to see who can trigger the most orgasms.'
  69. act 'Continue': gt 'vecher', 'end13'
  70. end
  71. end
  72. end
  73. if $ARGS[0] = 'end4':
  74. *clr & cla
  75. '<center><img <<$set_imgh>> src="images/locations/shared/party/itog4.jpg"></center>'
  76. 'You get drunk and begin to molest the other girls. Before you realise it your top is pulled down to show your breasts and Vika is licking and sucking at your breasts in front of everyone.'
  77. gs 'willpower', 'cuni', 'resist'
  78. if will_cost <= pcs_willpwr:
  79. act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'dorm', 'korr'
  80. else
  81. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  82. end
  83. act 'Go with Vika to an empty room':
  84. cla
  85. if vikasex = 0: vikasex = 1
  86. $sexloc = 'obroom'
  87. gt 'lezbsex', 'start'
  88. end
  89. end
  90. if $ARGS[0] = 'end5':
  91. *clr & cla
  92. guy += 1
  93. stat['vaginal'] += 1
  94. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog5.jpg"></center>'
  95. 'You wake up on the floor in the hallway, half way to your room. Panting over your body is a pimply young man, dick inside you, trying to fuck your vagina careful so you wouldn''t wake up. Noticing that you''re awake, he quickly jumps to his feet and runs off, leaving you lying confused and naked on the dirty floor.'
  96. act 'Leave': gt 'dorm', 'korr'
  97. end
  98. if $ARGS[0] = 'end6':
  99. *clr & cla
  100. '<center><img <<$set_imgh>> src="images/locations/shared/party/itog6.jpg"></center>'
  101. 'You spent all evening molesting a girl with big tits, begging her to let you kiss them. Eventually you both got so drunk you were allowed to bury your face in her cleavage and motorboat her.'
  102. act 'Leave': gt 'dorm', 'korr'
  103. end
  104. if $ARGS[0] = 'end7':
  105. *clr & cla
  106. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog7.jpg"></center>'
  107. 'You don''t know how or when your dancing became a striptease but the alcohol has plainly done its job. You begin to become lewder and lewder, swaying on your feet before collapsing into a man''s lap on the couch. Scarely believing his luck he wasted no time in grabbing at your breasts, pinching your nipples.'
  108. gs 'willpower', 'sex', 'resist'
  109. if will_cost <= pcs_willpwr:
  110. act 'Leave him blueballed (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'dorm', 'korr'
  111. else
  112. act 'Leave him blueballed (<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. act 'Remove panties':
  115. *clr & cla
  116. guy += 1
  117. stat['bj'] += 1
  118. stat['vaginal'] += 1
  119. spafinloc = 4
  120. gs 'cum_manage'
  121. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog71.jpg"></center>'
  122. 'You get up off the man''s lap to finish your stripping, shuffling out of your panties drunkenly, almost toppling over again. Catching a glimpse of your pussy the man hastens to strip off too, fumbling with his flies.'
  123. act 'Suck':
  124. *clr & cla
  125. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog72.jpg"></center>'
  126. 'You go down on your knees and clasp his member greedily between your lips, starting to move back and forth on his length, slurping noisily, ignoring the crowd in the rest of the room. The man seems to want more however, wrapping his fingers in your hair and starting to drag your head back and forth, using your mouth to masturbate.'
  127. act 'Further':
  128. *clr & cla
  129. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog73.jpg"></center>'
  130. 'With his cock rock hard and nicely wet he lifted you bodily and turned you around, pushing you into the sofa doggystyle, shoving himself into your pussy and starting to pound away not caring about your enjoyment, just fucking. The crowd gathered to view the show calling out encouragements and suggestions on how best to fuck you. The guy pounding you keeps it up for a long time, too drunk to do the deed properly.'
  131. act 'Further':
  132. *clr & cla
  133. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog74.jpg"></center>'
  134. 'Just when you start to get tired of his thrusting he tugs his dick out of your aching puss, shooting a few meagre ropes of cum onto your buttocks. Scooping up your clothes from the floor you follow him to his room to sleep it off.'
  135. act 'Leave':gt 'dorm', 'korr'
  136. end
  137. end
  138. end
  139. end
  140. end
  141. if $ARGS[0] = 'end8':
  142. *clr & cla
  143. '<center><img <<$set_imgh>> src="images/locations/shared/party/sex/itog8.jpg"></center>'
  144. 'You head out into one of the rooms with Vika, who soon started kissing and then fucking an unknown guy. You spent a few minutes lying next to Vika, having fun chatting with her while a drunk stranger pounds away at her.'
  145. gs 'willpower', 'voyeur', 'resist'
  146. if will_cost <= pcs_willpwr:
  147. act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'dorm', 'korr'
  148. else
  149. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  150. end
  151. act 'Caress Vika':
  152. *clr & cla
  153. if vikasex = 0: vikasex = 1
  154. girl += 1
  155. lesbian += 1
  156. pcs_horny += 60
  157. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog81.jpg"></center>'
  158. 'You kiss and fondle at Vika''s breasts, making her wriggle and moan, soon offering to reward you with some cunnilingus.'
  159. if pcs_horny < 100: 'You soon tire of the licking, wanting to get on with something else'
  160. if pcs_horny >= 100: pcs_horny = 0 & orgasm += 1 & 'The muscles of your vagina start to clench and ripple with pleasure, a warm wave of pleasure suffusing your lower body as you howl in orgasm'
  161. 'The stranger tugs his dick out of Vika with a wet schlurp and lifts his body to press it into her mouth.'
  162. act 'Watch':
  163. *clr & cla
  164. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog82.jpg"></center>'
  165. 'The man cums in Vika''s mouth with a sudder, prompting her to open her mouth and show off her creamy treat. You want to taste...'
  166. act 'Kiss Vika':
  167. *clr & cla
  168. spafinloc = 12
  169. gs 'cum_manage'
  170. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog83.jpg"></center>'
  171. 'You spend a couple of moments making out and snowballing the cum between the two of you.'
  172. act 'Leave': gt 'dorm', 'korr'
  173. end
  174. end
  175. act 'Share the dick':
  176. *clr & cla
  177. stat['bj'] += 1
  178. guy += 1
  179. spafinloc = 11
  180. gs 'cum_manage'
  181. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog84.jpg"></center>'
  182. 'You suck and lick the dick together, working as a team until the man climaxes across your faces and tongues.'
  183. act 'Kissing with Vika':
  184. *clr & cla
  185. spafinloc = 12
  186. gs 'cum_manage'
  187. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog83.jpg"></center>'
  188. 'You spend a couple of moments making out and snowballing the cum between the two of you.'
  189. act 'Leave': gt 'dorm', 'korr'
  190. end
  191. end
  192. end
  193. end
  194. if $ARGS[0] = 'end9':
  195. cla
  196. '<center><img <<$set_imgh>> src="images/locations/shared/party/sex/itog9.jpg"></center>'
  197. 'Girls love to have fun, particularly drunken ones. You and two new girlfriends you met spend the parting kissing and carressing each other, drawing a lot of admiring glances.'
  198. act 'Leave': gt 'dorm', 'korr'
  199. end
  200. if $ARGS[0] = 'end10':
  201. cla
  202. '<center><img <<$set_imgh>> src="images/locations/shared/party/itog10.jpg"></center>'
  203. 'You get drunk and dance with some stranger who spends the whole time pawing at your tits and making dirty comments.'
  204. gs 'willpower', 'misc', 'resist'
  205. if will_cost <= pcs_willpwr:
  206. act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'dorm','korr'
  207. else
  208. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  209. end
  210. act 'Grab his crotch':
  211. $sexloc = 'obroom'
  212. gs 'npcgeneratec', 0, 'stranger from a party', rand(18,28)
  213. gs 'boyStat', $npclastgenerated
  214. picrand = rand(20,40)
  215. gt 'sex', 'start'
  216. end
  217. end
  218. if $ARGS[0] = 'end11':
  219. *clr & cla
  220. spafinloc = 7
  221. gs 'cum_manage'
  222. '<center><img <<$set_imgh>> src="images/locations/shared/party/skirtcum.jpg"></center>'
  223. 'You wake up in a strange room, lying on a man''s stomach, thankfully still dressed although this hangover is killing you.'
  224. 'As you sit up you notice something wet on your butt. What a bastard, he dragged you into some random room and came on your clothes.'
  225. act 'Leave': gt 'dorm', 'korr'
  226. end
  227. if $ARGS[0] = 'end12':
  228. *clr & cla
  229. minut += 15
  230. picrand = RAND(1,5)
  231. '<center><img <<$set_imgh>> src="images/locations/city/island/university/college_ass_show<<picrand>>.jpg"></center>'
  232. 'All girls love to party. You and a few others get drunk and decide to host a contest for who has the best ass.'
  233. act 'Leave': gt 'dorm', 'korr'
  234. end
  235. if $ARGS[0] = 'end13':
  236. *clr & cla
  237. minut += 15
  238. picrand = rand(3, 9)
  239. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/vechend<<picrand>>.jpg"></center>'
  240. 'All mixed up in a big ball of women''s bodies, you can''t remember the name of the girl your fingers are exploring, or put a face to the taste on your tongue, nor identify who is delving into your pussy.'
  241. act 'More': gt 'vecher', 'end13'
  242. act 'Leave': gt 'dorm', 'korr'
  243. end
  244. if $ARGS[0] = 'twister':
  245. *clr & cla
  246. hour = 23
  247. '<center><img <<$set_imgh>> src="images/locations/city/island/university/twister0.jpg"></center>'
  248. 'You join a game. Everyone has fun, a heated competition developing as the bodies tangle together.'
  249. 'After a couple of rounds one of the spectators drunkenly calls out that everyone should play naked and soon the whole crowd is chanting it.'
  250. gs 'willpower', 'exhib', 'resist', 'easy'
  251. if will_cost <= pcs_willpwr:
  252. act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'dorm', 'korr'
  253. else
  254. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  255. end
  256. act 'Undress': gt 'vecher', 'twister_nude'
  257. end
  258. if $ARGS[0] = 'twister_nude':
  259. *clr & cla
  260. minut += 15
  261. pcs_horny += 30
  262. picrand = RAND(1,8)
  263. '<center><img <<$set_imgh>> src="images/locations/city/island/university/twister<<picrand>>.jpg"></center>'
  264. 'You undress and continue to play, making sure to take the most difficult and exposing postures you can. Throughout the game you feel a lot of hands groping and carressing your body, warm bodies pressed tight into yours.'
  265. twister_rand = rand(1,3)
  266. if twister_rand = 1:
  267. cla
  268. act 'Leave': gt 'dorm', 'korr'
  269. end
  270. if twister_rand = 2:
  271. cla
  272. act 'Leave': gt 'dorm', 'korr'
  273. end
  274. if twister_rand = 3:
  275. cla
  276. act 'Leave': gt 'dorm', 'korr'
  277. end
  278. act 'Leave': gt 'dorm', 'korr'
  279. end
  280. --- vecher ---------------------------------