1
0

pav_shared_gp.qsrc 74 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440
  1. # pav_shared_gp
  2. if $ARGS[0] = 'gp':
  3. menu_off = 1
  4. $loc_arg = 'gp'
  5. minut += 2
  6. '<h3><center><font color=#<<$gp_font>>><<$gp_name>></font></h3></center>'
  7. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
  8. ''
  9. 'He is a gopnik, showing violent and aggressive behavior. You feel something like a bad aura coming from him.'
  10. if gp_hadSex = 1:'As you know very well, <<$gp_name>> has <<gpDick>> cm long <a href="exec:gt ''pav_shared_gp'', ''gpDick''">dick</a> with somehow maintained pubic hair.'
  11. ''
  12. '<b>Today he looks to be in a <<$gp_mood>> mood.</b>'
  13. if gp_served = 1:'You have already served him today.'
  14. ''
  15. ! cum on hands, face, arms, legs¨; visible even when clothed
  16. if cumloc[13] > 0 or cumloc[11] > 0 or cumloc[16] > 0 or cumloc[10] > 0 or cumloc[9] > 0:
  17. '<font color=#<<$gp_font>>>"Hey <<$pcs_firstname>>, is that my cum? Go better wash, I don''t want you near me like that!"</font>'
  18. act 'Leave': gt 'pav_shared_apt', 'start'
  19. ! cum on clothes
  20. elseif cumloc[2] > 0 or cumloc[5] > 0 or cumloc[6] > 0 or cumloc[7] > 0:
  21. '<font color=#<<$gp_font>>>"Hey <<$pcs_firstname>>, is that my cum on your clothes? Go better change, I don''t want you near me like that!"</font>'
  22. act 'Leave': gt 'pav_shared_apt', 'start'
  23. ! cum on belly, breasts, ass, pussy; visible only when nude
  24. elseif (cumloc[14] > 0 or cumloc[15] > 0 or cumloc[1] > 0 or cumloc[4] > 0) and $clothingworntype = 'nude':
  25. '<font color=#<<$gp_font>>>"Hey <<$pcs_firstname>>, you dirty slut, you forgot to wash the cum! Get out!"</font>'
  26. act 'Leave': gt 'pav_shared_apt', 'start'
  27. else
  28. '<font color=#<<$gp_font>>>"Hey chick, here for fun?"</font>'
  29. act 'Just say hello and leave': gt 'pav_shared_apt', 'start'
  30. act 'Chat with him':gt 'pav_shared_gp', 'gpChat'
  31. if servitudeLvl = 2 and gp_served = 0:act 'Offer him to serve':gt 'pav_shared_gp', 'gpServe'
  32. end
  33. end
  34. if $ARGS[0] = 'gpDick':
  35. menu_off = 1
  36. minut += 2
  37. '<h3><font color=#<<$gp_font>>><<$gp_name>></font></h3>'
  38. if set_imgh < 250:
  39. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
  40. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
  41. else
  42. '<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
  43. '<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
  44. end
  45. ''
  46. 'Your relation with him is <<gp_rel>> / 100.'
  47. 'His dick is <<gpDick>> cm long with somehow maintained pubic hair.'
  48. milkPause = daystart - gp_lastCum
  49. if milkPause >= 1:'You have not milked him for <<milkPause>> day(s), he most likely has <<gp_cumVol>> ml semen accumulated in his balls' & if gp_cumVol > 80:', which are starting to turn blue' + '.'
  50. 'Today he looks to be at about <<gp_horny>> % of his maximum horniness.'
  51. ''
  52. 'So far you have:'
  53. if gp_hj = 1:'- jerked him'
  54. if gp_hj > 1:'- jerked him <<gp_hj>> times' & if gp_hjFail > 1:' and failed to make him cum with your hands <<gp_hjFail>> times'
  55. if gp_bj = 1:'- given him a blowjob'
  56. if gp_bj > 1:'- given him <<gp_bj>> blowjobs' & if gp_bjFail > 1:' and failed to make him cum with your mouth <<gp_bjFail>> times'
  57. if gp_bjDeep = 1:'- given him a blowjob with deepthroat'
  58. if gp_bjDeep > 1:'- given him <<gp_bjDeep>> blowjobs with deepthroat' & if gp_bjFailPuke > 1:' but failed and puked in his crotch <<gp_bjFailPuke>> times' & if gp_bjFailPuke > 1:' but failed and fainted impaled on his cock <<gp_bjFailFaint>> times'
  59. if gp_swall = 1:'- swallowed his semen, making it <<gp_cumSwall>> ml swallowed total'
  60. if gp_swall > 1:'- swallowed his semen <<gp_swall>> times, making it <<gp_cumSwall>> ml swallowed total'
  61. if gp_vag = 1:'- took it in your pussy' & if gp_vagCumInside = 1:' and let him cum inside you' & if gp_vagCumInsideUnwanted = 1:' and he also came inside your pussy against your will'
  62. if gp_vag > 1:'- took it in your pussy <<gp_vag>> times' & if gp_vagCumInside >= 1:' and let him cum inside you <<gp_vagCumInside>> times' & if gp_vagCumInsideUnwanted >= 1:' and he also came inside your pussy against your will <<gp_vagCumInsideUnwanted>> times'
  63. if gp_cumVag > 0:'- he pumped in total <<gp_cumVag>> ml of cum into your pussy'
  64. if gp_anal = 1:'- took it in your ass' & if gp_analCumInside = 1:' and let him cum inside you' & if gp_vagCumInsideUnwanted = 1:' and he also came inside your anus against your will'
  65. if gp_anal > 1:'- took it in your ass <<gp_anal>> times' & if gp_analCumInside >= 1:' and let him cum inside you <<gp_analCumInside>> times' & if gp_vagCumInsideUnwanted >= 1:' and he also came inside your anus against your will <<gp_analCumInsideUnwanted>> times'
  66. if gp_analVag > 0:'- he pumped in total <<gp_cumAnal>> ml of into your anus'
  67. if $loc_arg = 'gp':
  68. act 'Continue':gt 'pav_shared_gp', 'gp'
  69. else
  70. act 'Continue':gt 'pav_shared_apt', $goBack
  71. end
  72. end
  73. if $ARGS[0] = 'gpChat':
  74. menu_off = 1
  75. $loc_arg = 'gpChat'
  76. '<h3><font color=#<<$gp_font>>><<$gp_name>></font></h3>'
  77. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
  78. ''
  79. ! basic chat
  80. if chatLvl = 0:
  81. !clothing and bodyshape reactions
  82. say = rand(1, 2)
  83. if say = 1:
  84. if $clothingworntype = 'nude':
  85. '<<$gp_name>> is scanning your nude body with his eyes.'
  86. if salocatnow <= 2:
  87. 'He obviously enjoys the sight: <font color=#<<$gp_font>>>"Nice body <<$pcs_firstname>>. Are you here to offer it?"</font>'
  88. elseif salocatnow > 2 and salocatnow <= 4:
  89. 'He is not very content with the sight: <font color=#<<$gp_font>>>"You should lose some weight, <<$pcs_firstname>>, you are getting fat."</font>'
  90. else
  91. 'He seems almost disgusted by the sight: <font color=#<<$gp_font>>>"Jeezus <<$pcs_firstname>>, stop eating you are beginning to look like an elefant!"</font>'
  92. end
  93. !panties on
  94. if salocatnow <= 4 and $pantyworntype ! 'none':
  95. '<font color=#<<$gp_font>>>"Why did you leave those panties on <<$pcs_firstname>>? Such a shame."</font>'
  96. !panties off, anal plug
  97. elseif salocatnow <= 4 and $pantyworntype = 'none' and analplugIN = 1:
  98. 'As you accidentaly turn around, he gazes between your asscheeks on the plug stuck in your ass.'
  99. '<font color=#<<$gp_font>>>"Wow, you just can''t be a second without something filling your holes, do you?"</font>'
  100. if rand(0, 100) < 30:
  101. 'As he watches you, he gets up and goes near you, his hand reaching for your plugged ass.'
  102. act 'What are you doing?':chatLvl = 10 & gt 'pav_shared_gp', 'gpChat'
  103. end
  104. end
  105. elseif CloBimbo = 1:
  106. '<<$gp_name>> is scanning your outfit with his eyes.'
  107. if salocatnow <= 4:
  108. '<font color=#<<$gp_font>>>"You know I like when you dress like a mindless bimbo. Not that you aren''t, but anyway, good job!"</font>'
  109. else
  110. '<font color=#<<$gp_font>>>"I like girls dressed like bimbos, but they should have the body shape for it. Waste of good cloth on you."</font>'
  111. end
  112. elseif CloStyle = 4:
  113. '<<$gp_name>> is scanning your outfit with his eyes.'
  114. if salocatnow <= 4:
  115. '<font color=#<<$gp_font>>>"Only thing that I like more than stupid bimbos are whores. I won''t pay you anyway, but good job!"</font>'
  116. else
  117. '<font color=#<<$gp_font>>>"I literally love whores, but with your bodyshape you won''t be earning much money, darling."</font>'
  118. end
  119. end
  120. elseif say = 2:
  121. ! age reactions
  122. if age < 18:
  123. '<font color=#<<$gp_font>>>"I like that you are only <<age>> years old<<$pcs_firstname>>."</font>'
  124. if rand(0, 100)< 30:'<font color=#<<$gp_font>>>"By the way, don''t you have even younger sister or girlfriend that would like, you know, to meet me?"</font>'
  125. else
  126. '<font color=#<<$gp_font>>>"<<$pcs_firstname>> you are becoming too old for my taste. <<age>> years is too much."</font>'
  127. end
  128. end
  129. if step = 0:
  130. minut += 1
  131. act 'Chat about everyday stuff': step = 10 & gt 'pav_shared_gp', 'gpChat'
  132. act 'Leave':gt 'pav_shared_apt', 'start'
  133. elseif step = 10:
  134. minut += 15
  135. sayN = rand (1, 10)
  136. if sayN = 1:'<i><font color=#<<$gp_font>>>"Once I have kicked a guy to his nose.. he bled like a pig!"</font></i>'
  137. if sayN = 2:'<i><font color=#<<$gp_font>>>"Only morons have a job. I know how to make money without one, that''s a skill!"</font></i>'
  138. if sayN = 3:'<i><font color=#<<$gp_font>>>"I know some cool guys of your age. They often hang around in the park."</font></i>'
  139. if sayN = 4:'<i><font color=#<<$gp_font>>>"No one likes the authorities. Especially the cops. Yes. Fuck the cops!"</font></i>'
  140. if sayN = 5:'<i><font color=#<<$gp_font>>>"Don''t hang around the train station too much. Shady people, you know."</font></i>'
  141. '<i>You spent some time chatting with him about his ventures and mischiefs, slightly improving your relation with him.</i>'
  142. gp_rel += 1
  143. gs 'stat'
  144. intimateTalkCh = rand (0, 100)
  145. if gp_mood <= 2 and intimateTalkCh <= 80:
  146. step = 20
  147. else
  148. step = 0
  149. end
  150. act 'Continue':gt 'pav_shared_gp', 'gpChat'
  151. elseif step = 20:
  152. minut += 3
  153. if servitudeLvl = 0:
  154. '<font color=#<<$gp_font>>>"<<$pcs_firstname>>, have you finally decided to be our maid?"</font>'
  155. '<font color=#<<$pcs_font>>>"Jeez.."</font>'
  156. '<font color=#<<$gp_font>>>"Come on girl, don''t you see I need to tidy this shit-of-a-room?"</font>'
  157. act 'Say you are still not iterested':step = 0 & gt 'pav_shared_gp', 'gpChat'
  158. act 'Say you are willing to do some work afterall':step = 0 & servitudeLvl = 1 & gt 'pav_shared_gp', 'gpChat'
  159. elseif servitudeLvl = 1:
  160. '<font color=#<<$gp_font>>>"<<$pcs_firstname>>, have you finally decided to be our fucktoy?"</font>'
  161. '<font color=#<<$pcs_font>>>"What? I already clean up and cook for you."</font>'
  162. '<font color=#<<$gp_font>>>"Hey, you have to earn the rent money somewhere anyway. This way you don''t need to whore yourself on the streets you know?"</font>'
  163. act 'Say you are no whore and you are not interested':step = 0 & gt 'pav_shared_gp', 'gpChat'
  164. act 'Say you are willing to spread your legs a bit afterall':step = 0 & servitudeLvl = 2 & gt 'pav_shared_gp', 'gpChat'
  165. elseif servitudeLvl = 2:
  166. act 'Talk about sex':step = 30 & gt 'pav_shared_gp', 'gpChat'
  167. act 'Continue':step = 0 & gt 'pav_shared_gp', 'gpChat'
  168. end
  169. elseif step = 30:
  170. minut += 5
  171. 'You get into rather wild discussion about sex, porn and all that stuff. <<$gp_name>> is obviously thinking about sex most of his time.'
  172. resCh = rand (0, 6)
  173. if resCh <= 3:
  174. topicR = rand (1, 5)
  175. if topicR = 1:'<<$gp_name>> tells you he loves rough sex.'
  176. if topicR = 2:'<<$gp_name>> tells you he loves when girl is submissive.'
  177. if topicR = 3:'<<$gp_name>> tells you he kinda likes when it is a bit painful for the girl.'
  178. if topicR = 4:'<<$gp_name>> tells you his <<gpDick>> cm long dick is big enough, but he would like to have even bigger.'
  179. if topicR = 5:'<<$gp_name>> tells you he loves when the girl is young and thin.'
  180. act'Continue':step = 0 & gt 'pav_shared_gp', 'gpChat'
  181. elseif resCh = 4:
  182. if gp_doPornpos = 0:
  183. '<<$gp_name>> tells you he loves to fuck girls the Full Nelson position. He saw it in porn.'
  184. act'Continue':gp_doPornpos = 1 & gp_rel += 1 & step = 0 & gt 'pav_shared_gp', 'gpChat'
  185. elseif gp_doPornpos = 1:
  186. '<<$gp_name>> tells you he loves to fuck girls the Pile Driver position. He also saw it in porn.'
  187. act'Continue':gp_doPornpos = 2 & gp_rel += 1 & step = 0 & gt 'pav_shared_gp', 'gpChat'
  188. else
  189. act'Continue':step = 0 & gt 'pav_shared_gp', 'gpChat'
  190. end
  191. elseif resCh = 5:
  192. if gp_doAnal = 0:
  193. '<<$gp_name>> tells you that he loves rough anal sex.'
  194. act'Continue':gp_doAnal = 1 & gp_rel += 1 & step = 0 & gt 'pav_shared_gp', 'gpChat'
  195. else
  196. act'Continue':step = 0 & gt 'pav_shared_gp', 'gpChat'
  197. end
  198. elseif resCh = 6:
  199. if gp_doAnal = 1 and gp_doPornpos = 2:
  200. '<<$gp_name>> tells you that he recently bought a vacuum dick enlarger and cannot wait to test it.'
  201. act'Continue':gp_doVacuum = 1 & gp_rel += 1 & step = 0 & gt 'pav_shared_gp', 'gpChat'
  202. else
  203. act'Continue':step = 0 & gt 'pav_shared_gp', 'gpChat'
  204. end
  205. end
  206. end
  207. !anal plug
  208. elseif chatLvl = 10:
  209. '<font color=#<<$gp_font>>>"Helping you out!"</font>'
  210. '<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/buttplugpullout.mp4"></video></center>'
  211. ''
  212. 'Suddenly he grabs the plug and pulls it out without a warning!'
  213. 'PLOPPP.. your ass makes a sound as the plug leaves it gaping.'
  214. '<font color=#<<$pcs_font>>>"Ouuuch!"</font>'
  215. '<font color=#<<$gp_font>>>"You''re welcome <<$pcs_firstname>>, come again!"</font>'
  216. analplugIN = 0
  217. act 'Continue':chatLvl = 0 & gt 'pav_shared_gp', 'gpChat'
  218. end
  219. end
  220. if $ARGS[0] = 'gpServe':
  221. menu_off = 1
  222. $boy = $gp_name
  223. gs 'npcgeneratec', 0, $boy, 23
  224. gs 'boyStat', $npclastgenerated
  225. minut += 2
  226. $loc_arg = 'gpServe'
  227. '<h3><font color=#<<$gp_font>>><<$gp_name>></font></h3>'
  228. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
  229. ''
  230. step = 0
  231. subStep = 0
  232. sexCh = rand (0, 30) + gp_horny
  233. ! very bad mood, does not want anything
  234. if gp_mood >= 5:
  235. '<font color=#<<$gp_font>>>"Not now <<$pcs_firstname>>, get lost."</font>'
  236. act 'Leave':gt 'pav_shared_apt', 'start'
  237. ! random chance to sex, but increasing with horniness level; nd min horny = 30/100*100 = 30
  238. elseif sexCh < 40:
  239. '<font color=#<<$gp_font>>>"Not now <<$pcs_firstname>>, can''t you see I am busy?"</font>'
  240. act 'Leave':gt 'pav_shared_apt', 'start'
  241. ! wants sex
  242. else
  243. actionR = rand (2, 6)
  244. if actionR = 2:
  245. '<font color=#<<$gp_font>>>"You can do me with your little hands."</font>'
  246. act 'Agree': gp_rel += 1 & gt 'pav_shared_gp', 'gpHandjob'
  247. elseif actionR = 3:
  248. '<font color=#<<$gp_font>>>"Sure <<$pcs_firstname>>, blow me right now."</font>'
  249. act 'Agree': gp_rel += 1 & gt 'pav_shared_gp', 'gpSuck'
  250. elseif actionR = 4:
  251. '<font color=#<<$gp_font>>>"Present your pussy, <<$pcs_firstname>>."</font>'
  252. act 'Agree': gp_rel += 1 & gt 'pav_shared_gp', 'gpSexVaginal'
  253. elseif actionR = 5:
  254. if gp_anal = 0:
  255. if gp_doAnal = 1:
  256. '<font color=#<<$gp_font>>>"Hmmm.. what woud I like to do to you?"</font>'
  257. act 'It''s your choice':gt 'pav_shared_gp', 'gpServe'
  258. act 'You told me you like anal, do you?': gp_rel += 3 & gt 'pav_shared_gp', 'gpSexAnal'
  259. else
  260. gt 'pav_shared_gp', 'gpServe'
  261. end
  262. elseif gp_anal >= 1:
  263. '<font color=#<<$gp_font>>>"Sure <<$pcs_firstname>>, I would like to take your ass this time."</font>'
  264. act 'Agree': gp_rel += 1 & gt 'pav_shared_gp', 'gpSexAnal'
  265. end
  266. elseif actionR = 6:
  267. if gp_doVacuum >= 1:
  268. '<font color=#<<$gp_font>>>"Hmmm.. what woud I like to do to you?"</font>'
  269. act 'It''s your choice':gt 'pav_shared_gp', 'gpServe'
  270. act 'You told me you bought some vacuum enlarger, did you?':step = 6 & gp_rel += 2 & gt 'pav_shared_gp', 'gpSexVaginal'
  271. else
  272. gt 'pav_shared_gp', 'gpServe'
  273. end
  274. end
  275. if actionR > 1:act 'Say you changed your mind and leave': gp_rel -= 1 & gt 'pav_shared_apt', 'start'
  276. end
  277. end
  278. if $ARGS[0] = 'gpHandjob':
  279. '<b><font color=#<<$gp_font>>><<$gp_name>> - handjob</font></b>'
  280. if set_imgh < 250:
  281. if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
  282. if step > 0 and cockHard = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"></center>'
  283. if step > 0 and cockHard = 1:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
  284. else
  285. if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
  286. if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"></center>'
  287. if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
  288. end
  289. ''
  290. $loc_arg = 'gpHandjob'
  291. price = price_handjob
  292. if step > 0:'<<$gp_name>> orgasm build-up: '+orgB+'/100'
  293. if step = 0:
  294. orgB = 0
  295. cockHard = 0
  296. failC = 0
  297. '<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj2.mp4"></video></center>'
  298. ''
  299. '<<$gp_name>> sits on his bed, spreading his legs, showing you where to go.'
  300. 'You drop on your knees, crawl to him and unzip his pants.'
  301. 'His dick falls out of them, already half hard. <font color=#<<$gp_font>>>"Get to work, little girl."</font>'
  302. 'Looking at the cock, you decide to:'
  303. cockHard = 0
  304. act 'Jerk it slowly':step = 1 & gt 'pav_shared_gp', 'gpHandjob'
  305. !slow strokes
  306. elseif step = 1:
  307. if gp_mood = 0:
  308. orgB += rand(0, 10)
  309. else
  310. orgB += rand(0, 10) / gp_mood
  311. end
  312. '<center><video autoplay loop src="images/shared/sex/handjob/handjob2.mp4"></video></center>'
  313. ''
  314. 'You grab <<$gp_name>>''s cock in your hand, jerking it slowly, changing the pressure from time to time.'
  315. if cockHard = 0:cockHard = 1 & 'Your moves are slowly making the cock to get harder and harder, finally reaching his full <<gpDick>> cm length.'
  316. gs 'arousal', 'hj', 3
  317. gs 'stat'
  318. act 'Jerk it slowly':step = 1 & gt 'pav_shared_gp', 'gpHandjob'
  319. act 'Jerk it fast':step = 2 & gt 'pav_shared_gp', 'gpHandjob'
  320. act 'Put on lube and massage the cock':step = 3 & gt 'pav_shared_gp', 'gpHandjob'
  321. act 'Put on lube and massage the tip':step = 4 & gt 'pav_shared_gp', 'gpHandjob'
  322. !fast strokes
  323. elseif step = 2:
  324. '<center><video autoplay loop src="images/shared/sex/handjob/hj0.mp4"></video></center>'
  325. ''
  326. orgB += rand(10, 20)
  327. 'You jerk his hard cock with quite a fast pace, making him moan from pleasure.'
  328. gs 'arousal', 'hj', 3
  329. gs 'stat'
  330. act 'Jerk it slowly':step = 1 & gt 'pav_shared_gp', 'gpHandjob'
  331. act 'Jerk it fast':step = 2 & gt 'pav_shared_gp', 'gpHandjob'
  332. act 'Put on lube and massage the cock':step = 3 & gt 'pav_shared_gp', 'gpHandjob'
  333. act 'Put on lube and massage the tip':step = 4 & gt 'pav_shared_gp', 'gpHandjob'
  334. if orgB >= 100:
  335. act 'Try to make him cum':step = 5 & gt 'pav_shared_gp', 'gpHandjob'
  336. end
  337. !lube massage
  338. elseif step = 3:
  339. '<center><video autoplay loop src="images/shared/sex/handjob/handjob1.mp4"></video></center>'
  340. ''
  341. orgB += rand(15, 30)
  342. 'You put some lube on your hands and massage his cock with it.'
  343. 'The slimy lube enables you to increase the sensation, making him moan even more inensively.'
  344. '<font color=#<<$gp_font>>>"Oh yeah <<$pcs_firstname>>, this is what girls should learn as young as possible!"</font>'
  345. gs 'arousal', 'hj', 3
  346. gs 'stat'
  347. act 'Jerk it slowly':step = 1 & gt 'pav_shared_gp', 'gpHandjob'
  348. act 'Jerk it fast':step = 2 & gt 'pav_shared_gp', 'gpHandjob'
  349. act 'Put on lube and massage the cock':step = 3 & gt 'pav_shared_gp', 'gpHandjob'
  350. act 'Put on lube and massage the tip':step = 4 & gt 'pav_shared_gp', 'gpHandjob'
  351. if orgB >= 100:
  352. act 'Try to make him cum':step = 5 & gt 'pav_shared_gp', 'gpHandjob'
  353. end
  354. !tip lube massage
  355. elseif step = 4:
  356. '<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj1.jpg"></center>'
  357. ''
  358. minut += 3
  359. orgB += rand(15, 30)
  360. 'You put some lube on your hands and massage the tip of his cock with it.'
  361. 'The slimy lube enables you to play with the violet head of his cock, stroking also the hole time to time.'
  362. act 'Jerk it slowly':step = 1 & gt 'pav_shared_gp', 'gpHandjob'
  363. act 'Jerk it fast':step = 2 & gt 'pav_shared_gp', 'gpHandjob'
  364. act 'Put on lube and massage the cock':step = 3 & gt 'pav_shared_gp', 'gpHandjob'
  365. act 'Put on lube and massage the tip':step = 4 & gt 'pav_shared_gp', 'gpHandjob'
  366. if orgB >= 100:
  367. act 'Try to make him cum':step = 5 & gt 'pav_shared_gp', 'gpHandjob'
  368. end
  369. !cum attempt
  370. elseif step = 5:
  371. 'You decided that now it''s time to try and make him finally cum.'
  372. 'Intensifying the pressure and pace, you expect him every moment to moan and be done with it.'
  373. gs 'arousal', 'hj', 5
  374. cumCh = rand(0, 100)
  375. if cumCh <= 70:
  376. ''
  377. '<center><video autoplay loop src="images/shared/sex/cum/handjob/hand0,0.mp4"></video></center>'
  378. ''
  379. 'Your attempt is successful, as <<$gp_name>> cums right onto your hands and squirts all around them.'
  380. gp_lastCum = daystart
  381. gp_served = 1
  382. gs 'cum_call', 'hands', $boy, 1, 0, gp_cumVol
  383. act 'Get up':step = 9 & gp_cumVol = 0 & gt 'pav_shared_gp', 'gpHandjob'
  384. else
  385. failC += 1
  386. if failC >= 3:
  387. ''
  388. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjfail.jpg"></center>'
  389. ''
  390. '<font color=#<<$gp_font>>>"Come on <<$pcs_firstname>>, if you can''t suck a cock stop wasting my time. Get out!"</font>'
  391. act 'Get up':step = 6 & gt 'pav_shared_gp', 'gpHandjob'
  392. else
  393. ''
  394. '<center><img <<$set_imgh>> src="images/shared/sex/handjob/kotovhj.jpg"></center>'
  395. ''
  396. '<font color=#<<$gp_font>>>"Come on <<$pcs_firstname>>, what are you doing down there?"</font>'
  397. act 'Jerk it slowly':step = 1 & gt 'pav_shared_gp', 'gpHandjob'
  398. act 'Jerk it fast':step = 2 & gt 'pav_shared_gp', 'gpHandjob'
  399. act 'Put on lube and massage the cock':step = 3 & gt 'pav_shared_gp', 'gpHandjob'
  400. act 'Put on lube and massage the tip':step = 4 & gt 'pav_shared_gp', 'gpHandjob'
  401. end
  402. end
  403. !END cum fail
  404. elseif step = 6:
  405. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
  406. ''
  407. 'You get up from your knees, looking at <<$gp_name>>:<font color=#<<$pcs_font>>>"I''m sorry I was unable to satisfy you."</font>.'
  408. 'He looks really pissed:<font color=#<<$gp_font>>>"Get out you lousy slut!"</font>'
  409. gp_rel -= 3
  410. step = 0
  411. gp_hjFail += 1
  412. gs 'arousal', 'end'
  413. gs 'stat'
  414. act 'Leave':gt 'pav_shared_apt', 'start'
  415. !END cum success
  416. elseif step = 9:
  417. gp_hj += 1
  418. if gp_mood <= 3:
  419. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
  420. ''
  421. '<font color=#<<$gp_font>>>"Good job, <<$pcs_firstname>>. Now get out."</font>'
  422. 'Cleaning your hands off the cum: <font color=#<<$pcs_font>>>"OK, see you later."</font>.'
  423. gp_rel += 1
  424. step = 0
  425. else
  426. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
  427. ''
  428. '<<$gp_name>> doesn''t pay anymore attention to you, dressing up his pants he takes another magazine and starts reading it.'
  429. 'You just pack your things and quietly leave through the door.'
  430. step = 0
  431. end
  432. gs 'arousal', 'end'
  433. gs 'stat'
  434. act 'Leave': gt 'pav_shared_apt', 'payService'
  435. end
  436. end
  437. if $ARGS[0] = 'gpSuck':
  438. '<b><font color=#<<$gp_font>>><<$gp_name>> - blowjob</font></b>'
  439. if set_imgh < 250:
  440. if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
  441. if step > 0 and cockHard = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"></center>'
  442. if step > 0 and cockHard = 1:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
  443. else
  444. if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
  445. if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"></center>'
  446. if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
  447. end
  448. ''
  449. $loc_arg = 'gpSuck'
  450. price = price_blowjob
  451. if step > 0:'<<$gp_name>> orgasm build-up: '+orgB+'/100'
  452. ! crawl to him
  453. if step = 0:
  454. orgB = 0
  455. cockHard = 0
  456. failC = 0
  457. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"></center>'
  458. ''
  459. '<<$gp_name>> takes down his pants, revealing his flaccid cock. He relaxes on his bed, expecting you to do the service.'
  460. 'You drop on your knees and crawl to him, trying to move as sexy as possible.'
  461. act 'Lick his balls':step = 1 & gt 'pav_shared_gp', 'gpSuck'
  462. act 'Lick the tip':step = 2 & gt 'pav_shared_gp', 'gpSuck'
  463. act 'Suck the tip':step = 3 & gt 'pav_shared_gp', 'gpSuck'
  464. act 'Suck the cock':step = 4 & gt 'pav_shared_gp', 'gpSuck'
  465. !lick balls
  466. elseif step = 1:
  467. '<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj74.mp4"></video></center>'
  468. ''
  469. 'You decide that the best approach is to arouse him first.'
  470. 'Kneeling between his legs, you show him the whole length of your tongue, looking as lusty as you can.'
  471. 'Slowly you move your head down in his crotch and bellow his phallus. The moment you start using your tongue on his device, you can feel the increased pulsation in his veins, making the cock larger and thicker every second.'
  472. orgB += rand(0, 5)
  473. cockHard = 1
  474. gs 'arousal', 'bj', 3
  475. gs 'stat'
  476. act 'Lick his balls':step = 1 & gt 'pav_shared_gp', 'gpSuck'
  477. act 'Lick the tip':step = 2 & gt 'pav_shared_gp', 'gpSuck'
  478. act 'Suck the tip':step = 3 & gt 'pav_shared_gp', 'gpSuck'
  479. act 'Suck the cock':step = 4 & gt 'pav_shared_gp', 'gpSuck'
  480. !Lick the tip
  481. elseif step = 2:
  482. '<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj50.mp4"></video></center>'
  483. ''
  484. 'You take <<$gp_name>> cock in your hand, pointing the tip in front of your mouth.'
  485. 'As it was your favourity puppy, you start to gently Lick the tip all around, slowly making the cock to get harder and harder, finally reaching his full <<gpDick>> cm length.'
  486. gs 'arousal', 'bj', 3
  487. gs 'stat'
  488. orgB += rand(2, 7)
  489. cockHard = 1
  490. act 'Lick his balls':step = 1 & gt 'pav_shared_gp', 'gpSuck'
  491. act 'Lick the tip':step = 2 & gt 'pav_shared_gp', 'gpSuck'
  492. act 'Suck the tip':step = 3 & gt 'pav_shared_gp', 'gpSuck'
  493. act 'Suck the cock':step = 4 & gt 'pav_shared_gp', 'gpSuck'
  494. !suck the tip
  495. elseif step = 3:
  496. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjobtip3.mp4"></video></center>'
  497. ''
  498. if cockHard = 0:
  499. orgB += rand(5, 15)
  500. '<<$gp_name>>''s cock is not hard yet, but you start to suck the yet soft tip as if it was, slurping aloud.'
  501. 'You can feel that slowly his member becomes hard right in your mouth.'
  502. cockHard = 1
  503. else
  504. orgB += rand(10, 20)
  505. '<<$gp_name>>''s already hard cock points toward you and you suck the dark pink tip as a lolipop.'
  506. end
  507. gs 'arousal', 'bj', 3
  508. gs 'stat'
  509. act 'Lick his balls':step = 1 & gt 'pav_shared_gp', 'gpSuck'
  510. act 'Lick the tip':step = 2 & gt 'pav_shared_gp', 'gpSuck'
  511. act 'Suck the tip':step = 3 & gt 'pav_shared_gp', 'gpSuck'
  512. act 'Suck the cock':step = 4 & gt 'pav_shared_gp', 'gpSuck'
  513. act 'Deepthroat':step = 5 & gt 'pav_shared_gp', 'gpSuck'
  514. if orgB >= 100:
  515. act 'Try to make him cum':step = 6 & gt 'pav_shared_gp', 'gpSuck'
  516. end
  517. !sucking dick
  518. elseif step = 4:
  519. '<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj122.mp4"></video></center>'
  520. ''
  521. if cockHard = 0:
  522. orgB += rand(15, 35)
  523. '<<$nd_name>>''s cock is not hard yet, but you start to suck the member as if it was, making almost half of it disappear in your throat every time you move on.'
  524. 'You can slowly feel his member becoming hard right in your mouth, making you choke and gag on it more and more with every second.'
  525. cockHard = 1
  526. else
  527. orgB += rand(20, 40)
  528. '<<$gp_name>>''s already hard cock points toward you and you suck almost half of it, sucking and slurping it as best as you can.'
  529. end
  530. gs 'arousal', 'bj', 8
  531. gs 'stat'
  532. act 'Lick his balls':step = 1 & gt 'pav_shared_gp', 'gpSuck'
  533. act 'Lick the tip':step = 2 & gt 'pav_shared_gp', 'gpSuck'
  534. act 'Suck the tip':step = 3 & gt 'pav_shared_gp', 'gpSuck'
  535. act 'Suck the cock':step = 4 & gt 'pav_shared_gp', 'gpSuck'
  536. act 'Deepthroat':step = 5 & gt 'pav_shared_gp', 'gpSuck'
  537. if orgB >= 100:
  538. act 'Try to make him cum':step = 6 & gt 'pav_shared_gp', 'gpSuck'
  539. end
  540. !deepthroat
  541. elseif step = 5:
  542. '<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjdeepthroat.mp4"></video></center>'
  543. ''
  544. orgB += rand(40, 60)
  545. 'You decide to take <<$gp_name>>''s hard, <<gpDick>> cm long cock all the way your throat.'
  546. 'You force yourself on to it, overcoming the gag reflex in your throat, saliva and tears almost squirting out of you.'
  547. 'Doing this several times in a row, you try to hold on as long as you can with dick all the way down in your throat.'
  548. gp_bjDeep = 1
  549. gs 'arousal', 'bj', 6
  550. gs 'stat'
  551. deepthroatFailCh = rand(0, 100)
  552. fadeOutCh = rand(0, 100)
  553. if deepthroatFailCh <= 10:
  554. '<b>You try too hard to put it as far as possible, unable to hold the gag reflex anymore, still with his dick inside you vomit right in <<$gp_name>>''s crotch!</b>'
  555. act 'Continue':step = 8 & gt 'pav_shared_gp', 'gpSuck'
  556. elseif fadeOutCh <= 10:
  557. '<b>You try too hard to keep the cock inside you as long as possible, not being able to catch enough breath. Suddenly all goes dark and you fade away...</b>'
  558. act 'Continue':step = 9 & gt 'pav_shared_gp', 'gpSuck'
  559. else
  560. act 'Lick his balls':step = 1 & gt 'pav_shared_gp', 'gpSuck'
  561. act 'Lick the tip':step = 2 & gt 'pav_shared_gp', 'gpSuck'
  562. act 'Suck the tip':step = 3 & gt 'pav_shared_gp', 'gpSuck'
  563. act 'Suck the cock':step = 4 & gt 'pav_shared_gp', 'gpSuck'
  564. act 'Deepthroat':step = 5 & gt 'pav_shared_gp', 'gpSuck'
  565. if orgB >= 100:
  566. act 'Try to make him cum':step = 6 & gt 'pav_shared_gp', 'gpSuck'
  567. end
  568. end
  569. !cum attempt
  570. elseif step = 6:
  571. 'You decided that now it''s time to try and make him finally cum.'
  572. 'Intensifying the pressure and pace, you expect him every moment to moan and be done with it.'
  573. gs 'arousal', 'bj', 5
  574. cumCh = rand(0, 100)
  575. if cumCh <= 70:
  576. '<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1,5.mp4"></video></center>'
  577. ''
  578. 'Your attempt is successful, as <<$gp_name>> cums right into your mouth and on your face.'
  579. gp_lastCum = daystart
  580. gp_served = 1
  581. gs 'cum_call', 'mouth', $boy, 1, 0, gp_cumVol / 2
  582. gs 'cum_call', 'face', $boy, 1, 0, gp_cumVol / 2
  583. act 'Get up':step = 10 & gp_cumVol = 0 & gt 'pav_shared_gp', 'gpSuck'
  584. else
  585. failC += 1
  586. if failC >= 3:
  587. ''
  588. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjfail.jpg"></center>'
  589. ''
  590. '<font color=#<<$gp_font>>>"You are such a lousy sucker <<$pcs_firstname>>. Get out!"</font>'
  591. act 'Get up':step = 7 & gt 'pav_shared_gp', 'gpSuck'
  592. else
  593. ''
  594. '<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjfailtryagain.mp4"></video></center>'
  595. ''
  596. '<font color=#<<$gp_font>>>"Come on <<$pcs_firstname>>, what are you doing down there?"</font>'
  597. if failC = 1:'He is getting nervous..'
  598. if failC = 2:'He is obviously annoyed, you better try to finish him now!'
  599. act 'Suck just the tip':step = 3 & gt 'pav_shared_gp', 'gpSuck'
  600. act 'Suck the cock':step = 4 & gt 'pav_shared_gp', 'gpSuck'
  601. act 'Deepthroat':step = 5 & gt 'pav_shared_gp', 'gpSuck'
  602. end
  603. end
  604. gs 'stat'
  605. !END cum fail
  606. elseif step = 7:
  607. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
  608. ''
  609. 'You get up from your knees, looking at <<$gp_name>>:<font color=#<<$pcs_font>>>"I''m sorry I was unable to satisfy you."</font>.'
  610. 'He looks really pissed:<font color=#<<$gp_font>>>"Get out you lousy slut!"</font>'
  611. gp_rel -= 3
  612. step = 0
  613. gp_bjFail += 1
  614. act 'Leave':gt 'pav_shared_apt', 'start'
  615. !END deepthroat fail
  616. elseif step = 8:
  617. '<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjdeepthroatpuke.mp4"></video></center>'
  618. ''
  619. '<font color=#<<$gp_font>>>"Oh my god <<$pcs_firstname>>, have you just puked your shit onto me??!!"</font>'
  620. 'Cleaning your face and mouth with your clothes, all you can say is <font color=#<<$pcs_font>>>"I''m sorry..."</font>.'
  621. '<font color=#<<$gp_font>>>"Get out you stupid cunt!"</font>'
  622. gp_rel -= 5
  623. step = 0
  624. gp_bjFail += 1
  625. gp_bjFailPuke += 1
  626. act 'Leave':gt 'pav_shared_apt', 'start'
  627. !END deepthroat faint out
  628. elseif step = 9:
  629. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/faint.jpg"></center>'
  630. ''
  631. 'You wake up being slapped in your face: <font color=#<<$gp_font>>>"<<$pcs_firstname>>! <<$pcs_firstname>>! Wake up!"</font>'
  632. 'Slowly normal sight goes back to you, but still you are very confused. <font color=#<<$pcs_font>>>"Wh..what happened?</font>'
  633. '<font color=#<<$gp_font>>>"I guess you took somehow bigger portion than you can stand, <<$pcs_firstname>>!"</font> He is obviously entertained by this, even though you were unable to finish him.'
  634. gp_rel += 1
  635. step = 0
  636. gp_bjFail += 1
  637. gp_bjFailFaint += 1
  638. act 'Get up and leave':gt 'pav_shared_apt', 'start'
  639. !END cum success
  640. elseif step = 10:
  641. gp_bj += 1
  642. if gp_mood <= 3:
  643. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
  644. ''
  645. '<font color=#<<$gp_font>>>"Good job, <<$pcs_firstname>>. Now get out."</font>'
  646. 'Cleaning your face and mouth off the cum: <font color=#<<$pcs_font>>>"OK, see you later."</font>.'
  647. gp_rel += 1
  648. step = 0
  649. else
  650. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
  651. ''
  652. '<<$gp_name>> doesn''t pay anymore attention to you, dressing up his pants he takes another magazine and starts reading it.'
  653. 'You just pack your things and quietly leave through the door.'
  654. step = 0
  655. end
  656. gs 'arousal', 'end'
  657. gs 'stat'
  658. act 'Get up and leave': gt 'pav_shared_apt', 'payService'
  659. end
  660. end
  661. if $ARGS[0] = 'gpSexVaginal':
  662. '<b><font color=#<<$gp_font>>><<$gp_name>> - vaginal sex</font></b>'
  663. if set_imgh < 250:
  664. if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
  665. if step > 0 and step < 6:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
  666. if step = 6:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerectvacuum.jpg"></center>'
  667. else
  668. if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
  669. if step > 0 and step < 6:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
  670. if step = 6:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerectvacuum.jpg"></center>'
  671. end
  672. ''
  673. $loc_arg = 'gpSexVaginal'
  674. price = price_vaginal
  675. if step > 0:'<<$gp_name>> orgasm build-up: '+orgB+'/100'
  676. !strip down
  677. if step = 0:
  678. minut += 5
  679. orgB = 0
  680. cockHard = 0
  681. failC = 0
  682. $clothingworntype = 'nude'
  683. '<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
  684. ''
  685. '<<$gp_name>> begins to undress and you follow his example, stripping the few clothes you are currently wearing.'
  686. 'His somewhat thin but muscular body has the rather pale skin. He moves towards you, lubing his <<gpDick>> cm long cock and stroking it on the way.'
  687. if $pantyworntype ! 'none':
  688. gs 'panties', 'remove'
  689. gs 'stat'
  690. '<font color=#<<$gp_font>>>"Hey, <<$pcs_firstname>>, you let those panties on for me to rip them off, or what?"</font>'
  691. 'You entirely forgot to take them off! Or maybe you didn''t want to actually?'
  692. 'You reach for the ribbon of the panties, slowly slipping them off, down your legs. You blush a little.'
  693. end
  694. '<<$gp_name>> takes you by the ass, instantly poking his fingers into your pussy.'
  695. '<font color=#<<$gp_font>>>"Do you want to have your pussy fucked a certain way, or should I choose?"</font>'
  696. if gp_pornPos = 0:hisPos = rand(1, 3)
  697. if gp_pornPos = 1:hisPos = rand(1, 4)
  698. if gp_pornPos = 2:hisPos = rand(1, 5)
  699. if gp_vacuum = 1:hisPos = rand(1, 6)
  700. act 'Let him choose':step = hisPos & gt 'pav_shared_gp', 'gpSexVaginal'
  701. act 'Take me like a missionary':step = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
  702. act 'Take me from behind':step = 2 & gt 'pav_shared_gp', 'gpSexVaginal'
  703. act 'Take me from side':step = 3 & gt 'pav_shared_gp', 'gpSexVaginal'
  704. if gp_doPornpos = 1 and gp_pornPos < 1:act 'You told me that you like the Full Nelson position, do you?':gp_rel += 3 & step = 4 & gt 'pav_shared_gp', 'gpSexVaginal'
  705. if gp_doPornpos = 2 and gp_pornPos < 2:act 'You told me that you want the Pile Driver position, do you?':gp_rel += 2 & step = 5 & gt 'pav_shared_gp', 'gpSexVaginal'
  706. if gp_doVacuum = 1 and gp_vacuum < 1:act 'You told me you want to test some kind dick enlarger device..':gp_rel += 2 & step = 6 & gt 'pav_shared_gp', 'gpSexVaginal'
  707. if gp_pornPos >= 1:act 'Take me Full Nelson':step = 4 & gt 'pav_shared_gp', 'gpSexVaginal'
  708. if gp_pornPos >= 2:act 'Take me Pile Driver':step = 5 & gt 'pav_shared_gp', 'gpSexVaginal'
  709. if gp_vacuum = 1:act 'Take me using the vacuum enlarger on your dick':step = 6 & gt 'pav_shared_gp', 'gpSexVaginal'
  710. !missionary
  711. elseif step = 1:
  712. if subStep = 0:
  713. '<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/gp/vagmissionary1.mp4"></video></center>'
  714. ''
  715. 'You lie on the bed, spreading your legs for easy access.'
  716. '<<$gp_name>> kneels between those, roughly spreading them as wide as they go, making you scream a bit.'
  717. 'As he is content with the sight, he leans above you, moving his hips closer to your crotch.'
  718. 'He points the tip of his <<gpDick>> to your pussy and looks up to your face: <font color=#<<$gp_font>>>"Look at me while I penetrate your slit!"</font>'
  719. 'Slightly shaking you do as he says..'
  720. 'In that moment he pushes his dick inside you as far as your somewhat dry pussy let''s him.'
  721. '<<$gp_name>> bangs you wildly right from the start.'
  722. gs 'arousal', 'vaginal', 10, 'lube'
  723. gs 'stat'
  724. orgB += rand(10, 25)
  725. act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
  726. elseif subStep = 1:
  727. minut += 10
  728. '<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/gp/vagmissionary2.mp4"></video></center>'
  729. ''
  730. 'As he continuously and wildly rams your pussy, you have no strength to do anything but endure it and moan like an injured pig.'
  731. '<<$gp_name>> now rams you as fast as he can, all his <<gpDick>> cm are inside you.'
  732. gs 'arousal', 'vaginal', 10
  733. gs 'stat'
  734. orgB += rand(30, 50)
  735. if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
  736. if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexVaginal'
  737. end
  738. !doggy
  739. elseif step = 2:
  740. if subStep = 0:
  741. '<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/gp/vagdoggy1.mp4"></video></center>'
  742. ''
  743. 'You kneel on the bed, bending your back as much as you can, putting your nice round ass as high as possible.'
  744. '<<$gp_name>> kneels behind you, probing your vagina with several of his fingers.'
  745. '<font color=#<<$gp_font>>>"<<$pcs_firstname>>, prepare for the entry!"</font>'
  746. 'After his words, he grabs your hips and thrusts all of his <<gpDick>> centimeters inside your pussy, making you scream from discomfort.'
  747. 'The first pain fades away and you can feel building warmth and a good feeling of being fucked from behind like a mare in heat.'
  748. 'He fucks you furiously right from the start.'
  749. gs 'arousal', 'vaginal', 10, 'lube'
  750. gs 'stat'
  751. orgB += rand(5, 20)
  752. act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
  753. elseif subStep = 1:
  754. minut += 10
  755. '<center><video autoplay loop src="images/locations/city/residential/sauna/sex/fuckroughvaginal4.mp4"></video></center>'
  756. ''
  757. 'As he continuously and wildly rams your pussy, you have no strength to do anything but endure it and moan like an injured pig.'
  758. '<<$gp_name>> now rams you as deep and as fast he can, the every one of his <<gpDick>> cm are inside you with each stroke.'
  759. gs 'arousal', 'vaginal', 10
  760. gs 'stat'
  761. orgB += rand(20, 40)
  762. if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
  763. if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexVaginal'
  764. end
  765. !sidefuck
  766. elseif step = 3:
  767. if subStep = 0:
  768. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagsidefuck1.jpg"></center>'
  769. ''
  770. 'You lie on the bed, raising the upper leg in the air, exposing your tender pussy.'
  771. 'He doesn''t wait for anything and lies behind you, instantly preparing his large dick for the entry.'
  772. '<<$gp_name>> takes his rod, pointing the tip right to the entry of your vagina.'
  773. '<font color=#<<$gp_font>>>"<<$pcs_firstname>>, prepare for the penetration!"</font>'
  774. 'Then he pushes as far as his <<gpDick>> cm long dick can reach.'
  775. '<<$gp_name>> bangs you wildly right from the start.'
  776. gs 'arousal', 'vaginal', 10, 'lube'
  777. gs 'stat'
  778. orgB += rand(10, 25)
  779. act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
  780. elseif subStep = 1:
  781. minut += 10
  782. '<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagsidefuck2.mp4"></video></center>'
  783. ''
  784. 'As he continuously and wildly rams your pussy, you have no strength to do anything but endure it and moan like an injured pig.'
  785. '<<$gp_name>> now rams you as deep as he can and giving the position and the whole (<<gpDick>> cm) size of his dick, most of the strokes hurt.'
  786. gs 'pain', 1, 'vaginal', 'stretch'
  787. gs 'arousal', 'vaginal', 10
  788. gs 'stat'
  789. orgB += rand(30, 50)
  790. if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
  791. if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexVaginal'
  792. end
  793. !full nelson
  794. elseif step = 4:
  795. if gp_pornPos < 1:gp_pornPos = 1
  796. if subStep = 0:
  797. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagfullnelson1.jpg"></center>'
  798. ''
  799. 'You let him sit on the edge of the bed, having his large dick prepared for your vagina.'
  800. 'Facing him with your back, you climb on top of him and burry his <<gpDick>> cm long dick in your pussy. You wanted to ride it a bit to make the fuck smoother, but he doesn''t let you:<font color=#<<$gp_font>>>"No time for that <<$pcs_firstname>>, let''s start already!"</font>'
  801. 'Not waiting for your answer he grabs your legs and reaches for your head, immobilizing you entirely. Then he starts fucking you like a wild animal.'
  802. 'In this position you literally see every stroke of his <<gpDick>> cm long penis into your pussy.. And there is nothing else you can do.'
  803. gs 'arousal', 'vaginal', 10, 'lube'
  804. gs 'stat'
  805. orgB += rand(30, 50)
  806. act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
  807. elseif subStep = 1:
  808. minut += 10
  809. '<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagfullnelson2.mp4"></video></center>'
  810. ''
  811. 'As he continuously and wildly rams your pussy, you have no strength to do anything but endure it and moan like an injured pig.'
  812. '<<$gp_name>> rams you as deep as he can.'
  813. gs 'arousal', 'vaginal', 10
  814. gs 'stat'
  815. orgB += rand(40, 60)
  816. if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
  817. if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexVaginal'
  818. end
  819. !pile driver
  820. elseif step = 5:
  821. if gp_pornPos < 2:gp_pornPos = 2
  822. if subStep = 0:
  823. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagpiledriver1.jpg"></center>'
  824. ''
  825. 'You take a pillow from his bed, putting on the floor and lying on it with your back.'
  826. 'As if you were doing yoga, you put your ass in the hands and lift it above your head, letting the feet fall down aside your head.'
  827. '<<$gp_name>> now has the very best access to your pussy: <font color=#<<$gp_font>>>"Now that''s a sight! Every girl should be fucked like that!"</font>'
  828. 'He goes to you, probing your pussy with several of his fingers.'
  829. 'After while he takes his phallus, somehow bending it downwards and pushes it inside you.'
  830. gs 'arousal', 'vaginal', 10, 'lube'
  831. gs 'stat'
  832. orgB += rand(30, 50)
  833. act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
  834. elseif subStep = 1:
  835. minut += 10
  836. '<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagpiledriver2.mp4"></video></center>'
  837. ''
  838. 'As he continuously and wildly rams your pussy, you have no strength to do anything but endure it and moan like an injured pig.'
  839. '<<$gp_name>> rams you as deep as he can, making big effort to hammer you down as much as he can.'
  840. gs 'arousal', 'vaginal', 10
  841. gs 'stat'
  842. orgB += rand(40, 60)
  843. if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
  844. if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexVaginal'
  845. end
  846. !vacuum enlarged fuck
  847. elseif step = 6:
  848. if gp_vacuum < 1:gp_vacuum = 1
  849. if subStep = 0:
  850. minut += 5
  851. gpDick_enlarged = gpDick + (gpDick * rand(20, 40) / 100)
  852. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/gp/vacuumpumppenis.jpg"></center>'
  853. ''
  854. '<<$gp_name>> takes a vacuum dick enlarger device from his closet, putting it on his already <<gpDick>> cm long dick.'
  855. 'As he is pushing the pump, you can see the cock getting larger with each push.'
  856. 'After some time he stops, putting a ring on the root of his dick. Today the device has enlarged it to <<ndDick_enlarged>> cm!'
  857. act 'Let him fuck you with that monster':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
  858. elseif subStep = 1:
  859. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckdeep1.mp4"></video></center>'
  860. ''
  861. '<font color=#<<$gp_font>>>"Now <<$pcs_firstname>> prepare your pussy for the famous Pussy Destroyer!"</font>'
  862. 'As he reaches for your pussy you close eyes and brace for the expected pain.'
  863. 'He starts pushing it into, and even that it is quite lubed, it goes hard.'
  864. 'Finally he slips through the inner barrier and thrusts large part of his enlarged, <<gpDick_enlarged>> cm long and very thick dick into you.'
  865. orgB += rand(20, 30)
  866. gs 'pain', 1, 'vaginal', 'tear'
  867. act 'Endure it':subStep = 2 & gt 'pav_shared_gp', 'gpSexVaginal'
  868. elseif subStep = 2:
  869. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckdeep2.mp4"></video></center>'
  870. ''
  871. '<<$gp_name>> uses his newly gained centimeters and fucks you harder than usual, making you scream and moan and beg for relief.. in vain.'
  872. 'Today he obviously enjoys his dominance and fucks you relentlessly.'
  873. 'You have no strength to fight him and just try to endure it till the end.'
  874. orgB += rand(40, 60)
  875. gs 'pain', 1, 'vaginal', 'stretch'
  876. if orgB < 100:act 'Let him continue':subStep = 2 & gt 'pav_shared_gp', 'gpSexVaginal'
  877. if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexVaginal'
  878. end
  879. !where to cum
  880. elseif step = 10:
  881. if subStep = 0:
  882. minut += 2
  883. '<<$gp_name>> is groaning wildly, you can say that he is reaching his orgasm.'
  884. 'You decide to tell him:'
  885. gp_served = 1
  886. gp_vag += 1
  887. act 'Cum inside me':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
  888. cumOutL = rand(2, 6)
  889. act 'Don''t cum inside me':subStep = cumOutL & gt 'pav_shared_gp', 'gpSexVaginal'
  890. !inside
  891. elseif subStep = 1:
  892. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumpussy3.mp4"></video></center>'
  893. ''
  894. '<<$gp_name>> finally reaches his violent orgasm, pumping his load <<gpDick>> cm deep inside your pussy.'
  895. gp_vagCumInside += 1
  896. gp_cumVag += gp_cumVol
  897. gp_lastCum = daystart
  898. gs 'cum_call', '', $boy, 1, 0, gp_cumVol
  899. gs 'arousal', 'vaginal', 2
  900. gs 'arousal', 'end'
  901. gs 'stat'
  902. act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
  903. !stomach
  904. elseif subStep = 2:
  905. '<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumbelly2.mp4"></video></center>'
  906. ''
  907. '<<$gp_name>> finally reaches his violent orgasm and in the moment he starts spouting his seed, he takes his dick out and points it on your stomach.'
  908. 'A large pool of cum lands on your abdomen, feeling warm but sticky.'
  909. minut += 2
  910. gp_lastCum = daystart
  911. gs 'cum_call', 'stomach', $boy, 1, 0, gp_cumVol
  912. gs 'arousal', 'end'
  913. gs 'stat'
  914. act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
  915. !ass
  916. elseif subStep = 3:
  917. '<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/cumonass.mp4"></video></center>'
  918. ''
  919. '<<$gp_name>> finally reaches his violent orgasm and in the moment he starts spouting his seed, he takes his dick out and points it on your ass.'
  920. 'Both your asscheeks are covered in sticky, warm seed.'
  921. minut += 2
  922. gp_lastCum = daystart
  923. gs 'cum_call', 'butt', $boy, 1, 0, gp_cumVol
  924. gs 'arousal', 'end'
  925. gs 'stat'
  926. act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
  927. !face
  928. elseif subStep = 4:
  929. '<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cumface1.mp4"></video></center>'
  930. ''
  931. '<<$gp_name>> finally reaches his violent orgasm and in the moment he starts spouting his seed, he pushes you on your knees and points his tip in front of your face.'
  932. 'The seed starts squirting, splashing your face with surprisingly strong force, leaking to your nose and eyes and hair..'
  933. '<font color=#<<$gp_font>>>"Oh yes, now that''s the right makeup for a girl!"</font>'
  934. minut += 2
  935. gp_lastCum = daystart
  936. gs 'cum_call', 'face', $boy, 1, 0, gp_cumVol
  937. gs 'arousal', 'end'
  938. gs 'stat'
  939. act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
  940. !takeout fail
  941. elseif subStep = 5:
  942. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagcumtakoutfail.jpg"></center>'
  943. ''
  944. 'You expect <<$gp_name>> to take his cock out of you any moment, but instead you hear his groans becoming louder.'
  945. '<font color=#<<$pcs_font>>>"What are you doing? You aren''t coming inside me, are you?"</font>'
  946. '<font color=#<<$gp_font>>>"Shut up <<$pcs_firstname>>, I cum where I want to."</font>'
  947. if tabletkishot = 0 and pillcon < 0:
  948. '<font color=#<<$pcs_font>>>"I am not on the pill <<$gp_name>>!"</font>'
  949. '<font color=#<<$gp_font>>>"And? Your problem. Piss off."</font>'
  950. 'He is obvously annoyed by your reaction.'
  951. gp_rel -= 5
  952. else
  953. gp_rel -= 3
  954. end
  955. 'You furiously get up from the bed, putting your clothes between your legs to catch the remainder of the cum, so it doesn''t spur on your legs and carpet.'
  956. gp_lastCum = daystart
  957. gp_cumVag += gp_cumVol
  958. gp_vagCumInside += 1
  959. gp_vagCumInsideUnwanted += 1
  960. gs 'cum_call', '', $boy, 1, 0, gp_cumVol
  961. gs 'arousal', 'vaginal', 5, 'sub'
  962. gs 'arousal', 'end'
  963. gs 'stat'
  964. act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
  965. !will you swallow?
  966. elseif subStep = 6:
  967. '<font color=#<<$gp_font>>>"I will cum in your pussy or you will swallow it. Make your choice before it''s too late, <<$pcs_firstname>>!"</font>'
  968. act 'Swallow':subStep = 20 & gt 'pav_shared_gp', 'gpSexVaginal'
  969. act 'Pussy':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
  970. if gp_mood <= 2:act 'Neither!':subStep = 30 & gt 'pav_shared_gp', 'gpSexVaginal'
  971. if gp_mood > 2:act 'Neither!':subStep = 5 & gt 'pav_shared_gp', 'gpSexVaginal'
  972. !swallow YES
  973. elseif subStep = 20:
  974. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecummouth5.mp4"></video></center>'
  975. ''
  976. '<<$gp_name>> finally reaches the end and in the moment he is about the come, you get on your knees and open your mouth for his delivery.'
  977. 'The seed starts squirting, landing in your mouth and some even around it.'
  978. '<<$gp_name>> spins the last of his cum dry from his cock, you close your mouth, swallowing the mouthful in one gulp.'
  979. 'Afterwards you show him your tongue as a proof that not a drop was left unconsumed..'
  980. '<font color=#<<$gp_font>>>"Good girl, better than any food, is it?"</font>'
  981. gp_lastCum = daystart
  982. gp_cumSwall += gp_cumVol
  983. gp_swall += 1
  984. gp_rel += 1
  985. minut += 5
  986. gs 'cum_call', 'mouth', $boy, 1, 0, gp_cumVol
  987. gs 'arousal', 'end'
  988. gs 'stat'
  989. act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
  990. !swallow NO
  991. elseif subStep = 30:
  992. '<font color=#<<$gp_font>>>"Allright I''ll cum elsewhere, but only because I have a <<$nd_mood>> mood today!"</font>'
  993. gp_rel -= 3
  994. cumOutL2 = rand(2, 4)
  995. act 'Continue':subStep = cumOutL2 & gt 'pav_shared_gp', 'gpSexVaginal'
  996. end
  997. end
  998. end
  999. if $ARGS[0] = 'gpSexAnal':
  1000. '<b><font color=#<<$gp_font>>><<$gp_name>> - anal sex</font></b>'
  1001. if set_imgh < 250:
  1002. if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
  1003. if step > 0 and step < 6:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
  1004. if step = 6:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerectvacuum.jpg"></center>'
  1005. else
  1006. if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
  1007. if step > 0 and step < 6:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
  1008. if step = 6:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerectvacuum.jpg"></center>'
  1009. end
  1010. ''
  1011. $loc_arg = 'gpSexAnal'
  1012. price = price_anal
  1013. if step > 0:'<<$gp_name>> orgasm build-up: '+orgB+'/100'
  1014. !strip down
  1015. if step = 0:
  1016. minut += 5
  1017. orgB = 0
  1018. cockHard = 0
  1019. failC = 0
  1020. $clothingworntype = 'nude'
  1021. '<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
  1022. ''
  1023. '<<$gp_name>> begins to undress and you follow his example, stripping the few clothes you are currently wearing.'
  1024. 'His somewhat thin but muscular body has the rather pale skin. He moves towards you, lubing his <<gpDick>> cm long cock and stroking it on the way.'
  1025. if $pantyworntype ! 'none':
  1026. gs 'panties', 'remove'
  1027. gs 'stat'
  1028. '<font color=#<<$gp_font>>>"Hey, <<$pcs_firstname>>, you let those panties on for me to rip them off, or what?"</font>'
  1029. 'You entirely forgot to take them off! Or maybe you didn''t want to actually?'
  1030. 'You reach for the ribbon of the panties, slowly slipping them off, down your legs. You blush a little.'
  1031. end
  1032. '<<$gp_name>> takes you by the ass, instantly poking his fingers into your anus.'
  1033. '<font color=#<<$gp_font>>>"Do you want to have your ass fucked a certain way, or should I choose?"</font>'
  1034. if gp_pornPos = 0:hisPos = rand(1, 3)
  1035. if gp_pornPos = 1:hisPos = rand(1, 4)
  1036. if gp_pornPos = 2:hisPos = rand(1, 5)
  1037. if gp_vacuum = 1:hisPos = rand(1, 6)
  1038. act 'Let him choose':step = hisPos & gt 'pav_shared_gp', 'gpSexAnal'
  1039. act 'Take me like a missionary':step = 1 & gt 'pav_shared_gp', 'gpSexAnal'
  1040. act 'Take me from behind':step = 2 & gt 'pav_shared_gp', 'gpSexAnal'
  1041. act 'Take me from side':step = 3 & gt 'pav_shared_gp', 'gpSexAnal'
  1042. if gp_doPornpos = 1 and gp_pornPos < 1:act 'You told me that you like the Full Nelson position, do you?':gp_rel += 3 & step = 4 & gt 'pav_shared_gp', 'gpSexAnal'
  1043. if gp_doPornpos = 2 and gp_pornPos < 2:act 'You told me that you want the Pile Driver position, do you?':gp_rel += 2 & step = 5 & gt 'pav_shared_gp', 'gpSexAnal'
  1044. if gp_doVacuum = 1 and gp_vacuum < 1:act 'You told me you want to test some kind dick enlarger device..':gp_rel += 2 & step = 6 & gt 'pav_shared_gp', 'gpSexAnal'
  1045. if gp_pornPos >= 1:act 'Take me Full Nelson':step = 4 & gt 'pav_shared_gp', 'gpSexAnal'
  1046. if gp_pornPos >= 2:act 'Take me Pile Driver':step = 5 & gt 'pav_shared_gp', 'gpSexAnal'
  1047. if gp_vacuum >= 1:act 'Take me using the vacuum enlarger on your dick':step = 6 & gt 'pav_shared_gp', 'gpSexAnal'
  1048. !missionary
  1049. elseif step = 1:
  1050. if subStep = 0:
  1051. '<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/gp/analmissionary1.mp4"></video></center>'
  1052. ''
  1053. 'You lie on the bed, spreading your legs for easy access.'
  1054. '<<$gp_name>> kneels between those, roughly spreading them as wide as they go, making you scream a bit.'
  1055. 'As he is content with the sight, he leans above you, moving his hips closer to your crotch.'
  1056. 'He points the tip of his <<gpDick>> to your pussy and looks up to your face: <font color=#<<$gp_font>>>"Look at me while I penetrate your sphincter!"</font>'
  1057. ! normal/or-better mood OR likes Sveta
  1058. if gp_mood <= 3 or gp_rel > 80:
  1059. 'Before doing so, he takes some more lube on his fingers and one by one he sretches your anus with them. Making it easier for you to be penetrated.'
  1060. 'He starts pushing his dick inside, and as it is lubed, it goes in quite easily.'
  1061. else
  1062. 'Slightly shaking you do as he says..'
  1063. 'In that moment he pushes his dick inside your ass as far as he can!'
  1064. '<font color=#<<$pcs_font>>>"Ouuuch! <<$gp_name>>, that hurt!"</font>'
  1065. '<font color=#<<$gp_font>>>"Shut up <<$pcs_firstname>> and take it like a good little girl!"</font>'
  1066. gs 'pain', 1, 'asshole', 'tear'
  1067. end
  1068. '<<$gp_name>> bangs you wildly right from the start.'
  1069. gs 'arousal', 'anal', 10, 'lube'
  1070. gs 'stat'
  1071. orgB += rand(5, 20)
  1072. act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
  1073. elseif subStep = 1:
  1074. minut += 10
  1075. '<center><video autoplay loop src="/images/locations/shared/abduction/sex/slavewhorefuckanal5.mp4"></video></center>'
  1076. ''
  1077. 'As he continuously and wildly rams your anus, you have no strength to do anything but endure it and moan like an injured pig.'
  1078. '<<$gp_name>> now rams you as deep as he can, all his <<gpDick>> centimeters are inside you.'
  1079. gs 'arousal', 'anal', 10
  1080. gs 'stat'
  1081. orgB += rand(20, 40)
  1082. if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
  1083. if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexAnal'
  1084. end
  1085. !behind
  1086. elseif step = 2:
  1087. if subStep = 0:
  1088. '<center><video autoplay loop src="images/locations/city/residential/sauna/sex/fuckanal3.mp4"></video></center>'
  1089. ''
  1090. 'You kneel on the bed, bending your back as much as you can, putting your nice round ass as high as possible.'
  1091. '<<$gp_name>> kneels behind you, poking your anus with several of his fingers.'
  1092. ! normal/or-better mood OR likes Sveta
  1093. if gp_mood <= 3 or gp_rel > 80:
  1094. 'He takes some more lube on his fingers and one by one he sretches your anus with them. Making it easier for you to be penetrated.'
  1095. 'He starts pushing his dick inside, and as it is lubed, it goes in quite easily.'
  1096. else
  1097. 'In a few moments he pushes his dick inside your ass as far as he can!'
  1098. '<font color=#<<$pcs_font>>>"Ouuuch! <<$gp_name>>, that hurt!"</font>'
  1099. '<font color=#<<$gp_font>>>"Shut up <<$pcs_firstname>> and take it like a good little girl!"</font>'
  1100. gs 'pain', 1, 'asshole', 'tear'
  1101. end
  1102. '<<$gp_name>> bangs you wildly right from the start.'
  1103. gs 'arousal', 'anal', 10, 'lube'
  1104. gs 'stat'
  1105. orgB += rand(5, 20)
  1106. act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
  1107. elseif subStep = 1:
  1108. minut += 10
  1109. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanal2.mp4"></video></center>'
  1110. ''
  1111. 'As he continuously and wildly rams your anus, you have no strength to do anything but endure it and moan like an injured pig.'
  1112. '<<$gp_name>> now rams you as deep and as fast he can, the every one of his <<gpDick>> centimeters are inside you with every stroke.'
  1113. gs 'arousal', 'anal', 10
  1114. gs 'stat'
  1115. orgB += rand(20, 40)
  1116. if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
  1117. if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexAnal'
  1118. end
  1119. !sidefuck
  1120. elseif step = 3:
  1121. if subStep = 0:
  1122. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analsidefuck1.jpg"></center>'
  1123. ''
  1124. 'You lie on the bed, raising the upper leg in the air, exposing your lustful anus.'
  1125. 'He doesn''t wait for anything and lies behind you, instantly preparing his large dick for the entry.'
  1126. '<<$gp_name>> takes his rod, pointing the tip right to your anus.'
  1127. '<font color=#<<$gp_font>>>"<<$pcs_firstname>>, prepare for the penetration!"</font>'
  1128. ! normal/or-better mood OR likes Sveta
  1129. if gp_mood <= 3 or gp_rel > 80:
  1130. 'He takes some more lube on his fingers and one by one he sretches your anus with them. Making it easier for you to be penetrated later.'
  1131. 'He starts pushing his dick inside, and as it is lubed, it goes in quite easily.'
  1132. else
  1133. 'In a few moments he pushes his dick inside your ass as far as he can!'
  1134. '<font color=#<<$pcs_font>>>"Ouuuch! <<$gp_name>>, that hurt!"</font>'
  1135. '<font color=#<<$gp_font>>>"Shut up <<$pcs_firstname>> and take it like a good little girl!"</font>'
  1136. gs 'pain', 1, 'asshole', 'tear'
  1137. end
  1138. '<<$gp_name>> bangs you wildly right from the start.'
  1139. gs 'arousal', 'anal', 10, 'lube'
  1140. gs 'stat'
  1141. orgB += rand(5, 20)
  1142. act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
  1143. elseif subStep = 1:
  1144. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanal1.mp4"></video></center>'
  1145. ''
  1146. 'As he continuously and wildly rams your anus, you have no strength to do anything but endure it and moan like an injured pig.'
  1147. '<<$gp_name>> now rams you as deep and he can and giving the position and the entire (<<gpDick>> cm) size of his dick, the continuous banging hurts.'
  1148. gs 'pain', 1, 'anal', 'stretch'
  1149. gs 'arousal', 'anal', 10
  1150. gs 'stat'
  1151. orgB += rand(20, 40)
  1152. if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
  1153. if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexAnal'
  1154. end
  1155. !full nelson
  1156. elseif step = 4:
  1157. if gp_pornPos < 1:gp_pornPos = 1
  1158. if subStep = 0:
  1159. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analfullnelson1.jpg"></center>'
  1160. ''
  1161. 'You let him sit on the edge of the bed, having his dick prepared for your anus.'
  1162. 'Facing him with your back, you climb on top of him and slowly burry his <<gpDick>> cm long dick in your anus. You wanted to ride it a bit to make the fuck smoother, but he doesn''t let you:<font color=#<<$gp_font>>>"No time for that <<$pcs_firstname>>, let''s start already!"</font>'
  1163. 'Not waiting for your answer he grabs your legs and reaches for your head, immobilizing you entirely. Then he starts fucking you like a wild animal.'
  1164. 'In this position you literally see every stroke of his <<gpDick>> cm long penis into your pussy.. And there is nothing else you can do.'
  1165. 'In this position you literally see every stroke of his penis into your anus, hidden bellow your empty pussy.. But there is nothing else you can do.'
  1166. 'You feel like being continuously impaled.'
  1167. gs 'arousal', 'anal', 10, 'lube'
  1168. gs 'stat'
  1169. orgB += rand(20, 40)
  1170. act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
  1171. elseif subStep = 1:
  1172. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanal3.mp4"></video></center>'
  1173. ''
  1174. 'As he continuously and wildly rams your anus, you have no strength to do anything but endure it and moan like an injured pig.'
  1175. '<<$gp_name>> rams you as deep as he can.'
  1176. gs 'arousal', 'anal', 10
  1177. gs 'stat'
  1178. orgB += rand(30, 50)
  1179. if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
  1180. if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexAnal'
  1181. end
  1182. !pile driver
  1183. elseif step = 5:
  1184. if gp_pornPos < 2:gp_pornPos = 2
  1185. if subStep = 0:
  1186. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analpiledriver1.jpg"></center>'
  1187. ''
  1188. 'You take a pillow from his bed, putting on the floor and lying on it with your back.'
  1189. 'As if you were doing yoga, you put your ass in the hands and lift it above your head, letting the feet fall down aside your head.'
  1190. '<<$gp_name>> now has the very best access to your pussy: <font color=#<<$gp_font>>>"Now that''s a sight! Every girl should be fucked like that!"</font>'
  1191. 'He goes to you, probing your pussy with several of his fingers.'
  1192. ! normal/or-better mood OR likes Sveta
  1193. if gp_mood <= 3 or gp_rel > 80:
  1194. 'He takes some more lube on his fingers and one by one he sretches your anus with them. Making it easier for you to be penetrated later.'
  1195. 'He starts pushing his dick inside, and as it is lubed, it goes in quite easily.'
  1196. else
  1197. 'Without much care about your feelings he rams his <<gpDick>> cm long thick dick into your anus.'
  1198. '<font color=#<<$pcs_font>>>"Ouuuch! <<$gp_name>>, that hurt!"</font>'
  1199. '<font color=#<<$gp_font>>>"Shut up <<$pcs_firstname>> and take it like a good anal slut!"</font>'
  1200. gs 'pain', 1, 'asshole', 'tear'
  1201. end
  1202. 'You feel like being continuously impaled.'
  1203. gs 'arousal', 'anal', 10, 'lube'
  1204. gs 'stat'
  1205. orgB += rand(20, 40)
  1206. act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
  1207. elseif subStep = 1:
  1208. '<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analpiledriver2.mp4"></video></center>'
  1209. ''
  1210. 'As he continuously and wildly rams your anus, you have no strength to do anything but endure it and moan like an injured pig.'
  1211. '<<$gp_name>> rams you as deep as he can.'
  1212. gs 'arousal', 'anal', 10
  1213. gs 'stat'
  1214. orgB += rand(30, 50)
  1215. if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
  1216. if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexAnal'
  1217. end
  1218. !vacuum enlarged fuck
  1219. elseif step = 6:
  1220. if gp_vacuum < 1:gp_vacuum = 1
  1221. if subStep = 0:
  1222. minut += 5
  1223. gpDick_enlarged = gpDick + (gpDick * rand(20, 40) / 100)
  1224. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/gp/vacuumpumppenis.jpg"></center>'
  1225. ''
  1226. '<<$gp_name>> takes a vacuum dick enlarger device from his closet, putting it on his already <<ndDick>> cm long dick.'
  1227. 'As he is pushing the pump, you can see the cock getting larger with each push.'
  1228. 'After some time he stops, putting a ring on the root of his dick. Today the device has enlarged it to <<gpDick_enlarged>> cm!'
  1229. act 'Let him fuck you with that monster':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
  1230. elseif subStep = 1:
  1231. '<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/gp/analvacuumenlargerpen.mp4"></video></center>'
  1232. ''
  1233. '<font color=#<<$gp_font>>>"Now <<$pcs_firstname>> prepare your pussy for the famous Anus Destroyer!"</font>'
  1234. 'As he reaches for your ass you close eyes and brace for the expected pain.'
  1235. 'He starts pushing it into you, and even that it is quite lubed, it goes hard.'
  1236. 'Finally he slips through the sphincter and thrusts large part of his enlarged, <<gpDick_enlarged>> cm long and very thick dick into your ass.'
  1237. orgB += rand(20, 30)
  1238. gs 'pain', 1, 'asshole', 'tear'
  1239. act 'Endure it':subStep = 2 & gt 'pav_shared_gp', 'gpSexAnal'
  1240. elseif subStep = 2:
  1241. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanaldeep1.mp4"></video></center>'
  1242. ''
  1243. '<<$gp_name>> uses his newly gained centimeters and fucks your ass harder than usual, making you scream and moan and beg for relief.. in vain.'
  1244. 'Today he obviously enjoys his dominance and fucks you relentlessly.'
  1245. 'You have no strength to fight him and just try to endure it till the end.'
  1246. gs 'pain', 1, 'asshole', 'stretch'
  1247. orgB += rand(40, 60)
  1248. if orgB < 100:act 'Let him continue':subStep = 2 & gt 'pav_shared_gp', 'gpSexAnal'
  1249. if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexAnal'
  1250. end
  1251. !where to cum
  1252. elseif step = 10:
  1253. if subStep = 0:
  1254. minut += 2
  1255. '<<$gp_name>> is groaning loudly, you can say that he is reaching his orgasm.'
  1256. 'You decide to tell him:'
  1257. gp_served = 1
  1258. gp_anal += 1
  1259. act 'Cum inside me':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
  1260. cumOutL = rand(2, 6)
  1261. act 'Don''t cum inside me':subStep = cumOutL & gt 'pav_shared_gp', 'gpSexAnal'
  1262. !inside
  1263. elseif subStep = 1:
  1264. '<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumanal4.mp4"></video></center>'
  1265. ''
  1266. '<<$gp_name>> finally reaches his violent orgasm, pumping his load <<gpDick>> cm deep inside your anus.'
  1267. gp_analCumInside = 1
  1268. gp_lastCum = daystart
  1269. gp_cumAnal += gp_cumVol
  1270. gs 'cum_call', 'anus', $boy, 1, 0, gp_cumVol
  1271. gs 'arousal', 'anal', 2
  1272. gs 'arousal', 'end'
  1273. gs 'stat'
  1274. act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
  1275. !stomach
  1276. elseif subStep = 2:
  1277. '<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumbelly2.mp4"></video></center>'
  1278. ''
  1279. '<<$gp_name>> finally reaches his violent orgasm and in the moment he starts spouting his seed, he takes his dick out and points it on your stomach.'
  1280. 'A large pool of cum lands on your abdomen, feeling warm but sticky.'
  1281. minut += 2
  1282. gp_lastCum = daystart
  1283. gs 'cum_call', 'stomach', $boy, 1, 0, gp_cumVol
  1284. gs 'arousal', 'end'
  1285. gs 'stat'
  1286. act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
  1287. !ass
  1288. elseif subStep = 3:
  1289. '<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/cumonass.mp4"></video></center>'
  1290. ''
  1291. '<<$gp_name>> finally reaches his violent orgasm and in the moment he starts spouting his seed, he takes his dick out and points it on your ass.'
  1292. 'Both your asscheeks are covered in sticky, warm seed.'
  1293. minut += 2
  1294. gp_lastCum = daystart
  1295. gs 'cum_call', 'butt', $boy, 1, 0, gp_cumVol
  1296. gs 'arousal', 'end'
  1297. gs 'stat'
  1298. act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
  1299. !face
  1300. elseif subStep = 4:
  1301. '<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cumface1.mp4"></video></center>'
  1302. ''
  1303. '<<$gp_name>> finally reaches his violent orgasm and in the moment he starts spouting his seed, he pushes you on your knees and points his tip in front of your face.'
  1304. 'The seed starts squirting, splashing your face with surprisingly strong force, leaking to your nose and eyes and hair..'
  1305. '<font color=#<<$gp_font>>>"Oh yes, now that''s the right makeup for an anal whore like you!"</font>'
  1306. minut += 2
  1307. gp_lastCum = daystart
  1308. gs 'cum_call', 'face', $gp_name, 1, 0, gp_cumVol
  1309. gs 'arousal', 'end'
  1310. gs 'stat'
  1311. act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
  1312. !takeout fail
  1313. elseif subStep = 5:
  1314. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagcumtakoutfail.jpg"></center>'
  1315. ''
  1316. 'You expect <<$gp_name>> to take his cock out of your ass any moment, but instead you hear his groans becoming louder.'
  1317. '<font color=#<<$pcs_font>>>"What are you doing? You aren''t coming inside me, are you?"</font>'
  1318. '<font color=#<<$gp_font>>>"Shut up <<$pcs_firstname>>, I cum where I want to."</font>'
  1319. '<font color=#<<$pcs_font>>>"I told you not to! -I hate it when it slowly leaks out of my anus for hours!"</font>'
  1320. '<font color=#<<$gp_font>>>"Every girl deserves having her ass cumpumped, so piss off!"</font>'
  1321. 'He is obvously annoyed by your reaction.'
  1322. 'You furiously get up from the bed, putting your clothes between your legs to catch the remainder of the cum, so it doesn''t spur on your legs and carpet.'
  1323. gp_lastCum = daystart
  1324. gp_cumAnal += gp_cumVol
  1325. gp_analCumInside += 1
  1326. gp_analCumInsideUnwanted += 1
  1327. gp_rel -= 3
  1328. gs 'cum_call', '', $boy, 1, 0, gp_cumVol
  1329. gs 'arousal', 'anal', 5, 'sub'
  1330. gs 'arousal', 'end'
  1331. gs 'stat'
  1332. act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
  1333. !will you swallow?
  1334. elseif subStep = 6:
  1335. '<font color=#<<$gp_font>>>"I will cum in your ass or you will swallow it. Make your choice before it''s too late, <<$pcs_firstname>>!"</font>'
  1336. act 'Swallow':subStep = 20 & gt 'pav_shared_gp', 'gpSexAnal'
  1337. act 'Ass':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
  1338. if gp_mood <= 2:act 'Neither!':subStep = 30 & gt 'pav_shared_gp', 'gpSexAnal'
  1339. if gp_mood > 2:act 'Neither!':subStep = 5 & gt 'pav_shared_gp', 'gpSexAnal'
  1340. !swallow YES
  1341. elseif subStep = 20:
  1342. '<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecummouth3.mp4"></video></center>'
  1343. ''
  1344. '<<$gp_name>> finally reaches the end and in the moment he is about the come, you get on your knees and open your mouth for his delivery.'
  1345. 'The seed starts squirting, landing in your mouth and some even around it.'
  1346. '<<$gp_name>> spins the last of his cum dry from his cock, you close your mouth, swallowing the mouthful in one gulp.'
  1347. 'Afterwards you show him your tongue as a proof that not a drop was left unconsumed..'
  1348. '<font color=#<<$gp_font>>>"Good girl, better than any food, is it?"</font>'
  1349. gp_swall += 1
  1350. gp_rel += 1
  1351. minut += 5
  1352. gp_lastCum = daystart
  1353. gp_cumSwall += gp_cumVol
  1354. gs 'cum_call', 'mouth', $boy, 1, 0, gp_cumVol
  1355. gs 'arousal', 'end'
  1356. gs 'stat'
  1357. act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
  1358. !swallow NO
  1359. elseif subStep = 30:
  1360. '<font color=#<<$gp_font>>>"Allright I''ll cum elsewhere, but only because I have a <<$nd_mood>> mood today!"</font>'
  1361. gp_rel -= 3
  1362. cumOutL2 = rand(2, 4)
  1363. act 'Continue':subStep = cumOutL2 & gt 'pav_shared_gp', 'gpSexAnal'
  1364. end
  1365. end
  1366. end
  1367. --- pav_shared_gp ---------------------------------