Prostitute.qsrc 37 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809
  1. # Prostitute
  2. $location_type = 'public_outdoors'
  3. if $ARGS[0] = 'start':
  4. $metka = $ARGS[0]
  5. $loc = $CURLOC
  6. $metkaSex = $ARGS[0]
  7. $locSex = $CURLOC
  8. menu_off = 1
  9. cls
  10. minut += 5
  11. gs 'stat'
  12. '<center><b><font color="maroon">Road near the park, among prostitutes</font></b></center>'
  13. '<center><img <<$set_imgh>> src="images/locations/city/centralpark/park2.jpg"></center>'
  14. if hour >= 16 and hour <= 23:
  15. if whoreQW = 1:
  16. 'Several prostitutes are looking at you a bit awkwardly, remembering the beating you gave their friend all too well. They still don''t want you here, but they''re too scared to confront you directly.'
  17. act 'Ask how things work around here':
  18. cla
  19. whoreQW = 2
  20. 'You approach one of the more isolated girls and give her a disarming smile: "Hey! So, the other girl said I have to be one of you to work here? How does that work?"'
  21. 'The prostitute shrugs, not entirely willing to talk to you, but she''s afraid you''d fight her too. She says: "We don''t really work for anyone, but that also means we don''t get any protection. One of the women here called Stella organized part of the girls into a group. She requires some protection money from time to time, and arranges ''accidents'' for those who don''t pay. She and her cronies are not that tough, but since she doesn''t ask for that much, I usually just pay her off. Less hassle that way, you know?"'
  22. 'You nod understandingly and the girl continues: "And then there''s the bandits! They sometimes extort us too, because we''re easy prey. Stella doesn''t have that much influence around here, but I wouldn''t mess with the bandits if I were you! They mean business..."'
  23. 'She also points out: "By the way, it may sound obvious but <b>if you want to pick up customers, you need to be dressed like a prostitute.</b> If it''s not very obvious to guys that you''re a working girl, none of them will approach you! You can buy some in a sex shop."'
  24. act 'Thank her and move away':gt 'prostitute', 'start'
  25. end
  26. elseif whoreQW = 0:
  27. '"Hey bitch, you''re not one of us!" a prostitute yells angrily at you, rapidly moving towards you. "Get off our turf, or it''ll cost you your teeth!"'
  28. 'She looks like she''s getting ready to fight you, though she''s clearly under the influence of drugs and wobbles a bit as she walks.'
  29. act 'Fight her':
  30. cla
  31. minut += 15
  32. gs 'npcgeneratec', 1, 'stoned prostitute', rand(18,28)
  33. gs 'boyStat', $npclastgenerated
  34. !!stats{
  35. strenV = 20
  36. speedV = 30
  37. agilV = 30
  38. reactV = 30
  39. vitalV = 50
  40. intelV = 10
  41. willV = 10
  42. !!skills
  43. magikV = 10
  44. boxingV = 10
  45. shootV = 10
  46. !!parameters
  47. healthV = vitalV * 10 + strenV * 5
  48. manaV = intelV * 10 + magikV * 10
  49. willpowerV = willV * 10
  50. BonusAtakV = 0
  51. BonusDefV = 0
  52. !!Programme of Action
  53. program = 0
  54. if spellavtoklon = 1:klon = 3
  55. if spellbefshild = 1:defence = 500}
  56. gs 'fight','initFight'
  57. $opp_name[0] = 'Prostitute'
  58. $opp_image[0] = 'images/locations/city/shared/streetwalker/working1.jpg'
  59. opp_def[0] = 30
  60. opp_run[0] = 30
  61. opp_wrstlng[0] = 20
  62. opp_kick[0] = 0
  63. opp_punch[0] = 10
  64. opp_jab[0] = 10
  65. opp_stren[0] = 20
  66. opp_agil[0] = 30
  67. opp_vital[0] = 50
  68. opp_react[0] = 30
  69. opp_health[0] = (opp_vital[0] * 10 + opp_stren[0] * 5)
  70. opp_willpwr[0] = 50
  71. opp_shoot[0] = 10
  72. fightEnding = 4
  73. gt 'fight', 'start'
  74. end
  75. act '"How do I become one of you?"':
  76. cla
  77. 'You raise your hands disarmingly and say: "Whoa, relax! I only wanted to ask... how do I become one of you? I want to work here!"'
  78. 'The prostitute grins meanly and spits on the ground before you, saying: "That''s what I thought, bitch. Stella runs this area! You pay her if you want to work here, you got that?"'
  79. act 'Shrug and leave':gt 'prostitute', 'start'
  80. act 'Nod understandingly':
  81. cla
  82. whoreQW = 2
  83. 'When you nod, the prostitute adds: "By the way: <b>you need to look like a whore, if you want to work as a whore</b>. The sex shop sells outfits. And remember: you work here, you pay Stella! Otherwise you''re in deep trouble!"'
  84. act 'Move away from her':gt 'prostitute', 'start'
  85. end
  86. end
  87. elseif whoreQW = 2:
  88. 'The prostitutes look at you curiously for a moment, but quickly turn their attention back to trying to attract customers.'
  89. if PCloStyle = 4 and pcs_sleep > 0:
  90. act 'Stand and wait for customers (0:16)':
  91. cla
  92. minut += 10
  93. if rand(0, (pcs_apprnc/4 + hour) * 2) < 20:
  94. 'You walk around for a while, trying to find a customer. Unfortunately, no one is interested in you right now.'
  95. act 'Continue':gt 'prostitute', 'start'
  96. else
  97. proseventrand = rand(1, 20)
  98. if proseventrand = 1:
  99. 'A black jeep with tinted windows pulls up next to you, and a window rolls down. You''re looking into the face of a fairly mean looking guy, who you''re fairly sure is a criminal.'
  100. 'He looks at you with disdain. "Time for you to pay your tribute, slut."'
  101. if money >= 1000:
  102. act 'Give him 1000 <b>₽</b>':
  103. cla
  104. money -= 1000
  105. 'You give the man 1,000 <b>₽</b>, which he pockets right away. Then he drives off, without saying another word.'
  106. act 'Continue':gt 'prostitute', 'start'
  107. end
  108. elseif money < 1000:
  109. act 'Say you haven''t earned much':
  110. cla
  111. money = 0
  112. 'You try to explain to the man that you haven''t earned much yet. He thinks it over for a moment.'
  113. '"Are you new, or do you just suck at your job then? All the girls here know to have their money ready when we come to collect!" he grunts as he opens the door of the car and pulls you in with his thick, burly arms. "Let''s see what you''re working with. Maybe you need someone to teach you how to make money around here!"'
  114. 'When he sees you hesitate, he slaps your face and says: "Go on, whore! I don''t have all day."'
  115. 'You realize he''s not going to let you off the hook easily, and that he probably has enough connections to get you into serious trouble. It''s probably easiest to treat him as just another customer, maybe he''ll let you go if you do a good job...'
  116. act 'Reach for his groin':
  117. gs 'npcgeneratec', 0, 'Bandit', rand(18,45)
  118. gs 'boyStat', $npclastgenerated
  119. gt 'blowPR', 'start'
  120. end
  121. end
  122. end
  123. act 'Refuse to pay and fight him':
  124. cla
  125. minut += 15
  126. gs 'npcgeneratec', 0, 'Bandit', rand(18,45)
  127. gs 'boyStat', $npclastgenerated
  128. !!stats{
  129. strenV = 200
  130. speedV = 30
  131. agilV = 20
  132. reactV = 20
  133. vitalV = 150
  134. intelV = 10
  135. willV = 10
  136. !!skills
  137. magikV = 10
  138. boxingV = 10
  139. shootV = 10
  140. !!parameters
  141. healthV = vitalV * 10 + strenV * 5
  142. manaV = intelV * 10 + magikV * 10
  143. willpowerV = willV * 10
  144. BonusAtakV = 0
  145. BonusDefV = 0
  146. !!Programme of Action
  147. program = 0
  148. if spellavtoklon = 1:klon = 3
  149. if spellbefshild = 1:defence = 500}
  150. gs 'fight','initFight'
  151. $opp_name[0] = 'Bandit'
  152. $opp_image[0] = 'images/locations/shared/street/mugger.jpg'
  153. opp_def[0] = 10
  154. opp_run[0] = 30
  155. opp_wrstlng[0] = 10
  156. opp_kick[0] = 0
  157. opp_punch[0] = 10
  158. opp_jab[0] = 10
  159. opp_stren[0] = 200
  160. opp_agil[0] = 20
  161. opp_vital[0] = 150
  162. opp_react[0] = 20
  163. opp_health[0] = (opp_vital[0] * 10 + opp_stren[0] * 5)
  164. opp_willpwr[0] = 100
  165. opp_shoot[0] = 10
  166. fightEnding = 5
  167. gt 'fight', 'start'
  168. end
  169. elseif proseventrand = 2:
  170. 'A rather scrawny looking prostitute approaches you and says: "Listen up, skank. It''s time you pay Stella!"'
  171. if money >= 500:
  172. act 'Give her 500 <b>₽</b>':
  173. cla
  174. money -= 500
  175. 'As you give her the money, you''d swear you see a twinge of relief in her eyes. The girl was clearly worried you were going to give her a hard time.'
  176. 'She quickly walks away, not saying anything else.'
  177. act 'Continue':gt 'prostitute', 'start'
  178. end
  179. elseif money < 500:
  180. act 'Say you haven''t earned much':
  181. cla
  182. money = 0
  183. 'You begin to explain that you haven''t earned much money yet, but she''s not interested in your story.'
  184. 'She quickly rummages through your belongings, and takes all the money you have on you. Then she leaves quickly, before you can object.'
  185. act 'Continue':gt 'prostitute', 'start'
  186. end
  187. end
  188. act 'Refuse to pay and fight her':
  189. cla
  190. minut += 15
  191. gs 'npcgeneratec', 1, 'prostitute', rand(18,28)
  192. gs 'boyStat', $npclastgenerated
  193. !!stats{
  194. strenV = 50
  195. speedV = 50
  196. agilV = 40
  197. reactV = 30
  198. vitalV = 60
  199. intelV = 10
  200. willV = 10
  201. !!skills
  202. magikV = 10
  203. boxingV = 10
  204. shootV = 10
  205. !!parameters
  206. healthV = vitalV * 10 + strenV * 5
  207. manaV = intelV * 10 + magikV * 10
  208. willpowerV = willV * 10
  209. BonusAtakV = 0
  210. BonusDefV = 0
  211. !!Programme of Action
  212. program = 0
  213. if spellavtoklon = 1:klon = 3
  214. if spellbefshild = 1:defence = 500}
  215. gs 'fight','initFight'
  216. $opp_name[0] = 'Prostitute'
  217. $opp_image[0] = 'images/locations/city/shared/streetwalker/working1.jpg'
  218. opp_def[0] = 10
  219. opp_run[0] = 50
  220. opp_wrstlng[0] = 10
  221. opp_kick[0] = 0
  222. opp_punch[0] = 10
  223. opp_jab[0] = 10
  224. opp_stren[0] = 50
  225. opp_agil[0] = 40
  226. opp_vital[0] = 60
  227. opp_react[0] = 30
  228. opp_health[0] = (opp_vital[0] * 10 + opp_stren[0] * 5)
  229. opp_willpwr[0] = 50
  230. opp_shoot[0] = 10
  231. fightEnding = 6
  232. gt 'fight', 'start'
  233. end
  234. else
  235. 'A car stops near you and the driver rolls his window down.'
  236. prosti = 0
  237. if proseventrand <= 8:
  238. 'The driver asks matter-of-factly: "You''ve got a cute face on you. How much for a blowjob?"'
  239. elseif proseventrand <= 14:
  240. 'The driver says matter-of-factly: "You seem decent enough... I want to fuck you. How much?"'
  241. else
  242. 'The driver says matter-of-factly: "I like your ass. How much do you charge for anal?"'
  243. end
  244. act 'Walk away from him':gt 'prostitute', 'start'
  245. if ProsMoney > 0:
  246. act '<<ProsMoney * 100>> <b>₽</b>':
  247. cls
  248. gt 'prostitute', 'work1', iif(proseventrand <= 8, 'blow job', iif(proseventrand <= 14, 'sex', 'anal'))
  249. end
  250. end
  251. act 'Change the price':
  252. cls
  253. gs 'stat'
  254. ProsMoney = input("Enter a number below, which will be multiplied by 100")
  255. if ProsMoney < 1:
  256. '"Are you making a joke or something? I''m not in the mood for jokes!" the customer sighs wearily. He starts his car again and drives away without saying another word.'
  257. 'The price you set was too low for the man to take you seriously.'
  258. act 'Continue':gt 'prostitute', 'start'
  259. else
  260. gt 'prostitute', 'work1', iif(proseventrand <= 8, 'blow job', iif(proseventrand <= 14, 'sex', 'anal'))
  261. end
  262. end
  263. end
  264. end
  265. end
  266. end
  267. end
  268. end
  269. act 'Go back to the park':
  270. cla
  271. minut += 5
  272. gt 'park', 'start'
  273. end
  274. end
  275. if $ARGS[0] = 'work1':
  276. !! ARGS 1 - blow job, sex, anal
  277. $location_type = 'event_outdoors'
  278. '<center><img <<$set_imgh>> src="images/locations/city/centralpark/park2.jpg"></center>'
  279. 'You pretend to think it over for a moment, then look at the man again and smile: "For you, babe? Only <<ProsMoney * 100>> <b>₽</b>."'
  280. vnpr = 0
  281. if vidage >= 40:vnpr -= 20
  282. if vidage >= 35 and vidage < 40:vnpr -= 10
  283. if vidage >= 30 and vidage < 35:vnpr -= 5
  284. if vidage >= 25 and vidage < 30:vnpr += 1
  285. if vidage >= 20 and vidage < 25:vnpr += 5
  286. if vidage >= 18 and vidage < 20:vnpr += 10
  287. if vidage < 18:vnpr += 15
  288. if pcs_apprnc = -10:
  289. vnpr -= 100
  290. elseif pcs_apprnc < 5:
  291. vnpr -= 10
  292. elseif pcs_apprnc < 15:
  293. vnpr -= 5
  294. elseif pcs_apprnc < 30:
  295. vnpr += 1
  296. elseif pcs_apprnc < 50:
  297. vnpr += 5
  298. else
  299. vnpr += 10
  300. end
  301. if cumSUM > 0:vnpr -= 10
  302. if pcs_makeup = 0:vnpr -= 10
  303. if pcs_makeup = 1:vnpr -= 1
  304. if pcs_makeup = 2:vnpr += 1
  305. if pcs_makeup = 3:vnpr += 5
  306. if pcs_makeup = 4:vnpr += 10
  307. if pcs_leghair <= 0:vnpr += 1
  308. if pcs_leghair > 0:vnpr -= 5
  309. if pcs_pubes > 3:vnpr -= 5
  310. if pcs_pubes <= 3:vnpr += 1
  311. if pcs_tan > 0:vnpr += 1
  312. if curly > 0:vnpr += 1
  313. if pcs_sweat > 24:
  314. vnpr -= 10
  315. elseif pcs_sweat < 15:
  316. vnpr += 1
  317. end
  318. if pcs_hairbsh = 0:vnpr -= 1
  319. if pcs_lip = 4:vnpr += 1
  320. if vnpr >= 0:
  321. if ProsMoney = 1:
  322. gt 'prostitute', 'work2', $ARGS[1]
  323. exit
  324. else
  325. if vnpr >= rand(0, 30):
  326. if $ARGS[1] = 'blow job':KlientMON = rand(1, 10)
  327. if $ARGS[1] = 'sex':KlientMON = rand(3, 25)
  328. if $ARGS[1] = 'anal':KlientMON = rand(5, 40)
  329. if KlientMON >= ProsMoney:
  330. gt 'prostitute', 'work2', $ARGS[1]
  331. exit
  332. else
  333. if rand(0, 1) = 1:
  334. 'The client smiles and offers: "I only have <<KlientMON * 100>>... what do you say?"'
  335. act 'Agree':
  336. ProsMoney = KlientMON
  337. gt 'prostitute', 'work2', $ARGS[1]
  338. exit
  339. end
  340. act 'Refuse':gt 'prostitute', 'start'
  341. exit
  342. end
  343. end
  344. end
  345. end
  346. end
  347. 'The client examines you hesitantly, a bit startled by the amount you asked for. He shakes his head as he starts his car: "Too much."'
  348. 'Then he drives away before you can get another word in. Doesn''t he understand how bartering works!?'
  349. act 'Continue':gt 'prostitute', 'start'
  350. end
  351. if $ARGS[0] = 'work2':
  352. !! ARGS 1 - blow job, sex, anal
  353. $location_type = 'event_outdoors'
  354. 'The client grins and gives you a nod: "Get in."'
  355. act 'Get into his car':
  356. cla
  357. clr
  358. *clr
  359. gs 'boy'
  360. gs 'npcgeneratec', 0, '"John"', rand(18,45)
  361. gs 'boyStat', $npclastgenerated
  362. slutty += 1
  363. guy += 1
  364. if pcs_throat < dick: pcs_throat += 1
  365. gs 'stat'
  366. '<center><img <<$set_imgh>> src="images/locations/shared/sex/car/bj.jpg"></center>'
  367. 'Once you''re in the car you slide your hand on his crotch. The man quickly drives to a quiet place, about two streets away from where he picked you up. You can already feel an impressive bulge as you reach into his pants and you compliment him on his nice cock when you finally liberate it. He''s nearly fully erect, and if you look closely you can actually see his cock throbbing.'
  368. gs 'arousal', 'foreplay', 5, 'prostitution', 'unknown'
  369. gs 'stat'
  370. if prezik > 0:
  371. protect = 1
  372. act 'Put on a condom, using your mouth':
  373. cla
  374. clr
  375. *clr
  376. minut += 5
  377. dynamic $prezik
  378. gs 'stat'
  379. picrand = rand(1, 7)
  380. if picrand = 1:
  381. '<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bjp.jpg"></center>'
  382. else
  383. '<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bjp<<picrand>>.jpg"></center>'
  384. end
  385. 'You put a condom between your lips and slowly guide your mouth to his penis, you gently roll it down using only your lips. You can tell the guy is really impressed with your skills.'
  386. if $ARGS[1] = 'blow job':
  387. money += ProsMoney * 100
  388. 'You proceed to give him a blowjob, licking and sucking his condom-clad penis. The taste of the rubber is a bit unpleasant, but you do a good job regardless. In no time the guy groans loudly.'
  389. 'When you feel his cock finally soften between your lips, you pull your head back. The man ties a knot in the condom and tosses it out of the window carelessly, then he gives you the money he owes you.'
  390. gs 'dinSex', 'std_trigger_oral'
  391. gs 'arousal', 'bj', 5, 'prostitution', 'unknown'
  392. gs 'arousal', 'end'
  393. gs 'stat'
  394. act 'Get out of the car':gt 'prostitute', 'start'
  395. elseif $ARGS[1] = 'sex':
  396. 'The client is so turned on, he doesn''t want any foreplay. Now that he has a condom on, he wants to fuck you.'
  397. act 'Continue':
  398. cla
  399. clr
  400. *clr
  401. prosti = 0
  402. protect = 1
  403. if preziktype = 2:
  404. sexcontra = 7
  405. else
  406. sexcontra = 3
  407. end
  408. money += ProsMoney * 100
  409. gs 'stat'
  410. if rand(0, 1) = 0:
  411. '<center><img <<$set_imgh>> src="images/locations/shared/sex/car/sexcar1.jpg"></center>'
  412. 'You obediently lie down on your back in the back seat. The man pounces on you eagerly, pushing your legs apart and buring his cock deep inside you, all in one swift motion. You groan at the sudden intrusion, but do nothing to stop his rough and fast pace. Quite the opposite actually, you encourage the hard fucking by wrapping your legs around his waist as he keeps slamming his dick deep into your vagina with all his might. '
  413. gs 'arousal', 'vaginal', 15, 'prostitution', 'unknown', 'rough'
  414. gs 'stat'
  415. else
  416. '<center><img <<$set_imgh>> src="images/locations/shared/sex/car/sexcar2.jpg"></center>'
  417. 'You feel the man''s hands on your ass cheeks as soon as you get on your hands and knees in the back seat. He confidently guides his cock to your pussy, and slowly thrusts it inside you. You find his slow pace maddening and thrust back on his cock a few times to encourage a faster pace, after all you still have more customers you''d like to get to. The man complies and soon he is slamming his dick in and out of you, as you moan like a bitch in heat.'
  418. gs 'arousal', 'vaginal', 15, 'prostitution', 'unknown', 'rough'
  419. gs 'stat'
  420. end
  421. 'After a few minutes of fucking you, the man groans and you feel his hips spasming against yours. He pulls out of you and takes the filled condom off his slowly shrinking cock.'
  422. 'He ties a knot in the condom and tosses it out of the window carelessly, and gives you the money he owes you.'
  423. gs 'dinSex', 'std_trigger'
  424. gs 'arousal', 'end'
  425. gs 'stat'
  426. protect = 0
  427. act 'Get out of the car':gt 'prostitute', 'start'
  428. end
  429. elseif $ARGS[1] = 'anal':
  430. 'The client is so turned on, he doesn''t want any foreplay. Now that he has a condom on, he wants to fuck your ass.'
  431. act 'Continue':
  432. cla
  433. clr
  434. *clr
  435. prosti = 0
  436. money += ProsMoney * 100
  437. gs 'stat'
  438. dickK = dick * 10 / 100
  439. if dickK < 1:dickK = 1
  440. pcs_ass += dickK
  441. '<center><img <<$set_imgh>> src="images/shared/sex/anal/doggy/anal30.jpg"></center>'
  442. 'You immediately feel the man''s hands on your ass cheeks when you get on your hands and knees in the back seat. The man confidently guides his condom-covered cock to your sphincter, and slowly thrusts all of his <<dick>> centimeter inside you.'
  443. gs 'arousal', 'anal', 10, 'prostitution', 'unknown'
  444. gs 'stat'
  445. if pcs_ass < dick:
  446. 'Your anus stretches painfully while he fills your ass with his shaft, and you wince and beg him to take it easy for a little while. Fortunately, he listens.'
  447. 'Once he feels he gave you enough time to adapt, he begins to move his hips. Slowly at first, but his thrusts accelerate more and more as he gets closer to his orgasm.'
  448. gs 'arousal', 'anal', 10, 'prostitution', 'unknown'
  449. gs 'stat'
  450. end
  451. if pcs_ass >= dick:
  452. pcs_horny += pcs_ass
  453. 'Your anus has no difficulty adjusting to the size of his member, and it actually feels fairly pleasant when he shoves his length in. Your anus clasps around the base of his cock from time to time, and the man begins to thrust his hips against yours enthusiastically when he notices you can take it.'
  454. gs 'arousal', 'anal', 10, 'prostitution', 'unknown'
  455. gs 'stat'
  456. end
  457. 'After a few minutes of fucking your ass, the man groans and you feel his hips spasming against yours. He pulls out of you and takes the filled condom off his slowly shrinking cock.'
  458. 'The man ties a knot in the condom and tosses it out of the window carelessly, and gives you the money he owes you.'
  459. gs 'dinSex', 'std_trigger'
  460. protect = 0
  461. gs 'arousal', 'end'
  462. gs 'stat'
  463. act 'Get out of the car':gt 'prostitute', 'start'
  464. end
  465. end
  466. end
  467. else
  468. act 'Get him hard with your mouth':
  469. cla
  470. clr
  471. *clr
  472. gs 'dinSex', 'std_trigger_oral'
  473. gs 'stat'
  474. picrand = rand(8, 13)
  475. '<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bjp<<picrand>>.jpg"></center>'
  476. 'You close your lips around his member and flick your tongue over the tip of his cock teasingly.'
  477. gs 'arousal', 'bj', 5, 'prostitution', 'unknown'
  478. gs 'stat'
  479. act 'Suck on his cock':
  480. *clr
  481. cla
  482. if $ARGS[1] = 'blow job':
  483. bjrand = rand(1, 100)
  484. money += ProsMoney * 100
  485. if bjrand <= 50:
  486. if stat['bj'] <= 15:
  487. spafinloc = 12
  488. gs 'cum_manage'
  489. '<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum32.jpg"></center>'
  490. 'You don''t have much experience giving blowjobs, and even though you do your best, the man can tell you''re not very good at it.'
  491. 'Your mouth makes him feel good nevertheless, and after a few minutes he groans and cums in your mouth. You wince from the unpleasant taste of his sperm, which earns you a disdaining look from him.'
  492. 'The man silently gives you the money he owes you, and then tells you to get out of his car.'
  493. gs 'arousal', 'bj', 10, 'prostitution', 'unknown'
  494. gs 'stat'
  495. else
  496. spafinloc = 12
  497. gs 'cum_manage'
  498. '<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum33.jpg"></center>'
  499. 'Your trained tongue slides up and down his shaft expertly, you pull out all of your tricks to make him feel good. You even use some techniques you learned to stall his orgasm for a moment, making it all the more intense for him when he shoots his load into your mouth.'
  500. 'When you swallow his load obediently, the man smiles at you with a delighted look on his face and gives you the money he owes you. You really made him feel great!'
  501. gs 'arousal', 'bj', 10, 'prostitution', 'unknown'
  502. gs 'stat'
  503. end
  504. elseif bjrand <= 80:
  505. if stat['bj'] <= 15:
  506. spafinloc = 11
  507. gs 'cum_manage'
  508. '<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial17.jpg"></center>'
  509. 'You don''t have much experience giving blowjobs, and even though you do your best, the man can tell you''re not very good at it.'
  510. 'When the man is about to cum, he suddenly pulls his cock out of your mouth and shoots his load all over your face. Not expecting this, you didn''t have time to close your eyes and some of it ends up in your eyes.'
  511. if pcs_makeup > 1:pcs_makeup = 0 & 'The cum on your face makes a mess of your make-up, too.'
  512. 'You try to remain professional enough and smile at him, ignoring the pain, but the man can clearly tell you''re uncomfortable, yet he doesn''t seem to care.'
  513. 'The man silently gives you the money he owes you, and then tells you to get out of his car.'
  514. gs 'arousal', 'bj', 10, 'prostitution', 'unknown'
  515. gs 'stat'
  516. else
  517. spafinloc = 11
  518. gs 'cum_manage'
  519. '<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial18.jpg"></center>'
  520. 'Your trained tongue slides up and down his shaft expertly, and you pull out all of your tricks to make him feel good. You even use some techniques you learned to stall his orgasm for a moment, making it all the more intense for him when he orgasms.'
  521. 'You quickly release his cock from your mouth and tilt your head backwards with your eyes closed, making him squirt his load onto your chin with a fake smile on your face.'
  522. if pcs_makeup > 1: 'Even though the man thinks you''re delighted with him cumming all over you, in truth you''re mostly focusing on not smearing your make-up!'
  523. 'The man grins happily when he looks at his work of art, and gives you the money he owes you. You made his day!'
  524. gs 'arousal', 'bj', 10, 'prostitution', 'unknown'
  525. gs 'stat'
  526. end
  527. else
  528. if stat['bj'] <= 15:
  529. spafinloc = 7
  530. pcs_throat += 1
  531. gs 'cum_manage'
  532. '<center><img <<$set_imgh>> src="images/shared/sex/cum/chest/bjt2.jpg"></center>'
  533. 'You don''t have much experience giving blowjobs, and even though you do your best, the man can tell you''re not very good at it.'
  534. 'While you''re sucking him off, the man tries to pull your clothes aside to expose your breasts. You moan uncomfortably in protest with his cock still deep in your mouth, letting him know that was not part of the deal!'
  535. 'He''s clearly displeased, but lets go and refocuses his efforts on fucking your throat instead.'
  536. 'When he''s close to cumming, he pulls his cock out of your mouth. When he begins to jerk off furiously, you close your eyes and tilt your head back... except you don''t feel anything land on your face!'
  537. 'You open your eyes again after a few seconds and notice in horror that the asshole dumped his load onto your clothes, leaving stains everywhere! You silently curse him but force yourself to smile... he is still your customer, after all.'
  538. 'The man silently gives you the money he owes you, and then tells you to get out of his car.'
  539. gs 'arousal', 'bj', 10, 'prostitution', 'unknown'
  540. gs 'stat'
  541. else
  542. money += 500
  543. '<center><img <<$set_imgh>> src="images/shared/sex/cum/chest/bjt.jpg"></center>'
  544. 'Your trained tongue slides up and down his shaft expertly, and you pull out all of your tricks to make him feel good. You even use some techniques you learned to stall his orgasm for a while.'
  545. 'While you''re sucking him off, the man tries to pull your clothes aside to expose your breasts. Understanding what he wants, you expose your boobs readily. His cock erupts almost immediately at the sight of them, and he removes his cock from your mouth so he can spray his sperm over your tits too.'
  546. 'The man grins happily when he looks at his work of art across your boobs, and gives you an extra 500 <b>₽</b> as a tip on top of the money he owed you. You really made his day!'
  547. gs 'arousal', 'bj', 10, 'prostitution', 'unknown'
  548. gs 'stat'
  549. end
  550. end
  551. gs 'arousal', 'end'
  552. gs 'stat'
  553. act 'Get out of his car':gt 'prostitute', 'start'
  554. elseif $ARGS[1] = 'sex':
  555. 'After you suck him off for a while, the guy reminds you that that''s not why you''re here. He''s ready to fuck you now.'
  556. act 'Continue':
  557. cla
  558. clr
  559. *clr
  560. prosti = 0
  561. money += ProsMoney * 100
  562. gs 'stat'
  563. prostRand = rand(1, 100)
  564. gs 'dinSex', 'std_trigger'
  565. if prostRand <= 50:
  566. pose = 1
  567. picpRand = rand(1, 7)
  568. '<center><img <<$set_imgh>> src="images/locations/shared/sex/car/sexcar<<picpRand>>.jpg"></center>'
  569. 'You lean against the car and expose your bare ass to the man. He''s not wasting any time and immediately gets behind you, eagerly rubbing his cock against your vagina. The feeling of a rock hard erection rubbing on your pussy lips excites you. Your hips move involuntarily seeking out more friction. The man smiles at your eagerness to be fucked and grants your wish by slamming powerfully his hard member deep into your willing vagina. '
  570. gs 'arousal', 'vaginal', 10, 'prostitution', 'unknown'
  571. gs 'stat'
  572. elseif prostRand <= 75:
  573. pose = 1
  574. picpRand = rand(8, 10)
  575. '<center><img <<$set_imgh>> src="images/locations/shared/sex/car/sexcar<<picpRand>>.jpg"></center>'
  576. 'You get down on your hands and knees like he wants you to, and brace yourself against the car when you feel him pressing his cock against your pussy in a none too gentle fashion, wasting no time as he roughly uses your tender vagina for his pleasure. You groan in pain, which only encourages the man to fuck you even harder. '
  577. gs 'arousal', 'vaginal', 10, 'prostitution', 'unknown', 'rough'
  578. gs 'stat'
  579. else
  580. pose = 0
  581. picpRand = rand(11, 17)
  582. '<center><img <<$set_imgh>> src="images/locations/shared/sex/car/sexcar<<picpRand>>.jpg"></center>'
  583. 'He groans in your ear: "Get on the hood, on your back!"'
  584. 'You quickly do as he says, and let out a soft moan when he rubs his cock against your pussy lips.'
  585. gs 'arousal', 'vaginal', 10, 'prostitution', 'unknown'
  586. gs 'stat'
  587. end
  588. 'He exerted himself a great deal while he was fucking you, and is slowly catching his breath while you straighten your clothes.'
  589. 'With a satisfied smile on his face, he gives you the money he owes you and drives off.'
  590. gs 'arousal', 'end'
  591. gs 'stat'
  592. act 'Continue':gt 'prostitute', 'start'
  593. end
  594. elseif $ARGS[1] = 'anal':
  595. 'After you suck him off for a while, the guy reminds you that that''s not why you''re here. He''s ready to fuck your ass now.'
  596. act 'Continue':
  597. cla
  598. clr
  599. *clr
  600. prosti = 0
  601. gs 'stat'
  602. dickK = dick * 10 / 100
  603. if dickK < 1:dickK = 1
  604. pcs_ass += dickK
  605. !! the first cowl image is cowl, not cowl1
  606. picrand = rand(1, 6)
  607. '<center><img <<$set_imgh>> src="images/shared/sex/anal/mis/cowl<<picrand>>.jpg"></center>'
  608. 'As soon as you lie down on the hood of the car, the man parts your legs and eagerly presses the tip of his cock against your anus.'
  609. gs 'arousal', 'foreplay', 1, 'prostitution', 'unknown'
  610. gs 'stat'
  611. if pcs_ass < dick:
  612. 'You feel a sharp pain and wince when the man pushes the tip of his <<dick>> centimeter member past your sphincter, and continues to work most of his length inside you. Fortunately, he listens when you beg him to go slow.'
  613. 'The guy holds still for a moment so your ass can get used to how far it''s being stretched out. After a little while you don''t think it''s going to get any better, and you tell the man he can start to fucking you now with a forced, fake smile on your face.'
  614. 'He''s still careful at first, but soon forgets about your suffering and accelerates more and more. The man groans loudly while he hammers his cock inside your ass, ignoring your crying and mewling underneath him.'
  615. gs 'arousal', 'anal', 10, 'prostitution', 'unknown', 'rough'
  616. gs 'stat'
  617. else
  618. pcs_horny += pcs_ass
  619. 'Your anus has no difficulty adjusting to the size of his member, and it actually feels fairly pleasant when he shoves his length in. Your anus clasps around the base of his cock from time to time, and the man begins to thrust his hips against yours enthusiastically when he notices you can take it.'
  620. gs 'arousal', 'anal', 10, 'prostitution', 'unknown'
  621. gs 'stat'
  622. gs 'dinSex', 'std_trigger'
  623. end
  624. if klismaday ! daystart:
  625. act 'Continue':
  626. cla
  627. *clr
  628. gs 'stat'
  629. 'When the man stops, you think it''s because he came. Instead, you hear swearing.'
  630. '"What the fuck!? What kind of dirty whore are you, this is disgusting!" he yells.'
  631. 'When you turn around, you see the problem: his dick is covered in shit! You should really give yourself an enema first, if you want to sell your ass like this...'
  632. 'The man shouts angrily: "Get lost, whore... you''re lucky I''m letting you leave without beating you up first! You can forget about your money!"'
  633. gs 'arousal', 'end'
  634. gs 'stat'
  635. act 'Leave quietly':gt 'prostitute', 'start'
  636. act 'Insist he pays you anyway':
  637. cla
  638. *clr
  639. money += ProsMoney * 100
  640. pcs_mood -= 30
  641. pcs_health -= pcs_health/5
  642. pcs_throat += 1
  643. spafinloc = 12
  644. gs 'cum_manage'
  645. pcs_breath = 0
  646. gs 'dinSex', 'std_trigger_oral'
  647. gs 'stat'
  648. '<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bjr.jpg"></center>'
  649. '"Hey, I did what you wanted! You owe m-" you begin, but he doesn''t let you finish. The man angrily punches you in the stomach, making you double over in pain.'
  650. '"Fine! You''ll get your money... but you will correct your mistake, whore!" he snarls angrily.'
  651. 'He kneels down and thrusts his smelly, dirty cock all the way into your mouth, and says with a mean grin: "Start sucking, slut. It''s not coming out until it''s completely clean!"'
  652. 'The taste and stench are terrible, and you really have to fight the urge to vomit. You barely manage, partially because you''re afraid of what he would do otherwise...'
  653. 'A few minutes later, long after you licked and sucked his cock clean, the man is still fucking your throat violently. Then finally, he groans and cums inside your mouth.'
  654. 'He scoffs at you when he pulls away, while you roll to your stomach and dry heave a few times. That was disgusting!'
  655. 'He carelessly throws the money he owes you onto the ground and drives off, without saying another word.'
  656. gs 'arousal', 'bj', 5, 'prostitution', 'unknown', 'sub', 'humiliation'
  657. gs 'stat'
  658. act 'Collect the money and get up':gt 'prostitute', 'start'
  659. end
  660. if pcs_intel >= 50:
  661. act 'Apologize and make amends':
  662. cla
  663. *clr
  664. pcs_throat += 1
  665. gs 'dinSex', 'std_trigger_oral'
  666. gs 'stat'
  667. '<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bjr1.jpg"></center>'
  668. 'You understand perfectly why he''s upset... that wasn''t very smart of you. You''ll have to think of a solution fast!'
  669. '"I''m sorry, sir! Please allow me to make it up to you..." you tell him, while you drop to your knees obediently. This is going to be unpleasant, but you have to do something to keep him happy! And still get paid.'
  670. 'The man watches in disgust as you close your lips around his dirty cock. The taste and smell are awful! He''s still upset, but you can see his anger slowly fade away when you lick his dirty cock clean. It''s fully erect again by now, and you can tell he''s still very horny despite your mishap.'
  671. 'He then says: "Good enough. Lie down in the grass and spread your legs."'
  672. gs 'arousal', 'bj', 5, 'prostitution', 'unknown', 'sub', 'humiliation'
  673. gs 'stat'
  674. act 'Let him fuck you':
  675. cla
  676. *clr
  677. pcs_vag += 1
  678. money += ProsMoney * 110
  679. protect = 1
  680. gs 'dinSex', 'std_trigger'
  681. protect = 0
  682. gs 'stat'
  683. '<center><img <<$set_imgh>> src="images/locations/shared/sex/car/sexcar20.jpg"></center>'
  684. 'You lie down obediently, giving the man a humble look as he takes place between your legs. He quickly put a condom on, not taking any more chances with you. You still have that awful taste in your mouth, but do your best to focus on giving the man pleasure.'
  685. 'The man drives his cock deep inside you and begins to fuck your pussy using long, firm strokes. He groans every time his hips slap against yours, and the intensity with which he fucks you makes you cry out as well.'
  686. 'After a few minutes, the man groans and you feel his hips spasming against yours. He pulls out of you and takes the filled condom off his slowly shrinking cock.'
  687. 'While you lay on the grass, recovering from all the things you just had to do to not lose your customer, he theatrically throws a number of bills onto your body one by one. He''s smiling again, and is clearly in a good mood. He even added a little extra!'
  688. gs 'arousal', 'vaginal', 5, 'prostitution', 'unknown', 'sub', 'humiliation'
  689. gs 'arousal', 'end'
  690. gs 'stat'
  691. act 'Collect the money and get up':gt 'prostitute', 'start'
  692. end
  693. end
  694. end
  695. end
  696. else
  697. money += 2000
  698. cumanalRand = rand(0, 2)
  699. if cumanalRand = 0:
  700. spafinloc = 4
  701. gs 'cum_manage'
  702. 'Suddenly the man groans loudly, and abruptly pulls his member out of your stretched anus. The sudden emptiness feels strange, but you smile seductively at the man while he jerks himself off over your ass cheeks. When he''s done covering your buttocks with his seed, he lets out a satisfied sigh and gives you your money.'
  703. elseif cumanalRand = 1:
  704. spafinloc = 7
  705. gs 'cum_manage'
  706. 'Suddenly the man groans loudly, and abruptly pulls his member out of your stretched anus. The sudden emptiness feels strange, but you smile seductively at the man while he jerks himself off over your ass cheeks. Then the bastard suddenly aims his cock at your clothes, and shoots his load all over them!'
  707. 'You silently curse him, but force yourself to keep smiling as he lets out a satisfied sigh and gives you your money.'
  708. else
  709. spafinloc = 3
  710. gs 'cum_manage'
  711. 'Suddenly the man groans loudly, and he holds still with his cock deep inside you. Then he very slowly pulls out, and a trickle of his sperm slowly runs out of your slightly gaping ass.'
  712. 'He admires his work for a moment, before giving the money he owes you with a satisfied smile on his face.'
  713. end
  714. gs 'arousal', 'end'
  715. gs 'stat'
  716. act 'Take his money and straighten your clothes':gt 'prostitute', 'start'
  717. end
  718. end
  719. end
  720. end
  721. end
  722. end
  723. end
  724. end
  725. --- Prostitute ---------------------------------