1
1

pornfilm 59 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633
  1. # pornfilm
  2. if $ARGS[0] = 'pornactor':
  3. if pfactor ! 50:
  4. num = pfactor
  5. :actorloop
  6. akrand = rand(1,10)
  7. if akrand = 1:
  8. gs 'npcgeneratec', 0, 'Porn Actor', rand(18,28)
  9. $npc_usedname[$npclastgenerated] = 'Alexei'
  10. $npc_nickname[$npclastgenerated] = 'Alexei'
  11. $pakter[num] = 'Alexei'
  12. gs 'npcpreservec', $npclastgenerated
  13. $pakterID[num] = $npclastsaved
  14. elseif akrand = 2:
  15. gs 'npcgeneratec', 0, 'Porn Actor', rand(18,28)
  16. $npc_usedname[$npclastgenerated] = 'Sergey'
  17. $npc_nickname[$npclastgenerated] = 'Sergey'
  18. $pakter[num] = 'Sergey'
  19. gs 'npcpreservec', $npclastgenerated
  20. $pakterID[num] = $npclastsaved
  21. elseif akrand = 3:
  22. gs 'npcgeneratec', 0, 'Porn Actor', rand(18,28)
  23. $npc_usedname[$npclastgenerated] = 'George'
  24. $npc_nickname[$npclastgenerated] = 'George'
  25. $pakter[num] = 'George'
  26. gs 'npcpreservec', $npclastgenerated
  27. $pakterID[num] = $npclastsaved
  28. elseif akrand = 4:
  29. gs 'npcgeneratec', 0, 'Porn Actor', rand(18,28)
  30. $npc_usedname[$npclastgenerated] = 'Ignat'
  31. $npc_nickname[$npclastgenerated] = 'Ignat'
  32. $pakter[num] = 'Ignat'
  33. gs 'npcpreservec', $npclastgenerated
  34. $pakterID[num] = $npclastsaved
  35. elseif akrand = 5:
  36. gs 'npcgeneratec', 0, 'Porn Actor', rand(18,28)
  37. $npc_usedname[$npclastgenerated] = 'Simeon'
  38. $npc_nickname[$npclastgenerated] = 'Simeon'
  39. $pakter[num] = 'Simeon'
  40. gs 'npcpreservec', $npclastgenerated
  41. $pakterID[num] = $npclastsaved
  42. elseif akrand = 6:
  43. gs 'npcgeneratec', 0, 'Porn Actor', rand(18,28)
  44. $npc_usedname[$npclastgenerated] = 'Vasili'
  45. $npc_nickname[$npclastgenerated] = 'Vasili'
  46. $pakter[num] = 'Vasili'
  47. gs 'npcpreservec', $npclastgenerated
  48. $pakterID[num] = $npclastsaved
  49. elseif akrand = 7:
  50. gs 'npcgeneratec', 0, 'Porn Actor', rand(18,28)
  51. $npc_usedname[$npclastgenerated] = 'Boris'
  52. $npc_nickname[$npclastgenerated] = 'Boris'
  53. $pakter[num] = 'Boris'
  54. gs 'npcpreservec', $npclastgenerated
  55. $pakterID[num] = $npclastsaved
  56. elseif akrand = 8:
  57. gs 'npcgeneratec', 0, 'Porn Actor', rand(18,28)
  58. $npc_usedname[$npclastgenerated] = 'Danek'
  59. $npc_nickname[$npclastgenerated] = 'Danek'
  60. $pakter[num] = 'Danek'
  61. gs 'npcpreservec', $npclastgenerated
  62. $pakterID[num] = $npclastsaved
  63. elseif akrand = 9:
  64. gs 'npcgeneratec', 0, 'Porn Actor', rand(18,28)
  65. $npc_usedname[$npclastgenerated] = 'Pyotr'
  66. $npc_nickname[$npclastgenerated] = 'Pyotr'
  67. $pakter[num] = 'Pyotr'
  68. gs 'npcpreservec', $npclastgenerated
  69. $pakterID[num] = $npclastsaved
  70. elseif akrand = 10:
  71. gs 'npcgeneratec', 0, 'Porn Actor', rand(18,28)
  72. $npc_usedname[$npclastgenerated] = 'Oleg'
  73. $npc_nickname[$npclastgenerated] = 'Oleg'
  74. $pakter[num] = 'Oleg'
  75. gs 'npcpreservec', $npclastgenerated
  76. $pakterID[num] = $npclastsaved
  77. end
  78. if num < pfactor:
  79. num2 = pfactor
  80. :actorloop2
  81. if $pakter[num] = $pakter[num2]:jump 'actorloop'
  82. num2 -= 1
  83. if num2 > num:jump 'actorloop2'
  84. end
  85. if aksex[akrand] = 0:aksex[akrand] = 1 & guy += 1
  86. num -= 1
  87. if num > 0:jump 'actorloop'
  88. end
  89. end
  90. if $ARGS[0] = '1':
  91. if rand(0,1)=0:pornhj += 1
  92. pornbukk += 1
  93. pfType = 0
  94. cla
  95. *clr
  96. minut += 30
  97. gs 'stat'
  98. 'The set is already bustling with assistants setting up lighting, so that there are no shadows.'
  99. 'To the side stands the actor <<$pakter[1]>>, stroking his member.'
  100. act 'Undress and start':
  101. cla
  102. *clr
  103. gs 'stat'
  104. '<center><img src="images/locations/city/citycenter/studio/sex/hj.gif"></center>'
  105. '<<$pakter[1]>> lies on the bed. You lie down beside him and take his penis in your hand. You begin to stroke his penis.'
  106. gs 'arousal', 'hj', 30, 'exhibitionism'
  107. gs 'arousal', 'porn', 30, 'exhibitionism'
  108. minut -= 30
  109. gs 'stat'
  110. act 'Masturbate him':
  111. cla
  112. *clr
  113. '<center><img src="images/locations/city/citycenter/studio/sex/hjcumontits.gif"></center>'
  114. '<<$pakter[1]>> begins to caress your chest, and you continues to jerk his cock squirting his hot cum on you.'
  115. gs 'boyStat', $pakterID[1]
  116. sexpartkno = 1
  117. spafinloc = 15
  118. gs 'cum_manage'
  119. gs 'arousal', 'hj', 5, 'exhibitionism'
  120. gs 'arousal', 'porn', 5, 'exhibitionism'
  121. minut -= 5
  122. gs 'arousal', 'end'
  123. gs 'stat'
  124. act 'Shower':gt 'pornstudio', 'shower'
  125. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  126. end
  127. end
  128. end
  129. if $ARGS[0] = '2':
  130. if rand(0,2)=0:pornhj += 1
  131. if rand(0,1)=0:pornbj += 1
  132. pornswall += 1
  133. if rand(0,2)=0:pornbukk += 1
  134. pfType = 0
  135. cla
  136. *clr
  137. minut += 30
  138. gs 'stat'
  139. 'The set is already bustling with assistants setting up lighting, so that there are no shadows.'
  140. 'To the side stands the actor <<$pakter[1]>>, stroking his member.'
  141. act 'Undress and start':
  142. cla
  143. *clr
  144. gs 'stat'
  145. '<center><img src="images/locations/city/citycenter/studio/sex/hj.gif"></center>'
  146. '<<$pakter[1]>> lay on the bed. You lie down beside him and take his penis in your hand. You begin to stroke his penis.'
  147. gs 'arousal', 'hj', 30, 'exhibitionism'
  148. gs 'arousal', 'porn', 30, 'exhibitionism'
  149. minut -= 30
  150. gs 'stat'
  151. act 'Suck it':
  152. cla
  153. *clr
  154. '<center><img src="images/locations/city/citycenter/studio/sex/bj.gif"></center>'
  155. '<<$pakter[1]>> sits on the bed. You settle down between his legs, take his cock in your mouth and begin sucking the head of his penis.'
  156. gs 'arousal', 'bj', 5, 'exhibitionism'
  157. gs 'arousal', 'porn', 5, 'exhibitionism'
  158. minut -= 5
  159. gs 'stat'
  160. act 'Keep sucking':
  161. cla
  162. *clr
  163. '<center><img src="images/locations/city/citycenter/studio/sex/deep.gif"></center>'
  164. '<<$pakter[1]>> begins to fuck your mouth, driving his cock down your throat with every thrust.'
  165. 'Finally he takes his cock out. You wipe the saliva from your mouth.'
  166. gs 'arousal', 'bj', 5, 'exhibitionism'
  167. gs 'arousal', 'porn', 5, 'exhibitionism'
  168. minut -= 5
  169. gs 'stat'
  170. act 'Open your mouth':
  171. cla
  172. *clr
  173. minut += 5
  174. facial += 1
  175. gs 'stat'
  176. '<center><img src="images/locations/city/citycenter/studio/sex/cum.gif"></center>'
  177. '<<$pakter[1]>> shoots hot streams of sperm into your mouth and down your throat.'
  178. gs 'boyStat', $pakterID[1]
  179. sexpartkno = 1
  180. spafinloc = 12
  181. sexvolume = 36
  182. gs 'cum_manage'
  183. spafinloc = 11
  184. sexvolume = 4
  185. gs 'cum_manage'
  186. act 'Clean his cock':
  187. cla
  188. *clr
  189. minut += 5
  190. swallow += 1
  191. gs 'stat'
  192. '<center><img src="images/locations/city/citycenter/studio/sex/bj2.gif"></center>'
  193. 'You keep your eyes fixed on his, as you gently lick every last drop of sperm from his cock.'
  194. gs 'arousal', 'end'
  195. gs 'stat'
  196. act 'Shower':gt 'pornstudio', 'shower'
  197. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  198. end
  199. end
  200. end
  201. end
  202. end
  203. end
  204. if $ARGS[0] = '3':
  205. if rand(0,2)=0:pornhj += 1
  206. if rand(0,2)=0:pornbj += 1
  207. pornvag += 1
  208. pornswall += 1
  209. pfType = 0
  210. cla
  211. *clr
  212. minut += 30
  213. gs 'stat'
  214. 'The set is already bustling with assistants setting up lighting, so that there are no shadows.'
  215. 'To the side stands the actor <<$pakter[1]>>, stroking his inviting member.'
  216. act 'Undress and start':
  217. cla
  218. *clr
  219. gs 'stat'
  220. '<center><img src="images/locations/city/citycenter/studio/sex/hj.gif"></center>'
  221. '<<$pakter[1]>> lies on the bed. You lie down beside him and take his penis in your hand. You begin to pleasure him.'
  222. gs 'arousal', 'hj', 30, 'exhibitionism'
  223. gs 'arousal', 'porn', 30, 'exhibitionism'
  224. minut -= 30
  225. gs 'stat'
  226. act 'Blow him':
  227. cla
  228. *clr
  229. '<center><img src="images/locations/city/citycenter/studio/sex/bj.gif"></center>'
  230. '<<$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.'
  231. gs 'arousal', 'bj', 5, 'exhibitionism'
  232. gs 'arousal', 'porn', 5, 'exhibitionism'
  233. minut -= 5
  234. gs 'stat'
  235. act 'Suck more':
  236. cla
  237. *clr
  238. '<center><img src="images/locations/city/citycenter/studio/sex/deep.gif"></center>'
  239. '<<$pakter[1]>> begins to fuck your mouth deeply, occasionally withdrawing completely to allow you to catch your breath, before returning more vigorously.'
  240. gs 'arousal', 'bj', 5, 'exhibitionism', 'deepthroat'
  241. gs 'arousal', 'porn', 5, 'exhibitionism'
  242. minut -= 5
  243. gs 'stat'
  244. act 'Doggy style':
  245. cla
  246. *clr
  247. pcs_vag += 1
  248. '<center><img src="images/locations/city/citycenter/studio/sex/sex.gif"></center>'
  249. 'You turn around and get on all fours, <<$pakter[1]>> guides his dick deep into your pussy. He begins to fuck you from behind, hard.'
  250. gs 'boyStat', $pakterID[1]
  251. sexpartkno = 1
  252. cumprecheck = 1
  253. gs 'cum_manage'
  254. gs 'arousal', 'vaginal', 15, 'exhibitionism'
  255. gs 'arousal', 'porn', 15, 'exhibitionism'
  256. minut -= 15
  257. gs 'stat'
  258. act 'Kneel down and open your mouth':
  259. cla
  260. *clr
  261. minut += 5
  262. spafinloc = 12
  263. sexvolume = 36
  264. gs 'cum_manage'
  265. spafinloc = 11
  266. sexvolume = 4
  267. gs 'cum_manage'
  268. facial += 1
  269. gs 'stat'
  270. '<center><img src="images/locations/city/citycenter/studio/sex/cum.gif"></center>'
  271. '<<$pakter[1]>> holds his cock to your open mouth and fills it with sperm.'
  272. act 'Clean his cock with your mouth':
  273. cla
  274. *clr
  275. minut += 5
  276. swallow += 1
  277. gs 'stat'
  278. '<center><img src="images/locations/city/citycenter/studio/sex/bj2.gif"></center>'
  279. 'Looking it to his eyes adoringly, you meticulously lick all the cum off his dick.'
  280. gs 'arousal', 'end'
  281. gs 'stat'
  282. act 'Shower':gt 'pornstudio', 'shower'
  283. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  284. end
  285. end
  286. end
  287. end
  288. end
  289. end
  290. end
  291. if $ARGS[0] = '4':
  292. if rand(0,2) = 0:pornhj += 1
  293. if rand(0,1) = 0:pornbj += 1
  294. if rand(0,1) = 0:pornvag += 1
  295. if rand(0,1) = 0:pornanal += 1
  296. if rand(0,1) = 0:pornbukk += 1
  297. if rand(0,1) = 0:pornswall += 1
  298. pfType = 0
  299. cla
  300. *clr
  301. minut += 30
  302. gs 'stat'
  303. 'The set is already bustling with assistants setting up lighting, so that there are no shadows.'
  304. 'To the side stands the actor <<$pakter[1]>>, stroking his impressive member.'
  305. act 'Undress and start':
  306. cla
  307. *clr
  308. gs 'stat'
  309. '<center><img src="images/locations/city/citycenter/studio/sex/hj.gif"></center>'
  310. '<<$pakter[1]>> lies on the bed. You lie down beside him, place your hand on his penis and begin to stroke it.'
  311. gs 'arousal', 'hj', 30, 'exhibitionism'
  312. gs 'arousal', 'porn', 30, 'exhibitionism'
  313. minut -= 30
  314. gs 'stat'
  315. act 'Blow him':
  316. cla
  317. *clr
  318. '<center><img src="images/locations/city/citycenter/studio/sex/bj.gif"></center>'
  319. '<<$pakter[1]>> sits up. You have crouch down on the floor, he swings his legs over and you suddenly have his cock right in front of your face.'
  320. 'After admiring the impressive sight, you remember you''re being filmed and begin sucking the head of his penis.'
  321. gs 'arousal', 'bj', 5, 'exhibitionism'
  322. gs 'arousal', 'porn', 5, 'exhibitionism'
  323. minut -= 5
  324. gs 'stat'
  325. act 'Suck further':
  326. cla
  327. *clr
  328. '<center><img src="images/locations/city/citycenter/studio/sex/deep.gif"></center>'
  329. '<<$pakter[1]>> relaxes as you take control with your mouth trying to take the full length of his cock down your throat.'
  330. gs 'arousal', 'bj', 5, 'exhibitionism', 'deepthroat'
  331. gs 'arousal', 'porn', 5, 'exhibitionism'
  332. minut -= 5
  333. gs 'stat'
  334. act 'Doggy style':
  335. cla
  336. *clr
  337. pcs_vag += 1
  338. '<center><img src="images/locations/city/citycenter/studio/sex/sex.gif"></center>'
  339. 'You turn around and get on all fours, <<$pakter[1]>> guides his dick deep into your pussy. He begins to fuck you from behind, hard.'
  340. 'Just as you''re really getting into it, <<$pakter[1]>> pulls his cock out. You feel him pressing against your anus.'
  341. gs 'boyStat', $pakterID[1]
  342. sexpartkno = 1
  343. cumprecheck = 1
  344. gs 'cum_manage'
  345. gs 'arousal', 'vaginal', 5, 'exhibitionism'
  346. gs 'arousal', 'porn', 5, 'exhibitionism'
  347. minut -= 5
  348. gs 'stat'
  349. act 'Anal':
  350. cla
  351. *clr
  352. pcs_ass += 1
  353. '<center><img src="images/locations/city/citycenter/studio/sex/sex.gif"></center>'
  354. 'You try as best you can to relax your anus. Suddenly <<$pakter[1]>> pushes into your ass and goes at it like a jack-hammer.'
  355. gs 'arousal', 'anal', 5, 'exhibitionism'
  356. gs 'arousal', 'porn', 5, 'exhibitionism'
  357. minut -= 5
  358. gs 'stat'
  359. act 'Kneel down and open your mouth':
  360. cla
  361. *clr
  362. minut += 5
  363. facial += 1
  364. gs 'stat'
  365. '<center><img src="images/locations/city/citycenter/studio/sex/cum.gif"></center>'
  366. '<<$pakter[1]>> brings his cock to your mouth, and feeds you the contents of his balls.'
  367. spafinloc = 12
  368. sexvolume = 36
  369. gs 'cum_manage'
  370. spafinloc = 11
  371. sexvolume = 4
  372. gs 'cum_manage'
  373. act 'Clean his cock with your mouth':
  374. cla
  375. *clr
  376. minut += 5
  377. swallow += 1
  378. gs 'stat'
  379. '<center><img src="images/locations/city/citycenter/studio/sex/bj2.gif"></center>'
  380. 'You keep look deep into his eyes, then lick and kiss his sperm covered cock until it''s thoughly cleaned.'
  381. gs 'arousal', 'end'
  382. gs 'stat'
  383. act 'Shower':gt 'pornstudio', 'shower'
  384. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  385. end
  386. end
  387. end
  388. end
  389. end
  390. end
  391. end
  392. end
  393. if $ARGS[0] = '5':
  394. if rand(0,2) = 0:pornhj += 1
  395. if rand(0,1) = 0:pornbj += 1
  396. if rand(0,1) = 0:pornvag += 1
  397. if rand(0,1) = 0:pornanal += 1
  398. if rand(0,1) = 0:pornbukk += 1
  399. if rand(0,1) = 0:pornswall += 1
  400. porngang += 1
  401. pfType = 0
  402. cla
  403. *clr
  404. minut += 30
  405. gang += 1
  406. gs 'stat'
  407. 'The set is already bustling with assistants setting up lighting, so that there are no shadows.'
  408. 'Actors <<$pakter[1]>> and <<$pakter[2]>>, are watching porn on a monitor, getting their cocks ready for you...'
  409. act 'Undress and kneel':
  410. cla
  411. *clr
  412. gs 'stat'
  413. '<center><img src="images/locations/city/citycenter/studio/sex/tbj.gif"></center>'
  414. '<<$pakter[1]>> and <<$pakter[2]>> slap their fully errect cocks against your face.'
  415. gs 'arousal', 'bj', 10, 'exhibitionism', 'group'
  416. gs 'arousal', 'porn', 10, 'exhibitionism', 'group'
  417. minut -= 10
  418. gs 'stat'
  419. act 'Suck them':
  420. cla
  421. *clr
  422. pornbj += 1
  423. gs 'stat'
  424. '<center><img src="images/locations/city/citycenter/studio/sex/tbj2.gif"></center>'
  425. 'You start by sucking both members trying to please them both. Then, using your tounge, you draw circles under <<$pakter[1]>>s gland, making him moan.'
  426. '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'
  427. gs 'arousal', 'bj', 15, 'exhibitionism'
  428. gs 'arousal', 'porn', 15, 'exhibitionism'
  429. minut -= 15
  430. gs 'stat'
  431. act 'Fuck':
  432. cla
  433. *clr
  434. pcs_vag += 1
  435. pornvag += 1
  436. '<center><img src="images/locations/city/citycenter/studio/sex/three.gif"></center>'
  437. 'You bend over and <<$pakter[1]>> drives his dick into your pussy while you suck <<$pakter[2]>>.'
  438. gs 'boyStat', $pakterID[1]
  439. sexpartkno = 1
  440. cumprecheck = 1
  441. gs 'cum_manage'
  442. gs 'stat'
  443. gs 'arousal', 'bj', 15, 'exhibitionism'
  444. gs 'arousal', 'vaginal', 15, 'exhibitionism'
  445. gs 'arousal', 'porn', 15, 'exhibitionism'
  446. minut -= 15
  447. gs 'stat'
  448. act 'Anal':
  449. cla
  450. *clr
  451. pcs_ass += 1
  452. pornanal += 1
  453. '<center><img src="images/locations/city/citycenter/studio/sex/threea.gif"></center>'
  454. '<<$pakter[1]>> takes his cock out of your pussy, and plunges it into your ass. The change and the extra tightness quickly overwelms him.'
  455. 'He shoots his load into your ass, all the while you keep sucking <<$pakter[2]>>.'
  456. spafinloc = 3
  457. gs 'cum_manage'
  458. gs 'stat'
  459. gs 'arousal', 'bj', 15, 'exhibitionism'
  460. gs 'arousal', 'anal', 15, 'exhibitionism'
  461. gs 'arousal', 'porn', 15, 'exhibitionism'
  462. minut -= 15
  463. gs 'stat'
  464. act 'Cum on face':
  465. cla
  466. *clr
  467. minut += 5
  468. facial += 1
  469. pornswall += 1
  470. '<center><img src="images/locations/city/citycenter/studio/sex/tcum.gif"></center>'
  471. 'You move around to clean up <<$pakter[1]>>, when <<$pakter[2]>> grabs your head and feeds you his cum saying the most depraved things as it slowly trickles down your throat.'
  472. gs 'boyStat', $pakterID[2]
  473. sexpartkno = 1
  474. spafinloc = 12
  475. gs 'cum_manage'
  476. gs 'stat'
  477. gs 'arousal', 'end'
  478. gs 'stat'
  479. act 'Shower':gt 'pornstudio', 'shower'
  480. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  481. end
  482. end
  483. end
  484. end
  485. end
  486. end
  487. if $ARGS[0] = '6':
  488. pornbj += 1
  489. pornvag += 1
  490. pornanal += 1
  491. if rand(0,1) = 0:pornbukk += 1
  492. pornswall += 1
  493. porngang += 1
  494. pfType = 0
  495. cla
  496. *clr
  497. minut += 30
  498. gang += 1
  499. gs 'stat'
  500. 'The set is already bustling with assistants setting up lighting, so that there are no shadows.'
  501. 'Actors <<$pakter[1]>> and <<$pakter[2]>>, are watching porn on a monitor, getting their cocks ready for you...'
  502. act 'Undress and start':
  503. cla
  504. *clr
  505. gs 'stat'
  506. '<center><img src="images/locations/city/citycenter/studio/sex/tbj.gif"></center>'
  507. '<<$pakter[1]>> and <<$pakter[2]>> bash their fully errect cocks into your face.'
  508. gs 'arousal', 'bj', 10, 'exhibitionism', 'group'
  509. gs 'arousal', 'porn', 10, 'exhibitionism', 'group'
  510. minut -= 10
  511. gs 'stat'
  512. act 'Suck':
  513. cla
  514. *clr
  515. gs 'stat'
  516. '<center><img src="images/locations/city/citycenter/studio/sex/tbj2.gif"></center>'
  517. 'You started to suck both members trying to please them both, it feels so good, all this cock and it''s all for you.'
  518. gs 'arousal', 'bj', 15, 'exhibitionism', 'group'
  519. gs 'arousal', 'porn', 15, 'exhibitionism', 'group'
  520. minut -= 15
  521. gs 'stat'
  522. act 'Fuck':
  523. cla
  524. *clr
  525. pcs_vag += 1
  526. '<center><img src="images/locations/city/citycenter/studio/sex/three.gif"></center>'
  527. 'You got on all fours and <<$pakter[1]>> fucks you like a dog while you suck <<$pakter[2]>>.'
  528. gs 'boyStat', $pakterID[1]
  529. sexpartkno = 1
  530. cumprecheck = 1
  531. gs 'cum_manage'
  532. gs 'stat'
  533. gs 'arousal', 'bj', 15, 'exhibitionism', 'group'
  534. gs 'arousal', 'vaginal', 15, 'exhibitionism', 'group'
  535. gs 'arousal', 'porn', 15, 'exhibitionism', 'group'
  536. minut -= 15
  537. gs 'stat'
  538. act 'Anal':
  539. cla
  540. *clr
  541. pcs_ass += 1
  542. gs 'stat'
  543. '<center><img src="images/locations/city/citycenter/studio/sex/threea.gif"></center>'
  544. '<<$pakter[1]>> switches it up and sticks his cock into your ass while you keep sucking <<$pakter[2]>>.'
  545. gs 'arousal', 'bj', 15, 'exhibitionism', 'group'
  546. gs 'arousal', 'anal', 15, 'exhibitionism', 'group'
  547. gs 'arousal', 'porn', 15, 'exhibitionism', 'group'
  548. minut -= 15
  549. gs 'stat'
  550. act 'Double Penetration':
  551. cla
  552. *clr
  553. pcs_ass += 1
  554. pcs_vag += 1
  555. gs 'stat'
  556. '<center><img src="images/locations/city/citycenter/studio/sex/three2.gif"></center>'
  557. '<<$pakter[1]>> takes his dick out of your ass and lies down. Knowing <<$pakter[1]>> wants more, you straddle his cock.'
  558. 'You feel how his cock fill your pussy while <<$pakter[2]>> cames up from behind you and pushes his penis into your ass.'
  559. 'The guys find a rhythm and grind away at your holes, you moan loudly.'
  560. gs 'arousal', 'anal', 15, 'exhibitionism', 'group'
  561. gs 'arousal', 'vaginal', 15, 'exhibitionism', 'group'
  562. gs 'arousal', 'porn', 15, 'exhibitionism', 'group'
  563. minut -= 15
  564. gs 'stat'
  565. act 'Finish in mouth':
  566. cla
  567. *clr
  568. minut += 5
  569. facial += 1
  570. '<center><img src="images/locations/city/citycenter/studio/sex/tcum.gif"></center>'
  571. 'The guys tell you they''re close and disengage. You grab the cock of <<$pakter[1]>> and began to suck.'
  572. '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.'
  573. spafinloc = 12
  574. sexvolume = 6
  575. gs 'cum_manage'
  576. spafinloc = 11
  577. sexvolume = 2
  578. gs 'cum_manage'
  579. gs 'boyStat', $pakterID[2]
  580. spafinloc = 12
  581. sexvolume = 6
  582. gs 'cum_manage'
  583. spafinloc = 11
  584. sexvolume = 2
  585. gs 'cum_manage'
  586. gs 'stat'
  587. gs 'arousal', 'end'
  588. gs 'stat'
  589. act 'Shower':gt 'pornstudio', 'shower'
  590. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  591. end
  592. end
  593. end
  594. end
  595. end
  596. end
  597. end
  598. if $ARGS[0] = '7':
  599. if rand(0,1) = 0:pornbj += 1
  600. pornvag += 1
  601. if rand(0,2) = 0:porngang += 1
  602. porncream += 1
  603. pfType = 1
  604. cla
  605. *clr
  606. minut += 30
  607. gs 'stat'
  608. 'The set is already bustling with assistants setting up lighting, so that there are no shadows.'
  609. 'To the side stands the actor <<$pakter[1]>>, stroking his member.'
  610. act 'Undress and start':
  611. cla
  612. *clr
  613. pornbj += 1
  614. gs 'stat'
  615. '<center><img src="images/locations/city/citycenter/studio/sex/bj.gif"></center>'
  616. '<<$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.'
  617. gs 'arousal', 'bj', 30, 'exhibitionism'
  618. gs 'arousal', 'porn', 30, 'exhibitionism'
  619. minut -= 30
  620. gs 'stat'
  621. act 'Keep sucking':
  622. cla
  623. *clr
  624. '<center><img src="images/locations/city/citycenter/studio/sex/deep.gif"></center>'
  625. '<<$pakter[1]>> begins to fuck your mouth, driving his cock down your throat with every thrust.'
  626. 'Finally he takes his cock out. You wipe the saliva from your mouth.'
  627. gs 'arousal', 'bj', 15, 'exhibitionism'
  628. gs 'arousal', 'porn', 15, 'exhibitionism'
  629. minut -= 15
  630. gs 'stat'
  631. act 'Lay down on the couch':
  632. cla
  633. *clr
  634. gs 'stat'
  635. '<center><img src="images/locations/city/citycenter/studio/sex/fuck<<rand(1,2)>>.gif" width="500"></center>'
  636. '<<$pakter[1]>> grabs your hips and throw you on the couch and starts to fuck you.'
  637. gs 'arousal', 'vaginal', 15, 'exhibitionism'
  638. gs 'arousal', 'porn', 15, 'exhibitionism'
  639. minut -= 15
  640. gs 'stat'
  641. if pcs_horny < 85 and pcs_exhibition < 80:
  642. act 'Fake orgasm':
  643. cla
  644. minut += 15
  645. pcs_horny += 15
  646. sexpartkno = 1
  647. gs 'boyStat', $pakterID[1]
  648. gs 'cum_manage'
  649. gs 'stat'
  650. '<center><img src="images/locations/city/citycenter/studio/sex/porgasmfake.gif" width="400"></center>'
  651. 'Finally you feel <<$pakter[1]>> cumming inside of you, so you fake a sreaming orgasm for the film. You keep your eyes fixed on his, as he pumps a huge amount of sperm in you.'
  652. '<center><img src="images/locations/city/citycenter/studio/sex/porncp<<rand(1,4)>>.gif" width="400"></center>'
  653. 'He finally 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.'
  654. $orgasm_or = 'no'
  655. gs 'arousal', 'end'
  656. gs 'stat'
  657. act 'Shower':gt 'pornstudio', 'shower'
  658. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  659. end
  660. else
  661. act 'Orgasm':
  662. cla
  663. minut += 15
  664. sexpartkno = 1
  665. orgasmbonus += 10
  666. porngasm += 1
  667. gs 'boyStat', $pakterID[1]
  668. gs 'cum_manage'
  669. gs 'stat'
  670. '<center><img src="images/locations/city/citycenter/studio/sex/porgasm.gif" width="400"></center>'
  671. 'Finally you feel <<$pakter[1]>> cumming inside of you, which starts your own orgasm. You keep your eyes fixed on his, as he pumps a huge amount of sperm in you.'
  672. '<center><img src="images/locations/city/citycenter/studio/sex/porncp<<rand(1,4)>>.gif" width="400"></center>'
  673. 'He finally 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.'
  674. $orgasm_or = 'yes'
  675. gs 'arousal', 'end'
  676. gs 'stat'
  677. act 'Shower':gt 'pornstudio', 'shower'
  678. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  679. end
  680. end
  681. end
  682. end
  683. end
  684. end
  685. if $ARGS[0] = '8':
  686. if rand(0,2) = 0:pornbj += 1
  687. pornvag += 1
  688. pornanal += 1
  689. porngang += 1
  690. porncream += 1
  691. pfType = 1
  692. cla
  693. *clr
  694. minut += 30
  695. gang += 1
  696. porngang += 1
  697. gs 'stat'
  698. 'The set is already bustling with assistants setting up lighting, so that there are no shadows.'
  699. 'Actors <<$pakter[1]>> and <<$pakter[2]>>, are watching porn on a monitor, getting their cocks ready for you...'
  700. act 'Undress and kneel':
  701. cla
  702. *clr
  703. gs 'stat'
  704. '<center><img src="images/locations/city/citycenter/studio/sex/tbj.gif"></center>'
  705. '<<$pakter[1]>> and <<$pakter[2]>> slap their fully errect cocks against your face.'
  706. gs 'arousal', 'bj', 10, 'exhibitionism', 'group'
  707. gs 'arousal', 'porn', 10, 'exhibitionism', 'group'
  708. minut -= 10
  709. gs 'stat'
  710. act 'Suck them':
  711. cla
  712. *clr
  713. gs 'stat'
  714. '<center><img src="images/locations/city/citycenter/studio/sex/tbj2.gif"></center>'
  715. 'You start by sucking both members trying to please them both. Then, using your tounge, you draw circles under <<$pakter[1]>>''s gland, making him moan.'
  716. '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'
  717. gs 'arousal', 'bj', 15, 'exhibitionism', 'group'
  718. gs 'arousal', 'porn', 15, 'exhibitionism', 'group'
  719. minut -= 15
  720. gs 'stat'
  721. act 'Fuck them':
  722. cla
  723. *clr
  724. pcs_vag += 1
  725. pcs_ass += 1
  726. '<center><img src="images/locations/city/citycenter/studio/sex/threesomeDP<<rand(1,5)>>.gif" width="500"></center>'
  727. if rand(0,1) = 0:
  728. gs 'boyStat', $pakterID[1]
  729. sexpartkno = 1
  730. gs 'cum_manage'
  731. gs 'boyStat', $pakterID[2]
  732. sexpartkno = 1
  733. spafinloc = 3
  734. gs 'cum_manage'
  735. '<<$pakter[1]>> lays on the bed and you climb above him, fitting his cock in your pussy, then wait until <<$pakter[2]>> pushes his member in 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 the guys that they should cum inside.'
  736. gs 'arousal', 'anal', 25, 'exhibitionism', 'group'
  737. gs 'arousal', 'vaginal', 25, 'exhibitionism', 'group'
  738. gs 'arousal', 'porn', 25, 'exhibitionism', 'group'
  739. minut -= 25
  740. gs 'stat'
  741. else
  742. gs 'boyStat', $pakterID[2]
  743. sexpartkno = 1
  744. gs 'cum_manage'
  745. gs 'boyStat', $pakterID[1]
  746. sexpartkno = 1
  747. spafinloc = 3
  748. gs 'cum_manage'
  749. '<<$pakter[2]>> lays on the bed and you climb above him, fitting his cock in your pussy, then wait until <<$pakter[1]>> pushes his member in 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 the guys that they should cum inside.'
  750. gs 'arousal', 'anal', 25, 'exhibitionism', 'group'
  751. gs 'arousal', 'vaginal', 25, 'exhibitionism', 'group'
  752. gs 'arousal', 'porn', 25, 'exhibitionism', 'group'
  753. minut -= 25
  754. gs 'stat'
  755. end
  756. 'The guys starts to fuck you even faster as a reply, and pretty soon you feel them twitching inside of your body.'
  757. ''
  758. if pcs_horny < 85 and pcs_exhibition < 80:
  759. '<center><img src="images/locations/city/citycenter/studio/sex/porgasmfake.gif" width="400"></center>'
  760. 'You fake a sreaming 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 finally finishing, so 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 starts to leak out of you. After a few minutes of this the director nods his head, and you get up.'
  761. $orgasm_or = 'no'
  762. else
  763. porngasm += 1
  764. orgasmbonus += 10
  765. '<center><img src="images/locations/city/citycenter/studio/sex/porgasm.gif" width="400"></center>'
  766. '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 finally finishing, so 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 starts to leak out of you. After a few minutes of this the director nods his head, and you get up.'
  767. $orgasm_or = 'yes'
  768. end
  769. gs 'arousal', 'end'
  770. gs 'stat'
  771. act 'Shower':gt 'pornstudio', 'shower'
  772. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  773. end
  774. end
  775. end
  776. end
  777. if $ARGS[0] = '9':
  778. if rand(0,2) = 0:pornbj += 1
  779. pornswall += 1
  780. pornvag += 1
  781. porngang += 1
  782. porncream += 1
  783. pfType = 1
  784. cla
  785. *clr
  786. minut += 30
  787. gang += 1
  788. gs 'stat'
  789. 'The set is already bustling with assistants setting up lighting, so that there are no shadows.'
  790. 'Actors <<$pakter[1]>> and <<$pakter[2]>>, are watching porn on a monitor, getting their cocks ready for you...'
  791. act 'Undress and kneel':
  792. cla
  793. *clr
  794. gs 'stat'
  795. '<center><img src="images/locations/city/citycenter/studio/sex/tbj.gif"></center>'
  796. '<<$pakter[1]>> and <<$pakter[2]>> slap their fully errect cocks against your face.'
  797. gs 'arousal', 'bj', 10, 'exhibitionism', 'group'
  798. gs 'arousal', 'porn', 10, 'exhibitionism', 'group'
  799. minut -= 10
  800. gs 'stat'
  801. act 'Suck them':
  802. cla
  803. *clr
  804. gs 'stat'
  805. '<center><img src="images/locations/city/citycenter/studio/sex/tbj2.gif"></center>'
  806. 'You start by sucking both members trying to please them both. Then, using your tounge, you draw circles under <<$pakter[1]>>''s gland, making him moan.'
  807. 'Then you sucking <<$pakter[2]>>''s dick while he grabs your hair for leverage and facefuck 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.'
  808. gs 'arousal', 'bj', 15, 'exhibitionism', 'group', 'rough', 'deepthroat'
  809. gs 'arousal', 'porn', 15, 'exhibitionism', 'group'
  810. minut -= 15
  811. gs 'stat'
  812. act 'Fuck them':
  813. cla
  814. *clr
  815. pornvag += 1
  816. pornswall += 1
  817. '<center><img src="images/shared/sex/group/threesomePM<<rand(1,12)>>.gif" width="500"></center>'
  818. if rand(0,1) = 0:
  819. gs 'boyStat', $pakterID[1]
  820. sexpartkno = 1
  821. gs 'cum_manage'
  822. gs 'boyStat', $pakterID[2]
  823. sexpartkno = 1
  824. spafinloc = 12
  825. gs 'cum_manage'
  826. 'You get in position before <<$pakter[2]>> and starts to suck him, while <<$pakter[1]>> starts to fuck your pussy. He soon works on that part 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.'
  827. gs 'arousal', 'bj', 25, 'exhibitionism', 'group'
  828. gs 'arousal', 'vaginal', 25, 'exhibitionism', 'group'
  829. gs 'arousal', 'porn', 25, 'exhibitionism', 'group'
  830. minut -= 25
  831. gs 'stat'
  832. else
  833. gs 'boyStat', $pakterID[2]
  834. sexpartkno = 1
  835. gs 'cum_manage'
  836. gs 'boyStat', $pakterID[1]
  837. sexpartkno = 1
  838. spafinloc = 3
  839. gs 'cum_manage'
  840. 'You get in position before <<$pakter[1]>> and starts to suck him, while <<$pakter[2]>> starts to fuck your pussy. He soon works on that part 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.'
  841. gs 'arousal', 'bj', 25, 'exhibitionism', 'group'
  842. gs 'arousal', 'vaginal', 25, 'exhibitionism', 'group'
  843. gs 'arousal', 'porn', 25, 'exhibitionism', 'group'
  844. minut -= 25
  845. gs 'stat'
  846. end
  847. 'The guys immediately starts 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 oy your body simultaneously, bathing your cunt in seed while your mouth quickly fills with sperm too.'
  848. ''
  849. if pcs_horny < 85 and pcs_exhibition < 80:
  850. '<center><img src="images/locations/city/citycenter/studio/sex/porgasmfake.gif" width="400"></center>'
  851. 'You fake a sreaming orgasm for the film. You keep your eyes fixed on the guy before you as he pumps a huge amount of sperm in your mouth. The guys finally finishing and your movie partners step away from the scene so so the cameraman could take a few closeups of your sperm-full mouth and seed-dripping pussy. After a few seconds you swallow the sperm and get up.'
  852. $orgasm_or = 'no'
  853. else
  854. orgasmbonus += 10
  855. porngasm += 1
  856. '<center><img src="images/locations/city/citycenter/studio/sex/porgasm.gif" width="400"></center>'
  857. 'You have a real orgasm while filming. You keep your eyes fixed on the guy before you as he pumps a huge amount of sperm in your mouth. The guys finally finishing and your movie partners step away from the scene so so the cameraman could take a few closeups of your sperm-full mouth and seed-dripping pussy. After a few seconds you swallow the sperm and get up.'
  858. $orgasm_or = 'yes'
  859. end
  860. gs 'arousal', 'end'
  861. gs 'stat'
  862. act 'Shower':gt 'pornstudio', 'shower'
  863. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  864. end
  865. end
  866. end
  867. end
  868. if $ARGS[0] = '10':
  869. if rand(0,1) = 0:pornbj += 1
  870. pornvag += 2
  871. porngang += 2
  872. if rand(0,1) = 0:pornhj += 1
  873. pornbukk += 2
  874. pfType = 1
  875. cla
  876. *clr
  877. minut += 30
  878. gang += 1
  879. gs 'stat'
  880. 'The set is already bustling with assistants setting up lighting, so that there are no shadows.'
  881. '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...'
  882. act 'Warmup':
  883. cla
  884. *clr
  885. gs 'stat'
  886. '<center><img src="images/locations/city/citycenter/studio/sex/warmupgang.gif" width="500"></center>'
  887. 'The actors gather around you, and you soon suck one guy while giving a handjob for an another one. The two other guys get creative, one of them sucking your tits, while the other licking your pussy. The guys switch places once in a while, and soon the director indicates to change the scene.'
  888. gs 'arousal', 'bj', 20, 'exhibitionism', 'group'
  889. gs 'arousal', 'hj', 20, 'exhibitionism', 'group'
  890. gs 'arousal', 'porn', 20, 'exhibitionism', 'group'
  891. minut -= 20
  892. gs 'stat'
  893. act 'Fuck them':
  894. cla
  895. *clr
  896. gs 'stat'
  897. '<center><img src="images/locations/city/citycenter/studio/sex/gangp<<rand(1,4)>>.gif" width="500"></center>'
  898. 'The guys starts to fuck you, one after the other, but never cumming. All the while you keep them ready with your hands and mouth.'
  899. gs 'arousal', 'vaginal', 20, 'exhibitionism', 'group'
  900. gs 'arousal', 'porn', 20, 'exhibitionism', 'group'
  901. minut -= 20
  902. gs 'stat'
  903. act 'Cream bath':
  904. killvar 'cuminside'
  905. cla
  906. *clr
  907. 'The guys continue to fuck you, but this time with the purpose of cumming as quickly as possible.'
  908. gs 'arousal', 'vaginal', 5, 'exhibitionism', 'group'
  909. gs 'arousal', 'porn', 5, 'exhibitionism', 'group'
  910. minut -= 5
  911. gs 'stat'
  912. gs 'boyStat', $pakterID[1]
  913. sexpartkno = 1
  914. cumprecheck = 1
  915. gs 'cum_manage'
  916. if rand(0,5) > 0:
  917. '<center><img src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,9)>>.gif" width="500"></center>'
  918. '<<$pakter[1]>> suddenly groans, pulling out in the last second coating your pussylips with his sperm.'
  919. else
  920. '<center><img src="images/locations/city/citycenter/studio/sex/cumbathM<<rand(1,2)>>.gif" width="500"><img src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,9)>>.gif" width="500"></center>'
  921. '<<$pakter[1]>> suddenly groans, pulling his dick out of your pussy but obviously 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.'
  922. sexpartkno = 1
  923. gs 'cum_manage'
  924. cuminside = 1
  925. end
  926. spafinloc = 1
  927. sexpartkno = 1
  928. gs 'cum_manage'
  929. if pcs_horny >= (100-pcs_exhibition):
  930. orgasmbonus += 10
  931. pornorg = 1
  932. '<center><img src="images/locations/city/citycenter/studio/sex/porgasm.gif" width="400"></center>'
  933. 'You have a real orgasm while filming. You keep your eyes fixed on the guy as he coats your writhing body with his seed.'
  934. $orgasm_or = 'yes'
  935. gs 'stat'
  936. end
  937. 'When he is done, he is replaced by <<$pakter[2]>>, who also fucks you.'
  938. gs 'arousal', 'vaginal', 5, 'exhibitionism', 'group'
  939. gs 'arousal', 'porn', 5, 'exhibitionism', 'group'
  940. minut -= 5
  941. gs 'stat'
  942. gs 'boyStat', $pakterID[2]
  943. sexpartkno = 1
  944. cumprecheck = 1
  945. gs 'cum_manage'
  946. if rand(0,5) > 0:
  947. '<center><img src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,9)>>.gif" width="500"></center>'
  948. '<<$pakter[2]>> suddenly groans, pulling out in the last second coating your breasts with his sperm.'
  949. else
  950. '<center><img src="images/locations/city/citycenter/studio/sex/cumbathM<<rand(1,2)>>.gif" width="500"><img src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,9)>>.gif" width="500"></center>'
  951. '<<$pakter[2]>> suddenly groans, pulling his dick out of your pussy but obviously 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.'
  952. sexpartkno = 1
  953. gs 'cum_manage'
  954. cuminside = 1
  955. end
  956. spafinloc = 15
  957. sexpartkno = 1
  958. gs 'cum_manage'
  959. if pcs_horny >= (100-pcs_exhibition):
  960. orgasmbonus += 10
  961. pornorg = 1
  962. '<center><img src="images/locations/city/citycenter/studio/sex/porgasm.gif" width="400"></center>'
  963. 'You have a real orgasm while filming. You keep your eyes fixed on the guy as he coats your writhing body with his seed.'
  964. $orgasm_or = 'yes'
  965. gs 'stat'
  966. end
  967. 'When he is done, he is replaced by <<$pakter[3]>>, who also fucks you.'
  968. gs 'arousal', 'vaginal', 5, 'exhibitionism', 'group'
  969. gs 'arousal', 'porn', 5, 'exhibitionism', 'group'
  970. minut -= 5
  971. gs 'stat'
  972. gs 'boyStat', $pakterID[3]
  973. sexpartkno = 1
  974. cumprecheck = 1
  975. gs 'cum_manage'
  976. if rand(0,5) > 0:
  977. '<center><img src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,9)>>.gif" width="500"></center>'
  978. '<<$pakter[3]>> suddenly groans, pulling out in the last second coating your face and hair with his sperm.'
  979. else
  980. '<center><img src="images/locations/city/citycenter/studio/sex/cumbathM<<rand(1,2)>>.gif" width="500"><img src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,9)>>.gif" width="500"></center>'
  981. '<<$pakter[3]>> suddenly groans, pulling his dick out of your pussy but obviously 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.'
  982. sexpartkno = 1
  983. gs 'cum_manage'
  984. cuminside = 1
  985. end
  986. spafinloc = 11
  987. sexpartkno = 1
  988. gs 'cum_manage'
  989. spafinloc = 16
  990. sexpartkno = 1
  991. gs 'cum_manage'
  992. if pcs_horny >= (100-pcs_exhibition):
  993. orgasmbonus += 10
  994. pornorg = 1
  995. '<center><img src="images/locations/city/citycenter/studio/sex/porgasm.gif" width="400"></center>'
  996. 'You have a real orgasm while filming. You keep your eyes fixed on the guy as he coats your writhing body with his seed.'
  997. $orgasm_or = 'yes'
  998. end
  999. 'When he is done, he is replaced by <<$pakter[4]>>, who also fucks you.'
  1000. gs 'arousal', 'vaginal', 5, 'exhibitionism', 'group'
  1001. gs 'arousal', 'porn', 5, 'exhibitionism', 'group'
  1002. minut -= 5
  1003. gs 'stat'
  1004. gs 'boyStat', $pakterID[4]
  1005. sexpartkno = 1
  1006. cumprecheck = 1
  1007. gs 'cum_manage'
  1008. if rand(0,5) > 0:
  1009. '<center><img src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,9)>>.gif" width="500"></center>'
  1010. '<<$pakter[4]>> suddenly groans, pulling out in the last second coating your belly with his sperm.'
  1011. else
  1012. '<center><img src="images/locations/city/citycenter/studio/sex/cumbathM<<rand(1,2)>>.gif" width="500"><img src="images/locations/city/citycenter/studio/sex/cumbath<<rand(1,9)>>.gif" width="500"></center>'
  1013. '<<$pakter[4]>> suddenly groans, pulling his dick out of your pussy but obviously 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.'
  1014. sexpartkno = 1
  1015. gs 'cum_manage'
  1016. cuminside = 1
  1017. end
  1018. sexpartkno = 1
  1019. spafinloc = 14
  1020. gs 'cum_manage'
  1021. if pcs_horny >= (100-pcs_exhibition):
  1022. orgasmbonus += 10
  1023. pornorg = 1
  1024. '<center><img src="images/locations/city/citycenter/studio/sex/porgasm.gif" width="400"></center>'
  1025. 'You have a real orgasm while filming. You keep your eyes fixed on the guy as he coats your writhing body with his seed.'
  1026. $orgasm_or = 'yes'
  1027. end
  1028. if cuminside = 1:porncream += 1 & killvar 'cuminside'
  1029. if pornorg = 1:porngasm += 1 & killvar 'pornorg'
  1030. gs 'stat'
  1031. gs 'arousal', 'end'
  1032. gs 'stat'
  1033. act 'Shower':gt 'pornstudio', 'shower'
  1034. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1035. end
  1036. end
  1037. end
  1038. end
  1039. if $ARGS[0] = '11':
  1040. if rand(0,1) = 0:pornbj += 1
  1041. if rand(0,1) = 0:pornhj += 1
  1042. pornvag += 2
  1043. porngang += 2
  1044. porncream += 2
  1045. pfType = 1
  1046. cla
  1047. *clr
  1048. minut += 30
  1049. gang += 1
  1050. gs 'stat'
  1051. 'The set is already bustling with assistants setting up lighting, so that there are no shadows.'
  1052. '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...'
  1053. act 'Warmup':
  1054. cla
  1055. *clr
  1056. gs 'stat'
  1057. '<center><img src="images/locations/city/citycenter/studio/sex/warmupgang.gif" width="500"></center>'
  1058. 'The actors gather around you, and you soon suck one guy while giving a handjob for an another one. The two other guys get creative, one of them sucking your tits, while the other licking your pussy. The guys switch places once in a while, and soon the director indicates to change the scene.'
  1059. gs 'arousal', 'hj', 20, 'exhibitionism', 'group'
  1060. gs 'arousal', 'cuni', 20, 'exhibitionism', 'group'
  1061. gs 'arousal', 'porn', 20, 'exhibitionism', 'group'
  1062. minut -= 20
  1063. gs 'stat'
  1064. act 'Fuck them':
  1065. cla
  1066. *clr
  1067. gs 'boyStat', $pakterID[1]
  1068. sexpartkno = 1
  1069. cumprecheck = 1
  1070. gs 'cum_manage'
  1071. gs 'boyStat', $pakterID[2]
  1072. sexpartkno = 1
  1073. cumprecheck = 1
  1074. gs 'cum_manage'
  1075. gs 'boyStat', $pakterID[3]
  1076. sexpartkno = 1
  1077. cumprecheck = 1
  1078. gs 'cum_manage'
  1079. gs 'boyStat', $pakterID[4]
  1080. sexpartkno = 1
  1081. cumprecheck = 1
  1082. gs 'cum_manage'
  1083. gs 'stat'
  1084. '<center><img src="images/shared/sex/group/threesomePM<<rand(1,12)>>.gif" width="500"></center>'
  1085. 'The guys starts to fuck you, one after the other, but never cumming. All the while you keep them ready with your hands and mouth.'
  1086. gs 'arousal', 'hj', 20, 'exhibitionism', 'group'
  1087. gs 'arousal', 'bj', 20, 'exhibitionism', 'group'
  1088. gs 'arousal', 'vaginal', 20, 'exhibitionism', 'group'
  1089. gs 'arousal', 'porn', 20, 'exhibitionism', 'group'
  1090. minut -= 20
  1091. gs 'stat'
  1092. act 'Creampie':
  1093. cla
  1094. *clr
  1095. minut += 5
  1096. porncream += 1
  1097. '<center><img src="images/locations/city/citycenter/studio/sex/porncp<<rand(1,4)>>.gif" width="500"></center>'
  1098. gs 'boyStat', $pakterID[1]
  1099. sexpartkno = 1
  1100. gs 'cum_manage'
  1101. gs 'boyStat', $pakterID[2]
  1102. sexpartkno = 1
  1103. gs 'cum_manage'
  1104. gs 'boyStat', $pakterID[3]
  1105. sexpartkno = 1
  1106. gs 'cum_manage'
  1107. gs 'boyStat', $pakterID[4]
  1108. sexpartkno = 1
  1109. gs 'cum_manage'
  1110. if pcs_horny < 85 and pcs_exhibition < 80:
  1111. 'You pull your legs up to your chest and smile at the guys, inviting them to come and cum in you, and in moments one of them steps up to you, pushing his dick in your pussy and groaning as he pumps his considerable amount of sperm in your vagina. As soon as he steps aside, an another guy replaces him, and after a few pumps you get your second helping of seed. Soon the third and fourth guys also cum in you, and you carefully open your pussylips with your fingers for the camera to show your sperm-full vagina.'
  1112. '<center><img src="images/locations/city/citycenter/studio/sex/pornwalk1.gif" height="200"><img src="images/locations/city/citycenter/studio/sex/pornwalk2.gif" height="200"><img src="images/locations/city/citycenter/studio/sex/pornwalk3.gif" height="200"></center>'
  1113. 'The scene ends with you pulling up your panties and skirt, and step out the door with the four guys'' load still inside you.'
  1114. $orgasm_or = 'no'
  1115. gs 'arousal', 'vaginal', 20, 'exhibitionism', 'group'
  1116. gs 'arousal', 'porn', 20, 'exhibitionism', 'group'
  1117. minut -= 20
  1118. gs 'stat'
  1119. else
  1120. 'You pull your legs up to your chest and smile at the guys, inviting them to come and cum in you, and in moments one of them steps up to you, pushing his dick in your pussy and groaning as he pumps his considerable amount of sperm in your vagina.'
  1121. '<center><img src="images/locations/city/citycenter/studio/sex/porgasm.gif" width="400"></center>'
  1122. '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, an another guy replaces him, and after a few pumps you get your second helping of seed, while you are still in the afterthroes of your first orgasm. Soon the third and fourth guys also cum in you, and you carefully open your pussylips with your fingers for the camera to show your sperm-full vagina.'
  1123. '<center><img src="images/locations/city/citycenter/studio/sex/pornwalk1.gif" height="200"><img src="images/locations/city/citycenter/studio/sex/pornwalk2.gif" height="200"><img src="images/locations/city/citycenter/studio/sex/pornwalk3.gif" height="200"></center>'
  1124. 'The scene ends with you pulling up your panties and skirt, and step out the door with the four guys'' load still inside you.'
  1125. orgasmbonus += 10
  1126. porngasm += 1
  1127. $orgasm_or = 'yes'
  1128. gs 'arousal', 'vaginal', 20, 'exhibitionism', 'group'
  1129. gs 'arousal', 'porn', 20, 'exhibitionism', 'group'
  1130. minut -= 20
  1131. gs 'stat'
  1132. end
  1133. gs 'stat'
  1134. gs 'arousal', 'end'
  1135. gs 'stat'
  1136. act 'Shower':gt 'pornstudio', 'shower'
  1137. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1138. end
  1139. end
  1140. end
  1141. end
  1142. if $ARGS[0] = '12':
  1143. if rand(0,1) = 0:pornbj += 1
  1144. if rand(0,1) = 0:pornhj += 1
  1145. pornanal += 2
  1146. porngang += 2
  1147. porncream += 2
  1148. pfType = 0
  1149. cla
  1150. *clr
  1151. minut += 30
  1152. gang += 1
  1153. gs 'stat'
  1154. 'The set is already bustling with assistants setting up lighting, so that there are no shadows.'
  1155. '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...'
  1156. act 'Warmup':
  1157. cla
  1158. *clr
  1159. gs 'stat'
  1160. '<center><img src="images/locations/city/citycenter/studio/sex/warmupgang.gif" width="500"></center>'
  1161. 'The actors gather around you, and you soon suck one guy while giving a handjob for an another one. The two other guys get creative, one of them sucking your tits, while the other licking your pussy. The guys switch places once in a while, and soon the director indicates to change the scene.'
  1162. gs 'arousal', 'hj', 20, 'exhibitionism', 'group'
  1163. gs 'arousal', 'cuni', 20, 'exhibitionism', 'group'
  1164. gs 'arousal', 'porn', 20, 'exhibitionism', 'group'
  1165. minut -= 20
  1166. gs 'stat'
  1167. act 'Fuck them':
  1168. cla
  1169. *clr
  1170. gs 'stat'
  1171. '<center><img src="images/shared/sex/group/threesomePM<<rand(0,5)>>.gif" width="500"></center>'
  1172. 'The guys starts to fuck your ass, one after the other, but never cumming. All the while you keep them ready with your hands and mouth.'
  1173. gs 'arousal', 'hj', 20, 'exhibitionism', 'group'
  1174. gs 'arousal', 'bj', 20, 'exhibitionism', 'group'
  1175. gs 'arousal', 'anal', 20, 'exhibitionism', 'group'
  1176. gs 'arousal', 'porn', 20, 'exhibitionism', 'group'
  1177. minut -= 20
  1178. gs 'stat'
  1179. act 'Ass creampie':
  1180. cla
  1181. *clr
  1182. minut += 5
  1183. gs 'boyStat', $pakterID[1]
  1184. sexpartkno = 1
  1185. spafinloc = 3
  1186. gs 'cum_manage'
  1187. gs 'boyStat', $pakterID[2]
  1188. sexpartkno = 1
  1189. spafinloc = 3
  1190. gs 'cum_manage'
  1191. gs 'boyStat', $pakterID[3]
  1192. sexpartkno = 1
  1193. spafinloc = 3
  1194. gs 'cum_manage'
  1195. gs 'boyStat', $pakterID[4]
  1196. sexpartkno = 1
  1197. spafinloc = 3
  1198. gs 'cum_manage'
  1199. '<center><img src="images/locations/city/citycenter/studio/sex/porncp<<rand(1,4)>>.gif" width="500"></center>'
  1200. if pcs_horny < 85 and pcs_exhibition < 80:
  1201. '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.'
  1202. '<center><img src="images/locations/city/citycenter/studio/sex/pornwalk1.gif" height="200"><img src="images/locations/city/citycenter/studio/sex/pornwalk2.gif" height="200"><img src="images/locations/city/citycenter/studio/sex/pornwalk3.gif" height="200"></center>'
  1203. 'The scene ends with you pulling up your panties and skirt, and step out the door with the four guys'' load still inside you.'
  1204. $orgasm_or = 'no'
  1205. gs 'arousal', 'anal', 20, 'exhibitionism', 'group'
  1206. gs 'arousal', 'porn', 20, 'exhibitionism', 'group'
  1207. minut -= 20
  1208. gs 'stat'
  1209. else
  1210. '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.'
  1211. '<center><img src="images/locations/city/citycenter/studio/sex/porgasm.gif" width="400"></center>'
  1212. '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.'
  1213. '<center><img src="images/locations/city/citycenter/studio/sex/pornwalk1.gif" height="200"><img src="images/locations/city/citycenter/studio/sex/pornwalk2.gif" height="200"><img src="images/locations/city/citycenter/studio/sex/pornwalk3.gif" height="200"></center>'
  1214. 'The scene ends with you pulling up your panties and skirt, and step out the door with the four guys'' load still inside you.'
  1215. orgasmbonus += 10
  1216. porngasm += 1
  1217. $orgasm_or = 'yes'
  1218. gs 'arousal', 'anal', 20, 'exhibitionism', 'group'
  1219. gs 'arousal', 'porn', 20, 'exhibitionism', 'group'
  1220. minut -= 20
  1221. gs 'stat'
  1222. end
  1223. gs 'stat'
  1224. gs 'arousal', 'end'
  1225. gs 'stat'
  1226. act 'Shower':gt 'pornstudio', 'shower'
  1227. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1228. end
  1229. end
  1230. end
  1231. end
  1232. if $ARGS[0] = '13':
  1233. if rand(0,1) = 0:pornbj += 1
  1234. if rand(0,1) = 0:pornhj += 1
  1235. pornvag += 1
  1236. pornanal += 1
  1237. porngang += 2
  1238. porncream += 2
  1239. pfType = 1
  1240. cla
  1241. *clr
  1242. minut += 30
  1243. gang += 1
  1244. gs 'stat'
  1245. 'The set is already bustling with assistants setting up lighting, so that there are no shadows.'
  1246. '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...'
  1247. act 'Kneel in front of them':
  1248. cla
  1249. *clr
  1250. gs 'stat'
  1251. '<center><img src="images/locations/city/citycenter/studio/sex/warmupgang.gif" width="500"></center>'
  1252. 'You kneel in front of the guys and start to suck <<$paktor>> and <<$paktor2>> in turns, while giving a handjob to <<$paktor3>> and <<$paktor4>>. Pretty soon they are all hard and ready, and the director nods to you.'
  1253. gs 'arousal', 'hj', 20, 'exhibitionism', 'group'
  1254. gs 'arousal', 'bj', 20, 'exhibitionism', 'group'
  1255. gs 'arousal', 'porn', 20, 'exhibitionism', 'group'
  1256. minut -= 20
  1257. gs 'stat'
  1258. act 'Let them fuck you':
  1259. cla
  1260. *clr
  1261. gs 'boyStat', $pakterID[1]
  1262. sexpartkno = 1
  1263. gs 'cum_manage'
  1264. gs 'boyStat', $pakterID[2]
  1265. sexpartkno = 1
  1266. gs 'cum_manage'
  1267. '<center><img src="images/shared/sex/group/doublevag<<rand(1,4)>>.gif" width="500"></center>'
  1268. if pcs_horny < 85 and pcs_exhibition < 80:
  1269. '<<$paktor>> lies down on the floor, and you sit in his dick, spearing yourself on it in the process. <<$paktor2>> steps behind you and pushes his hard 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 of you at the same time.'
  1270. '<center><img src="images/locations/city/citycenter/studio/sex/porgasmfake.gif" width="400"></center>'
  1271. 'You fake an orgasm for the camera while you wait for them to empty their sack in you.'
  1272. $orgasm_or = 'no'
  1273. gs 'arousal', 'vaginal', 30, 'exhibitionism', 'group'
  1274. gs 'arousal', 'porn', 30, 'exhibitionism', 'group'
  1275. minut -= 30
  1276. gs 'stat'
  1277. else
  1278. orgasmbonus += 10
  1279. porngasm += 1
  1280. '<<$paktor>> lies down on the floor, and you sit in his dick, spearing yourself on it in the process. <<$paktor2>> steps behind you and pushes his hard 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 of you at the same time.'
  1281. '<center><img src="images/locations/city/citycenter/studio/sex/porgasm.gif" width="400"></center>'
  1282. 'You also came around them, crying out in pleasure as you contract around them in your vagina while they empty their sack in you.'
  1283. $orgasm_or = 'yes'
  1284. gs 'arousal', 'vaginal', 30, 'exhibitionism', 'group'
  1285. gs 'arousal', 'porn', 30, 'exhibitionism', 'group'
  1286. minut -= 30
  1287. gs 'stat'
  1288. end
  1289. gs 'stat'
  1290. act 'They fuck your ass':
  1291. cla
  1292. *clr
  1293. gs 'boyStat', $pakterID[3]
  1294. sexpartkno = 1
  1295. spafinloc = 3
  1296. gs 'cum_manage'
  1297. gs 'boyStat', $pakterID[4]
  1298. sexpartkno = 1
  1299. spafinloc = 3
  1300. gs 'cum_manage'
  1301. gs 'stat'
  1302. '<center><img src="images/locations/city/citycenter/studio/sex/doublean<<rand(1,4)>>.gif" width="500"></center>'
  1303. if pcs_horny < 85 and pcs_exhibition < 80:
  1304. 'While still dripping the sperm of the previous two guys from your pussy, <<$paktor3>> and <<$paktor4>> switches places with <<$paktor>> and <<$paktor2>>, but they just dip their dick in your slick pussy, then pushes their dick in your anus. At first the place is pretty tight, but soon start to build up a good rithm. They also cum in you, this time in your ass.'
  1305. '<center><img src="images/locations/city/citycenter/studio/sex/porgasmfake.gif" width="400"></center>'
  1306. 'You fake an another orgasm for the camera while you wait for them to finish in your bowel.'
  1307. $orgasm_or = 'no'
  1308. gs 'arousal', 'anal', 30, 'exhibitionism', 'group'
  1309. gs 'arousal', 'porn', 30, 'exhibitionism', 'group'
  1310. minut -= 30
  1311. gs 'stat'
  1312. else
  1313. orgasmbonus += 10
  1314. porngasm += 1
  1315. 'While still dripping the sperm of the previous two guys from your pussy, <<$paktor3>> and <<$paktor4>> switches places with <<$paktor>> and <<$paktor2>>, but they just dip their dick in your slick pussy, then pushes their dick in your anus. At first the place is pretty tight, but soon start to build up a good rithm. They also cum in you, this time in your ass.'
  1316. '<center><img src="images/locations/city/citycenter/studio/sex/porgasm.gif" width="400"></center>'
  1317. 'You came around them, visibly orgasming as you contract around them, while they finish in your bowel.'
  1318. $orgasm_or = 'yes'
  1319. gs 'arousal', 'anal', 30, 'exhibitionism', 'group'
  1320. gs 'arousal', 'porn', 30, 'exhibitionism', 'group'
  1321. minut -= 30
  1322. gs 'stat'
  1323. end
  1324. gs 'arousal', 'end'
  1325. gs 'stat'
  1326. act 'Shower':gt 'pornstudio', 'shower'
  1327. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1328. end
  1329. end
  1330. end
  1331. end
  1332. if $ARGS[0] = '14':
  1333. porngang += 5
  1334. pornexhib += 5
  1335. pfType = 1
  1336. cla
  1337. *clr
  1338. gang += 1
  1339. guy += 50
  1340. gs 'stat'
  1341. 'The set is already bustling with assistants setting up lighting, so that there are no shadows.'
  1342. 'On the scene there are fifty guys standing around, and you believe this many actor would cost a fortune. The only luck the studio have is that these guys are all your fans, so they came for just the chance to fuck you. They are all nervously talking, and watching your previous works on monitors all around the huge hall.'
  1343. '<center><img src="images/locations/city/citycenter/studio/sex/touching.gif" width="500"></center>'
  1344. 'You lie down on the stage, and let them touch you to get them into the mood.'
  1345. gs 'arousal', 'foreplay', 60, 'gangbang'
  1346. gs 'stat'
  1347. act 'Undress and lie on the bed':
  1348. cla
  1349. *clr
  1350. gs 'npcgeneratec', 0, 'Porn Fan', rand(22,38)
  1351. gs 'boyStat', $npclastgenerated
  1352. bj50 = rand(0,8)
  1353. hj50 = rand(0,8)
  1354. lip50 = rand(0,8)
  1355. anal50 = rand(0,8)
  1356. bukk50 = rand(0,8)
  1357. sex50 = 50 - bj50 - hj50 - lip50 - anal50 - bukk50
  1358. stat['vaginal'] += 50-anal50
  1359. if bj50 > 5:pornbj += 1
  1360. if hj50 > 5:
  1361. pornhj += 1 & pornbukk += 1
  1362. elseif hj50 > 5:
  1363. pornhj += 1
  1364. end
  1365. if lip50 > 5:pornbj += 1 & pornswall += 1
  1366. if anal50 > 5:pornanal += 1
  1367. if bukk50 > 5:pornbukk += 1
  1368. if sex50 > 45:
  1369. pornvag += 5
  1370. porncream += 5
  1371. elseif sex50 > 35:
  1372. pornvag += 4
  1373. porncream += 4
  1374. elseif sex50 > 25:
  1375. pornvag += 3
  1376. porncream += 3
  1377. elseif sex50 > 15:
  1378. pornvag += 2
  1379. porncream += 2
  1380. elseif sex50 > 5:
  1381. pornvag += 1
  1382. porncream += 1
  1383. end
  1384. sexpartkno = 0
  1385. pfcounter = 0
  1386. :gbblow
  1387. if bj50 > 0:
  1388. pfcounter += 1
  1389. cumprecheck = 1
  1390. gs 'cum_manage'
  1391. spafinloc = 12
  1392. gs 'cum_manage'
  1393. bj50 -= 1
  1394. stat['bj'] += 1
  1395. swallow += 1
  1396. end
  1397. if bj50 > 0: jump 'gbblow'
  1398. :gbhand
  1399. if hj50 > 0:
  1400. pfcounter += 1
  1401. cumprecheck = 1
  1402. gs 'cum_manage'
  1403. spafinloc = 13
  1404. gs 'cum_manage'
  1405. hj50 -= 1
  1406. stat['hj'] += 1
  1407. end
  1408. if hj50 > 0: jump 'gbhand'
  1409. :gbface
  1410. if lip50 > 0:
  1411. pfcounter += 1
  1412. cumprecheck = 1
  1413. gs 'cum_manage'
  1414. if rand(0,1)=0:
  1415. spafinloc = 11
  1416. else
  1417. spafinloc = 16
  1418. end
  1419. gs 'cum_manage'
  1420. lip50 -= 1
  1421. facial += 1
  1422. end
  1423. if lip50 > 0: jump 'gbface'
  1424. :gbass
  1425. if anal50 > 0:
  1426. pfcounter += 1
  1427. spafinloc = 3
  1428. gs 'cum_manage'
  1429. anal50 -= 1
  1430. stat['anal'] += 1
  1431. end
  1432. if anal50 > 0: jump 'gbass'
  1433. :gbbukk
  1434. if bukk50 > 0:
  1435. pfcounter += 1
  1436. cumprecheck = 1
  1437. gs 'cum_manage'
  1438. bukkloc = rand(0,6)
  1439. if bukkloc = 0:
  1440. spafinloc = 1
  1441. elseif bukkloc = 1:
  1442. spafinloc = 4
  1443. elseif bukkloc = 2:
  1444. spafinloc = 8
  1445. elseif bukkloc = 3:
  1446. spafinloc = 9
  1447. elseif bukkloc = 4:
  1448. spafinloc = 10
  1449. elseif bukkloc = 5:
  1450. spafinloc = 14
  1451. else
  1452. spafinloc = 15
  1453. end
  1454. gs 'cum_manage'
  1455. bukk50 -= 1
  1456. end
  1457. if bukk50 > 0: jump 'gbbukk'
  1458. :gbsex
  1459. if sex50 > 0:
  1460. pfcounter += 1
  1461. gs 'cum_manage'
  1462. sex50 -= 1
  1463. end
  1464. if sex50 > 0: jump 'gbsex'
  1465. gangOrg = 0
  1466. if pcs_horny > 70 and pcs_exhibition > 80:gangOrg = rand(1,5) & orgazm += gangOrg & pcs_horny = rand(0,50)
  1467. if gangOrg = 1:
  1468. $gangorg = ' and you still managed to have an orgasm.'
  1469. $orgasm_or = 'yes'
  1470. elseif gangOrg > 0:
  1471. $gangorg = ' and you still managed to orgasm <<gangOrg>> times.'
  1472. $orgasm_or = 'yes'
  1473. else
  1474. $gangorg = '.'
  1475. end
  1476. orgasmbonus += gangOrg*10
  1477. porngasm += gangOrg
  1478. gs 'stat'
  1479. '<center><img src="images/locations/city/citycenter/studio/sex/fuckfifty<<rand(0,12)>>.gif" width="500"></center>'
  1480. 'Your fans gather around you, and starts to fuck you with great entusiasm, but little technique. Most of them cum almost immediately when they are in your body, but since they are many, 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.'
  1481. gs 'arousal', 'vaginal', 360, 'gangbang'
  1482. gs 'arousal', 'end'
  1483. gs 'stat'
  1484. act 'Shower':gt 'pornstudio', 'shower'
  1485. act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
  1486. end
  1487. end
  1488. --- pornfilm ---------------------------------