frot.qsrc 14 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466
  1. # frot
  2. menu_off = 1
  3. if $ARGS[0] = 'a':
  4. cla
  5. *clr
  6. svol = rand(30,50)
  7. spot = 500*rand(16,24)
  8. gs 'stat'
  9. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frot.jpg"></center>'
  10. 'You feel something solid against your ass, stirring you realize that rising up between your buttocks a penis comes to rest.'
  11. act 'Move away':gt 'frot', 'fin'
  12. act 'Disregard':
  13. cla
  14. *clr
  15. clr
  16. gs 'stat'
  17. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frot1.jpg"></center>'
  18. 'The guy standing behind you, with no regard for other passengers, grabs your butt with his hand and presses his member harder against your ass.'
  19. gs 'arousal', 'foreplay', 5, 'sub'
  20. gs 'stat'
  21. act 'Move away':gt 'frot', 'fin'
  22. act 'Disregard':
  23. cla
  24. *clr
  25. clr
  26. gs 'stat'
  27. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frot2.jpg"></center>'
  28. 'You feel like the man behind you has got his penis out and begun to rub it on your ass, clinging on to you and squeezing your buttocks with his hands.'
  29. gs 'arousal', 'foreplay', 5, 'sub'
  30. gs 'stat'
  31. act 'Move away':gt 'frot', 'fin'
  32. act 'Disregard':
  33. cla
  34. *clr
  35. pcs_horny += 10
  36. frot += 1
  37. gs 'cum_call', 'pantyrear', 'stranger on the metro', 0, 0, spot, svol
  38. sub += 3
  39. dynamic '<<$clothingworntype>>H[<<clothingwornnumber>>] -= 1'
  40. clr
  41. gs 'stat'
  42. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotc1.jpg"></center>'
  43. 'The man jerks back and you feel something warm and viscous flow over you. The guy finished you on your ass, then moved away to another section.'
  44. act 'Get out of the car':gt 'frot', 'fin2'
  45. end
  46. end
  47. end
  48. end
  49. if $ARGS[0] = 'b':
  50. cla
  51. *clr
  52. svol = rand(30,50)
  53. spot = 500*rand(16,24)
  54. gs 'stat'
  55. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frot.jpg"></center>'
  56. 'You feel something solid against your ass, stirring you realize that rising up between your buttocks a penis comes to rest.'
  57. act 'Move away':gt 'frot', 'fin'
  58. act 'Disregard':
  59. cla
  60. *clr
  61. clr
  62. gs 'stat'
  63. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frot1.jpg"></center>'
  64. 'The guy standing behind you, with no regard for other passengers, grabs your butt with his hand and presses his member harder against your ass.'
  65. gs 'arousal', 'foreplay', 5, 'sub'
  66. gs 'stat'
  67. act 'Move away':gt 'frot', 'fin'
  68. act 'Disregard':
  69. cla
  70. *clr
  71. clr
  72. gs 'stat'
  73. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frota1.jpg"></center>'
  74. 'The man lifts your skirt and starts to caress your bare buttocks with his strong hands.'
  75. gs 'arousal', 'foreplay', 5, 'sub'
  76. gs 'stat'
  77. act 'Move away':gt 'frot', 'fin'
  78. act 'Disregard':
  79. cla
  80. *clr
  81. pcs_horny += 10
  82. sub += 1
  83. clr
  84. gs 'stat'
  85. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frota2.jpg"></center>'
  86. 'The man lowers your panties and slides his hand between your naked buttocks to caress your wet pussy.'
  87. gs 'arousal', 'vaginal_finger', 5, 'sub'
  88. gs 'stat'
  89. act 'Move away':gt 'frot', 'fin'
  90. act 'Disregard':
  91. *clr & cla
  92. gs 'stat'
  93. frot += 1
  94. gs 'cum_call', 'clothesgroin', 'stranger on the metro', 0, 0, spot, svol
  95. dynamic '<<$clothingworntype>>H[<<clothingwornnumber>>] -= 1'
  96. gs 'stat'
  97. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotc2.jpg"></center>'
  98. 'The man pull your panties down to your knees, then letting your skirt fall back into place takes your hand in his. He forces his dick into your hand.'
  99. 'You cup the hot and hard cock and begin stroking it. After a couple of minutes you feel the man cumming on your skirt.'
  100. gs 'arousal', 'hj', 5, 'sub'
  101. gs 'stat'
  102. act 'Get out of the car':gt 'frot', 'fin2'
  103. end
  104. end
  105. end
  106. end
  107. end
  108. if $ARGS[0] = 'c':
  109. cla
  110. *clr
  111. svol = rand(30,50)
  112. spot = 500*rand(16,24)
  113. gs 'stat'
  114. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp.jpg"></center>'
  115. 'You feel a man standing behind you start poking his hand down the back of your pants.'
  116. act 'Move away':gt 'frot', 'fin'
  117. act 'Disregard':
  118. cla
  119. *clr
  120. gs 'stat'
  121. !!Image needed '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp1.jpg"></center>'
  122. 'You enjoy the nice sensation of the stranger caressing your ass under your pants, when suddenly you see he has pulled out a small pair of scissors and is trying to reach your bra strap.'
  123. gs 'arousal', 'foreplay', 5, 'sub'
  124. gs 'stat'
  125. act 'Move away':gt 'frot', 'fin'
  126. act 'Disregard':
  127. cla
  128. *clr
  129. gs 'bras', 'dispose'
  130. clr
  131. gs 'stat'
  132. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp2.jpg"></center>'
  133. 'The man cut the straps of your bra and removes it from you. Freed from your bra, he now fondles your breasts.'
  134. gs 'arousal', 'foreplay', 5, 'sub'
  135. gs 'stat'
  136. act 'Move away':gt 'frot', 'fin'
  137. act 'Enjoy':
  138. cla
  139. *clr
  140. gs 'arousal', 'foreplay', 5, 'sub'
  141. clr
  142. gs 'stat'
  143. !!Image needed '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp3.jpg"></center>'
  144. if PCloSkirt = 0:
  145. 'You are bent forward and the man begins to caress your ass, you feel his hands clutching your pants trying to tear them.'
  146. else
  147. 'You are bent forward and the man begins to caress your ass, you feel his hands start to lift your skirt.'
  148. end
  149. act 'Move away':gt 'frot', 'fin'
  150. act 'Allow him':
  151. cla
  152. *clr
  153. pcs_horny += 10
  154. clr
  155. gs 'stat'
  156. pcs_horny += 10
  157. sub += 2
  158. dynamic '<<$clothingworntype>>H[<<clothingwornnumber>>] -= 5'
  159. clr
  160. gs 'stat'
  161. !!Image needed '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp4.jpg"></center>'
  162. if PCloSkirt = 0:
  163. 'The man rips your pants between your legs, thereby exposing your wet pussy.'
  164. elseif $pantyworntype = 'none':
  165. 'The man raises your skirt and you feel his hard cock brushing against your pussy lips.'
  166. else
  167. 'The man rips aside your panties, thereby exposing your wet pussy.'
  168. end
  169. if pcs_dom > 0:act 'Move away':gt 'frot', 'fin'
  170. act 'Submit':
  171. cla
  172. *clr
  173. !!Image needed '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp5.jpg"></center>'
  174. if stat['vaginal'] = 0:
  175. 'The idea of letting some stranger take your virginity makes you feel like a dirty slut, but also excites you more than you care to admit.'
  176. end
  177. 'You widen your stance as much as possible in the crowded car and push back against him as he thrusts into your sweaty pussy.'
  178. if pcs_horny >= 100:
  179. pcs_mood += 15
  180. pcs_willpwr += 15
  181. $orgasm_or = 'custom'
  182. $orgasm_txt = 'The wild excitement of sex with a stranger in a public place is too much and you start to cum almost immediately as he enters you.'
  183. else
  184. $orgasm_or = 'custom'
  185. $orgasm_txt = 'You are overwhelmed by the wild excitement of sex with a stranger in a public place.'
  186. end
  187. guy += 1
  188. pcs_vag += 1
  189. cumprecheck = 1
  190. gs 'cum_call', '', 'stranger on the metro', 0, 0, spot, svol
  191. gs 'arousal', 'vaginal', 5, 'sub'
  192. gs 'stat'
  193. if pcs_dom > 0:act 'Move away':gt 'frot', 'fin'
  194. act 'Further':
  195. cla
  196. *clr
  197. sub += 3
  198. pcs_horny += 10
  199. frot += 1
  200. gs 'cum_call', '', 'stranger on the metro', 0, 0, spot, svol
  201. gs 'stat'
  202. !!Image needed '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp6.jpg"></center>'
  203. 'The stranger does not pull out of your pussy, your juices flow and he finishes inside you. You feel like a strong jet of sperm filled your uterus.'
  204. gs 'cuminsidereact', 'some guy whose face you haven''t even seen'
  205. act 'Get out of the car':gt 'frot', 'fin2'
  206. end
  207. end
  208. end
  209. end
  210. end
  211. end
  212. end
  213. if $ARGS[0] = 'd':
  214. cla
  215. *clr
  216. svol = rand(30,50)
  217. spot = 500*rand(16,24)
  218. gs 'stat'
  219. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp.jpg"></center>'
  220. 'You feel a man standing behind you start poking his hand down the back of your pants.'
  221. act 'Move away':gt 'frot', 'fin'
  222. act 'Disregard':
  223. cla
  224. *clr
  225. clr
  226. gs 'stat'
  227. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd.jpg"></center>'
  228. 'The man pulls your pants off you leaving you with a bare ass in a crowded subway car, he takes your hand and makes you hold his penis in your hand.'
  229. gs 'arousal', 'foreplay', 5, 'sub'
  230. gs 'stat'
  231. act 'Move away':gt 'frot', 'fin'
  232. act 'Stroke his cock':
  233. cla
  234. *clr
  235. gs 'cum_call', 'butt', 'stranger on the metro', 0, 0, spot, svol
  236. frot += 1
  237. clr
  238. gs 'stat'
  239. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd1.jpg"></center>'
  240. 'You caress his dick and rub it on your bare skin, you rub it more vigorously as it stiffens and sperm splashes onto your bare ass. After the man was satisfied, he pulls your pants over your sperm covered ass, pats you on the bum and disappears.'
  241. gs 'arousal', 'hj', 5, 'sub'
  242. gs 'stat'
  243. act 'Get out of the car':gt 'frot', 'fin2'
  244. end
  245. end
  246. end
  247. if $ARGS[0] = 'e':
  248. cla
  249. *clr
  250. svol = rand(30,50)
  251. spot = 500*rand(16,24)
  252. gs 'stat'
  253. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp.jpg"></center>'
  254. 'You feel a man standing behind you start poking his hand down the back of your pants.'
  255. act 'Move away':gt 'frot', 'fin'
  256. act 'Disregard':
  257. cla
  258. *clr
  259. clr
  260. gs 'stat'
  261. !!Image needed '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote.jpg"></center>'
  262. 'The man pulls your pants off you leaving you with a bare ass in a crowded subway car, you feel his hand reach between your legs and start to masturbate your pussy from behind.'
  263. gs 'arousal', 'vaginal_finger', 5, 'sub'
  264. gs 'stat'
  265. if pcs_horny >= 90:
  266. pcs_mood += 15
  267. pcs_willpwr += 15
  268. $orgasm_or = 'custom'
  269. $orgasm_txt = 'You can''t take any more and you explode in a powerful orgasm. Your legs give way.'
  270. act 'Squat':
  271. cla
  272. *clr
  273. pcs_horny += 10
  274. clr
  275. gs 'stat'
  276. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote1.jpg"></center>'
  277. 'You can no longer stand and squat. The man moves to your side, pulls out his member and taking you head in his hand, turns your face to meet it.'
  278. if pcs_dom > 0:act 'Move away':gt 'frot', 'fin'
  279. act 'Suck it':
  280. cla
  281. *clr
  282. guy += 1
  283. frot += 1
  284. clr
  285. gs 'stat'
  286. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote2.jpg"></center>'
  287. 'The man taunts you by bringing his cock to your lips, then moving back. Soon, timing it just right, you catch his purple head between your lips.'
  288. 'You obediently suck his hard cock. You are sitting on your haunches in the middle of a crowded subway car and sucking a stranger dick.'
  289. gs 'arousal', 'bj', 5, 'sub'
  290. gs 'stat'
  291. if pcs_dom > 0:act 'Move away':gt 'frot', 'fin'
  292. act 'Continue to suck':
  293. cla
  294. *clr
  295. pcs_horny += 10
  296. gs 'cum_call', 'face', 'stranger on the metro', 0, 0, spot, svol
  297. facial += 1
  298. sub += 3
  299. clr
  300. gs 'stat'
  301. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote3.jpg"></center>'
  302. 'The man pulls his cock out of your mouth and ends against your lips, hot cum splatters on your lips chin.'
  303. if pcs_dom > 0:act 'Move away':gt 'frot', 'fin'
  304. act 'Sit on the floor':
  305. cla
  306. *clr
  307. pcs_horny += 10 + sub
  308. gs 'cum_call', 'mouth', 'stranger on the metro', 0, 0, spot, svol
  309. swallow += 1
  310. sub += 3
  311. gs 'stat'
  312. !!Image needed '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote4.jpg"></center>'
  313. 'Male fingers collect the sperm from your face and they push into your mouth, and you dutifully lick them and swallow the sperm.'
  314. act 'Get out of the car':gt 'frot', 'fin2'
  315. end
  316. end
  317. end
  318. end
  319. exit
  320. else
  321. 'You are very nervous the thought crosses your mind to masturbate his penis.'
  322. act 'Stroke his cock':
  323. cla
  324. *clr
  325. gs 'cum_call', 'butt', 'stranger from the metro', 0, 0, spot, svol
  326. frot += 1
  327. clr
  328. gs 'stat'
  329. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd1.jpg"></center>'
  330. 'You caress his dick and rub it on your bare skin, you rub it more vigorously as it stiffens and sperm splashes onto your bare ass. After the man was satisfied, he pulls your pants over your sperm covered ass, pats you on the bum and disappears.'
  331. gs 'arousal', 'hj', 5, 'sub'
  332. gs 'stat'
  333. act 'Get out of the car':gt 'frot', 'fin2'
  334. end
  335. end
  336. end
  337. end
  338. if $ARGS[0] = 'd1':
  339. cla
  340. *clr
  341. svol = rand(30,50)
  342. spot = 500*rand(16,24)
  343. gs 'stat'
  344. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd2.jpg"></center>'
  345. 'You feel a man standing behind you playing with your skirt.'
  346. act 'Move away':gt 'frot', 'fin'
  347. act 'Disregard':
  348. cla
  349. *clr
  350. clr
  351. gs 'stat'
  352. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd.jpg"></center>'
  353. 'The man pulls your pants off you leaving you with a bare ass in a crowded subway car, he takes your hand and makes you take his penis in your hand.'
  354. gs 'arousal', 'foreplay', 5, 'sub'
  355. gs 'stat'
  356. act 'Move away':gt 'frot', 'fin'
  357. act 'Stroke his cock':
  358. cla
  359. *clr
  360. gs 'cum_call', 'butt', 'stranger on the metro', 0, 0, spot, svol
  361. frot += 1
  362. clr
  363. gs 'stat'
  364. '<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd1.jpg"></center>'
  365. 'You caress his dick and rub it on your bare skin, you rub it more vigorously as it stiffens and sperm splashes onto your bare ass. After the man was satisfied, he pulls your pants over your sperm covered ass, pats you on the bum and disappears.'
  366. gs 'arousal', 'hj', 5, 'sub'
  367. gs 'stat'
  368. act 'Get out of the car':gt 'frot', 'fin2'
  369. end
  370. end
  371. end
  372. if $ARGS[0] = 'fin':
  373. cla
  374. 'You barely manage to escape to another place, away from the horny idiot. After a while you get to your station.'
  375. gs 'arousal', 'end'
  376. gs 'stat'
  377. act 'Get out of the car':gt 'metro', 'start'
  378. end
  379. if $ARGS[0] = 'fin2':
  380. gt 'metro', 'start'
  381. end
  382. --- frot ---------------------------------