podrsex.qsrc 7.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254
  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. if sub <= 0:
  17. if sexvar ! 1:
  18. act 'Suck his dick':gt 'podrsex', 'suck'
  19. act 'Let him fuck your pussy':gt 'podrsex', 'pussy'
  20. act 'Let him fuck your ass':gt 'podrsex', 'ass'
  21. act 'Watch him fuck the other girl':gt 'podrsex', 'voy'
  22. else
  23. act 'Suck him off':gt 'podrsex', 'suck'
  24. act 'Ask him to cum in your pussy':gt 'podrsex', 'pussy'
  25. act 'Ask him to cum in your ass':gt 'podrsex', 'ass'
  26. if pcs_dom > 10:act 'Make him cum in the other girl':gt 'podrsex', 'voy'
  27. end
  28. else
  29. podrand = rand(0,3)
  30. if podrand = 0:
  31. xgt 'podrsex', 'suck'
  32. elseif podrand = 1:
  33. xgt 'podrsex', 'pussy'
  34. elseif podrand = 2:
  35. xgt 'podrsex', 'ass'
  36. else
  37. xgt 'podrsex', 'voy'
  38. end
  39. end
  40. end
  41. if $ARGS[0] = 'suck':
  42. *clr
  43. menu_off = 1
  44. sexvar -= 1
  45. if sexvar < 0: sexstart = 0
  46. gs 'dinsex2', 'stamina_npc'
  47. pos = 1
  48. if pdsxbj = 0: pdsxbj = 1
  49. '<center><img <<$set_imgh>> src="images/locations/shared/sex/pod/minet<<picrand>>.jpg"></center>'
  50. '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.'
  51. gs 'arousal', 'bj', 10, 'sub', 'group'
  52. gs 'stat'
  53. if pcs_horny >= (randhorny - pcs_exhib):
  54. '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.'
  55. $orgasm_or = 'yes'
  56. gs 'arousal', 'masturbate', 5
  57. gs 'stat'
  58. end
  59. if sexvar = 1:'<br>The man groans that he will cum soon.'
  60. if sexvar > 0:xgt 'podrsex', 'var'
  61. if sexvar = 0:
  62. *clr
  63. '<br><center><img <<$set_imgh>> src="images/locations/shared/sex/pod/cum<<picrand>>.jpg"></center>'
  64. spafinloc = 12
  65. gs 'cum_manage'
  66. gs 'podrsex', 'end'
  67. end
  68. end
  69. if $ARGS[0] = 'pussy':
  70. *clr
  71. menu_off = 1
  72. sexvar -= 1
  73. if sexvar < 0: sexstart = 0
  74. gs 'dinsex2', 'stamina_npc'
  75. pos = 2
  76. cumprecheck = 1
  77. gs 'cum_manage'
  78. if pdsxsex = 0: pdsxsex = 1
  79. '<center><img <<$set_imgh>> src="images/locations/shared/sex/pod/uvag<<picrand>>.jpg"></center>'
  80. 'The man eagerly penetrates your pussy, and begins to thrust his length inside you over and over bringing you pleasure.'
  81. gs 'arousal', 'vaginal', 10, 'sub', 'group'
  82. gs 'stat'
  83. if pcs_horny >= (randhorny - pcs_exhib):
  84. '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.'
  85. $orgasm_or = 'yes'
  86. gs 'stat'
  87. end
  88. if sexvar = 1:'<br>The man groans that he will cum soon.'
  89. if sexvar > 0:xgt 'podrsex', 'var'
  90. if sexvar = 0:
  91. gs 'cum_manage'
  92. gs 'podrsex', 'end'
  93. end
  94. end
  95. if $ARGS[0] = 'ass':
  96. *clr
  97. menu_off = 1
  98. sexvar -= 1
  99. if sexvar < 0: sexstart = 0
  100. gs 'dinsex2', 'stamina_npc'
  101. pos = 3
  102. if pdsxanal = 0: pdsxanal = 1
  103. '<center><img <<$set_imgh>> src="images/locations/shared/sex/pod/uanal<<picrand>>.jpg"></center>'
  104. '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.'
  105. gs 'arousal', 'anal', 10, 'sub', 'group'
  106. gs 'stat'
  107. if pcs_horny >= (randhorny - pcs_exhib):
  108. '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.'
  109. $orgasm_or = 'yes'
  110. gs 'stat'
  111. end
  112. if sexvar = 1:'<br>The man groans that he will cum soon.'
  113. if sexvar > 0:xgt 'podrsex', 'var'
  114. if sexvar = 0:
  115. spafinloc = 3
  116. gs 'cum_manage'
  117. gs 'podrsex', 'end'
  118. end
  119. end
  120. if $ARGS[0] = 'voy':
  121. *clr
  122. menu_off = 1
  123. sexvar -= 1
  124. if sexvar < 0: sexstart = 0
  125. gs 'dinsex2', 'stamina_npc'
  126. if pcs_horny >= (randhorny - pcs_exhib):
  127. $orgasm_or = 'custom'
  128. $orgasm_txt = 'You have an orgasm.'
  129. gs 'stat'
  130. end
  131. if rand(0,1) = 0:
  132. pos = 4
  133. '<center><img <<$set_imgh>> src="images/locations/shared/sex/pod/vag<<picrand>>.jpg"></center>'
  134. '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.'
  135. gs 'arousal', 'cuni', 10, 'lesbian', 'dom', 'group'
  136. gs 'stat'
  137. else
  138. pos = 5
  139. '<center><img <<$set_imgh>> src="images/locations/shared/sex/pod/anal<<picrand>>.jpg"></center>'
  140. '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.'
  141. gs 'arousal', 'cuni', 10, 'lesbian', 'dom', 'group'
  142. gs 'stat'
  143. end
  144. if sexvar = 1:'<br>The man groans that he will cum soon.'
  145. if sexvar > 0:xgt 'podrsex', 'var'
  146. if sexvar = 0:
  147. spafinloc = 12
  148. gs 'cum_manage'
  149. gs 'podrsex', 'end'
  150. end
  151. end
  152. if $ARGS[0] = 'end':
  153. cla
  154. menu_off = 1
  155. pdsxbj = 0
  156. pdsxsex = 0
  157. pdsxanal = 0
  158. sexstart = 0
  159. if pos = 1:
  160. '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.'
  161. gs 'arousal', 'kiss', 5, 'lesbian'
  162. gs 'arousal', 'end'
  163. gs 'stat'
  164. elseif pos = 2:
  165. 'The man groans, pumping his seed deep inside your pussy.'
  166. tmp = func 'pregriskeval'
  167. if tmp = 0:
  168. '<br>"Oh, shit!" you think, when you feel his cock pumping his load deep inside you. Hopefully you won''t end up pregnant...'
  169. gs 'arousal', 'end'
  170. gs 'stat'
  171. elseif tmp > 0:
  172. '<br>You push against him when you feel his cock pumping his load deep inside you. Maybe you''ll end up pregnant...'
  173. gs 'arousal', 'end'
  174. gs 'stat'
  175. end
  176. elseif pos = 3:
  177. spafinloc = 3
  178. 'The man groans, pumping his seed deep inside your ass.'
  179. gs 'arousal', 'end'
  180. gs 'stat'
  181. elseif pos = 4:
  182. 'He groans, pumping her pussy full of cum.'
  183. tmp = func 'pregriskeval'
  184. if tmp > 0:
  185. '<br>It''s exciting to watch another woman being pumped full of sperm. Maybe''ll she end up pregnant with his bastard son... '
  186. gs 'arousal', 'end'
  187. gs 'stat'
  188. else
  189. '<br>It''s hot to see another woman being pumped full of cum, but You just hope she''s on the pill right now...'
  190. gs 'arousal', 'end'
  191. gs 'stat'
  192. end
  193. elseif pos = 5:
  194. 'He groans, pumping her ass full of cum.'
  195. gs 'arousal', 'end'
  196. gs 'stat'
  197. end
  198. pos = 0
  199. gs 'stat'
  200. act 'Leave':
  201. if picrand = 26 or picrand = 27 or picrand = 29:gt 'office', 'work'
  202. if picrand >= 30 and picrand <= 32:gt 'down'
  203. if picrand = 19:gt 'tanhousezal'
  204. if kazsexdva = 1:
  205. kazsexdva = 0
  206. gt 'kazinosvid', '3'
  207. end
  208. gt $sexloc, 'start'
  209. end
  210. end
  211. --- podrsex ---------------------------------