1
0

Prostitute 20 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632
  1. # Prostitute
  2. if $ARGS[0] = 'start':
  3. $metka = $ARGS[0]
  4. $loc = $CURLOC
  5. $metkaSex = $ARGS[0]
  6. $locSex = $CURLOC
  7. cls
  8. minut += 5
  9. gs 'stat'
  10. gs 'outdoors'
  11. '<center><b><font color="maroon">Hooker</font></b></center>'
  12. '<center><img src="images/etogame/park2.jpg"></center>'
  13. if hour >= 16 and hour <= 23:
  14. if whoreQW = 1:
  15. 'Prostitutes look at you with interest.'
  16. act 'Talk':
  17. cla
  18. whoreQW = 2
  19. 'You went to a prostitute and asked her how things are done here at all. She began to explain. "We are free, do not work on anyone, but because of this many problems. Svimi Stella with her friends sometimes beat us and rob and sometimes come petty thugs and rob us of the money. If you want to work here, you have to pay and Stella and Bandyuk . course you cool, you can try to besiege Stella and her friends, but the bandits do not advise contact. And yet, you do not peck on customers, if you nebudesh dressed like a slut, you can buy some clothes in a sex shop. "'
  20. act 'Move away':gt 'prostitute', 'start'
  21. end
  22. elseif whoreQW = 0:
  23. 'Hey, you´re not one of us, would valyl from our point, and that the teeth will not collect.'
  24. act 'Fuck you!':
  25. cla
  26. minut += 15
  27. $boy = 'Stoned prostitute'
  28. !!stats
  29. strenV = 20
  30. speedV = 30
  31. agilV = 30
  32. reactV = 30
  33. vitalV = 50
  34. intelV = 10
  35. willV = 10
  36. !!skills
  37. magikV = 10
  38. boxingV = 10
  39. shootV = 10
  40. !!parameters
  41. healthV = vitalV * 10 + strenV * 5
  42. mannaV = intelV * 10 + magikV * 10
  43. willpowerV = willV * 10
  44. BonusAtakV = 0
  45. BonusDefV = 0
  46. !!Programme of Action
  47. program = 0
  48. prostitutFight = 1
  49. if spellavtoklon = 1:klon = 3
  50. if spellbefshild = 1:defence = 500
  51. gt 'fight', 'start'
  52. end
  53. act 'And how to become one of your own?':
  54. cla
  55. 'And how to become one of your own? You asked. Brazen prostitute grinned spat. To do this, you have to pay Stella.'
  56. act 'Move away':gt 'prostitute', 'start'
  57. act 'I agree':
  58. cla
  59. whoreQW = 2
  60. 'You agreed. Prostitute told you that you need to buy the appropriate clothing in sex Shope. Then customers will immediately understand that you´re a prostitute.'
  61. act 'Move away':gt 'prostitute', 'start'
  62. end
  63. end
  64. elseif whoreQW = 2:
  65. 'Prostitutes look at you with curiosity.'
  66. if $clothingworntype = 'naughty' and PCloQuality = 2 and son > 0:
  67. act 'Stand and wait for customers (0:15)':
  68. cla
  69. minut += 10
  70. if rand(0, (vnesh/4 + hour) * 2) < 20:
  71. 'No you are not interested.'
  72. act 'Leave':gt 'prostitute', 'start'
  73. else
  74. proseventrand = rand(1, 20)
  75. if proseventrand = 1:
  76. 'To you black jeep pulled up, opened the window and leaned out healthy brazen face. "Hey slut, it´s time to pay tribute. Shtukar Come here and get out on work."'
  77. if money >= 1000:
  78. act 'Giving money':
  79. cla
  80. money -= 1000
  81. 'You gave the money big man in the jeep. He put them in his pocket and left.'
  82. act 'Move away':gt 'prostitute', 'start'
  83. end
  84. elseif money < 1000:
  85. act 'I have not earned much':
  86. cla
  87. money = 0
  88. 'You big man began to explain that you have not earned it grabbed you by the arm and threw him into a jeep, there you have it brushed pocket and said that he will teach you how to work.'
  89. act 'Work':
  90. $boy = 'Bandit'
  91. dick = rand(18, 21)
  92. gt 'blowPR', 'start'
  93. end
  94. end
  95. end
  96. act 'Fuck you!':
  97. cla
  98. minut += 15
  99. $boy = 'Bandit'
  100. !!stats
  101. strenV = 200
  102. speedV = 30
  103. agilV = 20
  104. reactV = 20
  105. vitalV = 150
  106. intelV = 10
  107. willV = 10
  108. !!skills
  109. magikV = 10
  110. boxingV = 10
  111. shootV = 10
  112. !!parameters
  113. healthV = vitalV * 10 + strenV * 5
  114. mannaV = intelV * 10 + magikV * 10
  115. willpowerV = willV * 10
  116. BonusAtakV = 0
  117. BonusDefV = 0
  118. !!Programme of Action
  119. program = 0
  120. prostitutFight = 2
  121. if spellavtoklon = 1:klon = 3
  122. if spellbefshild = 1:defence = 500
  123. gt 'fight', 'start'
  124. end
  125. elseif proseventrand = 2:
  126. 'To you approached a prostitute. "I hear you, slut, if you do not want problems, you have to pay Stella. Pyatihatnik Come here and get out on work."'
  127. if money >= 500:
  128. act 'Giving money':
  129. cla
  130. money -= 500
  131. 'You gave the money to the prostitute, she turned and walked away.'
  132. act 'Move away':gt 'prostitute', 'start'
  133. end
  134. elseif money < 500:
  135. act 'I have not earned much':
  136. cla
  137. money = 0
  138. 'You started zhalovatsya that do not earn much money. You searched prostitute taking everything of value and left.'
  139. act 'Move away':gt 'prostitute', 'start'
  140. end
  141. end
  142. act 'Fuck you!':
  143. cla
  144. minut += 15
  145. $boy = 'Prostitute'
  146. !!stats
  147. strenV = 50
  148. speedV = 50
  149. agilV = 40
  150. reactV = 30
  151. vitalV = 60
  152. intelV = 10
  153. willV = 10
  154. !!skills
  155. magikV = 10
  156. boxingV = 10
  157. shootV = 10
  158. !!parameters
  159. healthV = vitalV * 10 + strenV * 5
  160. mannaV = intelV * 10 + magikV * 10
  161. willpowerV = willV * 10
  162. BonusAtakV = 0
  163. BonusDefV = 0
  164. !!Programme of Action
  165. program = 0
  166. prostitutFight = 3
  167. if spellavtoklon = 1:klon = 3
  168. if spellbefshild = 1:defence = 500
  169. gt 'fight', 'start'
  170. end
  171. else
  172. 'To you a car drove up.'
  173. prosti = 0
  174. if proseventrand <= 8:
  175. 'The client wants to blow and asks how much it will cost.'
  176. elseif proseventrand <= 14:
  177. 'Client wants sex and asks how much it will cost.'
  178. else
  179. 'Client wants anal and asks how much it will cost.'
  180. end
  181. act 'Leave':gt 'prostitute', 'start'
  182. if ProsMoney > 0:
  183. act '<<ProsMoney * 100>> <b>₽</b>':
  184. cls
  185. gt 'prostitute', 'work1', iif(proseventrand <= 8, 'blow job', iif(proseventrand <= 14, 'sex', 'anal'))
  186. end
  187. end
  188. act 'Assign a price':
  189. cls
  190. gs 'stat'
  191. ProsMoney = input("Enter a number below, which will multiplied by 100")
  192. if ProsMoney < 1:
  193. 'The client looked at you in amazement and muttered "what that fucker." Then started the car and drove away.'
  194. act 'Leave':gt 'prostitute', 'start'
  195. else
  196. gt 'prostitute', 'work1', iif(proseventrand <= 8, 'blow job', iif(proseventrand <= 14, 'sex', 'anal'))
  197. end
  198. end
  199. end
  200. end
  201. end
  202. end
  203. end
  204. end
  205. act 'Leave':
  206. cla
  207. minut += 5
  208. prosta = 0
  209. gt 'park', 'start'
  210. end
  211. end
  212. if $ARGS[0] = 'work1':
  213. !! ARGS 1 - blow job, sex, anal
  214. '<center><img src="images/etogame/park2.jpg"></center>'
  215. 'You told the client that <<$ARGS[1]>> will cost <<ProsMoney * 100>> <b>₽</b>.'
  216. vnpr = 0
  217. if vidage >= 40:vnpr -= 20
  218. if vidage >= 35 and vidage < 40:vnpr -= 10
  219. if vidage >= 30 and vidage < 35:vnpr -= 5
  220. if vidage >= 25 and vidage < 30:vnpr += 1
  221. if vidage >= 20 and vidage < 25:vnpr += 5
  222. if vidage >= 18 and vidage < 20:vnpr += 10
  223. if vidage < 18:vnpr += 15
  224. if vnesh = -10:
  225. vnpr -= 100
  226. elseif vnesh < 5:
  227. vnpr -= 10
  228. elseif vnesh < 15:
  229. vnpr -= 5
  230. elseif vnesh < 30:
  231. vnpr += 1
  232. elseif vnesh < 50:
  233. vnpr += 5
  234. else
  235. vnpr += 10
  236. end
  237. if cumSUM > 0:vnpr -= 10
  238. if mop = 0:vnpr -= 10
  239. if mop = 1:vnpr -= 1
  240. if mop = 2:vnpr += 1
  241. if mop = 3:vnpr += 5
  242. if mop = 4:vnpr += 10
  243. if leghair <= 0:vnpr += 1
  244. if leghair > 0:vnpr -= 5
  245. if lobok > 0:vnpr -= 5
  246. if lobok <= 0:vnpr += 1
  247. if tan > 0:vnpr += 1
  248. if curly > 0:vnpr += 1
  249. if sweat > 0:vnpr -= 10
  250. if hapri = 0:vnpr -= 1
  251. if lip = 4:vnpr += 1
  252. if vnpr >= 0:
  253. if ProsMoney = 1:
  254. gt 'prostitute', 'work2', $ARGS[1]
  255. exit
  256. else
  257. if vnpr >= rand(0, 30):
  258. if $ARGS[1] = 'blow job':KlientMON = rand(1, 10)
  259. if $ARGS[1] = 'sex':KlientMON = rand(3, 25)
  260. if $ARGS[1] = 'anal':KlientMON = rand(5, 40)
  261. if KlientMON >= ProsMoney:
  262. gt 'prostitute', 'work2', $ARGS[1]
  263. exit
  264. else
  265. if rand(0, 1) = 1:
  266. 'The client grins and offers <<KlientMON * 100>> per job.'
  267. act 'Agree':
  268. ProsMoney = KlientMON
  269. gt 'prostitute', 'work2', $ARGS[1]
  270. exit
  271. end
  272. act 'Refuse':gt 'prostitute', 'start'
  273. exit
  274. end
  275. end
  276. end
  277. end
  278. end
  279. 'Client meticulously examined you and said, "No, fuck." After that, he started the car and drove away.'
  280. act 'Leave':gt 'prostitute', 'start'
  281. end
  282. if $ARGS[0] = 'work2':
  283. !! ARGS 1 - blow job, sex, anal
  284. 'The client nods his head and opens the door of his car.'
  285. act 'Get into the client''s car':
  286. cla
  287. clr
  288. *clr
  289. gs 'boy'
  290. dynamic $CatName, '"John"'
  291. slutty += 1
  292. minut += 1
  293. guy += 1
  294. bj += 1
  295. throat += 1
  296. prosta = 1
  297. if rand(1, 100) >= 70:dynamic $venerasiak
  298. gs 'stat'
  299. '<center><img src="images/Prost/bj.jpg"></center>'
  300. 'Your hand slid crotch guy and unzipped his pants. You shoved his hand into his pants and pulled out his cock.'
  301. if prezik > 0:
  302. act 'Wear a condom on the penis mouth':
  303. cla
  304. clr
  305. *clr
  306. minut += 5
  307. prezik -= 1
  308. gs 'stat'
  309. picrand = rand(1, 7)
  310. '<center><img src="images/Prost/bjp<<picrand>>.jpg"></center>'
  311. 'You pulled his lips a condom on the penis'
  312. if $ARGS[1] = 'blow job':
  313. money += ProsMoney * 100
  314. 'Your lips slide down the barrel client until he cums in a condom.'
  315. act 'Finish':gt 'prostitute', 'start'
  316. elseif $ARGS[1] = 'sex':
  317. 'Client sufficiently warmed up and you can continue.'
  318. act 'Further':
  319. cla
  320. clr
  321. *clr
  322. prosti = 0
  323. minut += 15
  324. sex += 1
  325. protect = 1
  326. if preziktype = 2:
  327. sexcontra = 7
  328. else
  329. sexcontra = 3
  330. end
  331. money += ProsMoney * 100
  332. gs 'stat'
  333. if rand(0, 1) = 0:
  334. '<center><img src="images/Prost/sexcar.jpg"></center>'
  335. 'You obediently lay naked in the back seat until your dick hole logged.'
  336. gs 'orgazm', 'start'
  337. else
  338. '<center><img src="images/Prost/sexcar2.jpg"></center>'
  339. 'Standing on all fours, you felt like you were planting confident movement on the penis.'
  340. gs 'orgazm', 'start'
  341. end
  342. act 'Leave':gt 'prostitute', 'start'
  343. end
  344. elseif $ARGS[1] = 'anal':
  345. 'Client sufficiently warmed up and you can continue.'
  346. act 'Further':
  347. cla
  348. clr
  349. *clr
  350. minut += 1
  351. prosti = 0
  352. anal += 1
  353. money += ProsMoney * 100
  354. gs 'stat'
  355. dickK = dick * 10 / 100
  356. if dickK < 1:dickK = 1
  357. anus += dickK
  358. '<center><img src="images/Prost/anal.jpg"></center>'
  359. 'You got cancer and client uper you in your anus <<dick>> centimeter member.'
  360. if anus < dick:
  361. fun = 0
  362. 'Ass ached when the member entered her client waited for a bit until your ass adapt and gradually began to move his cock in you, gradually accelerating.'
  363. end
  364. if anus >= dick:
  365. horny += anus
  366. 'You felt like like vagina stretched anus clasping member when a customer came in you, he immediately began to have your ass.'
  367. end
  368. 'Finally, the client does not stand up and ends in a condom.'
  369. act 'Leave':gt 'prostitute', 'start'
  370. end
  371. end
  372. end
  373. else
  374. act 'Mark cock in her mouth':
  375. cla
  376. clr
  377. *clr
  378. dynamic $venerasiak
  379. minut += 5
  380. gs 'stat'
  381. picrand = rand(8, 13)
  382. '<center><img src="images/Prost/bjp<<picrand>>.jpg"></center>'
  383. 'You clasped lips member.'
  384. act 'Suck':
  385. *clr
  386. cla
  387. if $ARGS[1] = 'blow job':
  388. bjrand = rand(1, 100)
  389. money += ProsMoney * 100
  390. if bjrand <= 50:
  391. if bj <= 15:
  392. spafinloc = 12
  393. gs 'cum_manage'
  394. '<center><img src="images/Prost/bjm.jpg"></center>'
  395. 'You clumsy movements suck dick customer until he cums in your mouth, making you wince from the unpleasant taste of sperm.'
  396. else
  397. spafinloc = 12
  398. gs 'cum_manage'
  399. '<center><img src="images/Prost/bjm2.jpg"></center>'
  400. 'Your trained sponge glide up and down, bringing pleasure to the customer. Very soon you will feel the taste of his seed that you swallow with delight to the last drop.'
  401. end
  402. elseif bjrand <= 80:
  403. if bj <= 15:
  404. spafinloc = 11
  405. gs 'cum_manage'
  406. if mop > 1:mop = 0
  407. '<center><img src="images/Prost/bjf.jpg"></center>'
  408. 'You clumsy movements suck dick client suddenly you he pulls his dick, ending on your face, you do not have time to blink, a little sperm gets you in the eye, but, despite the burning, you can not cry, you can only smile.'
  409. else
  410. spafinloc = 11
  411. gs 'cum_manage'
  412. '<center><img src="images/Prost/bjf2.jpg"></center>'
  413. 'Your trained sponge glide up and down, bringing pleasure to the customer as soon as the client has released your mouth, you realize that your face is now flooded with sperm. You have time, tilt the head back with her eyes closed, heavy drops falling on your chin, forcing to smile at the thought of not smeared makeup.'
  414. end
  415. else
  416. if bj <= 15:
  417. spafinloc = 7
  418. gs 'cum_manage'
  419. '<center><img src="images/Prost/bjt2.jpg"></center>'
  420. 'You clumsy movements suck dick client, it stretches hands to your chest trying to expose it. You moaned, letting him know that was not the deal. Dissatisfied client continued to have you in my mouth. You have already relaxed, as a client, pushing, pulled wet from saliva member. His eyes closed, you feel like a drop of sperm not fall on your face and chest! Surprised you open your eyes in horror when he saw in the semen-stained clothing, and pretty smiling customer.'
  421. else
  422. money += 500
  423. '<center><img src="images/Prost/bjt.jpg"></center>'
  424. 'Your trained sponge glide up and down, bringing pleasure to the customer. He stretches his hands to your chest did not patiently trying to expose her, you understand everything without words. Exposing boobs you become even more carefully to work his mouth when he was already on the brink, you have stepped back sharply, slipping back with the member in a moment became a client shoot sperm on your carefully when substituted hemisphere. Left happy, he handed you another Piatihatki.'
  425. end
  426. end
  427. act 'Finish':gt 'prostitute', 'start'
  428. elseif $ARGS[1] = 'sex':
  429. 'Client sufficiently warmed up and you can continue.'
  430. act 'Further':
  431. cla
  432. clr
  433. *clr
  434. prosti = 0
  435. minut += 15
  436. sex += 1
  437. money += ProsMoney * 100
  438. gs 'stat'
  439. prostRand = rand(1, 100)
  440. if prostRand <= 50:
  441. pose = 1
  442. picpRand = rand(1, 7)
  443. 'Becoming cancer, you feel hot prick seeking to get into the vagina.'
  444. gs 'orgazm', 'start'
  445. elseif prostRand <= 75:
  446. pose = 1
  447. picpRand = rand(8, 10)
  448. 'Standing on all fours, you felt like a hole braced member.'
  449. gs 'orgazm', 'start'
  450. else
  451. pose = 0
  452. picpRand = rand(11, 17)
  453. 'You were ordered to undress and lie down on the hood of the car.'
  454. gs 'orgazm', 'start'
  455. end
  456. '<center><img src="images/Prost/sexcar<<picpRand>>.jpg"></center>'
  457. act 'Leave':gt 'prostitute', 'start'
  458. end
  459. elseif $ARGS[1] = 'anal':
  460. 'Client sufficiently warmed up and you can continue.'
  461. act 'Further':
  462. cla
  463. clr
  464. *clr
  465. minut += 1
  466. prosti = 0
  467. gs 'stat'
  468. dickK = dick * 10 / 100
  469. if dickK < 1:dickK = 1
  470. anus += dickK
  471. !! the first cowl image is cowl, not cowl1
  472. picrand = rand(2, 6)
  473. '<center><img src="images/Prost/cowl<<picrand>>.jpg"></center>'
  474. 'As soon as you lay on the hood of the car, legs apart, you stared into the anus <<dick>> centimeter member.'
  475. if anus < dick:
  476. fun = 0
  477. 'A sharp pain pierced member of stuck in the ass, making you wince groan. Customer waited patiently until your anus, get used to stretching, but you still could not get rid of the nagging pain. Fake smile, through the desire to end this torture quickly, you give the signal to start the action. Client was cautious, starting with the slow movements in the anus, gradually accelerating, he forgot about your suffering, surrendering his own enjoyment, and not noticing as "goods", writhes and moans in pain.'
  478. else
  479. horny += anus
  480. 'You felt like like vagina stretched anus clasping member when a customer came in you, he immediately began to have your ass.'
  481. end
  482. if klismaday ! daystart:
  483. act 'Escape':
  484. cla
  485. *clr
  486. gs 'stat'
  487. 'You were going to get the money but instead heard swearing. "You fear that the nipple completely lost my whole bolt in your shit, you do not know that I have a dick, and not brush the toilet, get out of here while intact, but money can not forget."'
  488. act 'Leave':gt 'prostitute', 'start'
  489. act 'Be rude':
  490. cla
  491. *clr
  492. money += ProsMoney * 100
  493. manna -= 30
  494. health -= 30
  495. willpower -= 30
  496. bj += 1
  497. throat += 1
  498. gs 'stat'
  499. '<center><img src="images/Prost/bjr.jpg"></center>'
  500. '"Hey, I did not understand, chase my money ..." you did not get to finish. Man hit you strong blow to the chest, from which you crashed to the ground. "Money is wanted, well, what a bitch I''ll give them to you, but you are correct his mistake" after these words he drove you exhaling stench dick in her mouth. You were choking from the stench, but there was nothing, his eyes closed, as if saying yes, you tried to keep from vomiting, fear of causing mayhem. The stranger had you in my mouth, trying to touch every movement of your lips their balls. His cock soon became clean, but it did not stop him, it seemed an eternity before he again finished right in the throat. Looking at you roll in a mixture of saliva and vomit, he laughed and said no more words thrown in your face money.'
  501. act 'Leave':gt 'prostitute', 'start'
  502. end
  503. if intel >= 50:
  504. act 'Make amends':
  505. cla
  506. *clr
  507. bj += 1
  508. throat += 1
  509. gs 'stat'
  510. '<center><img src="images/Prost/bjr1.jpg"></center>'
  511. 'You understand everything perfectly, you are at fault, and you correct client insanely angry and seems ready to tear you to pieces. You decide to make amends, his guilt polish smeared mouth organ client.'
  512. act 'Suck':
  513. cla
  514. *clr
  515. vagina += 1
  516. money += ProsMoney * 110
  517. gs 'stat'
  518. '<center><img src="images/Prost/sexcar20.jpg"></center>'
  519. 'Bitter taste in the mouth of feces did not give you a taste of diluted semen. Freeing your mouth working, customer ordered to lie on the grass. You humbly and even with a certain touch of acting talent was acting innocent doll while you fuck. Client warmed your able mouth twitching long over you, quickly ran into the condom. While you lay recovering on your body fall three green paper, he was satisfied, happy smile you think.'
  520. act 'Escape':gt 'prostitute', 'start'
  521. end
  522. end
  523. end
  524. end
  525. else
  526. money += 2000
  527. cumanalRand = rand(0, 2)
  528. if cumanalRand = 0:
  529. anal += 1
  530. spafinloc = 4
  531. gs 'cum_manage'
  532. 'Suddenly the anus was empty, the client abruptly yanked member before it drops the seed watered half your ass.'
  533. elseif cumanalRand = 1:
  534. anal += 1
  535. spafinloc = 7
  536. gs 'cum_manage'
  537. 'Suddenly the anus was empty, the client abruptly yanked a member before his seed rain drops fell on your body, dirtying clothes traces of dairy.'
  538. else
  539. anal += 1
  540. spafinloc = 3
  541. gs 'cum_manage'
  542. 'Customer traffic have become sharp and painful it literally rammed in the ass you finally feel like you''re inside you flowing sperm all over you think.'
  543. end
  544. act 'Leave':gt 'prostitute', 'start'
  545. end
  546. end
  547. end
  548. end
  549. end
  550. end
  551. end
  552. end
  553. --- Prostitute ---------------------------------