abductionCustomer.qsrc 51 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152
  1. # abductionCustomer
  2. if $ARGS[0] = 'abdCustomerGate':
  3. menu_off = 1
  4. 'Your master approaches you. "Hello, slave."'
  5. '"I have a customer here who came to rent you for a while. Do whatever he asks of you."'
  6. buyout = 0
  7. act 'Yes, Master.':gt 'abductionCustomer', 'abdCustomerGo'
  8. end
  9. if $ARGS[0] = 'abdCustomerGateBuyout':
  10. menu_off = 1
  11. 'Your master approaches you. "Hello, slave."'
  12. '"I have a customer here that came to rent you for a while. Do whatever he asks of you."'
  13. buyout = 1
  14. act 'Yes, Master.':gt 'abductionCustomer', 'abdCustomerGo'
  15. end
  16. if $ARGS[0] = 'abdCustomerGo':
  17. menu_off = 1
  18. minut += 5
  19. gs 'stat'
  20. i = rand(1,3)
  21. '<center><video autoplay loop src="images/locations/shared/abduction/sex/ledonfour<<i>>.mp4"></video></center>'
  22. 'Your master removes your regular chain and attaches a leash to your collar.'
  23. 'You are led up the stairs into the house above your cellar.'
  24. 'When you enter the hall, your master orders you on your knees. "Crawl on your hands and legs like the bitch you are!"'
  25. if pcs_vag = 0:
  26. 'You are led to the room where your customer awaits. Your leash is handed to him.'
  27. else
  28. 'You are led to the room where your customer awaits. Your leash is handed to him, and your master leaves. The room''s only door closes behind him, leaving you alone with your customer.'
  29. end
  30. act 'Continue':gt 'abductionCustomer', 'abdCustomer'
  31. end
  32. if $ARGS[0] = 'abdCustomer':
  33. minut += 5
  34. gs 'stat'
  35. ! customer character type
  36. ! -1=kind, 3-4=normal, 5+=sadistic
  37. charTypeRand = 3
  38. ! customer body type
  39. ! -1=skinny, 3-4=regular, 5-6=muscular, 7+=fat
  40. bodyTypeRand = 3
  41. ! customer height type
  42. ! -1=small, 3-4=regular, 5+=tall
  43. heightTypeRand = 3
  44. ! customer age
  45. customerAge = rand(15, 90)
  46. ! customer race, racial modifiers
  47. raceRand = rand(0, 2)
  48. if RaceRand = 0:
  49. $raceType = 'white'
  50. dickChance = 30
  51. charTypeRand += rand(-3,2)
  52. bodyTypeRand += rand(-2,8)
  53. heightTypeRand += rand(-1,6)
  54. elseif RaceRand = 1:
  55. $raceType = 'black'
  56. dickChance = 40
  57. charTypeRand += rand(0,2)
  58. bodyTypeRand += rand(0,6)
  59. heightTypeRand += rand(0,6)
  60. elseif RaceRand = 2:
  61. $raceType = 'asian'
  62. dickChance = 20
  63. charTypeRand += rand(-2,2)
  64. bodyTypeRand += rand(-6,2)
  65. heightTypeRand += rand(-4,1)
  66. end
  67. if pcs_vag = 0:
  68. dick = 28
  69. elseif buyout = 1:
  70. dick = 24
  71. else
  72. dickRand = rand(1,100)
  73. if dickRand <= dickChance:
  74. dick = rand(15, 40)
  75. elseif dickRand <= (dickChance * 2):
  76. dick = rand(10, 24)
  77. else
  78. dick = rand(5, 14)
  79. end
  80. end
  81. vagDMG = (dick - pcs_vag) * 2
  82. assDMG = (dick - pcs_ass) * 2
  83. throatDMG = (dick - pcs_throat) * 2
  84. ! customer dick size
  85. if dick >= 30:
  86. $dick_girth = 'monstrous'
  87. cumVol = rand(4,5)
  88. elseif dick >= 25:
  89. $dick_girth = 'huge'
  90. cumVol += 1
  91. cumVol = rand(3,5)
  92. elseif dick >= 20:
  93. $dick_girth = 'very big'
  94. cumVol = rand(2,5)
  95. elseif dick >= 15:
  96. $dick_girth = 'big'
  97. cumVol = rand(2,4)
  98. elseif dick >= 10:
  99. $dick_girth = 'regular'
  100. cumVol -= 1
  101. cumVol = rand(1,4)
  102. else
  103. $dick_girth = 'tiny'
  104. cumVol -= 2
  105. cumVol = rand(1,3)
  106. end
  107. ! customer cum volume
  108. if cumVol <= 1:
  109. $cumType = 'neglectable'
  110. elseif cumVol = 2:
  111. $cumType = 'little'
  112. elseif cumVol = 3:
  113. $cumType = 'normal'
  114. elseif cumVol = 4:
  115. $cumType = 'significant'
  116. elseif cumVol >= 5:
  117. $cumType = 'horse like'
  118. end
  119. if charTypeRand <= 1:
  120. $charType = 'kind'
  121. elseif charTypeRand >= 2 and charTypeRand <= 4:
  122. $charType = 'neutral'
  123. elseif charTypeRand >= 5:
  124. $charType = 'sadistic'
  125. end
  126. if bodyTypeRand <= 1:
  127. $bodyType = 'skinny'
  128. elseif bodyTypeRand >= 2 and bodyTypeRand <= 4:
  129. $bodyType = 'slim'
  130. elseif bodyTypeRand >= 5 and bodyTypeRand <= 6:
  131. $bodyType = 'muscular'
  132. elseif bodyTypeRand >= 7:
  133. $bodyType = 'fat'
  134. end
  135. if heightTypeRand <= 1:
  136. $heightType = 'small'
  137. elseif heightTypeRand >= 2 and heightTypeRand <= 4:
  138. $heightType = 'average'
  139. elseif heightTypeRand >= 5:
  140. $heightType = 'tall'
  141. end
  142. if customerAge <= 18:
  143. $ageType = 'very young'
  144. elseif customerAge > 18 and customerAge <= 30:
  145. $ageType = 'young'
  146. elseif customerAge > 30 and customerAge <= 45:
  147. $ageType = 'middle aged'
  148. elseif customerAge > 45 and customerAge <= 60:
  149. $ageType = 'elderly'
  150. elseif customerAge > 60 and customerAge <= 80:
  151. $ageType = 'old'
  152. elseif customerAge > 80:
  153. $ageType = 'very old'
  154. end
  155. if buyout = 1:
  156. $bName = 'Leonid'
  157. $bSurname = 'Nosov'
  158. '<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorekneel1.jpg"></center>'
  159. 'As you are led to the room, as usual, you see the man standing opposite of you.'
  160. 'Right away you can see that he is just another bastard coming here to use your <<age>> years young body.'
  161. 'Your master leaves you in the center of the room. You are still kneeling with the leash attached to your collar.'
  162. 'As the door closes behind him, the customer slowly turns, so you can finally see his face.'
  163. act 'Look at his face':gt 'abductionCustomer', 'abdCustomer-buyout1'
  164. else
  165. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorekneelmaster.mp4"></video></center>'
  166. 'The customer is a <<$heightType>> <<$bodyType>> <<$raceType>>.'
  167. 'Kneeling in front of him, you look up and see the <<$charType>> look in his eyes.'
  168. 'You then look down and see his crotch directly in front of you. It''s obvious that he has something <<$dick_girth>> in his pants.'
  169. end
  170. if pcs_vag = 0:
  171. 'Your master speaks to the customer. "So this is her. You can be sure she''s a virgin as her hymen is intact."'
  172. '"I believe you. She''s not the first virgin slut that you''ve delivered to me, is she?"'
  173. '"No, she definitely is not! How many has it been so far? Four, five?"'
  174. '"In your establishment, I have paid for six virgins in total. This one is the seventh.'
  175. if age < 17:
  176. '"Good number. Good slut, too. She''s only <<age>> years old, so her pussy will be especially tight."'
  177. '"That''s how I like it."'
  178. else
  179. '"Good number. She''s a good slut, too."'
  180. '"We will see."'
  181. end
  182. act 'Sob and wait':gt 'abductionCustomer', 'abdCustomer-virgin1'
  183. else
  184. if buyout = 0:
  185. 'He is clearly expecting you to start pleasuring him. You decide to:'
  186. act 'Show him your beautiful body':gt 'abductionCustomer', 'abdCustomer-show'
  187. act 'Unzip his pants':gt 'abductionCustomer', 'abdCustomer-unzip'
  188. end
  189. end
  190. end
  191. !! Scene is too long and has two images playing at the same time. Can this be split into smaller chunks please?
  192. if $ARGS[0] = 'abdCustomer-buyout1':
  193. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/leonid/leonid.jpg"></center>'
  194. 'As you look up at his face, a chill runs down your spine - you know him!'
  195. 'You remember this man from one of the parent-school conferences. It''s Dimka''s dad, <<$bName>>!'
  196. 'He recognizes you too. "Oh... what the? Who do we have here? Isn''t this that missing girl, <<$pcs_firstname>> <<$pcs_lastname>>?'
  197. *nl
  198. 'With a trembling voice, only a few words leave your mouth. "Th...that''s me mister <<$bSurname>>..."'
  199. '"You do realize that the police have already given up searching for you. As if they made any effort though..."'
  200. '"I-I don''t even know how long I''ve been here. The only thing I remember is being a plaything for these perverts..."'
  201. 'There is a short period of silence, but despite the unexpected situation, you keep kneeling with your back straight and breasts jutting forward, as you have been trained to do.'
  202. '<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorekneel2.jpg"></center>'
  203. 'Then suddenly, the look on <<$bName>>''s face changes from surprised to something else.'
  204. 'He comes up to you and gently caresses your face, "Plaything, you say? And do you like it?"'
  205. 'Surprised by such a question, you consider how to reply:'
  206. gs 'willpower', 'misc', 'self', 'hard'
  207. if will_cost <= pcs_willpwr:
  208. act 'Admit you like to be dominated, but this is too much (<<will_cost>> Willpower)':
  209. gs 'willpower', 'misc', 'self', 'hard'
  210. gs 'willpower', 'pay', 'self'
  211. gs 'stat'
  212. gt 'abductionCustomer', 'abdCustomer-buyout2'
  213. end
  214. else
  215. act 'Admit you like to be dominated, but this is too much (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  216. end
  217. act 'Say you hate it':gt 'abductionCustomer', 'abdCustomer-buyout3'
  218. end
  219. if $ARGS[0] = 'abdCustomer-buyout2':
  220. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorekneelmaster.mp4"></video></center>'
  221. '"What a nice submissive slut you have become. What would your mother say about this?"'
  222. '"I''d rather you didn''t let her know how I ended up." you meekly reply.'
  223. '"This establishment really gets the job done. I must commend the owner."'
  224. *nl
  225. 'He leaves the room and you can hear the echo of a discussion between him and your master.'
  226. 'After a while, <<$bName>> comes back. "Let''s go <<$pcs_firstname>>." He grabs your leash and leads you outside the room into the hallway.'
  227. '"B-but... where are you taking me? I have never been in this part of the house before."'
  228. '"You still don''t understand, do you slut? I own you now. I''ve bought you and you are now my property. You are... my slave."'
  229. 'You are still naked and collared as he leads you outside to his car. You are forced to get into his trunk.'
  230. act 'Continue':gt 'abductionCustomer', 'abdCustomer-buyoutLeave'
  231. end
  232. if $ARGS[0] = 'abdCustomer-buyout3':
  233. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreleonid1.mp4"></video></center>'
  234. '"In that case, let''s have some fun before we get straight to business."'
  235. 'He slaps your face so hard that you lose your balance and fall face first onto the floor.'
  236. 'You are taken by surprise by the blow - you had started to think that you were finally about to be saved from all of this.'
  237. 'However, <<$bName>> seems to be as perverted as all the other men that have used you previously.'
  238. 'Stepping above you as you helplessly lie on the floor, he opens his zipper to pull out his dick.'
  239. 'You can clearly see his <<dick>> cm long <<$dick_girth>> dick swing above you in the air.'
  240. act 'Suck on it':gt 'abductionCustomer', 'abdCustomer-suckTip'
  241. gs 'willpower', 'bj', 'resist'
  242. if will_cost <= pcs_willpwr:
  243. act 'Do Nothing (<<will_cost>> Willpower)':
  244. gs 'willpower', 'bj', 'resist'
  245. gs 'willpower', 'pay', 'resist'
  246. gs 'stat'
  247. gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
  248. end
  249. else
  250. act 'Do Nothing (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  251. end
  252. end
  253. if $ARGS[0] = 'abdCustomer-buyout4':
  254. '<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorefuckanalroughleonid2.jpg"></center>'
  255. 'You are left lying on the floor with <<$bName>>''s cum still flowing out of your gaping asshole.'
  256. 'You can hear the echo of his and your master''s voices discussing something you can''t make out.'
  257. 'A few minutes later, <<$bName>> comes back into the room. "I really like you <<$pcs_firstname>>."'
  258. *nl
  259. 'He grabs your leash and leads you outside the room into the hallway.'
  260. '"B-but... where are you taking me? I have never been in this part of the house."'
  261. '"You still don''t understand, do you slut? I own you now. I''ve bought you and you are now my property. You are... my slave."'
  262. 'You are still naked and collared as he leads you outside to his car. You are forced to get into his trunk.'
  263. act 'Continue':gt 'abductionCustomer', 'abdCustomer-buyoutLeave'
  264. end
  265. if $ARGS[0] = 'abdCustomer-buyoutLeave':
  266. '<center><img <<$set_imgh>> src="images/locations/shared/abduction/garage.jpg"></center>'
  267. 'Stuffed inside of the trunk, you can only hear the sound of the engine and the pavement below as he drives you somewhere unknown.'
  268. 'After an unknown amount of time, the sound of the pavement stops, and the engine shuts off, leaving only silence.'
  269. '<<$bName>> opens the trunk. Your eyes blink to adjust to the dimly lit area, and you realize that you are in an underground parking garage.'
  270. 'You climb out, still naked and collared like a dog. It seems he doesn''t care about your feelings at all.'
  271. 'He takes your leash and leads you on all fours up the stairs. You both exit through the stairwell door into a room that appears to be an office.'
  272. act 'Continue':gt 'leonid', 'firstTime'
  273. end
  274. if $ARGS[0] = 'abdCustomer-virgin1':
  275. minut += 10
  276. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin1.mp4"></video></center>'
  277. 'Your master leaves, and your body starts to shiver.'
  278. '"Don''t worry slut. This will only hurt a lot!" the customer laughs. He is clearly enjoying himself.'
  279. 'You run to the far corner of the room in a futile attempt to get as far away from him as you can.'
  280. 'He walks up to you and grabs you by the hair. He drags you as a pained, terrified scream emits from your throat to something that looks like a bench in the center of the room.'
  281. 'He forcefully yanks your hair to make you climb onto the bench like structure. He punches you in the stomach, and you collapse. He then flips you over onto your back and binds your arms above your head with handcuffs. He follows with putting your legs into stirrups, with legcuffs to hold you in place. You realize that this gives him unlimited access to your virgin pussy.'
  282. 'Your head is bound so that you have an unobstructed view on your own pussy. This is to ensure that you watch as he tears your terrified cunt apart.'
  283. gs 'stat'
  284. act 'Continue':gt 'abductionCustomer', 'abdCustomer-virgin2'
  285. end
  286. if $ARGS[0] = 'abdCustomer-virgin2':
  287. minut += 2
  288. pcs_mood = 5
  289. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin2.mp4"></video></center>'
  290. 'He starts to slowly undress, with his back to you to enhance your terror. You hear a loud clink as his pants, holding a belt, hit the concrete floor. He slowly turns around to face you, and you can finally see his naked body. His cock sways for a moment before stopping in front of your face.'
  291. '"With renewed terror, you start to cry at the sight of his <<dick>> cm thick <<$dick_girth>> cock."'
  292. gs 'stat'
  293. act 'Continue':gt 'abductionCustomer', 'abdCustomer-virgin3'
  294. end
  295. if $ARGS[0] = 'abdCustomer-virgin3':
  296. minut += 10
  297. '<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorevirgin3.jpg"></center>'
  298. 'He starts to jerk his cock, all the while looking at your eyes then to your bound and helpless nude body. The sight slowly makes his cock hard.'
  299. 'In his eyes, you can see he relishes looking at you in your despair.'
  300. gs 'stat'
  301. act 'Continue':gt 'abductionCustomer', 'abdCustomer-virgin4'
  302. end
  303. if $ARGS[0] = 'abdCustomer-virgin4':
  304. '<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorevirgin4.jpg"></center>'
  305. 'He finally reaches for you and brings the tip of his dick to the entrance of your virgin pussy.'
  306. 'He covers his <<$dick_girth>> member in a thick layer of lube then starts to slowly press against the opening of your vagina.'
  307. 'With his hands, he spreads your pussy lips apart to help ease the entry for his member.'
  308. '"Now behold girl. You are about to become a woman." he exclaims.'
  309. 'He pushes it in with a single long thrust that almost hits the bottom of your virgin cunt.'
  310. 'A terrible pain rips through your body, beginning where your hymen was and spreading like a fire. A trickle of blood runs down the shaft of his cock.'
  311. pcs_vag += 1
  312. stat['vaginal'] += 1
  313. pain['vaginal'] += 20
  314. gs 'stat'
  315. gs 'arousal', 'vaginal', 5, 'sub', 'maso', 'humiliation', 'rough', 'bound'
  316. act 'Cry':gt 'abductionCustomer', 'abdCustomer-virgin5'
  317. end
  318. if $ARGS[0] = 'abdCustomer-virgin5':
  319. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin5.mp4"></video></center>'
  320. 'He pulls his cock back out and shows it to you, enjoying the expression you make seeing your blood coating it.'
  321. 'He then slams his cock back into you. The pain you feel is renewed while he grunts in pleasure.'
  322. 'He feels accomplishment in his handiwork and sneers at you. He brutally thrusts into your pussy over and over again. He often hits your cervix with his <<dick>> cm long thick <<$dick_girth>> dick.'
  323. pain['vaginal'] += 10
  324. pain['cervix'] += 10
  325. pain['tummy'] += 10
  326. gs 'stat'
  327. gs 'arousal', 'vaginal', 30, 'sub', 'maso', 'humiliation', 'rough', 'bound'
  328. act 'Cry':gt 'abductionCustomer', 'abdCustomer-virgin6'
  329. end
  330. if $ARGS[0] = 'abdCustomer-virgin6':
  331. minut += 5
  332. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin6.mp4"></video></center>'
  333. '"And now whore you will receive your first load of cum. You will become the breeder you were always supposed to be!"'
  334. 'As renewed tears stream down your cheeks, he spurts his <<$cumType>> amount of sperm <<dick>> cm deep inside your pussy. You can feel it hit your cervix, and you shudder at the thought of you getting pregnant from this monster.'
  335. gs 'cum_call', 'pussy', 'deflowering pervert'
  336. gs 'stat'
  337. act 'Cry more':gt 'abductionCustomer', 'abdCustomer-virgin7'
  338. end
  339. if $ARGS[0] = 'abdCustomer-virgin7':
  340. '<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorevirgin7.jpg"></center>'
  341. 'He rests with his dick deep inside you for a while. He is enjoying the sight of your cries and the despair of your situation.'
  342. '"As his <<$dick_girth>> member becomes flaccid, it slides free of your abused pussy. He reaches out of sight and brings into view a dildo that looks almost exactly like his own dick. You think that it has probably been modeled from it."'
  343. '"The cum that I just gave you is not meant to just drip out of you. You will receive another gift from me, one that will keep my present inside you."'
  344. *nl
  345. 'He proceeds to lift your ass in the air so the cum doesn''t flow out, then brutally shoves the dildo all the way inside you. The dildo is pushed so deep into you that only its brightly coloured base peeks out of your abused hole.'
  346. 'He then takes some pieces of duct tape and wraps them over your pussy to cover your lips and keep the dildo firmly stuck inside.'
  347. 'He uncuffs you from the bench, but pulls your arms behind your back. This is probably to keep you from removing his ''gift''.'
  348. '"Now run along and enjoy my gifts even more, slut!" he laughs before leaving.'
  349. pain['vaginal'] += 10
  350. pain['cervix'] += 10
  351. pain['belly'] += 20
  352. gs 'stat'
  353. gs 'arousal', 'vaginal_dildo', 10, 'sub', 'maso', 'humiliation', 'rough', 'bound'
  354. act 'Struggle to remove the dildo':gt 'abductionCustomer', 'abdCustomer-virgin8'
  355. end
  356. if $ARGS[0] = 'abdCustomer-virgin8':
  357. minut += 10
  358. '<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorevirgin8.jpg"></center>'
  359. 'Your master comes in and finds you struggling on the ground. You are trying to shake the <<$dick_girth>> dildo out of you.'
  360. '"Stop it girl. You''ll just make it worse."'
  361. 'He grabs your leash and leads you back down to your cell.'
  362. 'As you follow your master, the plugged <<$dick_girth>> dildo moves inside you, causing you further unpleasant sensations and pain.'
  363. 'Finally, you are back at your bed.'
  364. gs 'stat'
  365. act 'Lie down':gt 'abductionCustomer', 'abdCustomer-virgin9'
  366. end
  367. if $ARGS[0] = 'abdCustomer-virgin9':
  368. minut += 480
  369. pcs_sleep += 70
  370. '<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorevirgin9.jpg"></center>'
  371. 'Your hands still bound, you are thrown on your bed and are once again chained to the wall.'
  372. 'Your master leaves and you are left lying on the bed, your vagina still plugged by the <<dick>> cm long <<$dick_girth>> dildo.'
  373. gs 'stat'
  374. act 'Try to rest':gt 'abductionCustomer', 'abdCustomer-virgin10'
  375. end
  376. if $ARGS[0] = 'abdCustomer-virgin10':
  377. minut += 15
  378. pcs_mood = 5
  379. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin10.mp4"></video></center>'
  380. 'The sound of your master coming downstairs wakes you up. You must have fallen asleep from the exhaustion.'
  381. '"Kneel and stick your ass high in the air slut."'
  382. *nl
  383. 'You are so desperate that you don''t even think about not doing what he orders you. You just stick your ass as high as possible.'
  384. 'It points so he has good access to both your ass and your ruthlessly plugged, deflowered pussy.'
  385. 'Your master kneels down to remove the duct tape with a single pull. You yelp in pain from the tiny pubic hairs that get ripped out with the tape. He puts his fingers inside you to grab the stuck dildo.'
  386. *nl
  387. 'Slowly, he takes it out. Remnants of your virgin blood and the customer''s sperm are smeared all over it.'
  388. 'Your empty vagina gives you a rush of relief as the cool air flows in to fill the void.'
  389. 'Your master unties you then adjusts your chain. As he leaves, he tells you "Be glad that you can be deflowered only once, you silly girl."'
  390. gs 'stat'
  391. act 'Continue':gt 'abduction', 'abdRoom'
  392. end
  393. if $ARGS[0] = 'abdCustomer-unzip':
  394. minut += 2
  395. gs 'stat'
  396. 'You reach towards his crotch and slowly start to unzip his trousers.'
  397. 'Pressing your face underneath his crotch, you pull down his pants and a <<$dick_girth>> member falls out. It lands directly onto your face with a loud slapping sound.'
  398. if dick > 15 and dick < 25:
  399. *nl
  400. '<center><video autoplay loop src="images/locations/shared/abduction/sex/unzip1.mp4"></video></center>'
  401. 'You stare at his <<$dick_girth>> cock with respect.'
  402. elseif dick >= 25:
  403. *nl
  404. '<center><video autoplay loop src="images/locations/shared/abduction/sex/unzip2.mp4"></video></center>'
  405. 'You stare at his <<$dick_girth>> cock with horror. You imagine what terrible things this sizable dick will do to your tender body.'
  406. elseif dick < 15 and pcs_throat > dick:
  407. *nl
  408. '<center><video autoplay loop src="images/locations/shared/abduction/sex/unzip3.mp4"></video></center>'
  409. 'You look at his <<$dick_girth>> cock in relief, thinking that it''s nothing you can''t handle.'
  410. end
  411. if pcs_throat < dick:
  412. 'It''s obvious that his <<$dick_girth>> dick is above your skill level and you know you can''t safely swallow it whole.'
  413. act 'Suck the tip':gt 'abductionCustomer', 'abdCustomer-suckTip'
  414. gs 'willpower', 'bj', 'self'
  415. if will_cost <= pcs_willpwr:
  416. act 'Force yourself on his cock (<<will_cost>> Willpower)':
  417. gs 'willpower', 'bj', 'self'
  418. gs 'willpower', 'pay', 'self'
  419. gs 'stat'
  420. gt 'abductionCustomer', 'abdCustomer-suckForceself'
  421. end
  422. else
  423. act 'Force yourself on his cock (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  424. end
  425. else
  426. 'Even though his dick is <<$dick_girth>>, you know you could take it all the way to the base.'
  427. act 'Suck the tip':gt 'abductionCustomer', 'abdCustomer-suckTip'
  428. gs 'willpower', 'bj', 'self'
  429. if will_cost <= pcs_willpwr:
  430. act 'Deepthroat his cock (<<will_cost>> Willpower)':
  431. gs 'willpower', 'bj', 'self'
  432. gs 'willpower', 'pay', 'self'
  433. gs 'stat'
  434. gt 'abductionCustomer', 'abdCustomer-suckDeep'
  435. end
  436. else
  437. act 'Deepthroat his cock (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  438. end
  439. end
  440. end
  441. if $ARGS[0] = 'abdCustomer-show':
  442. minut += 10
  443. i = rand(1,5)
  444. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoretease<<i>>.mp4"></video></center>'
  445. 'You decide to tease the customer by showing him your sexy breasts and jiggling them.'
  446. 'After some time of behaving like a slut, it is obvious that he wants something more.'
  447. act 'Continue':gt 'abductionCustomer', 'abdCustomer-unzip'
  448. end
  449. if $ARGS[0] = 'abdCustomer-suckTip':
  450. gs 'arousal', 'bj', 15, 'sub'
  451. gs 'stat'
  452. i = rand(1,5)
  453. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjobtip<<i>>.mp4"></video></center>'
  454. 'You try as best as you can to suck the head of his <<dick>> cm sized <<$dick_girth>> dick.'
  455. if pcs_throat < dick:
  456. 'It''s obvious that his <<$dick_girth>> dick is above your skill level and you know you can''t safely swallow it whole.'
  457. else
  458. 'Even though his dick is <<$dick_girth>>, you know you could take it all the way to the base.'
  459. end
  460. if $charType = 'sadistic':
  461. if buyout = 1:
  462. '<<$bName>> is starting to get very grumpy. He''s obviously not happy that all you can do is suck the tip of his cock.'
  463. else
  464. 'Your customer is starting to get very grumpy. He''s obviously not happy that all you can do is suck the tip of his cock.'
  465. end
  466. 'Suddenly, without any warning, he takes a step back, which pulls his <<$dick_girth>> member out of your mouth.'
  467. 'With an angry look in his eyes, he slaps your face very hard, which knocks you to the cold floor.'
  468. 'He jumps on top of your chest, and with a piece of rope, he ties you up.'
  469. '"Even here, one must train the slaves himself!" he shouts at you. He forces his <<$dick_girth>> dick all the way down your throat.'
  470. 'With your hands tied up, you are unable to resist. All you can do is struggle to avoid suffocating as best you can...'
  471. act 'Endure':gt 'abductionCustomer', 'abdCustomer-suckForced'
  472. elseif $charType = 'neutral':
  473. 'Your customer seems displeased by your performance. You are starting to worry about what he''ll do if you don''t satisfy him well enough...'
  474. forceChance = rand(1, 100)
  475. if forceChance <= 70:
  476. act 'Continue sucking the tip':gt 'abductionCustomer', 'abdCustomer-suckForced'
  477. else
  478. act 'Continue sucking the tip':gt 'abductionCustomer', 'abdCustomer-fuck'
  479. end
  480. if pcs_throat < dick:
  481. gs 'willpower', 'bj', 'self'
  482. if will_cost <= pcs_willpwr:
  483. act 'Force yourself on his cock (<<will_cost>> Willpower)':
  484. gs 'willpower', 'bj', 'self'
  485. gs 'willpower', 'pay', 'self'
  486. gs 'stat'
  487. gt 'abductionCustomer', 'abdCustomer-suckForceself'
  488. end
  489. else
  490. act 'Force yourself on his cock (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  491. end
  492. else
  493. gs 'willpower', 'bj', 'self'
  494. if will_cost <= pcs_willpwr:
  495. act 'Deepthroat his cock (<<will_cost>> Willpower)':
  496. gs 'willpower', 'bj', 'self'
  497. gs 'willpower', 'pay', 'self'
  498. gs 'stat'
  499. gt 'abductionCustomer', 'abdCustomer-suckDeep'
  500. end
  501. else
  502. act 'Deepthroat his cock (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  503. end
  504. end
  505. elseif $charType = 'kind':
  506. 'Your customer seems pleased by your skill, so you continue to tease the tip of his <<$dick_girth>> cock. You look at him with as much sensual abandon as you can muster under the present conditions.'
  507. act 'Continue sucking the tip':gt 'abductionCustomer', 'abdCustomer-fuck'
  508. end
  509. end
  510. if $ARGS[0] = 'abdCustomer-suckForceself':
  511. pcs_throat += 1
  512. pain['throat'] += throatDMG
  513. gs 'stat'
  514. i = rand(1,3)
  515. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjobselfforced<<i>>.mp4"></video></center>'
  516. 'Despite knowing you will probably hurt yourself, you force yourself on his <<dick>> cm long cock all the way down to the base.'
  517. 'You start gagging, and saliva freely flows from your stuffed mouth. Your customer seems more content now.'
  518. gs 'arousal', 'bj', 15, 'sub', 'rough', 'deepthroat'
  519. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuck'
  520. end
  521. if $ARGS[0] = 'abdCustomer-suckForced':
  522. pain['throat'] += throatDMG * 2
  523. pcs_throat += 2
  524. gs 'arousal', 'bj', 15, 'sub', 'rough', 'deepthroat', 'humiliation'
  525. gs 'stat'
  526. endPunishment = 1
  527. i = rand(1,6)
  528. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjobforced<<i>>.mp4"></video></center>'
  529. if buyout = 1:
  530. '<<$bName>> growls and suddenly pulls his cock out of your mouth.'
  531. else
  532. 'Your customer growls and suddenly pulls his cock out of your mouth.'
  533. end
  534. '"What kind of slave are you when you can''t swallow my <<$dick_girth>> dick?"'
  535. 'He ties you up and forces his cock down your throat. He shows little to no concern for your wellbeing.'
  536. 'You start to gag as he keeps pushing his member deep inside you. Sometimes this leaves you on the brink of passing out.'
  537. vagOrAss = rand (0,1)
  538. if buyout = 1:
  539. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
  540. else
  541. if vagOrAss = 0:
  542. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckRough'
  543. else
  544. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
  545. end
  546. end
  547. end
  548. if $ARGS[0] = 'abdCustomer-suckDeep':
  549. pcs_throat += 1
  550. gs 'arousal', 'bj', 15, 'sub', 'deepthroat'
  551. gs 'stat'
  552. i = rand(1,6)
  553. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjob<<i>>.mp4"></video></center>'
  554. 'You swallow his <<$dick_girth>> cock all the way down to his balls.'
  555. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuck'
  556. end
  557. if $ARGS[0] = 'abdCustomer-fuck':
  558. minut += 2
  559. pcs_throat += 1
  560. gs 'stat'
  561. endPunishment = 0
  562. '<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorecockremoved.jpg"></center>'
  563. 'It seems the customer is done with fucking your mouth as he removes his dick then steps back a bit. He looks at you with a <<$charType>> appetite in his eyes.'
  564. if $charType = 'sadistic':
  565. '"What should I do to you next, bitch?"'
  566. else
  567. '"So how do you want it next, slut?"'
  568. end
  569. 'You are not entirely sure if he means that as a rhetorical question or not.'
  570. if $charType = 'sadistic':
  571. *nl
  572. 'You want to answer him, but the moment you open your mouth to talk he slaps your face very hard. This knocks you down to the cold floor. Tears erupt from your eyes in response.'
  573. '"You thought I was actually interested in your opinion...<i>slave</i>?" he questions, laughing. "A bitch like you has no right to an opinion!"'
  574. 'You are unable to do anything except whimper like a small child. He ties you up, and you know that it''s going to get even worse now.'
  575. vagOrAss = rand (0,1)
  576. if vagOrAss = 0:
  577. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckRough'
  578. else
  579. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
  580. end
  581. else
  582. 'You decide to:'
  583. act 'Be quiet':gt 'abductionCustomer', 'abdCustomer-decide'
  584. gs 'willpower', 'sex', 'self'
  585. if will_cost <= pcs_willpwr:
  586. act 'Beg him to be kind (<<will_cost>> Willpower)':
  587. gs 'willpower', 'sex', 'self'
  588. gs 'willpower', 'pay', 'self'
  589. gs 'stat'
  590. gt 'abductionCustomer', 'abdCustomer-beg'
  591. end
  592. else
  593. act 'Beg him to be kind (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  594. end
  595. end
  596. end
  597. if $ARGS[0] = 'abdCustomer-decide':
  598. minut += 2
  599. gs 'stat'
  600. !!sexRand = rand(1, 2) I believe this isn''t used anywhere so I commented it out.
  601. vagOrAss = rand (0, 1)
  602. if vagOrAss = 1:
  603. if $charType = 'sadistic':
  604. '"I will fuck your cunt raw, bitch!"'
  605. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckRough'
  606. else
  607. '"Let''s take your tender pussy!" he decides.'
  608. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckNormal'
  609. end
  610. else
  611. if $charType = 'sadistic':
  612. '"I will fuck you deep in your ass, bitch!"'
  613. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
  614. else
  615. '"I want to see how tight your ass is." he says.'
  616. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnal'
  617. end
  618. end
  619. end
  620. if $ARGS[0] = 'abdCustomer-beg':
  621. vagOrAss = rand (1, 2)
  622. minut += 2
  623. gs 'stat'
  624. '<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorebeg1.jpg"></center>'
  625. 'Please be kind to me sir. I''m so afraid and sore... Please!'
  626. if dick >= 15:'"I''m very afraid of your <<$dick_girth>> penis sir!"'
  627. *nl
  628. bekindChance = rand(1, 100)
  629. endPunishment = 0
  630. if $charType = 'neutral' or $charType = 'kind':
  631. '"Alright girl, you''re lucky that I''m feeling generous today."'
  632. if vagOrAss = 1:
  633. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckNormal'
  634. elseif vagOrAss = 2:
  635. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnal'
  636. end
  637. else
  638. endPunishment = 1
  639. '"A slave has no right to ask what will happen to it!"'
  640. hardChance = rand(1, 100)
  641. '"I will fuck you however I want, so shut up bitch!"'
  642. if hardChance <= 50:
  643. if vagOrAss = 0:
  644. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckRough'
  645. else
  646. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
  647. end
  648. else
  649. if vagOrAss = 0:
  650. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckNormal'
  651. else
  652. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnal'
  653. end
  654. end
  655. end
  656. end
  657. if $ARGS[0] = 'abdCustomer-fuckAnal':
  658. pcs_ass += 1
  659. gs 'stat'
  660. i = rand(1,5)
  661. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanal<<i>>.mp4"></video></center>'
  662. 'The customer puts some lubricant on his <<$dick_girth>> cock and penetrates your ass.'
  663. 'He doesn''t care much about your feelings, but he''s also not exactly hurting you on purpose.'
  664. *nl
  665. if dick > pcs_ass:
  666. pain['asshole'] += assDMG
  667. pain['tummy'] += assDMG
  668. gs 'arousal', 'anal', 30, 'sub', 'rough'
  669. gs 'stat'
  670. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalDeep'
  671. else
  672. 'You have no problems accommodating his <<$dick_girth>> member.'
  673. gs 'arousal', 'anal', 30, 'sub'
  674. gs 'stat'
  675. act 'Continue':gt 'abductionCustomer', 'abdCustomer-cumGate'
  676. end
  677. end
  678. if $ARGS[0] = 'abdCustomer-fuckAnalRough':
  679. pcs_ass += 2
  680. gs 'arousal', 'anal', 30, 'sub', 'rough', 'bound'
  681. gs 'stat'
  682. i = rand(1,5)
  683. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanalrough<<i>>.mp4"></video></center>'
  684. if buyout = 1:
  685. '<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorefuckanalroughleonid1.jpg"></center>'
  686. '<<$bName>> takes you by your leash and positions your body as if it''s just meat to be used.'
  687. else
  688. 'The man takes you by your leash and positions your body as if it''s just meat to be used.'
  689. end
  690. 'What comes next is an excruciatingly rough ass fucking that clearly shows he has no regard for all the pain you have to endure.'
  691. *nl
  692. if assDMG <= 0 :
  693. 'Fortunately, his <<$dick_girth>> dick is not enough to damage your anus and intestines. No more than usual, anyway.'
  694. if buyout = 1:
  695. act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumAss'
  696. else
  697. if $charType = 'sadistic':
  698. act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
  699. else
  700. act 'Continue':gt 'abductionCustomer', 'abdCustomer-cumGate'
  701. end
  702. end
  703. elseif assDMG <= 2:
  704. 'His <<$dick_girth>> dick is too big for you and you suffer a lot of stretching pain as it slams against your intestinal walls.'
  705. pain['asshole'] += assDMG
  706. gs 'stat'
  707. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalDeep'
  708. else
  709. 'His <<$dick_girth>> dick is insanely big for you.'
  710. 'The tip of his cock repeatedly hits your intestinal walls and stretches your anus to insane proportions.'
  711. 'You will probably not be able to close your anus for a while.'
  712. pain['asshole'] += assDMG
  713. pain['tummy'] += assDMG
  714. gs 'stat'
  715. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalDeep'
  716. end
  717. end
  718. if $ARGS[0] = 'abdCustomer-fuckAnalDeep':
  719. minut += 15
  720. pcs_ass += 1
  721. gs 'stat'
  722. i = rand(1, 1)
  723. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanaldeep<<i>>.mp4"></video></center>'
  724. 'His member is <<$dick_girth>> and your ass is unable to accommodate it.'
  725. if $charType = 'sadistic':
  726. *nl
  727. 'But he doesn''t care, even though he is obviously aware, and he fucks you furiously hard.'
  728. '"How do like my <<$dick_girth>> cock inside you bitch?"'
  729. '"Is it deep enough for you, or should I push a bit more?"'
  730. 'Obviously, he''s enjoying this a lot. Doing this is probably the reason he came to this slave house.'
  731. *nl
  732. end
  733. 'With every stroke of his dick deep inside your intestines, you feel as if it''s your very stomach being poked by it.'
  734. 'A large bulge is noticeable every time he shoves it more than half the way inside you.'
  735. *nl
  736. if buyout = 1:
  737. 'After about a half an hour of deep anal banging, <<$bName>> is about to cum.'
  738. else
  739. 'After about a half an hour of deep anal banging, the man is about to cum.'
  740. end
  741. if (endPunishment = 1 or $charType = 'sadistic') and buyout = 0:
  742. '"Now, I will feed you my seed, you unruly anal slave."'
  743. act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
  744. elseif buyout = 1:
  745. act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumAss'
  746. else
  747. act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumGate'
  748. end
  749. end
  750. if $ARGS[0] = 'abdCustomer-fuckNormal':
  751. pcs_vag += 1
  752. gs 'stat'
  753. i = rand(1,5)
  754. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefucknormal<<i>>.mp4"></video></center>'
  755. 'The customer penetrates your pussy and fucks you.'
  756. if vagDMG <= 0:
  757. 'He''s not gentle, but it isn''t a very rough fuck either.'
  758. 'You have no problems accommodating his <<$dick_girth>> dick.'
  759. 'At some moments, you almost seem to enjoy it.'
  760. gs 'arousal', 'vaginal', 30, 'sub'
  761. act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumGate'
  762. elseif vagDMG <= 2:
  763. 'His <<$dick_girth>> dick is too big for you, and you suffer a lot of stretching pain as it bumps against your vaginal walls.'
  764. pain['vaginal'] += vagDMG
  765. gs 'arousal', 'vaginal', 30, 'sub', 'rough'
  766. gs 'stat'
  767. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckDeep'
  768. else
  769. 'His <<$dick_girth>> dick is insanely big for you.'
  770. 'The tip of his cock even penetrates your cervix, or at least it seems like it to you. The pain is almost unbearable!'
  771. pain['vaginal'] += vagDMG
  772. pain['cervix'] += vagDMG
  773. gs 'arousal', 'vaginal', 30, 'sub', 'rough'
  774. gs 'stat'
  775. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckDeep'
  776. end
  777. end
  778. if $ARGS[0] = 'abdCustomer-fuckRough':
  779. pcs_vag += 2
  780. gs 'stat'
  781. i = rand(1,5)
  782. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckrough<<i>>.mp4"></video></center>'
  783. 'The man takes you by your leash and positions your body as if it''s just meat to be used.'
  784. 'What comes next is an excruciatingly rough fuck that clearly shows he has no regard for all the pain you have to endure.'
  785. if vagDMG <= 0:
  786. 'Fortunately, his <<$dick_girth>> dick is not enough to damage your vagina. No more than usual, anyway.'
  787. gs 'arousal', 'vaginal', 30, 'sub', 'bound'
  788. if $charType = 'sadistic':
  789. act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
  790. else
  791. act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumGate'
  792. end
  793. elseif vagDMG <= 2:
  794. 'His <<$dick_girth>> dick is too big for you, and you suffer a lot of stretching pain as it slams against your vaginal walls.'
  795. pain['vaginal'] += vagDMG
  796. gs 'arousal', 'vaginal', 30, 'sub', 'bound', 'rough'
  797. gs 'stat'
  798. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckDeep'
  799. else
  800. 'His <<$dick_girth>> dick is insanely big for you.'
  801. 'The tip of his cock even penetrates your cervix, or at least it seems like it to you. The pain is almost unbearable!'
  802. 'He notices this too, realizing it''s why you''re groaning so loudly.'
  803. 'Enjoying your suffering, he pushes his dick even deeper inside, and you squeal like a pig.'
  804. pain['vaginal'] += vagDMG * 2
  805. pain['cervix'] += vagDMG * 2
  806. gs 'arousal', 'vaginal', 30, 'sub', 'bound', 'rough'
  807. gs 'stat'
  808. act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckDeep'
  809. end
  810. end
  811. if $ARGS[0] = 'abdCustomer-fuckDeep':
  812. minut += 15
  813. pcs_ass += 1
  814. gs 'stat'
  815. i = rand(1, 5)
  816. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckdeep<<i>>.mp4"></video></center>'
  817. 'His member is <<$dick_girth>> and your vagina is unable to accommodate it.'
  818. if $charType = 'sadistic':
  819. *nl
  820. 'But he doesn''t care about that, even though he is obviously aware of it, and fucks you furiously hard.'
  821. '"How do like my <<$dick_girth>> cock inside you bitch?"'
  822. '"Is it deep enough for you, or should I push a bit more?"'
  823. '"Do you feel me entering your cervix?"'
  824. 'Obviously he''s enjoying this a lot. Doing this is probably the reason he came to this slave house.'
  825. *nl
  826. end
  827. 'With every stroke of his dick deep inside your vagina, you feel as if it''s your very cervix being penetrated.'
  828. 'A large bulge is noticeable every time he shoves it more than half the way inside you.'
  829. *nl
  830. 'After about half an hour of deep vaginal banging, the man is about to cum.'
  831. if endPunishment = 1 or $charType = 'sadistic':
  832. '"Now, I will feed you my seed, you unruly fuck slave."'
  833. act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
  834. else
  835. act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumGate'
  836. end
  837. end
  838. if $ARGS[0] = 'abdCustomer-cumGate':
  839. if endPunishment = 1:
  840. '"Now, I will feed you my seed, you unruly slave."'
  841. act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
  842. elseif buyout = 1:
  843. '"You will be filled with my seed for the first time, so be sure to cherish the memory of this moment!"'
  844. act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumAss'
  845. else
  846. '"So where do you want it, bitch?"'
  847. act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
  848. act 'Ask him to cum on your face':gt 'abductionCustomer', 'abdCustomer-cumFace'
  849. gs 'willpower', 'cum_inside', 'self'
  850. if will_cost <= pcs_willpwr:
  851. act 'Ask him to cum inside your pussy (<<will_cost>> Willpower)':
  852. gs 'willpower', 'cum_inside', 'self'
  853. gs 'willpower', 'pay', 'self'
  854. gs 'stat'
  855. gt 'abductionCustomer', 'abdCustomer-cumPussy'
  856. end
  857. else
  858. act 'Ask him to cum inside your pussy (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  859. end
  860. gs 'willpower', 'cum_inside_anal', 'self'
  861. if will_cost <= pcs_willpwr:
  862. act 'Ask him to cum inside your ass (<<will_cost>> Willpower)':
  863. gs 'willpower', 'cum_inside_anal', 'self'
  864. gs 'willpower', 'pay', 'self'
  865. gs 'stat'
  866. gt 'abductionCustomer', 'abdCustomer-cumAss'
  867. end
  868. else
  869. act 'Ask him to cum inside your ass (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  870. end
  871. gs 'willpower', 'swallow', 'self'
  872. if will_cost <= pcs_willpwr:
  873. act 'Ask him to cum into your mouth (<<will_cost>> Willpower)':
  874. gs 'willpower', 'swallow', 'self'
  875. gs 'willpower', 'pay', 'self'
  876. gs 'stat'
  877. gt 'abductionCustomer', 'abdCustomer-cumMouth'
  878. end
  879. else
  880. act 'Ask him to cum into your mouth (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  881. end
  882. end
  883. end
  884. if $ARGS[0] = 'abdCustomer-cum':
  885. cumRand = rand(1,100)
  886. if cumRand > 75 and cumRand <= 100:
  887. 'He decides to cum inside your vagina.'
  888. act 'Endure it':gt 'abductionCustomer', 'abdCustomer-cumPussy'
  889. elseif cumRand > 50 and cumRand <= 75:
  890. 'He decides to cum inside your ass.'
  891. act 'Endure it':gt 'abductionCustomer', 'abdCustomer-cumAss'
  892. elseif cumRand > 25 and cumRand <= 50:
  893. 'He decides to cum into your mouth.'
  894. act 'Endure it':gt 'abductionCustomer', 'abdCustomer-cumMouth'
  895. else
  896. 'He decides to cum on your face.'
  897. act 'Endure it':gt 'abductionCustomer', 'abdCustomer-cumFace'
  898. end
  899. end
  900. if $ARGS[0] = 'abdCustomer-cumPussy':
  901. i = rand(1,5)
  902. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumpussy<<i>>.mp4"></video></center>'
  903. if vagDMG > 0:
  904. 'As he delivers his <<$cumType>> amount of cum inside your vagina, you can feel the tip of his <<$dick_girth>> cock at your cervix and even a bit inside it.'
  905. 'His bursting cum penetrates through the cervix directly into your womb, which causes a warm, yet painful sensation to flow through you.'
  906. pain['cervix'] += vagDMG
  907. gs 'stat'
  908. end
  909. *nl
  910. if cumVol = 3:
  911. 'With his <<$dick_girth>> dick buried inside your pussy, the customer delivers his <<$cumType>> amount of sperm inside you.'
  912. 'When he pulls it out, some of the sperm drips out of your cunt.'
  913. elseif cumVol = 4:
  914. 'With his <<$dick_girth>> dick buried deep inside your pussy, his tip touches your cervix.'
  915. 'He pumps your vagina full of his <<$cumType>> amount of sperm.'
  916. 'As he pulls his cock out, a large portion of the cum forcefully squirts out of you.'
  917. elseif cumVol >= 5:
  918. 'With his <<$dick_girth>> dick buried very deep inside your pussy, his tip pushes against your cervix and even slides inside of it a bit.'
  919. 'Then, as he shoots his <<$cumType>> amount of cum inside you, a lot of it goes directly to your womb.'
  920. 'It feels painful, but the warm sensation is weird and nothing like what you have felt before.'
  921. 'You feel as if your inner parts are stretching from the <<$cumType>> amount of cum being pumped into you.'
  922. *nl
  923. 'When he pulls his <<$dick_girth>> cock out the lower part of your belly bulges noticeably.'
  924. 'The customer looks at it with joy then punches at your bulge with his fist.'
  925. 'The cum bursts out of your pussy as if it shot out from an uncorked champagne bottle.'
  926. pain['cervix'] += 20
  927. pain['tummy'] += 40
  928. else
  929. 'The customer cums inside you. When he takes his <<$dick_girth>> cock out, a small part of his <<$cumType>> amount of sperm drips out of your pussy.'
  930. end
  931. pcs_vag += 1
  932. stat['vaginal'] += 1
  933. gs 'cum_call', 'pussy', 'customer', svol,'', spot
  934. gs 'stat'
  935. act 'Continue':gt 'abductionCustomer', 'abdCustomer-end'
  936. end
  937. if $ARGS[0] = 'abdCustomer-cumAss':
  938. i = rand(1,5)
  939. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumass<<i>>.mp4"></video></center>'
  940. if assDMG > 0:
  941. 'As he cums inside your ass, you can feel his <<$dick_girth>> cock slamming against your intestinal wall.'
  942. 'A moving bulge is visible on your otherwise flat stomach as his dick moves inside you.'
  943. 'His cum fills you, and it feels as if it has flowed right up to your stomach.'
  944. pain['asshole'] += assDMG
  945. gs 'stat'
  946. end
  947. if cumVol = 3:
  948. 'His <<$dick_girth>> member is buried in your intestines.'
  949. if buyout = 1:
  950. 'When <<$bName>> shoots his <<$cumType>> amount of cum, you can feel the warmth spreading inside you...'
  951. else
  952. 'When he shoots his <<$cumType>> amount of cum, you can feel the warmth spreading inside you...'
  953. end
  954. 'After his dick is removed, some of the sperm drips out of your gaping hole.'
  955. elseif cumVol = 4:
  956. 'His <<$dick_girth>> member is buried <<dick>> centimeters deep inside your intestines, sometimes even hitting your intestinal walls.'
  957. if buyout = 1:
  958. 'When <<$bName>> shoots his <<$cumType>> amount of cum inside, you can feel your stomach grow larger...'
  959. else
  960. 'When he shoots his <<$cumType>> amount of cum inside, the lower part of your belly bulges noticeably...'
  961. end
  962. 'You feel very full, even after he pulls his <<$dick_girth>> dick out of you.'
  963. 'After a few seconds, a large portion of his <<$cumType>> amount of cum spurts out of you, as if from a garden hose.'
  964. elseif cumVol >= 5:
  965. if buyout = 1:
  966. '<<$bName>>''s <<$dick_girth>> member is buried <<dick>> centimeters deep inside your intestines, with each stroke hitting your intestinal walls forcefully.'
  967. else
  968. 'The customer''s <<$dick_girth>> member is buried <<dick>> centimeters deep inside your intestines, with each stroke hitting your intestinal walls forcefully.'
  969. end
  970. 'You feel an increasing amount of pressure and stretching pain as he pumps your intestines with a <<$cumType>> amount of cum.'
  971. *nl
  972. 'When he pulls his <<$dick_girth>> cock out, the lower part of your belly bulges noticeably.'
  973. 'He looks at the bulge with joy then punches at it with his fist.'
  974. 'The cum bursts out of your anus as if it shot out from an uncorked champagne bottle.'
  975. pain['tummy'] += 20
  976. gs 'stat'
  977. else
  978. if buyout = 1:
  979. '<<$bName>> cums inside you. When he takes his <<$dick_girth>> cock out, a small amount of his <<$cumType>> amount of sperm leaks out of your gaping anus.'
  980. else
  981. 'The customer cums inside you. When he takes his <<$dick_girth>> cock out, a small amountt of his <<$cumType>> amount of sperm leaks out of your gaping anus.'
  982. end
  983. end
  984. if buyout = 1:
  985. gs 'npcgeneratec', 0, $bName, rand(18,34)
  986. gs 'boyStat', $npclastgenerated
  987. else
  988. gs 'npcgeneratec', 0, 'customer', rand(18,34)
  989. gs 'boyStat', $npclastgenerated
  990. end
  991. pcs_ass += 1
  992. gs 'cum_call', 'anus', $boy
  993. stat['anal'] += 1
  994. gs 'stat'
  995. if buyout = 1:
  996. act 'Continue':gt 'abductionCustomer', 'abdCustomer-buyout4'
  997. else
  998. act 'Continue':gt 'abductionCustomer', 'abdCustomer-end'
  999. end
  1000. end
  1001. if $ARGS[0] = 'abdCustomer-cumMouth':
  1002. i = rand(1, 5)
  1003. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecummouth<<i>>.mp4"></video></center>'
  1004. if throatDMG > 0:
  1005. 'Your aching throat is penetrated again.'
  1006. 'He buries his <<$dick_girth>> cock to the hilt inside you.'
  1007. 'While he''s cumming directly down your gullet, you can feel the pulsing of his member. It painfully stretches your already sore throat.'
  1008. pain['throat'] += throatDMG
  1009. gs 'stat'
  1010. end
  1011. if cumVol = 3:
  1012. 'His <<$cumType>> amount of cum fills your gullet.'
  1013. elseif cumVol = 4:
  1014. 'His <<$cumType>> amount of cum fills your gullet and drips down into your stomach.'
  1015. 'You feel very full and bloated.'
  1016. pcs_energy += 50
  1017. pcs_hydra += 40
  1018. elseif cumVol => 5:
  1019. 'You are being pumped like a water bag. His <<$cumType>> amount of jizz fills your stomach and gullet.'
  1020. 'You probably won''t need another meal today...'
  1021. pcs_energy += 100
  1022. pcs_hydra += 90
  1023. else
  1024. 'The customer shoots his <<$cumType>> amount of cum inside your mouth and down your gullet.'
  1025. end
  1026. mouth += 1
  1027. gs 'cum_call', 'mouth', 'customer'
  1028. stat['throat'] += 1
  1029. gs 'stat'
  1030. act 'Continue':gt 'abductionCustomer', 'abdCustomer-end'
  1031. end
  1032. if $ARGS[0] = 'abdCustomer-cumFace':
  1033. i = rand(1, 5)
  1034. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumface<<i>>.mp4"></video></center>'
  1035. 'He takes his <<$dick_girth>> dick and points it towards your face.'
  1036. if cumVol = 3:
  1037. 'A <<$cumType>> amount of sperm lands all over your face.'
  1038. elseif cumVol = 4:
  1039. 'A <<$cumType>> amount of sperm lands all over your face, some even lands in your eyes and hair.'
  1040. elseif cumVol => 5:
  1041. 'A <<$cumType>> amount of sperm lands all over your face. In your eyes, hair, everywhere.'
  1042. 'There is so much cum that you have a solid layer on your face, as if you were wearing a cosmetic mask.'
  1043. else
  1044. 'A <<$cumType>> cum volume is spread around your mouth and cheeks.'
  1045. end
  1046. 'The customer seems content with his creation and looks at you with a weird satisfaction.'
  1047. mouth += 1
  1048. gs 'cum_call', 'face', 'customer'
  1049. stat['mouth'] += 1
  1050. gs 'stat'
  1051. act 'Continue':gt 'abductionCustomer', 'abdCustomer-end'
  1052. end
  1053. if $ARGS[0] = 'abdCustomer-end':
  1054. if endPunishment = 1:
  1055. 'The customer goes to the bathroom and then calls for your master.'
  1056. act 'Continue':gt 'abductionCustomer', 'abdCustomer-endPunishment'
  1057. elseif buyout = 1:
  1058. '<<$bName>> leaves you lying on the ground, his cum still dripping out of your ass, and calls for your master.'
  1059. act 'Continue':gt 'abductionCustomer', 'abdCustomer-endPunishment'
  1060. else
  1061. 'The customer goes to the bathroom, and you are immediately lead back to the basement.'
  1062. act 'Go back':gt 'abduction', 'abdRoom'
  1063. end
  1064. end
  1065. if $ARGS[0] = 'abdCustomer-endPunishment':
  1066. '<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/kneelingslave1.jpg"></center>'
  1067. iif(buyout = 1, $bName, 'The customer') + ' tells your master how unruly you were and that further training should be applied to you.'
  1068. 'He then leaves.'
  1069. 'Kneeling, you look up at your master only to see his grim face. You can tell something bad will happen.'
  1070. act 'Be led back to the basement':gt 'abduction', 'abdFailedCustomer'
  1071. end
  1072. --- abductionCustomer ---------------------------------