1
0

zaprFWash 16 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447
  1. # zaprFWash
  2. if $ARGS[0] = 'start':
  3. $metka = 'start'
  4. $loc = 'zaprFWash'
  5. $metkaM = 'start'
  6. $locM = 'zaprFWash'
  7. cla
  8. clr
  9. if temper < 10:
  10. 'It''s too cold you''re more likely to get ill than make money, maybe try when the weather is a bit nicer?'
  11. act 'Return':gt 'zaprF', 'start'
  12. elseif (cumloc[6] = 1 or cumloc[7] = 1) or cumloc[11] = 1:
  13. minut += 5
  14. 'The gas station worker chases you away: "Go wash yourself off first at least, whore!"'
  15. act 'Leave':gt 'zaprF', 'start'
  16. else
  17. if (PCloBimbo = 1 or PCloStyle = 4) and pcs_apprnc >= 60:
  18. minut += 60
  19. pcs_sweat += 2
  20. money += 120
  21. skimpyCustomerChance = rand(1, 100)
  22. if skimpyCustomerChance > 30:
  23. gt 'zaprFWash', 'titsQ'
  24. else
  25. gt 'zaprFWash', 'wash'
  26. end
  27. else
  28. minut += 60
  29. pcs_sweat += 2
  30. money += 80
  31. gt 'zaprFWash', 'wash'
  32. end
  33. end
  34. end
  35. if $ARGS[0] = 'wash':
  36. if PCloBimbo = 1 or PCloStyle = 4:
  37. i = rand(1, 4)
  38. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/bimboclean<<i>>.jpg"></center>'
  39. else
  40. i = rand(1, 4)
  41. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/regular<<i>>.jpg"></center>'
  42. end
  43. 'You washed the windows of several cars and earned some cash.'
  44. act 'Continue':gt 'zaprF', 'start'
  45. end
  46. if $ARGS[0] = 'titsQ':
  47. i = rand(1, 4)
  48. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/bimboclean<<i>>.jpg"></center>'
  49. 'You wash another car. The driver finishes filling his tank and walks up to you giving you some tips. It''s obvious he''s looking for something more.'
  50. 'Want to earn more? Show me your tits, girl. Theres 100 in it, easy money.'
  51. act 'Agree and show him your tits':gt 'zaprFWash', 'titsFlash'
  52. act 'Refuse':gt 'zaprF', 'start'
  53. end
  54. if $ARGS[0] = 'assQ':
  55. i = rand(1, 4)
  56. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/bimboclean<<i>>.jpg"></center>'
  57. 'That was cool, girl. How about your ass, will another 100 convince you to show it to me?'
  58. act 'Agree and show him your ass':gt 'zaprFWash', 'assFlash'
  59. act 'Refuse':gt 'zaprF', 'start'
  60. end
  61. if $ARGS[0] = 'blowQ':
  62. i = rand(1, 4)
  63. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/bimboclean<<i>>.jpg"></center>'
  64. 'What a wonderful ass! I have a new problem now, girl. It''s getting tight down here, in my pants. How about you put your mouth to a good use? There is another 300 in it.'
  65. act 'Agree and give him blowjob':gt 'zaprFWash', 'blowjob'
  66. act 'Refuse':gt 'zaprF', 'start'
  67. end
  68. if $ARGS[0] = 'titsFlash':
  69. money += 100
  70. gifornot = rand (1, 100)
  71. if gifornot < 30:
  72. i = rand(1, 3)
  73. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/titsflash<<i>>.jpg"></center>'
  74. else
  75. i = rand(1, 7)
  76. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/titsflash<<i>>.gif"></center>'
  77. end
  78. 'You quickly pull up your top up and show him your naked breasts for a few seconds. You then quickly cover up and take your money.'
  79. gs 'arousal', 'flash_breasts', 5, 'exhibitionism'
  80. gs 'stat'
  81. if sub >= 30 or bimbolevel >= 1 or pcs_horny > 4:
  82. act 'Continue':gt 'zaprFWash', 'assQ'
  83. else
  84. act 'Run away':gt 'zaprF', 'start'
  85. end
  86. end
  87. if $ARGS[0] = 'assFlash':
  88. money += 100
  89. gifornot = rand (1, 100)
  90. if gifornot < 30:
  91. i = rand(1, 2)
  92. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/assflash<<i>>.jpg"></center>'
  93. else
  94. i = rand(1, 5)
  95. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/assflash<<i>>.gif"></center>'
  96. end
  97. 'You quickly pull down your pants and show him your ass for a few seconds. You then quickly cover up and take your money.'
  98. gs 'arousal', 'flash_ass', 5, 'exhibitionism'
  99. gs 'stat'
  100. if sub >= 30 or bimbolevel >= 1 or pcs_horny > 6:
  101. act 'Continue':gt 'zaprFWash', 'blowQ'
  102. else
  103. act 'Run away':gt 'zaprF', 'start'
  104. end
  105. end
  106. if $ARGS[0] = 'blowjob':
  107. gs 'npcgeneratec', 0, 'gas station customer', rand(18,40)
  108. gs 'boyStat', $npclastgenerated
  109. money += 300
  110. gifornot = rand (1, 100)
  111. if gifornot < 30:
  112. i = rand(1, 4)
  113. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/blowjob<<i>>.jpg"></center>'
  114. else
  115. i = rand(1, 3)
  116. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/blowjob<<i>>.gif"></center>'
  117. end
  118. 'You follow him behind the gas station, where you get the promised money, kneel down, unzip his pants and start working his shaft with your mouth.'
  119. 'After a while, the man starts trying to remove your clothes. He asks you to let him fuck your pussy: "I''ll give you another 300 if you let me take your pussy! C''mon!'
  120. gs 'arousal', 'bj', 15, 'sub', 'prostitute'
  121. gs 'stat'
  122. if sub >= 30 or bimbolevel >= 1 or pcs_horny > 6:
  123. if pcs_vag = 0:
  124. act 'Offer your ass instead (you don''t want to lose your virginity to this stranger...)':gt 'zaprFWash', 'fuckAnal'
  125. else
  126. act 'Offer your pussy':gt 'zaprFWash', 'fuckPussy'
  127. act 'Offer your ass':gt 'zaprFWash', 'fuckAnal'
  128. end
  129. act 'Suck harder to make him cum':gt 'zaprFWash', 'blowjobEndQ'
  130. else
  131. act 'Suck harder to make him cum':gt 'zaprFWash', 'blowjobEndQ'
  132. end
  133. end
  134. if $ARGS[0] = 'fuckPussy':
  135. money += 300
  136. gifornot = rand (1, 100)
  137. if gifornot < 40:
  138. i = rand(1, 4)
  139. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/fuckpussy<<i>>.jpg"></center>'
  140. else
  141. i = rand(1, 4)
  142. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/fuckpussy<<i>>.gif"></center>'
  143. end
  144. 'You bend over and let the man start fucking your pussy.'
  145. gs 'arousal', 'vaginal', 30, 'sub', 'prostitute'
  146. gs 'stat'
  147. act 'Continue':gt 'zaprFWash', 'pussyEndQ'
  148. end
  149. if $ARGS[0] = 'fuckAnal':
  150. money += 300
  151. gifornot = rand (1, 100)
  152. if gifornot < 40:
  153. i = rand(1, 4)
  154. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/fuckanal<<i>>.jpg"></center>'
  155. else
  156. i = rand(1, 4)
  157. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/fuckanal<<i>>.gif"></center>'
  158. end
  159. 'You bend over and let the man start fucking your ass, his cock wet with your saliva.'
  160. gs 'arousal', 'anal', 30, 'sub', 'prostitute'
  161. gs 'stat'
  162. rapePussyChance = rand(1, 100)
  163. if rapePussyChance < 10:
  164. act 'Continue':gt 'zaprFWash', 'rapePussy'
  165. else
  166. act 'Continue':gt 'zaprFWash', 'analEndQ'
  167. end
  168. end
  169. if $ARGS[0] = 'rapePussy':
  170. i = rand(1, 5)
  171. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/hardanal<<i>>.gif"></center>'
  172. 'The man fucks your ass furiously, taking no heed to your painful moans. As you try to move away a bit to limit the depth he can reach in your ass, he slaps your buttcheeks hard and shouts:'
  173. '"Stop moving bitch! Who do you think you are, that you can tell me what to do?"'
  174. if pcs_vag = 0:
  175. 'He gropes your ass, lifts it up and suddenly spots your hymen.'
  176. '"What, you are a virgin? Such a tease and still a virgin, really?"'
  177. rapeAnyway = rand(1, 100)
  178. if rapeAnyway < 50:
  179. '"It would have happened sooner or later anyway, virgin slut. Now enjoy and remember this moment!"'
  180. act 'Continue':gt 'zaprFWash', 'rapePussyYes'
  181. else
  182. '"Girls like you should not be acting like this! Someone should have taught you a hard lesson a long time ago."'
  183. act 'Continue':gt 'zaprFWash', 'punishSpank'
  184. end
  185. else
  186. act 'Continue':gt 'zaprFWash', 'rapePussyYes'
  187. end
  188. pcs_mood = 5
  189. gs 'stat'
  190. end
  191. if $ARGS[0] = 'rapePussyYes':
  192. 'He gropes your ass, lifts it up and pushes his dick inside your pussy in one thrust, all the way to the hilt!'
  193. i = rand(1, 3)
  194. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/pussytoanal<<i>>.gif"></center>'
  195. gs 'arousal', 'vaginal', 15, 'sub', 'prostitute', 'rough'
  196. gs 'stat'
  197. act 'Continue':gt 'zaprFWash', 'vaginaCum'
  198. end
  199. if $ARGS[0] = 'analEndQ':
  200. 'You can feel that the man is about to ejaculate. You decide to...:'
  201. act 'Let him cum inside your ass':gt 'zaprFWash', 'assCum'
  202. act 'Take his cum on your face':gt 'zaprFWash', 'blowjobEndFace'
  203. act 'Let him cum inside your mouth':gt 'zaprFWash', 'blowjobEndMouth'
  204. end
  205. if $ARGS[0] = 'pussyEndQ':
  206. 'You can feel that the man is about to orgasm. You decide to...:'
  207. act 'Let him cum inside your vagina':gt 'zaprFWash', 'vaginaCum'
  208. act 'Take his cum on your face':gt 'zaprFWash', 'blowjobEndFace'
  209. act 'Let him cum inside your mouth':gt 'zaprFWash', 'blowjobEndMouth'
  210. end
  211. if $ARGS[0] = 'assCum':
  212. minut += 5
  213. pain['asshole'] += 1
  214. pcs_ass += 1
  215. gs 'cum_call', 'anus'
  216. gs 'stat'
  217. i = rand(1, 2)
  218. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/cumanal<<i>>.gif"></center>'
  219. 'You let him cum deep inside your ass. A pleasant warmth fills your insides as he shoots his load deep inside you. When he pulls out, a bit of sperm leaks out of your hole before you can tighten your worn out anus.'
  220. gs 'arousal', 'end'
  221. gs 'stat'
  222. act 'Go back to gas station':gt 'zaprF', 'start'
  223. end
  224. if $ARGS[0] = 'vaginaCum':
  225. minut += 5
  226. pcs_vag += 1
  227. pain['vaginal'] += 4
  228. gs 'cum_call', ''
  229. gs 'stat'
  230. i = rand(1, 5)
  231. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/cumpussy<<i>>.gif"></center>'
  232. 'You let him cum deep inside your vagina. A pleasant warmth fills your insides as he shoots his load deep inside you. When he pulls out, a bit of sperm leaks out of your hole.'
  233. gs 'arousal', 'end'
  234. gs 'stat'
  235. act 'Go back to the gas station':gt 'zaprF', 'start'
  236. end
  237. if $ARGS[0] = 'blowjobEndQ':
  238. 'You can feel that the man is about to orgasm. You decide to take it...:'
  239. act 'On your face':gt 'zaprFWash', 'blowjobEndFace'
  240. act 'In your mouth':gt 'zaprFWash', 'blowjobEndMouth'
  241. end
  242. if $ARGS[0] = 'blowjobEndFace':
  243. minut += 5
  244. if gifornot < 30:
  245. i = rand(1, 2)
  246. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/cumface<<i>>.gif"></center>'
  247. else
  248. i = rand(1, 4)
  249. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/cumface<<i>>.jpg"></center>'
  250. end
  251. 'When the man starts to ejaculate, you quickly take his cock out and point it towards your face. His sack was full, you can say that for sure.'
  252. gs 'cum_call', 'face'
  253. gs 'arousal', 'end'
  254. gs 'stat'
  255. act 'Go back to the gas station':gt 'zaprF', 'start'
  256. end
  257. if $ARGS[0] = 'blowjobEndMouth':
  258. minut += 5
  259. gifornot = rand (1, 100)
  260. if gifornot < 30:
  261. i = rand(1, 4)
  262. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/cummouth<<i>>.jpg"></center>'
  263. else
  264. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/cummouth1.gif"></center>'
  265. end
  266. 'When the man starts to ejaculate, you quickly take his cock out of your mouth while keeping it aimed straight at your tongue, giving him a good view of the cum as it flies inside your gaping mouth. His sack was full, you can say that for sure.'
  267. gs 'cum_call', 'mouth'
  268. gs 'arousal', 'end'
  269. gs 'stat'
  270. act 'Continue':gt 'zaprFWash', 'blowjobEndMouthQ'
  271. end
  272. if $ARGS[0] = 'blowjobEndMouthQ':
  273. 'Your mouth is full of sperm. You decide to...:'
  274. act 'Swallow and then show him your empty mouth':gt 'zaprFWash', 'blowjobEndMouthSwallow'
  275. act 'Spit it out in front of him':gt 'zaprFWash', 'blowjobEndMouthSpit'
  276. end
  277. if $ARGS[0] = 'blowjobEndMouthSwallow':
  278. swallow += 1
  279. 'You gulp down the mouthful of sperm and then present your tongue as a proof that all of his seed is now in your belly.'
  280. i = rand(1, 4)
  281. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/swallow<<i>>.jpg"></center>'
  282. 'The man smiles, slaps you mildly on your face and says: "What a nice young slut you are. Next time I need a refill, I''ll be sure to stop by."'
  283. act 'Go back to the gas station':gt 'zaprF', 'start'
  284. end
  285. if $ARGS[0] = 'blowjobEndMouthSpit':
  286. 'You spit the load of sperm down between the legs of your customer. He doesn''t seem happy about it...'
  287. i = rand(1, 3)
  288. gifornot = rand (1, 100)
  289. if gifornot > 30:
  290. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/spit<<i>>.jpg"></center>'
  291. else
  292. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/spit1.gif"></center>'
  293. end
  294. 'His face darkens and he says: "What, my cum isn''t good enough for you to swallow? I''ll teach you bitch!"'
  295. 'He moves closer to you with an angry look!'
  296. act 'Run back to the gas station':gt 'zaprFWash', 'runback'
  297. end
  298. if $ARGS[0] = 'runback':
  299. runSuccess = rand(1, 100)
  300. if runSuccess > 50:
  301. 'You managed to escape his grasp!'
  302. act 'Continue':gt 'zaprF', 'start'
  303. else
  304. pain['cheeks'] += 2
  305. pain['head'] += 2
  306. pain['mouth'] += 2
  307. pain['neck'] += 4
  308. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/punishbeatface.gif"></center>'
  309. 'You weren''t quick enough and he caught you. He pushes you down and starts to slap your face!'
  310. gs 'arousal', 'end'
  311. gs 'stat'
  312. act 'Endure his punishment':gt 'zaprFWash', 'punish'
  313. end
  314. end
  315. if $ARGS[0] = 'punish':
  316. punishType = rand(1, 100)
  317. if punishType < 33:
  318. gt 'zaprFWash', 'punishSpank'
  319. elseif punishType < 66:
  320. gt 'zaprFWash', 'punishPussyQ'
  321. else
  322. gt 'zaprFWash', 'punishAnal'
  323. end
  324. end
  325. if $ARGS[0] = 'punishSpank':
  326. minut += 20
  327. pcs_horny = 0
  328. pain['asscheeks'] += 5
  329. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/punishspank.gif"></center>'
  330. 'The angry man bends you over an old chair and starts to spank your ass, hard.'
  331. 'After twenty minutes of ruthless punishment, you can finally crawl away with your burning ass.'
  332. abductionChance = rand(1, 100)
  333. if abductionChance <= 10 or sub > 90 and leonidSlave = 0:
  334. act 'Continue':gt 'zaprFWash', 'getAbducted'
  335. else
  336. act 'Get back to the gas station':gt 'zaprF', 'start'
  337. end
  338. pcs_mood = 5
  339. gs 'stat'
  340. gs 'arousal', 'end'
  341. gs 'stat'
  342. end
  343. if $ARGS[0] = 'punishPussyQ':
  344. 'The angry man drags you to an old house. He bends you over and starts to rub your pussy.'
  345. if pcs_vag = 0:
  346. 'Suddenly he remarks: "What? You''re a virgin? Such slutty tease and still a virgin?'
  347. penetrate = rand (1, 100)
  348. if penetrate <= 100 and penetrate > 66:
  349. 'Someone should have done this long time ago!'
  350. act 'Endure':gt 'zaprFWash', 'punishSpank'
  351. elseif penetrate <= 66 and penetrate > 33:
  352. 'I''ll spare your virginity but you''ll get fucked anyway. Sluts have more than one hole for a reason, right?'
  353. act 'Endure':gt 'zaprFWash', 'punishAnal'
  354. else
  355. 'This makes it even better! I''ll enjoy your tears even more!'
  356. act 'Endure':gt 'zaprFWash', 'punishPussy'
  357. end
  358. else
  359. 'Let''s try this teenie snatch!'
  360. act 'Endure':gt 'zaprFWash', 'punishPussy'
  361. end
  362. end
  363. if $ARGS[0] = 'punishPussy':
  364. pain['vaginal'] += 4
  365. gs 'cum_call', ''
  366. i = rand(1, 5)
  367. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/punishpussy<<i>>.gif"></center>'
  368. 'Your pussy fully exposed, he starts fucking it ruthlessly.'
  369. 'After half an hour of destroying your cunt he releases his grip on you so you can finally crawl away; your aching pussy sore from the brutal penetration.'
  370. gs 'arousal', 'vaginal', 30, 'sub', 'rough'
  371. gs 'arousal', 'end'
  372. gs 'stat'
  373. abductionChance = rand(1, 100)
  374. if abductionChance <= 10 or sub > 90:
  375. act 'Continue':gt 'zaprFWash', 'getAbducted'
  376. else
  377. act 'Get back to the gas station':gt 'zaprF', 'start'
  378. end
  379. pcs_mood = 5
  380. gs 'stat'
  381. end
  382. if $ARGS[0] = 'punishAnal':
  383. pain['asshole'] += 6
  384. gs 'cum_call', 'anus'
  385. pcs_mood = - 15
  386. i = rand(1, 3)
  387. '<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/punishanal<<i>>.gif"></center>'
  388. 'Your anus fully exposed, he starts fucking it ruthlessly.'
  389. 'After half an hour of rough assfucking he releases his grip on you so you can finally crawl away; your aching ass sore from the brutal penetration.'
  390. gs 'arousal', 'anal', 30, 'sub', 'rough'
  391. gs 'arousal', 'end'
  392. gs 'stat'
  393. abductionChance = rand(1, 100)
  394. if abductionChance <= 10 or sub > 90:
  395. act 'Continue':gt 'zaprFWash', 'getAbducted'
  396. else
  397. act 'Get back to the gas station':gt 'zaprF', 'start'
  398. end
  399. end
  400. if $ARGS[0] = 'getAbducted':
  401. 'But your perpetrator isn''t done with you.'
  402. 'He catches you again, drags you to his car and pushes you into the trunk...'
  403. 'You probably made a terrible mistake...'
  404. act 'Cry for help':gt 'abduction', 'start'
  405. end
  406. --- zaprFWash ---------------------------------