1
0

pavShared_gp 70 KB

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