vecher.qsrc 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293
  1. # vecher
  2. !!2021/08/13
  3. if $ARGS[0] = 'start':
  4. *clr & cla
  5. $menu_loc = 'vecher'
  6. $menu_arg = 'start'
  7. menu_off = 0
  8. gs 'stat'
  9. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/vecher.jpg"></center>'
  10. 'You turn up to a Friday night party.'
  11. 'A large crowd gathers on the senior''s floor.'
  12. gs 'willpower', 'drink', 'resist'
  13. if will_cost <= pcs_willpwr:
  14. act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'uni_dorm', 'tenth_floor'
  15. else
  16. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  17. end
  18. act 'Dance':
  19. cla
  20. hour = 23
  21. gs 'drugs', 'alcohol', 'wine'
  22. gs 'drugs', 'alcohol', 'vodka'
  23. gs 'drugs', 'alcohol', 'beer'
  24. 'You have fun, drinking and dancing.'
  25. itrand = rand(1, 12)
  26. gt 'vecher', 'end<<itrand>>'
  27. end
  28. end
  29. if $ARGS[0] = 'end1':
  30. *clr & cla
  31. '<center><img <<$set_imgh>> src="images/locations/shared/party/itog.jpg"></center>'
  32. 'Gradually, your steady alcohol intake gets the better of you, and you spend the rest of the night in the bathroom, hugging the toilet'
  33. act 'Leave':gt 'uni_dorm', 'tenth_floor'
  34. end
  35. if $ARGS[0] = 'end2':
  36. *clr & cla
  37. '<center><img <<$set_imgh>> src="images/shared/sex/kiss/kiss2.jpg"></center>'
  38. 'You dance and drink for a while before you have the idea to dance with Vika. Soon you end up having a deep lesbian kiss under the flashing lights of the dance.'
  39. gs 'willpower', 'cuni', 'resist'
  40. if will_cost <= pcs_willpwr:
  41. act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'uni_dorm', 'tenth_floor'
  42. else
  43. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  44. end
  45. act 'Get a room with Vika':
  46. cla
  47. if vikasex = 0: vikasex = 1
  48. $sexloc = 'uni_dorm'
  49. gt 'lezbsex', 'start'
  50. end
  51. end
  52. if $ARGS[0] = 'end3':
  53. *clr & cla
  54. if pcs_apprnc < 80:
  55. '<center><img <<$set_imgh>> src="images/locations/shared/party/itog3.jpg"></center>'
  56. 'You stumble into an open room and sleep it off, listening to the sounds of hardcore sex from down the hall.'
  57. act 'Leave': gt 'uni_dorm', 'tenth_floor'
  58. else
  59. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/vechend1.jpg"></center>'
  60. 'You stumble into an open room and sleep 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, her tongue on your clitoris. Opening your eyes, you see a few girls bent over your body, hands busy caressing you, while between your legs Vika skillfully uses her tongue. "This needs to become reality," you think as you awaken.'
  61. act 'Leave': gt 'uni_dorm', 'tenth_floor'
  62. act 'Enjoy':
  63. *clr & cla
  64. if vikasex = 0: vikasex = 1
  65. orgasm += 1
  66. girl += 4
  67. lesbian += 1
  68. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/vechend2.jpg"></center>'
  69. 'You relax, allowing the girls to caress your body. Periodically changing positions so another can take post at your pussy, they settle into a rotation, trying to see who can trigger the most orgasms.'
  70. act 'Continue': gt 'vecher', 'end13'
  71. end
  72. end
  73. end
  74. if $ARGS[0] = 'end4':
  75. *clr & cla
  76. '<center><img <<$set_imgh>> src="images/locations/shared/party/itog4.jpg"></center>'
  77. 'You get drunk and begin to molest the other girls. Before you realize it, your top is pulled down to show your breasts, and Vika is licking and sucking at them in front of everyone.'
  78. gs 'willpower', 'cuni', 'resist'
  79. if will_cost <= pcs_willpwr:
  80. act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'uni_dorm', 'tenth_floor'
  81. else
  82. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  83. end
  84. act 'Go with Vika to an empty room':
  85. cla
  86. if vikasex = 0: vikasex = 1
  87. $sexloc = 'uni_dorm'
  88. gt 'lezbsex', 'start'
  89. end
  90. end
  91. if $ARGS[0] = 'end5':
  92. *clr & cla
  93. guy += 1
  94. stat['vaginal'] += 1
  95. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog5.jpg"></center>'
  96. 'You wake up on the floor in the hallway, halfway to your room. Panting over your body is a pimply young man, dick inside you, trying to fuck your vagina carefully so you don''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.'
  97. act 'Leave': gt 'uni_dorm', 'tenth_floor'
  98. end
  99. if $ARGS[0] = 'end6':
  100. *clr & cla
  101. '<center><img <<$set_imgh>> src="images/locations/shared/party/itog6.jpg"></center>'
  102. 'You spend all evening molesting a girl with big tits, begging her to let you kiss them. Eventually, you both get so drunk she allows you to bury your face in her cleavage and motorboat her.'
  103. act 'Leave': gt 'uni_dorm', 'tenth_floor'
  104. end
  105. if $ARGS[0] = 'end7':
  106. *clr & cla
  107. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog7.jpg"></center>'
  108. '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. Scarcely believing his luck, he wastes no time in grabbing at your breasts, pinching your nipples.'
  109. gs 'willpower', 'sex', 'resist'
  110. if will_cost <= pcs_willpwr:
  111. act 'Leave him blueballed (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'uni_dorm', 'tenth_floor'
  112. else
  113. 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>'
  114. end
  115. act 'Remove your panties':
  116. *clr & cla
  117. guy += 1
  118. stat['bj'] += 1
  119. stat['vaginal'] += 1
  120. spafinloc = 4
  121. gs 'cum_manage'
  122. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog71.jpg"></center>'
  123. '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 his clothes too, fumbling with his fly.'
  124. act 'Suck':
  125. *clr & cla
  126. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog72.jpg"></center>'
  127. 'Getting down on your knees and clasping his member greedily between your lips, you start 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.'
  128. act 'Further':
  129. *clr & cla
  130. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog73.jpg"></center>'
  131. 'With his cock rock-hard and nicely wet, he lifts you bodily and turns you around, pushing you into the sofa doggystyle. He shoves himself into your pussy and starts to pound away, not caring about your enjoyment, just fucking. A crowd gathers 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.'
  132. act 'Further':
  133. *clr & cla
  134. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog74.jpg"></center>'
  135. 'Just when you start to get tired of his thrusting, he tugs his dick out of your aching puss, shooting a few meager ropes of cum onto your buttocks. Scooping up your clothes from the floor, you follow him to his room to sleep it off.'
  136. act 'Leave':gt 'uni_dorm', 'tenth_floor'
  137. end
  138. end
  139. end
  140. end
  141. end
  142. if $ARGS[0] = 'end8':
  143. *clr & cla
  144. '<center><img <<$set_imgh>> src="images/locations/shared/party/sex/itog8.jpg"></center>'
  145. 'You head out into one of the rooms with Vika, who soon starts kissing and then fucking an unknown guy. You spend a few minutes lying next to Vika, having fun chatting with her while a drunk stranger pounds away at her.'
  146. gs 'willpower', 'voyeur', 'resist'
  147. if will_cost <= pcs_willpwr:
  148. act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'uni_dorm', 'tenth_floor'
  149. else
  150. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  151. end
  152. act 'Caress Vika':
  153. *clr & cla
  154. if vikasex = 0: vikasex = 1
  155. girl += 1
  156. lesbian += 1
  157. pcs_horny += 60
  158. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog81.jpg"></center>'
  159. 'You kiss and fondle at Vika''s breasts, making her wriggle and moan. She soon offers to reward you with some cunnilingus.'
  160. if pcs_horny < 100: 'You soon tire of the licking, wanting to get on with something else.'
  161. 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.'
  162. 'The stranger tugs his dick out of Vika with a wet schlurp and lifts his body to press it into her mouth.'
  163. act 'Watch':
  164. *clr & cla
  165. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog82.jpg"></center>'
  166. 'The man cums in Vika''s mouth with a shudder, prompting her to open her mouth and show off her creamy treat. You want to taste...'
  167. act 'Kiss Vika':
  168. *clr & cla
  169. spafinloc = 12
  170. gs 'cum_manage'
  171. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog83.jpg"></center>'
  172. 'You spend a couple of moments making out and snowballing the cum between the two of you.'
  173. act 'Leave': gt 'uni_dorm', 'tenth_floor'
  174. end
  175. end
  176. act 'Share the dick':
  177. *clr & cla
  178. stat['bj'] += 1
  179. guy += 1
  180. spafinloc = 11
  181. gs 'cum_manage'
  182. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog84.jpg"></center>'
  183. 'You suck and lick the dick together, working as a team until the man climaxes across your faces and tongues.'
  184. act 'Kiss Vika':
  185. *clr & cla
  186. spafinloc = 12
  187. gs 'cum_manage'
  188. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/itog83.jpg"></center>'
  189. 'You spend a couple of moments making out and snowballing the cum between the two of you.'
  190. act 'Leave': gt 'uni_dorm', 'tenth_floor'
  191. end
  192. end
  193. end
  194. end
  195. if $ARGS[0] = 'end9':
  196. cla
  197. '<center><img <<$set_imgh>> src="images/locations/shared/party/sex/itog9.jpg"></center>'
  198. 'Girls love to have fun, particularly drunken ones. You and two new girlfriends you met spend the party kissing and caressing each other, drawing a lot of admiring glances.'
  199. act 'Leave': gt 'uni_dorm', 'tenth_floor'
  200. end
  201. if $ARGS[0] = 'end10':
  202. cla
  203. '<center><img <<$set_imgh>> src="images/locations/shared/party/itog10.jpg"></center>'
  204. 'You get drunk and dance with some stranger who spends the whole time pawing at your tits and making dirty comments.'
  205. gs 'willpower', 'foreplay', 'resist'
  206. if will_cost <= pcs_willpwr:
  207. act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'uni_dorm','korr'
  208. else
  209. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  210. end
  211. act 'Grab his crotch':
  212. $sexloc = 'uni_dorm'
  213. gs 'npcgeneratec', 0, 'stranger from a party', rand(18,28)
  214. gs 'boyStat', $npclastgenerated
  215. picrand = rand(20,40)
  216. gt 'sex', 'start'
  217. end
  218. end
  219. if $ARGS[0] = 'end11':
  220. *clr & cla
  221. spafinloc = 7
  222. gs 'cum_manage'
  223. '<center><img <<$set_imgh>> src="images/locations/shared/party/skirtcum.jpg"></center>'
  224. 'You wake up in a strange room, lying on a man''s stomach, thankfully still dressed although your hangover is killing you.'
  225. '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.'
  226. act 'Leave': gt 'uni_dorm', 'tenth_floor'
  227. end
  228. if $ARGS[0] = 'end12':
  229. *clr & cla
  230. minut += 15
  231. picrand = rand(3, 9)
  232. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/sex/party/vechend<<picrand>>.jpg"></center>'
  233. 'All mixed up in a big ball of women''s bodies, you can''t remember the name of the girl your fingers are exploring, put a face to the taste on your tongue, or identify who is delving into your pussy.'
  234. act 'More': gt 'vecher', 'end12'
  235. act 'Leave': gt 'uni_dorm', 'tenth_floor'
  236. end
  237. --- vecher ---------------------------------