1
0

podrsex.qsrc 6.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238
  1. # podrsex
  2. if $ARGS[0] = 'start':
  3. menu_off = 1
  4. gs 'sweat', 'add', 10
  5. girl += 1
  6. guy += 1
  7. lesbian += 1
  8. picrand = rand(0, 1)
  9. xgt 'podrsex', 'var'
  10. end
  11. if $ARGS[0] = 'var':
  12. cla
  13. menu_off = 1
  14. randhorny = rand(50,100)
  15. gs 'stat'
  16. act 'Suck his dick':gt 'podrsex', 'suck'
  17. act 'Let him fuck your pussy':gt 'podrsex', 'pussy'
  18. act 'Let him fuck your ass':gt 'podrsex', 'ass'
  19. act 'Watch him fuck the other girl':gt 'podrsex', 'voy'
  20. end
  21. if $ARGS[0] = 'suck':
  22. *clr
  23. menu_off = 1
  24. sexvar -= 1
  25. if sexvar < 0: sexstart = 0
  26. gs 'dinsex2', 'stamina_npc'
  27. pos = 1
  28. if pdsxbj = 0: pdsxbj = 1
  29. '<center><img <<$set_imgh>> src="images/locations/shared/sex/pod/minet<<picrand>>.jpg"></center>'
  30. 'You look the other girl deep in the eyes while the two of you suck the man''s cock, touching her tongue with yours when you reach it around his shaft. Then the two of you take turns sucking him off enthusiastically, while the other licks his balls.'
  31. gs 'arousal', 'bj', 10, 'sub', 'group'
  32. gs 'stat'
  33. if pcs_horny >= (randhorny - pcs_exhib):
  34. 'You feel so horny in this situation, you''re very close to having a spontaneous orgasm with the guy''s cock still in your mouth. The other girl notices and gives you a sweet wink while she takes over, giving you some time to rub your clit furiously.'
  35. $orgasm_or = 'yes'
  36. gs 'arousal', 'masturbate', 5
  37. gs 'stat'
  38. end
  39. if sexvar = 1:'<br>The man groans that he will cum soon.'
  40. if sexvar > 0:xgt 'podrsex', 'var'
  41. if sexvar = 0:
  42. *clr
  43. '<br><center><img <<$set_imgh>> src="images/locations/shared/sex/pod/cum<<picrand>>.jpg"></center>'
  44. spafinloc = 12
  45. gs 'cum_manage'
  46. gs 'podrsex', 'end'
  47. end
  48. end
  49. if $ARGS[0] = 'pussy':
  50. *clr
  51. menu_off = 1
  52. sexvar -= 1
  53. if sexvar < 0: sexstart = 0
  54. gs 'dinsex2', 'stamina_npc'
  55. pos = 2
  56. cumprecheck = 1
  57. gs 'cum_manage'
  58. if pdsxsex = 0: pdsxsex = 1
  59. '<center><img <<$set_imgh>> src="images/locations/shared/sex/pod/uvag<<picrand>>.jpg"></center>'
  60. 'The man eagerly penetrates your pussy, and begins to thrust his length inside you over and over bringing you pleasure.'
  61. gs 'arousal', 'vaginal', 10, 'sub', 'group'
  62. gs 'stat'
  63. if pcs_horny >= (randhorny - pcs_exhib):
  64. 'You feel so horny in this situation, you''re very close to having a spontaneous orgasm. You close your eyes and surrender yourself to the moment, reaching an explosive orgasm without ever touching yourself.'
  65. $orgasm_or = 'yes'
  66. gs 'stat'
  67. end
  68. if sexvar = 1:'<br>The man groans that he will cum soon.'
  69. if sexvar > 0:xgt 'podrsex', 'var'
  70. if sexvar = 0:
  71. gs 'cum_manage'
  72. gs 'podrsex', 'end'
  73. end
  74. end
  75. if $ARGS[0] = 'ass':
  76. *clr
  77. menu_off = 1
  78. sexvar -= 1
  79. if sexvar < 0: sexstart = 0
  80. gs 'dinsex2', 'stamina_npc'
  81. pos = 3
  82. if pdsxanal = 0: pdsxanal = 1
  83. if picrand = 12:
  84. '<center><img <<$set_imgh>> src="images/locations/shared/sex/sexdvanadva/uanal<<picrand>>.jpg"></center>'
  85. else
  86. '<center><img <<$set_imgh>> src="images/locations/shared/sex/pod/uanal<<picrand>>.jpg"></center>'
  87. end
  88. 'The man slowly works the tip of his cock inside your ass, and halts for a moment so you can get used to the sensation. Then he begins to thrust his length inside you, fucking you more and more intensely with less regard for your feelings and more for his own pleasure.'
  89. gs 'arousal', 'anal', 10, 'sub', 'group'
  90. gs 'stat'
  91. if pcs_horny >= (randhorny - pcs_exhib):
  92. 'You feel so horny in this situation, you''re very close to having a spontaneous orgasm. You close your eyes and surrender yourself to the moment, reaching an explosive orgasm without ever touching yourself.'
  93. $orgasm_or = 'yes'
  94. gs 'stat'
  95. end
  96. if sexvar = 1:'<br>The man groans that he will cum soon.'
  97. if sexvar > 0:xgt 'podrsex', 'var'
  98. if sexvar = 0:
  99. spafinloc = 3
  100. gs 'cum_manage'
  101. gs 'podrsex', 'end'
  102. end
  103. end
  104. if $ARGS[0] = 'voy':
  105. *clr
  106. menu_off = 1
  107. sexvar -= 1
  108. if sexvar < 0: sexstart = 0
  109. gs 'dinsex2', 'stamina_npc'
  110. if pcs_horny >= (randhorny - pcs_exhib):
  111. $orgasm_or = 'custom'
  112. $orgasm_txt = 'You have an orgasm.'
  113. gs 'stat'
  114. end
  115. if rand(0,1) = 0:
  116. pos = 4
  117. '<center><img <<$set_imgh>> src="images/locations/shared/sex/pod/vag<<picrand>>.jpg"></center>'
  118. 'While the other girl is enjoying getting her pussy fucked, you find that she''ll do whatever you want her to do. She eagerly licks your pussy when you put it on her mouth, and lap up her sweet juices while the guy rams his cock inside her repeatedly.'
  119. gs 'arousal', 'cuni', 10, 'lesbian', 'dom', 'group'
  120. gs 'stat'
  121. else
  122. pos = 5
  123. '<center><img <<$set_imgh>> src="images/locations/shared/sex/pod/anal<<picrand>>.jpg"></center>'
  124. 'While the other girl is enjoying getting her ass fucked, you find that she''ll do whatever you want her to do. She eagerly licks your pussy when you put it on her mouth, and lap up her sweet juices while the guy rams his cock inside her repeatedly.'
  125. gs 'arousal', 'cuni', 10, 'lesbian', 'dom', 'group'
  126. gs 'stat'
  127. end
  128. if sexvar = 1:'<br>The man groans that he will cum soon.'
  129. if sexvar > 0:xgt 'podrsex', 'var'
  130. if sexvar = 0:
  131. spafinloc = 12
  132. gs 'cum_manage'
  133. gs 'podrsex', 'end'
  134. end
  135. end
  136. if $ARGS[0] = 'end':
  137. cla
  138. menu_off = 1
  139. pdsxbj = 0
  140. pdsxsex = 0
  141. pdsxanal = 0
  142. sexstart = 0
  143. if pos = 1:
  144. 'The man''s cock erupts, shooting his load over your face and the other girl. The two of you giggle and lick his cock clean, kissing each other in the process.'
  145. gs 'arousal', 'kiss', 5, 'lesbian'
  146. gs 'arousal', 'end'
  147. gs 'stat'
  148. elseif pos = 2:
  149. 'The man groans, pumping his seed deep inside your pussy.'
  150. tmp = func 'pregriskeval'
  151. if tmp = 0:
  152. '<br>"Oh, shit!" you think, when you feel his cock pumping his load deep inside you. Hopefully you won''t end up pregnant...'
  153. gs 'arousal', 'end'
  154. gs 'stat'
  155. elseif tmp > 0:
  156. '<br>You push against him when you feel his cock pumping his load deep inside you. Maybe you''ll end up pregnant...'
  157. gs 'arousal', 'end'
  158. gs 'stat'
  159. end
  160. elseif pos = 3:
  161. spafinloc = 3
  162. 'The man groans, pumping his seed deep inside your ass.'
  163. gs 'arousal', 'end'
  164. gs 'stat'
  165. elseif pos = 4:
  166. 'He groans, pumping her pussy full of cum.'
  167. tmp = func 'pregriskeval'
  168. if tmp > 0:
  169. '<br>It''s exciting to watch another woman being pumped full of sperm. Maybe''ll she end up pregnant with his bastard son... '
  170. gs 'arousal', 'end'
  171. gs 'stat'
  172. else
  173. '<br>It''s hot to see another woman being pumped full of cum, but You just hope she''s on the pill right now...'
  174. gs 'arousal', 'end'
  175. gs 'stat'
  176. end
  177. elseif pos = 5:
  178. 'He groans, pumping her ass full of cum.'
  179. gs 'arousal', 'end'
  180. gs 'stat'
  181. end
  182. pos = 0
  183. gs 'stat'
  184. act 'Leave':
  185. if picrand = 26 or picrand = 27 or picrand = 29:gt 'office', 'work'
  186. if picrand >= 30 and picrand <= 32:gt 'down'
  187. if picrand = 19:gt 'tanhousezal'
  188. if kazsexdva = 1:
  189. kazsexdva = 0
  190. gt 'kazinosvid', '3'
  191. end
  192. gt $sexloc, 'start'
  193. end
  194. end
  195. --- podrsex ---------------------------------