pornfilm.qsrc 84 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989
  1. # pornfilm
  2. menu_off = 1
  3. if $ARGS[0] = 'pornactor':
  4. if pfactor ! 50:
  5. num = pfactor
  6. :actorloop
  7. akrand = rand(1,10)
  8. if akrand = 1:
  9. $pakter[num] = 'Alexei'
  10. $pakterID[num] = 'A193'
  11. elseif akrand = 2:
  12. $pakter[num] = 'Seryozha'
  13. $pakterID[num] = 'A194'
  14. elseif akrand = 3:
  15. $pakter[num] = 'Egori'
  16. $pakterID[num] = 'A195'
  17. elseif akrand = 4:
  18. $pakter[num] = 'Ignat'
  19. $pakterID[num] = 'A196'
  20. elseif akrand = 5:
  21. $pakter[num] = 'Syoma'
  22. $pakterID[num] = 'A197'
  23. elseif akrand = 6:
  24. $pakter[num] = 'Vasya'
  25. $pakterID[num] = 'A198'
  26. elseif akrand = 7:
  27. $pakter[num] = 'Borya'
  28. $pakterID[num] = 'A199'
  29. elseif akrand = 8:
  30. $pakter[num] = 'Danek'
  31. $pakterID[num] = 'A200'
  32. elseif akrand = 9:
  33. $pakter[num] = 'Pepik'
  34. $pakterID[num] = 'A201'
  35. elseif akrand = 10:
  36. $pakter[num] = 'Alusha'
  37. $pakterID[num] = 'A202'
  38. end
  39. if num < pfactor:
  40. num2 = pfactor
  41. :actorloop2
  42. if $pakter[num] = $pakter[num2]:jump 'actorloop'
  43. num2 -= 1
  44. if num2 > num:jump 'actorloop2'
  45. end
  46. if aksex[akrand] = 0:aksex[akrand] = 1 & guy += 1
  47. num -= 1
  48. if num > 0:jump 'actorloop'
  49. end
  50. end
  51. if $ARGS[0] = 'pornactress':
  52. if pfactor ! 50:
  53. num = pfactor
  54. :actressloop
  55. akrand = rand(1,10)
  56. if akrand = 1:
  57. $paktress[num] = 'K'
  58. $pactressID[num] = 'A207'
  59. elseif akrand = 2:
  60. $paktress[num] = 'Elli'
  61. $pactressID[num] = 'A234'
  62. elseif akrand = 3:
  63. $paktress[num] = 'Juli'
  64. $pactressID[num] = 'A235'
  65. elseif akrand = 4:
  66. $paktress[num] = 'Tina'
  67. $pactressID[num] = 'A236'
  68. elseif akrand = 5:
  69. $paktress[num] = 'Alli'
  70. $pactressID[num] = 'A237'
  71. end
  72. if num < pfactor:
  73. num2 = pfactor
  74. :actressloop2
  75. if $paktress[num] = $paktress[num2]:jump 'actressloop'
  76. num2 -= 1
  77. if num2 > num:jump 'actressloop2'
  78. end
  79. if aksex[akrand] = 0:aksex[akrand] = 1 & girl += 1
  80. num -= 1
  81. if num > 0:jump 'actressloop'
  82. end
  83. end
  84. if $ARGS[0] = '1':
  85. if rand(0,1) = 0: pornhj += 1
  86. pornbukk += 1
  87. pfType = 0
  88. *clr & cla
  89. gs 'fame', 'city', 'porn', 10
  90. minut += 30
  91. gs 'stat'
  92. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  93. 'To the side stands the actor <<$pakter[1]>>, stroking his member.'
  94. act 'Undress and start':
  95. *clr & cla
  96. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/hj.mp4"></video></center>'
  97. '<<$pakter[1]>> sits on the bed. You kneel beside him, take his penis in your hand and begin to stroke it.'
  98. gs 'arousal', 'hj', 30, 'exhibitionism'
  99. gs 'stat'
  100. act 'Jerk him off':
  101. *clr & cla
  102. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/hjcumontits.mp4"></video></center>'
  103. '<<$pakter[1]>> begins to caress your tits as you continue to jerk his cock. Soon, his hot cum is squirting over your tits.'
  104. gs 'cum_call', 'breasts', $pakterID[1], 1
  105. gs 'arousal', 'hj', 5, 'exhibitionism'
  106. gs 'arousal', 'end'
  107. gs 'stat'
  108. act 'Take a shower': gt 'pornstudio', 'shower'
  109. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  110. end
  111. end
  112. end
  113. if $ARGS[0] = '2':
  114. if rand(0,2) = 0: pornhj += 1
  115. if rand(0,1) = 0: pornbj += 1
  116. pornswall += 1
  117. if rand(0,2) = 0: pornbukk += 1
  118. pfType = 0
  119. *clr & cla
  120. gs 'fame', 'city', 'porn', 12
  121. minut += 30
  122. gs 'stat'
  123. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  124. 'On the side stands the actor <<$pakter[1]>>, stroking his member.'
  125. act 'Undress and start':
  126. *clr & cla
  127. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/hj.mp4"></video></center>'
  128. '<<$pakter[1]>> sits on the bed. You kneel beside him, take his penis in your hand and begin to stroke it.'
  129. gs 'arousal', 'hj', 30, 'exhibitionism'
  130. gs 'stat'
  131. act 'Blow him':
  132. *clr & cla
  133. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/bj.mp4"></video></center>'
  134. 'His cock now rock hard, you take it into your mouth and begin sucking his tip.'
  135. gs 'arousal', 'bj', 5, 'exhibitionism'
  136. gs 'stat'
  137. act 'Keep sucking':
  138. *clr & cla
  139. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/deep.mp4"></video></center>'
  140. '<<$pakter[1]>> begins to fuck your mouth, driving his cock down your throat with every thrust.'
  141. 'Finally, he takes his cock out and you wipe the saliva from your mouth.'
  142. gs 'arousal', 'bj', 5, 'exhibitionism'
  143. gs 'stat'
  144. act 'Open your mouth':
  145. *clr & cla
  146. minut += 5
  147. facial += 1
  148. gs 'stat'
  149. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/cum.mp4"></video></center>'
  150. '<<$pakter[1]>> is close, so you start quickly jerking him and stick your tongue out for him to shoot his load.'
  151. cumnostd = 1
  152. gs 'cum_call', 'mouth', $pakterID[1], 1, 0, 0, 36
  153. gs 'cum_call', 'face', $pakterID[1], 1, 0, 0, 4
  154. act 'Clean his cock':
  155. *clr & cla
  156. minut += 5
  157. swallow += 1
  158. gs 'stat'
  159. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/bj2.mp4"></video></center>'
  160. 'You keep your eyes fixed on his, as you gently lick every last drop of sperm from his cock.'
  161. gs 'arousal', 'end'
  162. gs 'stat'
  163. act 'Take a shower': gt 'pornstudio', 'shower'
  164. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  165. end
  166. end
  167. end
  168. end
  169. end
  170. end
  171. if $ARGS[0] = '3':
  172. if rand(0,2) = 0: pornhj += 1
  173. if rand(0,2) = 0: pornbj += 1
  174. pornvag += 1
  175. pornswall += 1
  176. pfType = 0
  177. *clr & cla
  178. gs 'fame', 'city', 'porn', 16
  179. minut += 30
  180. gs 'stat'
  181. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  182. 'On the side stands the actor <<$pakter[1]>>, stroking his inviting member.'
  183. act 'Undress and start':
  184. *clr & cla
  185. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/hj.mp4"></video></center>'
  186. '<<$pakter[1]>> sits on the bed. You kneel beside him and take his penis in your hand. You begin to pleasure him.'
  187. gs 'arousal', 'hj', 30, 'exhibitionism'
  188. gs 'stat'
  189. act 'Blow him':
  190. *clr & cla
  191. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/bj.mp4"></video></center>'
  192. 'You take his shaft into your mouth and start passionately sucking his dick like it''s the most delicious lollipop.'
  193. gs 'arousal', 'bj', 5, 'exhibitionism'
  194. gs 'stat'
  195. act 'Suck more':
  196. *clr & cla
  197. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/deep.mp4"></video></center>'
  198. '<<$pakter[1]>> begins to fuck your mouth deeply, occasionally withdrawing completely to allow you to catch your breath, before returning more vigorously.'
  199. gs 'arousal', 'bj', 5, 'exhibitionism', 'deepthroat'
  200. gs 'stat'
  201. act 'Doggy style':
  202. *clr & cla
  203. pcs_vag += 1
  204. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/doggysex.mp4"></video></center>'
  205. 'You stand and get on all fours on the edge of the bed. <<$pakter[1]>> guides his dick deep into your pussy and begins to fuck you hard from behind.'
  206. !! Precum pregnancy check
  207. cumnostd = 1
  208. gs 'cum_call', 'precum', $pakterID[1], 1, 0, 10000, 1
  209. gs 'arousal', 'vaginal', 15, 'exhibitionism'
  210. gs 'stat'
  211. act 'Facial':
  212. *clr & cla
  213. minut += 5
  214. cumnostd = 1
  215. gs 'cum_call', 'mouth', $pakterID[1], 1, 0, 0, 36
  216. gs 'cum_call', 'face', $pakterID[1], 1, 0, 0, 4
  217. facial += 1
  218. gs 'stat'
  219. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/cum.mp4"></video></center>'
  220. '<<$pakter[1]>> pulls out of you and you quickly turn to face him. He shoots his load onto your tongue and face.'
  221. act 'Clean his cock':
  222. *clr & cla
  223. minut += 5
  224. swallow += 1
  225. gs 'stat'
  226. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/bj2.mp4"></video></center>'
  227. 'Looking into his eyes adoringly, you meticulously lick all the cum off his dick.'
  228. gs 'arousal', 'end'
  229. gs 'stat'
  230. act 'Take a shower': gt 'pornstudio', 'shower'
  231. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  232. end
  233. end
  234. end
  235. end
  236. end
  237. end
  238. end
  239. if $ARGS[0] = '4':
  240. if rand(0,2) = 0: pornhj += 1
  241. if rand(0,1) = 0: pornbj += 1
  242. if rand(0,1) = 0: pornvag += 1
  243. if rand(0,1) = 0: pornanal += 1
  244. if rand(0,1) = 0: pornbukk += 1
  245. if rand(0,1) = 0: pornswall += 1
  246. pfType = 0
  247. *clr & cla
  248. gs 'fame', 'city', 'porn', 20
  249. minut += 30
  250. gs 'stat'
  251. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  252. 'On the side stands the actor <<$pakter[1]>>, stroking his impressive member.'
  253. act 'Undress and start':
  254. *clr & cla
  255. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/hj.mp4"></video></center>'
  256. '<<$pakter[1]>> sits on the bed. You kneel beside him, place your hand on his penis and begin to stroke it.'
  257. gs 'arousal', 'hj', 30, 'exhibitionism'
  258. gs 'stat'
  259. act 'Blow him':
  260. *clr & cla
  261. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/bj.mp4"></video></center>'
  262. 'Admiring the impressive size of the cock before you, you wrap your lips around the shaft and start sucking it.'
  263. gs 'arousal', 'bj', 5, 'exhibitionism'
  264. gs 'stat'
  265. act 'Suck further':
  266. *clr & cla
  267. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/deep.mp4"></video></center>'
  268. '<<$pakter[1]>> relaxes as you take control, trying to take the full length of his cock down your throat.'
  269. gs 'arousal', 'bj', 5, 'exhibitionism', 'deepthroat'
  270. gs 'stat'
  271. act 'Ride him':
  272. *clr & cla
  273. pcs_vag += 1
  274. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/sex.mp4"></video></center>'
  275. 'You straddle <<$pakter[1]>> and guide his dick into your pussy. You begin to ride him hard.'
  276. 'Just as you''re really getting into it, <<$pakter[1]>> pulls his cock out of you and throws you on all fours. You feel him pressing against your anus.'
  277. !! Precum pregnancy check
  278. cumnostd = 1
  279. gs 'cum_call', 'precum', $pakterID[1], 1, 0, 10000, 1
  280. gs 'arousal', 'vaginal', 5, 'exhibitionism'
  281. gs 'stat'
  282. act 'Anal':
  283. *clr & cla
  284. pcs_ass += 1
  285. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/sex1.mp4"></video></center>'
  286. 'You try as best as you can to relax as <<$pakter[1]>> pushes into your ass and goes at it like a jackhammer.'
  287. gs 'arousal', 'anal', 5, 'exhibitionism'
  288. gs 'stat'
  289. act 'Kneel down and open your mouth':
  290. *clr & cla
  291. minut += 5
  292. facial += 1
  293. gs 'stat'
  294. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/cum.mp4"></video></center>'
  295. '<<$pakter[1]>> pulls out of your ass and you kneel before him. He brings his cock to your mouth and feeds you the contents of his balls.'
  296. cumnostd = 1
  297. gs 'cum_call', 'mouth', $pakterID[1], 1, 0, 0, 36
  298. gs 'cum_call', 'face', $pakterID[1], 1, 0, 0, 4
  299. act 'Clean his cock':
  300. *clr & cla
  301. minut += 5
  302. swallow += 1
  303. gs 'stat'
  304. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/bj2.mp4"></video></center>'
  305. 'You keep look deep into his eyes as you lick his cock clean.'
  306. gs 'arousal', 'end'
  307. gs 'stat'
  308. act 'Take a shower': gt 'pornstudio', 'shower'
  309. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  310. end
  311. end
  312. end
  313. end
  314. end
  315. end
  316. end
  317. end
  318. if $ARGS[0] = '5':
  319. if rand(0,2) = 0: pornhj += 1
  320. if rand(0,1) = 0: pornbj += 1
  321. if rand(0,1) = 0: pornvag += 1
  322. if rand(0,1) = 0: pornanal += 1
  323. if rand(0,1) = 0: pornbukk += 1
  324. if rand(0,1) = 0: pornswall += 1
  325. porngang += 1
  326. pfType = 0
  327. *clr & cla
  328. gs 'fame', 'city', 'porn', 25
  329. minut += 30
  330. gang += 1
  331. gs 'stat'
  332. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  333. 'Actors <<$pakter[1]>> and <<$pakter[2]>>, are watching porn on a monitor, getting their cocks ready for you...'
  334. act 'Undress and kneel':
  335. *clr & cla
  336. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/tbj.mp4"></video></center>'
  337. '<<$pakter[1]>> and <<$pakter[2]>> slap their fully erect cocks against your face.'
  338. gs 'arousal', 'bj', 10, 'exhibitionism', 'group'
  339. gs 'stat'
  340. act 'Suck them':
  341. *clr & cla
  342. pornbj += 1
  343. gs 'stat'
  344. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/tbj2.mp4"></video></center>'
  345. 'You start by sucking both members trying to please them both. Then, using your tongue, you draw circles under <<$pakter[1]>>s gland, making him moan.'
  346. 'Then you push your lips tightly against <<$pakter[2]>>''s head, until your mouth is forced open, the look in his eyes tells you he''s ready'
  347. gs 'arousal', 'bj', 15, 'exhibitionism'
  348. gs 'stat'
  349. act 'Fuck':
  350. *clr & cla
  351. pcs_vag += 1
  352. pornvag += 1
  353. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/three.mp4"></video></center>'
  354. 'You bend over and <<$pakter[1]>> slides his dick into your pussy while you suck <<$pakter[2]>>.'
  355. !! Precum pregnancy check
  356. cumnostd = 1
  357. gs 'cum_call', 'precum', $pakterID[1], 1, 0, 10000, 1
  358. gs 'arousal', 'bj', -15, 'exhibitionism'
  359. gs 'arousal', 'vaginal', 15, 'exhibitionism'
  360. gs 'stat'
  361. act 'Anal':
  362. *clr & cla
  363. pcs_ass += 1
  364. pornanal += 1
  365. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/threea.mp4"></video></center>'
  366. '<<$pakter[1]>> takes his cock out of your pussy, and plunges it into your ass. The extra tightness quickly overwelms him.'
  367. 'He shoots his load into your ass, all the while you keep sucking <<$pakter[2]>>.'
  368. cumnostd = 1
  369. gs 'cum_call', 'anus', $pakterID[1], 1, 0, 0, 40
  370. gs 'arousal', 'bj', -15, 'exhibitionism'
  371. gs 'arousal', 'anal', 15, 'exhibitionism'
  372. gs 'stat'
  373. act 'Facial':
  374. *clr & cla
  375. minut += 5
  376. facial += 1
  377. pornswall += 1
  378. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/tcum.mp4"></video></center>'
  379. 'You move around to clean up <<$pakter[1]>>, when <<$pakter[2]>> grabs your head and shoots his cum onto your face, saying the most depraved things as it slowly trickles down you.'
  380. cumnostd = 1
  381. gs 'cum_call', 'mouth', $pakterID[2], 1, 0, 0, 40
  382. gs 'arousal', 'end'
  383. gs 'stat'
  384. act 'Take a shower': gt 'pornstudio', 'shower'
  385. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  386. end
  387. end
  388. end
  389. end
  390. end
  391. end
  392. if $ARGS[0] = '6':
  393. pornbj += 1
  394. pornvag += 1
  395. pornanal += 1
  396. if rand(0,1) = 0: pornbukk += 1
  397. pornswall += 1
  398. porngang += 1
  399. pfType = 0
  400. *clr & cla
  401. gs 'fame', 'city', 'porn', 25
  402. minut += 30
  403. gang += 1
  404. gs 'stat'
  405. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  406. 'Actors <<$pakter[1]>> and <<$pakter[2]>>, are watching porn on a monitor, getting their cocks ready for you...'
  407. act 'Undress and start':
  408. *clr & cla
  409. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/tbj.mp4"></video></center>'
  410. '<<$pakter[1]>> and <<$pakter[2]>> slap their fully erect cocks against your face.'
  411. gs 'arousal', 'bj', 10, 'exhibitionism', 'group'
  412. gs 'stat'
  413. act 'Suck them':
  414. *clr & cla
  415. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/tbj2.mp4"></video></center>'
  416. 'You started to suck both members, trying to please them both.'
  417. gs 'arousal', 'bj', 15, 'exhibitionism', 'group'
  418. gs 'stat'
  419. act 'Fuck them':
  420. *clr & cla
  421. pcs_vag += 1
  422. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/three.mp4"></video></center>'
  423. 'You get on all fours and <<$pakter[1]>> fucks you from behind while you suck <<$pakter[2]>>.'
  424. !! Precum pregnancy check
  425. cumnostd = 1
  426. gs 'cum_call', 'precum', $pakterID[1], 1, 0, 10000, 1
  427. gs 'stat'
  428. gs 'arousal', 'bj', -15, 'exhibitionism', 'group'
  429. gs 'arousal', 'vaginal', 15, 'exhibitionism', 'group'
  430. gs 'stat'
  431. act 'Anal':
  432. *clr & cla
  433. pcs_ass += 1
  434. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/threea.mp4"></video></center>'
  435. '<<$pakter[1]>> switches it up and sticks his cock into your ass while you keep sucking <<$pakter[2]>>.'
  436. gs 'arousal', 'bj', -15, 'exhibitionism', 'group'
  437. gs 'arousal', 'anal', 15, 'exhibitionism', 'group'
  438. gs 'stat'
  439. act 'Double Penetration':
  440. *clr & cla
  441. pcs_ass += 1
  442. pcs_vag += 1
  443. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/three2.mp4"></video></center>'
  444. '<<$pakter[1]>> takes his dick out of your ass and lies down. Knowing <<$pakter[1]>> wants more, you straddle his cock.'
  445. 'You feel how his cock fills your pussy while <<$pakter[2]>> comes up from behind you and pushes his penis into your ass.'
  446. 'The guys find a rhythm and grind away at your holes, as you moan loudly.'
  447. gs 'arousal', 'anal', -15, 'exhibitionism', 'group'
  448. gs 'arousal', 'vaginal', 15, 'exhibitionism', 'group'
  449. gs 'stat'
  450. act 'Finish them':
  451. *clr & cla
  452. minut += 5
  453. facial += 1
  454. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/tcum.mp4"></video></center>'
  455. 'The guys tell you they''re close and both pull out. You grab the cock of <<$pakter[1]>> and begin to suck.'
  456. 'Suddenly your head gets turned around and <<$pakter[2]>> shoots his load on your face and in your mouth, <<$pakter[1]>> following him close behind.'
  457. cumnostd = 1
  458. gs 'cum_call', 'mouth', $pakterID[1], 1, 0, 0, 10
  459. gs 'cum_call', 'face', $pakterID[1], 1, 0, 0, 30
  460. cumnostd = 1
  461. gs 'cum_call', 'mouth', $pakterID[2], 1, 0, 0, 10
  462. gs 'cum_call', 'face', $pakterID[2], 1, 0, 0, 30
  463. gs 'arousal', 'end'
  464. gs 'stat'
  465. act 'Take a shower': gt 'pornstudio', 'shower'
  466. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  467. end
  468. end
  469. end
  470. end
  471. end
  472. end
  473. end
  474. if $ARGS[0] = '7':
  475. if rand(0,1) = 0: pornbj += 1
  476. pornvag += 1
  477. if rand(0,2) = 0: porngang += 1
  478. porncream += 1
  479. pfType = 1
  480. *clr & cla
  481. gs 'fame', 'city', 'porn', 20
  482. minut += 30
  483. $orgasm_or = 'no'
  484. gs 'stat'
  485. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  486. 'On the side stands the actor <<$pakter[1]>>, stroking his member.'
  487. act 'Undress and start':
  488. *clr & cla
  489. pornbj += 1
  490. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/bj.mp4"></video></center>'
  491. '<<$pakter[1]>> sits before a TV. You walk up to him while disrobing and kneel between his legs, taking his cock in your mouth and begin sucking the head of his penis.'
  492. gs 'arousal', 'bj', 30, 'exhibitionism'
  493. gs 'stat'
  494. act 'Keep sucking':
  495. *clr & cla
  496. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/deep.mp4"></video></center>'
  497. '<<$pakter[1]>> begins to fuck your mouth, driving his cock down your throat with every thrust.'
  498. 'Finally he takes his cock out and you wipe the saliva from your mouth.'
  499. gs 'arousal', 'bj', 15, 'exhibitionism'
  500. gs 'stat'
  501. act 'Lay down on the couch':
  502. *clr & cla
  503. gs 'stat'
  504. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/pronebone.mp4"></video></center>'
  505. '<<$pakter[1]>> grabs your hips, throws you on the couch and slides into your pussy. He begins to fuck you hard.'
  506. gs 'arousal', 'vaginal', 15, 'exhibitionism'
  507. gs 'stat'
  508. if orgasm_buildup => 200 - pcs_inhib:
  509. if orgasm_buildup < 300 - pcs_inhib: gs 'willpower', 'exhib', 'self', 'hard'
  510. if will_cost <= pcs_willpwr or orgasm_buildup => 300 - pcs_inhib:
  511. act iif(orgasm_buildup < 300 - pcs_inhib, 'Block out everything but the pleasure and let yourself orgasm (<<will_cost>> Willpower)', 'Orgasm'):
  512. cla
  513. if orgasm_buildup < 300 - pcs_inhib: gs 'willpower', 'pay', 'self'
  514. orgasmbonus += 10
  515. porngasm += 1
  516. cumnostd = 1
  517. gs 'cum_call', '', $pakterID[1], 1, 0, 10000, 40
  518. gs 'stat'
  519. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porncp<<rand(1,3)>>.mp4" width="400"></video></center>'
  520. 'You are really getting into it and soon reach your orgasm. Your convulsing pussy tightens around <<$pakter[1]>>, which sends him over the edge. You soon feel yourself being filled with a considerable amount of sperm.'
  521. 'He climbs off of you, but you stay on the couch while the cameraman comes forward to film your pussy as it slowly starts to leak the actor''s seed. After a few minutes the director nods his head, and you get up.'
  522. $orgasm_or = 'yes'
  523. gs 'arousal', 'vaginal', 5, 'exhibitionism'
  524. gs 'arousal', 'end'
  525. gs 'stat'
  526. act 'Take a shower': gt 'pornstudio', 'shower'
  527. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  528. end
  529. else
  530. act 'Block out everything but the pleasure and let yourself orgasm (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  531. end
  532. end
  533. if orgasm_buildup < 300 - pcs_inhib:
  534. act 'Fake orgasm':
  535. cla
  536. cumnostd = 1
  537. gs 'cum_call', '', $pakterID[1], 1, 0, 10000, 40
  538. gs 'stat'
  539. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porncp<<rand(1,3)>>.mp4" width="400"></video></center>'
  540. '<<$pakter[1]>> is pounding your pussy and you soon feel him cumming inside of you, so you fake a screaming orgasm for the film. You keep your eyes fixed on his as he pumps a huge amount of sperm into you.'
  541. 'He climbs off of you, but you stay on the couch while the cameraman comes forward to film your pussy as it slowly starts to leak the actor''s seed. After a few minutes the director nods his head, and you get up.'
  542. gs 'arousal', 'vaginal', 5, 'exhibitionism'
  543. gs 'arousal', 'end'
  544. gs 'stat'
  545. act 'Take a shower': gt 'pornstudio', 'shower'
  546. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  547. end
  548. end
  549. end
  550. end
  551. end
  552. end
  553. if $ARGS[0] = '8':
  554. if rand(0,2) = 0: pornbj += 1
  555. pornvag += 1
  556. pornanal += 1
  557. porngang += 1
  558. porncream += 1
  559. pfType = 1
  560. *clr & cla
  561. gs 'fame', 'city', 'porn', 25
  562. minut += 30
  563. gang += 1
  564. porngang += 1
  565. $orgasm_or = 'no'
  566. gs 'stat'
  567. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  568. 'Actors <<$pakter[1]>> and <<$pakter[2]>>, are watching porn on a monitor, getting their cocks ready for you...'
  569. act 'Undress and kneel':
  570. *clr & cla
  571. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/tbj.mp4"></video></center>'
  572. '<<$pakter[1]>> and <<$pakter[2]>> slap their fully erect cocks against your face.'
  573. gs 'arousal', 'bj', 10, 'exhibitionism', 'group'
  574. gs 'stat'
  575. act 'Suck them':
  576. *clr & cla
  577. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/tbj2.mp4"></video></center>'
  578. 'You start by sucking both members trying to please them both. Then, using your tongue, you draw circles under <<$pakter[1]>>''s gland, making him moan.'
  579. 'Then you push your lips tightly against <<$pakter[2]>>''s head, until your mouth is forced open, the look in his eyes tells you he''s ready'
  580. gs 'arousal', 'bj', 15, 'exhibitionism', 'group'
  581. gs 'stat'
  582. act 'Fuck them':
  583. *clr & cla
  584. pcs_vag += 1
  585. pcs_ass += 1
  586. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/threesomedp<<rand(1,5)>>.mp4" width="500"></video></center>'
  587. if rand(0,1) = 0:
  588. cumnostd = 1
  589. gs 'cum_call', '', $pakterID[1], 1, 0, 10000, 40
  590. gs 'cum_call', 'anus', $pakterID[2], 1, 0, 0, 40
  591. '<<$pakter[1]>> lays on the bed and you climb on top of him, sliding his cock into your pussy, then wait until <<$pakter[2]>> pushes into your ass. He soon starts to fuck you enthusiastically, making you ride <<$pakter[1]>>''s dick. This continues for a while, but soon the director signals to the guys that they should cum inside.'
  592. else
  593. cumnostd = 1
  594. gs 'cum_call', '', $pakterID[2], 1, 0, 10000, 40
  595. gs 'cum_call', 'anus', $pakterID[1], 1, 0, 0, 40
  596. '<<$pakter[2]>> lays on the bed and you climb on top of him, sliding his cock into your pussy, then wait until <<$pakter[1]>> pushes into your ass. He soon starts to fuck you enthusiastically, making you ride <<$pakter[2]>>''s dick. This continues for a while, but soon the director signals to the guys that they should cum inside.'
  597. end
  598. gs 'arousal', 'anal', -25, 'exhibitionism', 'group'
  599. gs 'arousal', 'vaginal', 25, 'exhibitionism', 'group'
  600. gs 'stat'
  601. 'The guys start to fuck you even faster as a reply, and pretty soon you feel them twitching inside of your body.'
  602. if orgasm_buildup => 200 - pcs_inhib:
  603. if orgasm_buildup < 300 - pcs_inhib: gs 'willpower', 'exhib', 'self', 'hard'
  604. if will_cost <= pcs_willpwr or orgasm_buildup => 300 - pcs_inhib:
  605. act iif(orgasm_buildup < 300 - pcs_inhib, 'Block out everything but the pleasure and let yourself orgasm (<<will_cost>> Willpower)', 'Orgasm'):
  606. cla
  607. if orgasm_buildup < 300 - pcs_inhib: gs 'willpower', 'pay', 'self'
  608. porngasm += 1
  609. orgasmbonus += 10
  610. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porgasm.mp4" width="400"></video></center>'
  611. 'You have a real orgasm while filming. You keep your eyes fixed on the guy below you as he pumps a huge amount of sperm in you. The guys finished, you lay down on the bed with your legs apart so the cameraman could take a few closeups of your pussy and ass as the actors seed is slowly leaking out of you. After a few minutes of this the director nods his head, and you get up.'
  612. $orgasm_or = 'yes'
  613. gs 'arousal', 'vaginal', 5, 'exhibitionism'
  614. gs 'arousal', 'end'
  615. gs 'stat'
  616. act 'Take a shower': gt 'pornstudio', 'shower'
  617. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  618. end
  619. else
  620. act 'Block out everything but the pleasure and let yourself orgasm (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  621. end
  622. end
  623. if orgasm_buildup < 300 - pcs_inhib:
  624. act 'Fake orgasm':
  625. cla
  626. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porgasmfake.mp4" width="400"></video></center>'
  627. 'You fake a screaming orgasm for the film. You keep your eyes fixed on the guy below you as he pumps a huge amount of sperm in you. The guys finished, you lay down on the bed with your legs apart so the cameraman could take a few closeups of your pussy and ass as the actors seed is slowly leaking out of you. After a few minutes of this the director nods his head, and you get up.'
  628. gs 'arousal', 'vaginal', 5, 'exhibitionism'
  629. gs 'arousal', 'end'
  630. gs 'stat'
  631. act 'Take a shower': gt 'pornstudio', 'shower'
  632. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  633. end
  634. end
  635. end
  636. end
  637. end
  638. end
  639. if $ARGS[0] = '9':
  640. if rand(0,2) = 0: pornbj += 1
  641. pornswall += 1
  642. pornvag += 1
  643. porngang += 1
  644. porncream += 1
  645. pfType = 1
  646. *clr & cla
  647. gs 'fame', 'city', 'porn', 25
  648. minut += 30
  649. gang += 1
  650. $orgasm_or = 'no'
  651. gs 'stat'
  652. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  653. 'Actors <<$pakter[1]>> and <<$pakter[2]>>, are watching porn on a monitor, getting their cocks ready for you...'
  654. act 'Undress and kneel':
  655. *clr & cla
  656. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/tbj.mp4"></video></center>'
  657. '<<$pakter[1]>> and <<$pakter[2]>> slap their fully erect cocks against your face.'
  658. gs 'arousal', 'bj', 10, 'exhibitionism', 'group'
  659. gs 'stat'
  660. act 'Suck them':
  661. *clr & cla
  662. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/tbj2.mp4"></video></center>'
  663. 'You start by sucking both members trying to please them both. Then, using your tongue, you draw circles under <<$pakter[1]>>''s gland, making him moan.'
  664. 'Then you sucking <<$pakter[2]>>''s dick while he grabs your hair for leverage and facefucks you. After a while the director gestures for you to get to the next scene, so he releases you, and looking at <<$pakter[1]>> he urges you to push your ass out.'
  665. gs 'arousal', 'bj', 15, 'exhibitionism', 'group', 'rough', 'deepthroat'
  666. gs 'stat'
  667. act 'Fuck them':
  668. *clr & cla
  669. pornvag += 1
  670. pornswall += 1
  671. '<center><video autoplay loop src="images/shared/sex/group/threesomepm<<rand(1,12)>>.mp4" width="500"></video></center>'
  672. if rand(0,1) = 0:
  673. !! Precum pregnancy check
  674. cumnostd = 1
  675. gs 'cum_call', 'precum', $pakterID[1], 1, 0, 10000, 1
  676. cumnostd = 1
  677. gs 'cum_call', '', $pakterID[1], 1, 0, 10000, 40
  678. cumnostd = 1
  679. gs 'cum_call', 'mouth', $pakterID[2], 1, 0, 0, 40
  680. 'You get in position before <<$pakter[2]>> and start to suck him, while <<$pakter[1]>> starts to fuck your pussy. He fucks you enthusiastically, making you swallow <<$pakter[2]>>''s dick. This continues for a while, but soon the director signals that the scene is good enough, and it is time for the finale.'
  681. else
  682. !! Precum pregnancy check
  683. cumnostd = 1
  684. gs 'cum_call', 'precum', $pakterID[2], 1, 0, 10000, 1
  685. cumnostd = 1
  686. gs 'cum_call', '', $pakterID[2], 1, 0, 10000, 40
  687. cumnostd = 1
  688. gs 'cum_call', 'anus', $pakterID[1], 1, 0, 0, 40
  689. 'You get in position before <<$pakter[1]>> and starts to suck him, while <<$pakter[2]>> starts to fuck your pussy. He fucks you enthusiastically, making you swallow <<$pakter[1]>>''s dick. This continues for a while, but soon the director signals that the scene is good enough, and it is time for the finale.'
  690. end
  691. gs 'arousal', 'bj', -25, 'exhibitionism', 'group'
  692. gs 'arousal', 'vaginal', 25, 'exhibitionism', 'group'
  693. gs 'stat'
  694. 'The guys immediately start to fuck you even faster, clearly trying to cum as soon as possible, while still coordinating with each other, and since they are professional, you soon feel them twitching inside you simultaneously, your pussy being filled as a load of sperm hits your throat.'
  695. if orgasm_buildup => 200 - pcs_inhib:
  696. if orgasm_buildup < 300 - pcs_inhib: gs 'willpower', 'exhib', 'self', 'hard'
  697. if will_cost <= pcs_willpwr or orgasm_buildup => 300 - pcs_inhib:
  698. act iif(orgasm_buildup < 300 - pcs_inhib, 'Block out everything but the pleasure and let yourself orgasm (<<will_cost>> Willpower)', 'Orgasm'):
  699. cla
  700. if orgasm_buildup < 300 - pcs_inhib: gs 'willpower', 'pay', 'self'
  701. orgasmbonus += 10
  702. porngasm += 1
  703. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porgasm.mp4" width="400"></video></center>'
  704. 'You have a real orgasm while filming, your moans muffled by the cock in your mouth. The guys finish and step away so the cameraman can film you swallowing the load in your mouth before getting a closeup of your leaking pussy.'
  705. $orgasm_or = 'yes'
  706. gs 'arousal', 'vaginal', 5, 'exhibitionism'
  707. gs 'arousal', 'end'
  708. gs 'stat'
  709. act 'Take a shower': gt 'pornstudio', 'shower'
  710. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  711. end
  712. else
  713. act 'Block out everything but the pleasure and let yourself orgasm (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  714. end
  715. end
  716. if orgasm_buildup < 300 - pcs_inhib:
  717. act 'Fake orgasm':
  718. cla
  719. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porgasmfake.mp4" width="400"></video></center>'
  720. 'You fake an orgasm for the film, your moans muffled by the cock in your mouth. The guys finish and step away so the cameraman can film you swallowing the load in your mouth before getting a closeup of your leaking pussy.'
  721. gs 'arousal', 'vaginal', 5, 'exhibitionism'
  722. gs 'arousal', 'end'
  723. gs 'stat'
  724. act 'Take a shower': gt 'pornstudio', 'shower'
  725. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  726. end
  727. end
  728. end
  729. end
  730. end
  731. end
  732. if $ARGS[0] = '10':
  733. if rand(0,1) = 0: pornbj += 1
  734. pornvag += 2
  735. porngang += 2
  736. if rand(0,1) = 0: pornhj += 1
  737. pornbukk += 2
  738. pfType = 1
  739. *clr & cla
  740. gs 'fame', 'city', 'porn', 30
  741. minut += 30
  742. gang += 1
  743. $orgasm_or = 'no'
  744. gs 'stat'
  745. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  746. 'Actors <<$pakter[1]>>, <<$pakter[2]>>, <<$pakter[3]>> and <<$pakter[4]>> are talking loudly, trying to decide the order they will fuck you, while watching porn on a monitor, getting their cocks ready for you...'
  747. act 'Warmup':
  748. *clr & cla
  749. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/warmupgang.mp4" width="500"></video></center>'
  750. 'The actors gather around you, and you soon suck one guy while giving a handjob to another. The two other guys get creative, one of them sucking your tits, while the other licks your pussy. The guys switch places once in a while, and soon the director indicates to change the scene.'
  751. gs 'arousal', 'bj', -20, 'exhibitionism', 'group'
  752. gs 'arousal', 'hj', 20, 'exhibitionism', 'group'
  753. gs 'stat'
  754. act 'Fuck them':
  755. *clr & cla
  756. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/gangp<<rand(1,4)>>.mp4" width="500"></video></center>'
  757. 'The guys start to fuck you, one after the other, but never cumming. All the while, you keep them rock hard by jerking and sucking them off.'
  758. !! Precum pregnancy check
  759. cumnostd = 1
  760. gs 'cum_call', 'precum', $pakterID[1], 1, 0, 10000, 1
  761. cumnostd = 1
  762. gs 'cum_call', 'precum', $pakterID[2], 1, 0, 10000, 1
  763. cumnostd = 1
  764. gs 'cum_call', 'precum', $pakterID[3], 1, 0, 10000, 1
  765. cumnostd = 1
  766. gs 'cum_call', 'precum', $pakterID[4], 1, 0, 10000, 1
  767. gs 'arousal', 'vaginal', 20, 'exhibitionism', 'group'
  768. gs 'stat'
  769. act 'Cream bath':
  770. killvar 'cuminside'
  771. *clr & cla
  772. 'The guys continue to fuck you, but this time with the purpose of cumming as quickly as possible.'
  773. if rand(0,5) > 0:
  774. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,4)>>.mp4" width="500"></video></center>'
  775. '<<$pakter[1]>> suddenly groans, pulling out in the last second coating your pussylips with his sperm.'
  776. gs 'cum_call', 'labia', $pakterID[1], 1, 0, 10000, 40
  777. else
  778. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/cumbathm<<rand(1,2)>>.mp4" width="500"></video><video autoplay loop src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,4)>>.mp4" width="500"></video></center>'
  779. '<<$pakter[1]>> suddenly groans, pulling his dick out of your pussy but messes up when his first shot of seed sprays straight into your open vagina, but he quickly corrects it, and the others coat your pussylips.'
  780. cumnostd = 1
  781. gs 'cum_call', '', $pakterID[1], 1, 0, 10000, 10
  782. gs 'cum_call', 'labia', $pakterID[1], 1, 0, 10000, 30
  783. cuminside = 1
  784. end
  785. if orgasm_buildup >= 200 - pcs_inhib:
  786. orgasmbonus += 10
  787. pornorg = 1
  788. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porgasm.mp4" width="400"></video></center>'
  789. 'You have a real orgasm while filming. You keep your eyes fixed on the guy as he coats your writhing body with his seed.'
  790. $orgasm_or = 'yes'
  791. gs 'stat'
  792. end
  793. gs 'arousal', 'vaginal', 5, 'exhibitionism', 'group'
  794. gs 'stat'
  795. 'When he is done, he is replaced by <<$pakter[2]>>, who also fucks you.'
  796. if rand(0,5) > 0:
  797. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,4)>>.mp4" width="500"></video></center>'
  798. '<<$pakter[2]>> suddenly groans, pulling out in the last second coating your breasts with his sperm.'
  799. gs 'cum_call', 'breasts', $pakterID[2], 1, 0, 10000, 40
  800. else
  801. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/cumbathm<<rand(1,2)>>.mp4" width="500"></video><video autoplay loop src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,4)>>.mp4" width="500"></video></center>'
  802. '<<$pakter[2]>> suddenly groans, pulling his dick out of your pussy but messes up when his first shot of seed sprays straight into your open vagina, but he quickly corrects it, and the others coat your breasts.'
  803. cumnostd = 1
  804. gs 'cum_call', '', $pakterID[2], 1, 0, 10000, 10
  805. gs 'cum_call', 'labia', $pakterID[2], 1, 0, 10000, 30
  806. cuminside = 1
  807. end
  808. if orgasm_buildup >= 200 - pcs_inhib:
  809. orgasmbonus += 10
  810. pornorg = 1
  811. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porgasm.mp4" width="400"></video></center>'
  812. 'You have a real orgasm while filming. You keep your eyes fixed on the guy as he coats your writhing body with his seed.'
  813. $orgasm_or = 'yes'
  814. gs 'stat'
  815. end
  816. gs 'arousal', 'vaginal', 5, 'exhibitionism', 'group'
  817. gs 'stat'
  818. 'When he is done, he is replaced by <<$pakter[3]>>, who also fucks you.'
  819. if rand(0,5) > 0:
  820. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,4)>>.mp4" width="500"></video></center>'
  821. '<<$pakter[3]>> suddenly groans, pulling out in the last second coating your face and hair with his sperm.'
  822. gs 'cum_call', 'hair', $pakterID[3], 1, 0, 10000, 20
  823. gs 'cum_call', 'face', $pakterID[3], 1, 0, 10000, 20
  824. else
  825. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/cumbathm<<rand(1,2)>>.mp4" width="500"></video><video autoplay loop src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,4)>>.mp4" width="500"></video></center>'
  826. '<<$pakter[3]>> suddenly groans, pulling his dick out of your pussy but messes up when his first shot of seed sprays straight into your open vagina, but he quickly corrects it, and the others coat your face and hair with his sperm.'
  827. cumnostd = 1
  828. gs 'cum_call', '', $pakterID[3], 1, 0, 10000, 10
  829. gs 'cum_call', 'hair', $pakterID[3], 1, 0, 10000, 15
  830. gs 'cum_call', 'face', $pakterID[3], 1, 0, 10000, 15
  831. cuminside = 1
  832. end
  833. if orgasm_buildup >= 200 - pcs_inhib:
  834. orgasmbonus += 10
  835. pornorg = 1
  836. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porgasm.mp4" width="400"></video></center>'
  837. 'You have a real orgasm while filming. You keep your eyes fixed on the guy as he coats your writhing body with his seed.'
  838. $orgasm_or = 'yes'
  839. end
  840. gs 'arousal', 'vaginal', 5, 'exhibitionism', 'group'
  841. gs 'stat'
  842. 'When he is done, he is replaced by <<$pakter[4]>>, who also fucks you.'
  843. if rand(0,5) > 0:
  844. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,4)>>.mp4" width="500"></video></center>'
  845. '<<$pakter[4]>> suddenly groans, pulling out in the last second coating your belly with his sperm.'
  846. gs 'cum_call', 'stomach', $pakterID[4], 1, 0, 10000, 40
  847. else
  848. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/cumbathm<<rand(1,2)>>.mp4" width="500"></video><video autoplay loop src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,4)>>.mp4" width="500"></video></center>'
  849. '<<$pakter[4]>> suddenly groans, pulling his dick out of your pussy but messes up when his first shot of seed sprays straight into your open vagina, but he quickly corrects it, and the others coat your belly with his sperm.'
  850. cumnostd = 1
  851. gs 'cum_call', '', $pakterID[4], 1, 0, 10000, 10
  852. gs 'cum_call', 'stomach', $pakterID[4], 1, 0, 10000, 30
  853. cuminside = 1
  854. end
  855. if orgasm_buildup >= 200 - pcs_inhib:
  856. orgasmbonus += 10
  857. pornorg = 1
  858. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porgasm.mp4" width="400"></video></center>'
  859. 'You have a real orgasm while filming. You keep your eyes fixed on the guy as he coats your writhing body with his seed.'
  860. $orgasm_or = 'yes'
  861. end
  862. gs 'arousal', 'vaginal', 5, 'exhibitionism', 'group'
  863. if cuminside = 1: porncream += 1 & killvar 'cuminside'
  864. if pornorg = 1: porngasm += 1 & killvar 'pornorg'
  865. gs 'stat'
  866. gs 'arousal', 'end'
  867. gs 'stat'
  868. act 'Take a shower': gt 'pornstudio', 'shower'
  869. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  870. end
  871. end
  872. end
  873. end
  874. if $ARGS[0] = '11':
  875. if rand(0,1) = 0:pornbj += 1
  876. if rand(0,1) = 0:pornhj += 1
  877. pornvag += 2
  878. porngang += 2
  879. porncream += 2
  880. pfType = 1
  881. *clr & cla
  882. gs 'fame', 'city', 'porn', 30
  883. minut += 30
  884. gang += 1
  885. $orgasm_or = 'no'
  886. gs 'stat'
  887. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  888. 'Actors <<$pakter[1]>>, <<$pakter[2]>>, <<$pakter[3]>> and <<$pakter[4]>> are talking loudly, trying to decide the order they will fuck you, while watching porn on a monitor, getting their cocks ready for you...'
  889. act 'Warmup':
  890. *clr & cla
  891. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/warmupgang.mp4" width="500"></video></center>'
  892. 'The actors gather around you, and you soon suck one guy while giving a handjob to another. The two other guys get creative, one of them sucking your tits, while the other licks your pussy. The guys switch places once in a while, and soon the director indicates to change the scene.'
  893. gs 'arousal', 'hj', -20, 'exhibitionism', 'group'
  894. gs 'arousal', 'cuni', 20, 'exhibitionism', 'group'
  895. gs 'stat'
  896. act 'Fuck them':
  897. *clr & cla
  898. '<center><video autoplay loop src="images/shared/sex/group/threesomepm<<rand(1,12)>>.mp4" width="500"></video></center>'
  899. 'The guys start to fuck you, one after the other, but never cumming. All the while you keep them rock hard by jerking and sucking them off.'
  900. gs 'arousal', 'hj', -20, 'exhibitionism', 'group'
  901. gs 'arousal', 'bj', -20, 'exhibitionism', 'group'
  902. gs 'arousal', 'vaginal', 20, 'exhibitionism', 'group'
  903. gs 'stat'
  904. act 'Creampies':
  905. *clr & cla
  906. minut += 5
  907. porncream += 1
  908. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porncp<<rand(1,4)>>.mp4" width="500"></video></center>'
  909. cumnostd = 1
  910. gs 'cum_call', '', $pakterID[1], 1, 0, 10000, 40
  911. cumnostd = 1
  912. gs 'cum_call', '', $pakterID[2], 1, 0, 10000, 40
  913. cumnostd = 1
  914. gs 'cum_call', '', $pakterID[3], 1, 0, 10000, 40
  915. cumnostd = 1
  916. gs 'cum_call', '', $pakterID[4], 1, 0, 10000, 40
  917. gs 'arousal', 'vaginal', 15, 'exhibitionism', 'group'
  918. if orgasm_buildup => 200 - pcs_inhib:
  919. if orgasm_buildup < 300 - pcs_inhib: gs 'willpower', 'exhib', 'self', 'hard'
  920. if will_cost <= pcs_willpwr or orgasm_buildup => 300 - pcs_inhib:
  921. act iif(orgasm_buildup < 300 - pcs_inhib, 'Block out everything but the pleasure and let yourself orgasm (<<will_cost>> Willpower)', 'Orgasm'):
  922. *clr & cla
  923. if orgasm_buildup < 300 - pcs_inhib: gs 'willpower', 'pay', 'self'
  924. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porncp4some.mp4" width="400"></video></center>'
  925. 'You spread your legs and smile at the guys, inviting them to cum in you and in moments, your pussy is being filled. The loads from the first two guys start to leak from you as the last guy fucks you. '
  926. 'Since you are already on edge, this pushes you over and you cum around his dick, milking it even more. The director seems extremely pleased with this, as the cameraman captures it all from about a meter distance. As soon as the guys are finished, the camera comes for a close up as you spread your lips and a stream of cum runs from your pussy.'
  927. orgasmbonus += 10
  928. porngasm += 1
  929. $orgasm_or = 'yes'
  930. gs 'arousal', 'vaginal', 5, 'exhibitionism', 'group'
  931. gs 'arousal', 'end'
  932. gs 'stat'
  933. act 'Finish':
  934. *clr & cla
  935. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/pornwalk.mp4" height="200">'
  936. 'The scene ends with you putting on your dress, and stepping out the door, with the four guy''s loads still dripping from your pussy.'
  937. act 'Take a shower': gt 'pornstudio', 'shower'
  938. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  939. end
  940. end
  941. else
  942. act 'Block out everything but the pleasure and let yourself orgasm (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  943. end
  944. end
  945. if orgasm_buildup < 300 - pcs_inhib:
  946. act 'Fake orgasm':
  947. *clr & cla
  948. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porncp4some.mp4" width="400"></video></center>'
  949. 'You spread your legs and smile at the guys, inviting them to cum in you and in moments, your pussy is being filled. The loads from the first two guys start to leak from you as the last guy fucks you.
  950. As soon as the guys are finished, the camera comes for a close up as you spread your lips and a stream of cum runs from your pussy.'
  951. gs 'arousal', 'end'
  952. gs 'stat'
  953. act 'Finish':
  954. *clr & cla
  955. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/pornwalk.mp4" height="200">'
  956. 'The scene ends with you putting on your dress, and stepping out the door, with the four guy''s loads still dripping from your pussy.'
  957. act 'Take a shower': gt 'pornstudio', 'shower'
  958. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  959. end
  960. end
  961. end
  962. end
  963. end
  964. end
  965. end
  966. if $ARGS[0] = '12':
  967. if rand(0,1) = 0: pornbj += 1
  968. if rand(0,1) = 0: pornhj += 1
  969. pornanal += 2
  970. porngang += 2
  971. porncream += 2
  972. pfType = 0
  973. *clr & cla
  974. gs 'fame', 'city', 'porn', 30
  975. minut += 30
  976. gang += 1
  977. $orgasm_or = 'no'
  978. gs 'stat'
  979. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  980. 'Actors <<$pakter[1]>>, <<$pakter[2]>>, <<$pakter[3]>> and <<$pakter[4]>> are talking loudly, trying to decide the order they will fuck you, while watching porn on a monitor, getting their cocks ready for you...'
  981. act 'Warmup':
  982. *clr & cla
  983. gs 'stat'
  984. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/warmupgang.mp4" width="500"></video></center>'
  985. 'The actors gather around you, and you soon suck one guy while giving a handjob to another. The two other guys get creative, one of them sucking your tits, while the other licks your pussy. The guys switch places once in a while, and soon the director indicates to change the scene.'
  986. gs 'arousal', 'hj', -20, 'exhibitionism', 'group'
  987. gs 'arousal', 'cuni', 20, 'exhibitionism', 'group'
  988. gs 'stat'
  989. act 'Fuck them':
  990. *clr & cla
  991. gs 'stat'
  992. '<center><video autoplay loop src="images/shared/sex/group/threesomepm<<rand(0,5)>>.mp4" width="500"></video></center>'
  993. 'The guys start to fuck your ass, one after the other, but never cumming. All the while you keep them rock hard by jerking and sucking them off.'
  994. gs 'arousal', 'hj', -20, 'exhibitionism', 'group'
  995. gs 'arousal', 'bj', -20, 'exhibitionism', 'group'
  996. gs 'arousal', 'anal', 20, 'exhibitionism', 'group'
  997. gs 'stat'
  998. act 'Anal creampies':
  999. *clr & cla
  1000. minut += 5
  1001. cumnostd = 1
  1002. gs 'cum_call', 'anus', $pakterID[1], 1, 0, 10000, 40
  1003. cumnostd = 1
  1004. gs 'cum_call', 'anus', $pakterID[2], 1, 0, 10000, 40
  1005. cumnostd = 1
  1006. gs 'cum_call', 'anus', $pakterID[3], 1, 0, 10000, 40
  1007. cumnostd = 1
  1008. gs 'cum_call', 'anus', $pakterID[4], 1, 0, 10000, 40
  1009. '<center><video autoplay loop src="/images/shared/sex/cum/analcreampie/cumanal<<rand(1,2)>>.mp4" width="500"></video></center>'
  1010. gs 'arousal', 'anal', 5, 'exhibitionism', 'group'
  1011. if orgasm_buildup => 200 - pcs_inhib:
  1012. if orgasm_buildup < 300 - pcs_inhib: gs 'willpower', 'exhib', 'self', 'hard'
  1013. if will_cost <= pcs_willpwr or orgasm_buildup => 300 - pcs_inhib:
  1014. act iif(orgasm_buildup < 300 - pcs_inhib, 'Block out everything but the pleasure and let yourself orgasm (<<will_cost>> Willpower)', 'Orgasm'):
  1015. *clr & cla
  1016. if orgasm_buildup < 300 - pcs_inhib: gs 'willpower', 'pay', 'self'
  1017. 'You lower your head on the pillows while pushing your ass in the air, giving the guys easy access. One of them immediately starts to fuck your ass, then stops, and pushing his dick in deep, he pumps his considerable amount of sperm into your bowels.'
  1018. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/anal4some.mp4" width="400"></video></center>'
  1019. 'Since you are already on edge, this pushes you over and you came around his dick, milking it even more. The director seems extremely pleased with this, as the cameraman captured it all from about a meter distance. As soon as he steps aside, another guy replaces him, then the third and fourth guys also cum in your ass.'
  1020. orgasmbonus += 10
  1021. porngasm += 1
  1022. $orgasm_or = 'yes'
  1023. gs 'arousal', 'anal', 5, 'exhibitionism', 'group'
  1024. gs 'arousal', 'end'
  1025. gs 'stat'
  1026. act 'Finish':
  1027. *clr & cla
  1028. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/pornwalk.mp4" height="200">'
  1029. 'The scene ends with you putting on your dress, and stepping out the door, with the four guy''s load still inside you.'
  1030. act 'Take a shower': gt 'pornstudio', 'shower'
  1031. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1032. end
  1033. end
  1034. else
  1035. act 'Block out everything but the pleasure and let yourself orgasm (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  1036. end
  1037. end
  1038. if orgasm_buildup < 300 - pcs_inhib:
  1039. act 'Fake orgasm':
  1040. *clr & cla
  1041. 'You lower your head on the pillows while pushing your ass in the air, giving the guys easy access. One of them immediately starts to fuck your ass, then stops, and pushing his dick in deep he pumps his considerable amount of sperm in your colon. As soon as he steps aside, another guy replaces him, then the third and fourth guys also cum in your ass.'
  1042. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/anal4some.mp4" width="400"></video></center>'
  1043. gs 'arousal', 'anal', 5, 'exhibitionism', 'group'
  1044. gs 'arousal', 'end'
  1045. gs 'stat'
  1046. act 'Finish':
  1047. *clr & cla
  1048. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/pornwalk.mp4" height="200">'
  1049. 'The scene ends with you putting on your dress, and stepping out the door, with the four guy''s load still inside you.'
  1050. act 'Take a shower': gt 'pornstudio', 'shower'
  1051. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1052. end
  1053. end
  1054. end
  1055. end
  1056. end
  1057. end
  1058. end
  1059. if $ARGS[0] = '13':
  1060. if rand(0,1) = 0:pornbj += 1
  1061. if rand(0,1) = 0:pornhj += 1
  1062. pornvag += 1
  1063. pornanal += 1
  1064. porngang += 2
  1065. porncream += 2
  1066. pfType = 1
  1067. *clr & cla
  1068. gs 'fame', 'city', 'porn', 30
  1069. minut += 30
  1070. gang += 1
  1071. $orgasm_or = 'no'
  1072. gs 'stat'
  1073. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  1074. 'Actors <<$pakter[1]>>, <<$pakter[2]>>, <<$pakter[3]>> and <<$pakter[4]>> are talking loudly, trying to decide the order they will fuck you, while watching porn on a monitor, getting their cocks ready for you...'
  1075. act 'Kneel in front of them':
  1076. *clr & cla
  1077. gs 'stat'
  1078. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/warmupgang.mp4" width="500"></video></center>'
  1079. 'You kneel in front of the guys and start to suck <<$paktor[1]>> and <<$paktor[2]>> in turns, while giving a handjob to <<$paktor[3]>> and <<$paktor[4]>>. Pretty soon they are all hard and ready, and the director nods to you.'
  1080. gs 'arousal', 'hj', -20, 'exhibitionism', 'group'
  1081. gs 'arousal', 'bj', 20, 'exhibitionism', 'group'
  1082. gs 'stat'
  1083. act 'Let them fuck you':
  1084. *clr & cla
  1085. cumnostd = 1
  1086. gs 'cum_call', '', $pakterID[1], 1, 0, 10000, 40
  1087. cumnostd = 1
  1088. gs 'cum_call', '', $pakterID[2], 1, 0, 10000, 40
  1089. gs 'arousal', 'vaginal', 25, 'exhibitionism', 'group'
  1090. '<center><video autoplay loop src="images/shared/sex/group/doublevag<<rand(1,4)>>.mp4" width="500"></video></center>'
  1091. if orgasm_buildup < 200 - pcs_inhib:
  1092. '<<$paktor[1]>> lies down on the floor, and you slide down onto his dick, moaning as it stretches your pussy. <<$paktor[2]>> steps behind you and pushes his dick inside of your already occupied vagina, and the two guys start to fuck you in tandem. When the director signals, the two guys starts to fuck you more forcefully, and thanks to their timing, they came inside you at the same time.'
  1093. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porgasm.mp4" width="400"></video></center>'
  1094. 'You fake an orgasm for the camera while you wait for them to unload inside you.'
  1095. gs 'arousal', 'vaginal', 5, 'exhibitionism', 'group'
  1096. gs 'stat'
  1097. else
  1098. orgasmbonus += 10
  1099. porngasm += 1
  1100. '<<$paktor[1]>> lies down on the floor, and you slide down onto his dick, moaning as it stretches your pussy. <<$paktor[2]>> steps behind you and pushes his dick inside of your already occupied vagina, and the two guys start to fuck you in tandem. When the director signals, the two guys starts to fuck you more forcefully, and thanks to their timing, they came inside you at the same time.'
  1101. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porgasm.mp4" width="400"></video></center>'
  1102. 'You also cum, crying out in pleasure as your pussy contracts around them while they unload inside you.'
  1103. $orgasm_or = 'yes'
  1104. gs 'arousal', 'vaginal', 5, 'exhibitionism', 'group'
  1105. gs 'stat'
  1106. end
  1107. $orgasm_or = 'no'
  1108. gs 'stat'
  1109. act 'They fuck your ass':
  1110. *clr & cla
  1111. cumnostd = 1
  1112. gs 'cum_call', 'anus', $pakterID[3], 1, 0, 10000, 40
  1113. cumnostd = 1
  1114. gs 'cum_call', 'anus', $pakterID[4], 1, 0, 10000, 40
  1115. gs 'arousal', 'anal', 25, 'exhibitionism', 'group'
  1116. gs 'stat'
  1117. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/doublean<<rand(1,4)>>.mp4" width="500"></video></center>'
  1118. if orgasm_buildup => 200 - pcs_inhib:
  1119. if orgasm_buildup < 300 - pcs_inhib: gs 'willpower', 'exhib', 'self', 'hard'
  1120. if will_cost <= pcs_willpwr or orgasm_buildup => 300 - pcs_inhib:
  1121. act iif(orgasm_buildup < 300 - pcs_inhib, 'Block out everything but the pleasure and let yourself orgasm (<<will_cost>> Willpower)', 'Orgasm'):
  1122. cla
  1123. if orgasm_buildup < 300 - pcs_inhib: gs 'willpower', 'pay', 'self'
  1124. orgasmbonus += 10
  1125. porngasm += 1
  1126. 'The first drops of sperm leak from your pussy as <<$paktor[3]>> and <<$paktor[4]>> switch places with <<$paktor[1]>> and <<$paktor[2]>>. You give them both a quick blowjob before <<$paktor[3]>> lies on the floor and pulls you on top of him, sliding his cock into your ass. <<$paktor[4]>> moves in behind and inserts his dick into your already stretched ass. Despite the increased tightness, the guys quickly find a rhythm and you soon feel their warm sperm deep in your ass.'
  1127. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porgasm.mp4" width="400"></video></center>'
  1128. 'The pleasure from your ass being double fucked means you also cum, visibly orgasming on camera alongside the guys.'
  1129. $orgasm_or = 'yes'
  1130. gs 'arousal', 'anal', 5, 'exhibitionism', 'group'
  1131. gs 'arousal', 'end'
  1132. gs 'stat'
  1133. act 'Take a shower': gt 'pornstudio', 'shower'
  1134. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1135. end
  1136. else
  1137. act 'Block out everything but the pleasure and let yourself orgasm (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  1138. end
  1139. gs 'pornfilm', '13a'
  1140. else
  1141. gs 'pornfilm', '13a'
  1142. end
  1143. end
  1144. end
  1145. end
  1146. end
  1147. if $ARGS[0] = '13a':
  1148. act 'Fake orgasm':
  1149. *clr & cla
  1150. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porgasm.mp4" width="400"></video></center>'
  1151. 'The first drops of sperm leak from your pussy as <<$paktor[3]>> and <<$paktor[4]>> switch places with <<$paktor[1]>> and <<$paktor[2]>>. You give them both a quick blowjob before <<$paktor[3]>> lies on the floor and pulls you on top of him, sliding his cock into your ass. <<$paktor[4]>> moves in behind and inserts his dick into your already stretched ass. Despite the increased tightness, the guys quickly find a rhythm and you soon feel their warm sperm deep in your ass.'
  1152. 'You fake an orgasm for the camera while you wait for them to finish.'
  1153. gs 'arousal', 'anal', 5, 'exhibitionism', 'group'
  1154. gs 'arousal', 'end'
  1155. gs 'stat'
  1156. act 'Take a shower': gt 'pornstudio', 'shower'
  1157. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1158. end
  1159. end
  1160. if $ARGS[0] = '14':
  1161. porngang += 5
  1162. pornexhib += 5
  1163. pfType = 1
  1164. *clr & cla
  1165. gs 'fame', 'city', 'porn', 40
  1166. gang += 1
  1167. guy += 50
  1168. $orgasm_or = 'no'
  1169. gs 'stat'
  1170. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  1171. 'On the scene there are fifty guys standing around, and you believe this many actors would cost a fortune. Luckily for the studio, these guys are all your fans and they came for just for the chance to fuck you. They are all nervously talking, and watching your previous works on monitors all around the huge hall.'
  1172. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/touching.mp4" width="500"></video></center>'
  1173. 'You lie down on the stage, and let them touch you to get them into the mood.'
  1174. gs 'arousal', 'foreplay', 60, 'gangbang', 'exhibitionism'
  1175. gs 'stat'
  1176. act 'Undress and lie on the bed':
  1177. *clr & cla
  1178. bj50 = rand(0,8)
  1179. hj50 = rand(0,8)
  1180. lip50 = rand(0,8)
  1181. anal50 = rand(0,8)
  1182. bukk50 = rand(0,8)
  1183. sex50 = 50 - bj50 - hj50 - lip50 - anal50 - bukk50
  1184. stat['vaginal'] += 50-anal50
  1185. if bj50 > 5:pornbj += 1
  1186. if hj50 > 5:
  1187. pornhj += 1 & pornbukk += 1
  1188. elseif hj50 > 5:
  1189. pornhj += 1
  1190. end
  1191. if lip50 > 5:pornbj += 1 & pornswall += 1
  1192. if anal50 > 5:pornanal += 1
  1193. if bukk50 > 5:pornbukk += 1
  1194. if sex50 > 45:
  1195. pornvag += 5
  1196. porncream += 5
  1197. elseif sex50 > 35:
  1198. pornvag += 4
  1199. porncream += 4
  1200. elseif sex50 > 25:
  1201. pornvag += 3
  1202. porncream += 3
  1203. elseif sex50 > 15:
  1204. pornvag += 2
  1205. porncream += 2
  1206. elseif sex50 > 5:
  1207. pornvag += 1
  1208. porncream += 1
  1209. end
  1210. sexpartkno = 0
  1211. pfcounter = 0
  1212. :gbblow
  1213. if bj50 > 0:
  1214. gs 'npcgeneratec', 0, 'Porn Fan', rand(22,38)
  1215. !! Precum pregnancy check
  1216. cumnostd = 1
  1217. gs 'cum_call', 'precum', 'Porn Fan', 0, 0, 10000, 1
  1218. cumnostd = 1
  1219. gs 'cum_call', 'mouth', 'Porn Fan', 0, 0, 10000, 40
  1220. bj50 -= 1
  1221. stat['bj'] += 1
  1222. swallow += 1
  1223. end
  1224. if bj50 > 0: jump 'gbblow'
  1225. :gbhand
  1226. if hj50 > 0:
  1227. gs 'npcgeneratec', 0, 'Porn Fan', rand(22,38)
  1228. !! Precum pregnancy check
  1229. cumnostd = 1
  1230. gs 'cum_call', 'precum', 'Porn Fan', 0, 0, 10000, 1
  1231. gs 'cum_call', 'hands', 'Porn Fan', 0, 0, 10000, 40
  1232. hj50 -= 1
  1233. stat['hj'] += 1
  1234. end
  1235. if hj50 > 0: jump 'gbhand'
  1236. :gbface
  1237. if lip50 > 0:
  1238. gs 'npcgeneratec', 0, 'Porn Fan', rand(22,38)
  1239. !! Precum pregnancy check
  1240. cumnostd = 1
  1241. gs 'cum_call', 'precum', 'Porn Fan', 0, 0, 10000, 1
  1242. if rand(0,1)=0:
  1243. gs 'cum_call', 'face', 'Porn Fan', 0, 0, 10000, 40
  1244. else
  1245. gs 'cum_call', 'hair', 'Porn Fan', 0, 0, 10000, 40
  1246. end
  1247. lip50 -= 1
  1248. facial += 1
  1249. end
  1250. if lip50 > 0: jump 'gbface'
  1251. :gbass
  1252. if anal50 > 0:
  1253. gs 'npcgeneratec', 0, 'Porn Fan', rand(22,38)
  1254. !! Precum pregnancy check
  1255. cumnostd = 1
  1256. gs 'cum_call', 'precum', 'Porn Fan', 0, 0, 10000, 1
  1257. cumnostd = 1
  1258. gs 'cum_call', 'anus', 'Porn Fan', 0, 0, 10000, 40
  1259. anal50 -= 1
  1260. stat['anal'] += 1
  1261. end
  1262. if anal50 > 0: jump 'gbass'
  1263. :gbbukk
  1264. if bukk50 > 0:
  1265. gs 'npcgeneratec', 0, 'Porn Fan', rand(22,38)
  1266. !! Precum pregnancy check
  1267. cumnostd = 1
  1268. gs 'cum_call', 'precum', 'Porn Fan', 0, 0, 10000, 1
  1269. bukkloc = rand(0,6)
  1270. if bukkloc = 0:
  1271. gs 'cum_call', 'labia', 'Porn Fan', 0, 0, 10000, 40
  1272. elseif bukkloc = 1:
  1273. gs 'cum_call', 'butt', 'Porn Fan', 0, 0, 10000, 40
  1274. elseif bukkloc = 2:
  1275. gs 'cum_call', 'back', 'Porn Fan', 0, 0, 10000, 40
  1276. elseif bukkloc = 3:
  1277. gs 'cum_call', 'legs', 'Porn Fan', 0, 0, 10000, 40
  1278. elseif bukkloc = 4:
  1279. gs 'cum_call', 'arms', 'Porn Fan', 0, 0, 10000, 40
  1280. elseif bukkloc = 5:
  1281. gs 'cum_call', 'stomach', 'Porn Fan', 0, 0, 10000, 40
  1282. else
  1283. gs 'cum_call', 'breasts', 'Porn Fan', 0, 0, 10000, 40
  1284. end
  1285. bukk50 -= 1
  1286. end
  1287. if bukk50 > 0: jump 'gbbukk'
  1288. :gbsex
  1289. if sex50 > 0:
  1290. gs 'npcgeneratec', 0, 'Porn Fan', rand(22,38)
  1291. gs 'boyStat', $npclastgenerated
  1292. pfcounter += 1
  1293. cumnostd = 1
  1294. gs 'cum_call', '', 'Porn Fan', 0, 0, 10000, 40
  1295. sex50 -= 1
  1296. end
  1297. if sex50 > 0: jump 'gbsex'
  1298. gangOrg = 0
  1299. !if pcs_horny > 70 and pcs_inhib > 80:gangOrg = rand(1,5) & orgazm += gangOrg & pcs_horny = rand(0,50)
  1300. !if gangOrg = 1:
  1301. ! $gangorg = ' and you still managed to have an orgasm.'
  1302. ! $orgasm_or = 'yes'
  1303. !elseif gangOrg > 0:
  1304. ! $gangorg = ' and you still managed to orgasm <<gangOrg>> times.'
  1305. ! $orgasm_or = 'yes'
  1306. !else
  1307. ! $gangorg = '.'
  1308. !end
  1309. !orgasmbonus += gangOrg*10
  1310. !porngasm += gangOrg
  1311. gs 'stat'
  1312. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/fuckfifty<<rand(0,5)>>.mp4" width="500"></video></center>'
  1313. 'Your fans gather around you, and start to fuck you with great entusiasm, but little technique. Most of them cum almost immediately, but since they are dozens of them, it doesn''t hurt the shoot, even heightens the quality<<$gangorg>> It still takes about six hours of constant fucking to finish with all of the guys.'
  1314. ! Going to try to simulate orgasms and count them along the way. Had to adjust the arousal calls to not result in constant orgasming. Sicaa
  1315. :gangbang_orgasm_loop
  1316. gangbang_loop_counter += 1
  1317. ! 5 rounds of 72min to get the same 5 max possible orgasms as before
  1318. minut += 72
  1319. gs 'arousal', 'vaginal', -10, 'gangbang', 'exhibitionism'
  1320. $orgasm_or = 'no'
  1321. ! Made Sveta''s inhibitions the deciding factor for orgasming in a gangbang
  1322. ! After testing this came out roughly as: 25 = 0-2, 50 = 1-3, 75 = 2-4, 100 = 3-5
  1323. if orgasm_buildup >= 400 - (3*pcs_inhib):
  1324. gangOrg += 1
  1325. $orgasm_txt = ''
  1326. $orgasm_or = 'custom'
  1327. end
  1328. if gangbang_loop_counter < 5: jump 'gangbang_orgasm_loop'
  1329. killvar 'gangbang_loop_counter'
  1330. killvar '$orgasm_or'
  1331. if gangOrg > 0: 'During the shoot you managed to ' + iif(gangOrg = 1, 'have one orgasm.', 'orgasm <<gangOrg>> times.')
  1332. orgasmbonus += gangOrg*10
  1333. porngasm += gangOrg
  1334. !gs 'arousal', 'vaginal', 360, 'gangbang', 'exhibitionism'
  1335. gs 'arousal', 'end'
  1336. gs 'stat'
  1337. act 'Take a shower': gt 'pornstudio', 'shower'
  1338. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1339. end
  1340. end
  1341. if $ARGS[0] = '15':
  1342. if rand(0,1) = 0:pornbj += 1
  1343. pornanal += 1
  1344. if rand(0,2) = 0:porngang += 1
  1345. porncream += 1
  1346. pfType = 1
  1347. *clr & cla
  1348. city_porn += 20
  1349. minut += 30
  1350. gs 'stat'
  1351. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  1352. 'To the side stands the actor <<$pakter[1]>>, stroking his member.'
  1353. act 'Undress and start':
  1354. *clr & cla
  1355. pornbj += 1
  1356. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/bj.mp4"></video></center>'
  1357. '<<$pakter[1]>> sits before a TV. You walk up to him while disrobing and kneel between his legs, taking his cock in your mouth and begin sucking the head of his penis.'
  1358. gs 'arousal', 'bj', 30, 'exhibitionism'
  1359. gs 'stat'
  1360. act 'Keep sucking':
  1361. *clr & cla
  1362. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/deep.mp4"></video></center>'
  1363. '<<$pakter[1]>> begins to fuck your mouth, driving his cock down your throat with every thrust.'
  1364. 'Finally he takes his cock out. You wipe the saliva from your mouth.'
  1365. gs 'arousal', 'bj', 15, 'exhibitionism'
  1366. gs 'stat'
  1367. act 'Penetration':
  1368. *clr & cla
  1369. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/analinsert.mp4"></video></center>'
  1370. '<<$pakter[1]>> positions himself as you turn and grind his cock between your ass cheeks, your saliva coating your asshole. <<$pakter[1]>> guides his cock to your now wet hole and slides it inside.'
  1371. gs 'arousal', 'anal', 15, 'exhibitionism'
  1372. gs 'stat'
  1373. act 'Anal':
  1374. *clr & cla
  1375. pcs_ass += 1
  1376. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/sex2.mp4"></video></center>'
  1377. '<<$pakter[1]>> enjoys the tightness as he begins to fuck your ass hard, occasionally pulling out to show the camera your stretched hole.'
  1378. gs 'arousal', 'anal', 15, 'exhibitionism'
  1379. gs 'stat'
  1380. if orgasm_buildup => 200 - pcs_inhib:
  1381. if orgasm_buildup < 300 - pcs_inhib:gs 'willpower', 'exhib', 'self', 'hard'
  1382. if will_cost <= pcs_willpwr or orgasm_buildup => 300 - pcs_inhib:
  1383. act iif(orgasm_buildup < 300 - pcs_inhib, 'Block out everything but the pleasure and let yourself orgasm (<<will_cost>> Willpower)', 'Orgasm'):
  1384. gs 'willpower', 'pay', 'self'
  1385. *clr & cla
  1386. sexpartkno = 1
  1387. orgasmbonus += 10
  1388. porngasm += 1
  1389. cumnostd = 1
  1390. gs 'cum_call', 'anus', $pakterID[1], 1, 0, 10000, 40
  1391. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porncpanal.mp4" width="400"></video></center>'
  1392. 'You are really getting into it and reach your orgasm. Your ass tightens around <<$pakter[1]>>, which sends him over the edge. You feel your bowels being flooded with warm cum.'
  1393. '<<$pakter[1]>> pulls out of your ass and you show your gaping hole to the camera as it leaks his load.'
  1394. $orgasm_or = 'yes'
  1395. gs 'arousal', 'anal', 5, 'exhibitionism'
  1396. gs 'arousal', 'end'
  1397. gs 'stat'
  1398. act 'Take a shower': gt 'pornstudio', 'shower'
  1399. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1400. end
  1401. else
  1402. act 'Block out everything but the pleasure and let yourself orgasm (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  1403. end
  1404. gs 'pornfilm', '15a'
  1405. else
  1406. gs 'pornfilm', '15a'
  1407. end
  1408. end
  1409. end
  1410. end
  1411. end
  1412. end
  1413. if $ARGS[0] = '15a':
  1414. act 'Fake orgasm':
  1415. *clr & cla
  1416. sexpartkno = 1
  1417. cumnostd = 1
  1418. gs 'cum_call', 'anus', $pakterID[1], 1, 0, 10000, 40
  1419. 'You feel <<$pakter[1]>> starting to twitch inside you, so you squeeze your asshole tightly around his dick as you fake an orgasm. You soon feel <<$pakter[1]>> unload in your ass.'
  1420. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porncpanal.mp4" width="400"></video></center>'
  1421. '<<$pakter[1]>> pulls out of your ass and you show your gaping hole to the camera as it leaks his load.'
  1422. gs 'arousal', 'anal', 5, 'exhibitionism'
  1423. gs 'arousal', 'end'
  1424. gs 'stat'
  1425. act 'Take a shower': gt 'pornstudio', 'shower'
  1426. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1427. end
  1428. end
  1429. if $ARGS[0] = '16':
  1430. if rand(0,2)=0:pornhj += 1
  1431. if rand(0,2)=0:pornbj += 1
  1432. pornanal += 1
  1433. pornbukk += 1
  1434. pfType = 0
  1435. *clr & cla
  1436. city_porn += 16
  1437. minut += 30
  1438. gs 'stat'
  1439. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  1440. 'To the side stands the actor <<$pakter[1]>>, stroking his inviting member.'
  1441. act 'Undress and start':
  1442. *clr & cla
  1443. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/hj.mp4"></video></center>'
  1444. '<<$pakter[1]>> lies on the bed. You lie down beside him and take his penis in your hand. You begin to pleasure him.'
  1445. gs 'arousal', 'hj', 30, 'exhibitionism'
  1446. gs 'stat'
  1447. act 'Blow him':
  1448. *clr & cla
  1449. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/bj.mp4"></video></center>'
  1450. '<<$pakter[1]>> sits on the edge of the bed. You kneel down between his legs, and passionately suck the head of his penis like it''s the most delicious lollipop.'
  1451. gs 'arousal', 'bj', 5, 'exhibitionism'
  1452. gs 'stat'
  1453. act 'Rimjob':
  1454. *clr & cla
  1455. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/rimming.mp4"></video></center>'
  1456. 'You lay on the bed and spread your ass as <<$pakter[1]>> begins to rim you, expertly flicking his tongue over your hole.'
  1457. gs 'arousal', 'rimming', 5, 'exhibitionism'
  1458. gs 'stat'
  1459. act 'Anal':
  1460. *clr & cla
  1461. pcs_anal += 1
  1462. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/sexanal.mp4"></video></center>'
  1463. 'Your asshole now wet and ready, <<$pakter[1]>> fingers your hole before standing and inserting his dick inside. He begins to fuck you hard, occasionally pulling out to show your gaping hole to the camera.'
  1464. gs 'arousal', 'anal', 15, 'exhibitionism'
  1465. gs 'stat'
  1466. act 'Climax':
  1467. *clr & cla
  1468. minut += 5
  1469. cumnostd = 1
  1470. gs 'cum_call', 'butt', $pakterID[1], 1, 0, 10000, 40
  1471. gs 'stat'
  1472. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/cumanal.mp4"></video></center>'
  1473. 'Just as he is about to cum, <<$pakter[1]>> pulls out and shoots his load over your ass.'
  1474. act 'Clean his cock':
  1475. *clr & cla
  1476. minut += 5
  1477. swallow += 1
  1478. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/bj2.mp4"></video></center>'
  1479. 'You quickly slide off the bed and take his cock down your throat before licking his shaft clean.'
  1480. gs 'arousal', 'end'
  1481. gs 'stat'
  1482. act 'Take a shower': gt 'pornstudio', 'shower'
  1483. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1484. end
  1485. end
  1486. end
  1487. end
  1488. end
  1489. end
  1490. end
  1491. if $ARGS[0] = '17':
  1492. porntrib += 1
  1493. porncuni += 1
  1494. pornlesbo += 1
  1495. pfType = 0
  1496. *clr & cla
  1497. city_porn += 16
  1498. minut += 30
  1499. gs 'stat'
  1500. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  1501. 'To the side sits the actress <<$paktress[1]>>, fondling her breasts while watching porn on a monitor.'
  1502. act 'Start':
  1503. *clr & cla
  1504. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/lesbo0.mp4"></video></center>'
  1505. 'The scene starts with you playing with <<$paktress[1]>>''s ass. You give her a firm slap on the rear and tease the camera by slowly pulling her panties halfway down before pulling them up again. You then quickly pull them down again, this time to her ankles. She gives the camera a view of her pussy and asshole before you push her onto the bed in front of you.'
  1506. gs 'arousal', 'foreplay_give', 5, 'exhibitionism'
  1507. gs 'stat'
  1508. act 'Eat her pussy':
  1509. *clr & cla
  1510. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/lesbo1.mp4"></video></center>'
  1511. 'You kneel before <<$paktress[1]>>, lifting her panties from her ankles and spreading her legs. You slowly trace lines along her labia with your tongue before running it between her lips and reaching her clit. You then quickly start flicking her clit, your tongue swirling over it as it begins to swell.'
  1512. gs 'arousal', 'cuni_give', 15, 'exhibitionism'
  1513. gs 'stat'
  1514. act 'Your turn':
  1515. *clr & cla
  1516. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/lesbo2.mp4"></video></center>'
  1517. 'After pleasing her for a while, you withdraw your tongue from her crotch as she quickly pulls you down onto your back. She lifts your legs and practically rips your panties off, tossing them aside. She wastes no time and buries her face right into your pussy, teasing your engorged clit as she vigorously eats you out, her tongue lapping up the juices that run from your pussy.'
  1518. gs 'arousal', 'cuni', 15, 'exhibitionism'
  1519. gs 'stat'
  1520. act 'Tribadism':
  1521. *clr & cla
  1522. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/lesbo3.mp4"></video></center>'
  1523. 'Satisfied with pleasing you with her tongue, <<$paktress[1]>> straddles you and holds your leg to one side as she brings her pussy down to meet your own. You let out a pleasured moan as your clits make contact. She then begins rocking her hips back and forth and you both enjoy the sensation as your wet labia makes it easy for her to slide herself across you.'
  1524. gs 'arousal', 'tribbing', 15, 'exhibitionism'
  1525. gs 'stat'
  1526. act 'Double dildo':
  1527. *clr & cla
  1528. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/lesbo4.mp4"></video></center>'
  1529. '<<$paktress[1]>> stops her movements and reaches over to grab a sizeable doubled headed dildo. She sucks on one end and slides it into your pussy. The toy buried firmly in your hole, she slides herself down onto the other end. She then starts to ride the dildo, her movements pushing it deeper into your pussy.'
  1530. gs 'arousal', 'vaginal_dildo', 15, 'exhibitionism'
  1531. gs 'stat'
  1532. act 'Finish':
  1533. *clr & cla
  1534. minut += 5
  1535. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porgasm.mp4"></video></center>'
  1536. '<<$paktress[1]>> reaches her climax as she slams down on the dildo, sending it deep into her pussy. Her body is overwhelmed in pleasure as her juices run down the shaft of the dildo and onto your pussy. She withdraws the dildo from her pussy and pulls it out of you. You both suck the ends of it clean.'
  1537. gs 'arousal', 'end'
  1538. gs 'stat'
  1539. act 'Take a shower': gt 'pornstudio', 'shower'
  1540. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1541. end
  1542. end
  1543. end
  1544. end
  1545. end
  1546. end
  1547. end
  1548. if $ARGS[0] = '18':
  1549. porncuni += 1
  1550. pornlesbo += 1
  1551. pfType = 0
  1552. *clr & cla
  1553. city_porn += 16
  1554. minut += 30
  1555. gs 'stat'
  1556. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  1557. '<<$paktress[1]>> is sitting to the side, fondling her breasts while watching porn on a monitor.'
  1558. act 'Start':
  1559. *clr & cla
  1560. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/lesbo0.mp4"></video></center>'
  1561. 'The scene starts with you playing with <<$paktress[1]>>''s ass. You give her a firm slap on the rear and tease the camera by slowly pulling her panties halfway down before pulling them up again. You then quickly pull them down, this time to her ankles. She gives the camera a view of her pussy and asshole before you push her onto the bed in front of you.'
  1562. gs 'arousal', 'foreplay_give', 5, 'exhibitionism'
  1563. gs 'stat'
  1564. act 'Eat her pussy':
  1565. *clr & cla
  1566. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/lesbo1.mp4"></video></center>'
  1567. 'You kneel before <<$paktress[1]>>, lifting her panties from her ankles and spreading her legs. You slowly trace lines along her labia with your tongue before running it between her lips and reaching her clit. You then quickly start flicking her clit, your tongue swirling over it as it begins to swell.'
  1568. gs 'arousal', 'cuni_give', 15, 'exhibitionism'
  1569. gs 'stat'
  1570. act 'Your turn':
  1571. *clr & cla
  1572. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/lesbo2.mp4"></video></center>'
  1573. 'After pleasing her for a while, you withdraw your tongue from her crotch as she quickly pulls you down onto your back. She lifts your legs and practically rips your panties off, tossing them aside. She wastes no time and buries her face right into your pussy, teasing your engorged clit as she vigorously eats you out, her tongue lapping up the juices that run from your pussy.'
  1574. gs 'arousal', 'cuni', 15, 'exhibitionism'
  1575. gs 'stat'
  1576. act 'Get fucked':
  1577. *clr & cla
  1578. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/lesbo5.mp4"></video></center>'
  1579. 'You are lying on the bed as <<$paktress[1]>> moves off to the side and slips on a strapon dildo. She moves over to you as you slide down, take the plastic cock in your mouth and give her a fake BJ. She pushes you down onto the bed and climbs on top of you. She slides inside your pussy and begins to fuck you hard.'
  1580. gs 'arousal', 'vaginal_strap', 15, 'exhibitionism'
  1581. gs 'stat'
  1582. act 'Her turn':
  1583. *clr & cla
  1584. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/lesbo6.mp4"></video></center>'
  1585. 'After the vigorous pounding, <<$paktress[1]>> pulls out, slides the strapon off and gets on all fours as you stand and strap yourself in. She is on her knees before you begging you to fuck her ass and you are eager to comply. The plastic cock is coated in your juices and this makes it easy to push yourself into her awaiting hole. You begin to fuck her ass as she begs you to go harder.'
  1586. gs 'arousal', 'anal_strap_give', 15, 'exhibitionism'
  1587. gs 'stat'
  1588. act 'Finish':
  1589. *clr & cla
  1590. minut += 5
  1591. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/lesbo7.mp4"></video></center>'
  1592. 'The relentless ass fucking you give <<$paktress[1]>> is enough to bring her to orgasm. Her juices spray from her twitching pussy as her ass tightens around your fake cock. You pull out of her and the camera comes in for a shot of her stretched hole. The scene ends with you locking tongues with <<$paktress[1]>> '
  1593. gs 'arousal', 'end'
  1594. gs 'stat'
  1595. act 'Take a shower': gt 'pornstudio', 'shower'
  1596. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1597. end
  1598. end
  1599. end
  1600. end
  1601. end
  1602. end
  1603. end
  1604. if $ARGS[0] = '19':
  1605. pornbj += 1
  1606. pornvag += 1
  1607. pornanal += 1
  1608. pornswall += 1
  1609. porngang += 1
  1610. pfType = 0
  1611. *clr & cla
  1612. gs 'fame', 'city', 'porn', 25
  1613. minut += 30
  1614. gang += 1
  1615. gs 'stat'
  1616. 'The set is already bustling with assistants setting up lighting, so that there aren''t any shadows.'
  1617. '<<$pakter[1]>> is watching porn on a monitor, getting himself ready while <<$paktress[1]>> is having her make up touched up.'
  1618. act 'Undress and start':
  1619. *clr & cla
  1620. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/mff0.mp4"></video></center>'
  1621. 'The camera starts rolling and comes for a close up of you and <<$paktress[1]>>. As it does, she grabs your ass and gives it a jiggle for the camera. <<$pakter[1]>> moves into the scene and you both kneel before him.'
  1622. act 'Suck':
  1623. *clr & cla
  1624. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/mff1.mp4"></video></center>'
  1625. 'You take <<$pakter[1]>>''s cock into your mouth and begin sucking on his tip as <<$paktress[1]>> runs her tongue along his shaft. You then take him deeper into your throat as <<$paktress[1]>> playfully sucks on his balls.'
  1626. gs 'arousal', 'bj', 15, 'exhibitionism', 'group'
  1627. gs 'stat'
  1628. act 'Fuck':
  1629. *clr & cla
  1630. pcs_vag += 1
  1631. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/mff2.mp4"></video></center>'
  1632. '<<$paktress[1]>> remains on her knees as you move up and guide <<$patker[1]>>''s cock into your pussy. You start riding him as <<$paktress[1]>> buries her face in your pussy and quickly starts flicking her tongue over your clit, waves of pleasure overwhelming you.'
  1633. !! Precum pregnancy check
  1634. cumnostd = 1
  1635. gs 'cum_call', 'precum', $pakterID[1], 1, 0, 10000, 1
  1636. gs 'arousal', 'bj', 15, 'exhibitionism', 'group'
  1637. gs 'arousal', 'vaginal', 15, 'exhibitionism', 'group'
  1638. gs 'arousal', 'cuni', 15, 'exhibitionism', 'group'
  1639. gs 'stat'
  1640. act 'Anal':
  1641. *clr & cla
  1642. pcs_ass += 1
  1643. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/mff3.mp4"></video></center>'
  1644. '<<$paktress[1]>> gets up from the floor and lies down on the bed. You straddle her, your pussy sitting before her face. <<$pakter[1]>> moves in behind and slowly pushes his cock into your ass. <<$paktress[1]>> playfully licks your swollen clit as he starts fucking your ass hard.'
  1645. gs 'arousal', 'cuni', 15, 'exhibitionism', 'group'
  1646. gs 'arousal', 'anal', 15, 'exhibitionism', 'group'
  1647. gs 'stat'
  1648. act 'Creampie':
  1649. *clr & cla
  1650. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/mff4.mp4"></video></center>'
  1651. 'You eventually feel <<$pakter[1]>> starting to twitch and feel a sudden warmth flood your ass. He pulls out and a stream of cum soon follows, running down your pussy and into <<$paktress[1]>>''s awaiting mouth.'
  1652. cumnostd = 1
  1653. gs 'cum_call', 'anus', $pakterID[1], 1, 0, 10000, 20
  1654. gs 'arousal', 'anal', 15, 'exhibitionism', 'group'
  1655. gs 'arousal', 'cuni', 15, 'exhibitionism', 'group'
  1656. gs 'stat'
  1657. act 'Cum sharing':
  1658. *clr & cla
  1659. minut += 5
  1660. pornswall += 1
  1661. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/mff5.mp4"></video></center>'
  1662. 'You quickly climb off <<$paktress[1]>> and kneel before her as she opens her mouth and <<$pakter[1]>>''s load drools from her tongue and into your mouth. You show the camera your cum filled mouth before swallowing the cum and finishing the scene making out with <<$paktress[1]>>'
  1663. cumnostd = 1
  1664. gs 'cum_call', 'mouth', $pakterID[1], 1, 0, 10000, 20
  1665. act 'Take a shower': gt 'pornstudio', 'shower'
  1666. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1667. end
  1668. end
  1669. end
  1670. end
  1671. end
  1672. end
  1673. end
  1674. if $ARGS[0] = '20':
  1675. pornbj += 1
  1676. pornswall += 1
  1677. porngang += 1
  1678. pfType = 0
  1679. *clr & cla
  1680. gs 'fame', 'city', 'porn', 25
  1681. minut += 30
  1682. gang += 1
  1683. gs 'stat'
  1684. 'The set is already bustling with assistants setting up lighting, so that there are any shadows.'
  1685. '<<$pakter[1]>> is watching porn on a monitor, getting himself ready while <<$paktress[1]>> is having her make up touched up.'
  1686. act 'Undress and start':
  1687. *clr & cla
  1688. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/mff0.mp4"></video></center>'
  1689. 'The camera starts rolling and comes for a close up of you and <<$paktress[1]>>. As it does, you grab her ass and give it a jiggle for the camera. <<$pakter[1]>> moves into the scene and you both kneel before him.'
  1690. act 'Suck':
  1691. *clr & cla
  1692. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/mff1.mp4"></video></center>'
  1693. '<<$paktress[1]>> wastes no time and takes <<$pakter[1]>>''s cock right down her throat as you get down low and suck his balls.'
  1694. gs 'arousal', 'bj', 15, 'exhibitionism', 'group'
  1695. gs 'stat'
  1696. act 'Fuck':
  1697. *clr & cla
  1698. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/mff2.mp4"></video></center>'
  1699. 'You remain on your knees as <<$paktress[1]>> straddles <<$pakter[1]>>, slides down onto his cock and starts riding him. You take your place and bury your face into her pussy, running your tongue over her clit as she takes <<$pakter[1]>> deep inside her. She shrieks in pleasure and you''re sure that she orgasms at least once.'
  1700. gs 'arousal', 'cuni_give', 15, 'exhibitionism', 'group'
  1701. gs 'stat'
  1702. act 'Anal':
  1703. *clr & cla
  1704. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/mff3.mp4"></video></center>'
  1705. 'You lie down on the bed, <<$paktress[1]>> straddling you, her glistening pussy begging for you to please it. <<$pakter[1]>> moves in behind and inserts himself into her ass and starts to pound her, <<$paktress[1]>> begging him to go harder. You start flicking your tongue over <<$paktress[1]>>''s now massively engorged clit.'
  1706. gs 'arousal', 'cuni_give', 15, 'exhibitionism', 'group'
  1707. gs 'stat'
  1708. act 'Creampie':
  1709. *clr & cla
  1710. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/mff4.mp4"></video></center>'
  1711. 'You pull your face out of <<$paktress[1]>>''s crotch in time to see <<$pakter[1]>>''s balls twitching as he unloads inside her ass. At the same time, you see her pussy convulsing and she screams in pleasure as they reach orgasm together. You open your mouth as he pulls out of her, and a stream of cum runs from her hole down onto your tongue.'
  1712. cumnostd = 1
  1713. gs 'cum_call', 'mouth', $pakterID[1], 1, 0, 10000, 30
  1714. gs 'arousal', 'cuni_give', 15, 'exhibitionism', 'group'
  1715. gs 'stat'
  1716. act 'Cum sharing':
  1717. *clr & cla
  1718. minut += 5
  1719. '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/mff5.mp4"></video></center>'
  1720. '<<$paktress[1]>> climbs off and kneels in front of you as you open your mouth and allow <<$pakter[1]>>''s load to drool from your tongue and into her mouth. She then shows her cum filled mouth to the camera and makes a rather perverted show of swallowing it. The scene ends with the two of you making out.'
  1721. act 'Take a shower': gt 'pornstudio', 'shower'
  1722. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1723. end
  1724. end
  1725. end
  1726. end
  1727. end
  1728. end
  1729. end
  1730. --- pornfilm ---------------------------------