garfather 8.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228
  1. # garfather
  2. fatherAge = year - (((npc_dob['A28']) - (npc_dob['A28'] mod 10000)) / 10000)
  3. gs 'stat'
  4. gs 'dinfather'
  5. $metkaM = $ARGS[0]
  6. $locM = $CURLOC
  7. $location_type = 'event'
  8. '<center><B><font color=maroon>Your stepfather, Vladimir Mikhailovich Scriabin</font></B></center>'
  9. '<center><img src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
  10. 'Your stepfather is a greying, slightly flabby man working as a truck driver. He is <<fatherAge>> years old. Your mother divorced your biological father and married Vladimir when you were only one year old. You''ve never seen your biological father since their divorce, and as such you have no real memory of him.'
  11. dynamic $fatherRep
  12. act 'Move away':gt $loc, $metka
  13. act 'Chat':
  14. cls
  15. minut+=rand(10,15)
  16. gs 'stat'
  17. '<center><B><font color=maroon>Your stepfather, Vladimir Mikhailovich Scriabin</font></B></center>'
  18. '<center><img src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
  19. 'Your stepfather is sitting on a chair, twirling some kind of dirty car part in his hands. You sit down next to him on a nearby chair.'
  20. dynamic $fatherRep
  21. if hour>=20 and hour<21:
  22. act 'Move away':gt $loc, $metka
  23. else
  24. act 'Continue':gt $locM, $metkaM
  25. end
  26. if npc_rel['A28']<20:
  27. dynamic $d_fathergar[1]
  28. elseif npc_rel['A28']>=20 and npc_rel['A28']<40:
  29. dynamic $d_fathergar[2]
  30. elseif npc_rel['A28'] >=40:
  31. if pcs_apprnc<=60:
  32. dynamic $d_fathergar[3]
  33. end
  34. if pcs_apprnc>60:
  35. dynamic $d_fathergar[4]
  36. end
  37. end
  38. end
  39. act 'Help':
  40. cls
  41. minut += 60
  42. pcs_sweat += 10
  43. gs 'stat'
  44. '<center><B><font color=maroon>Stepfather Vladimir Skryabin</font></B></center>'
  45. '<center><img src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
  46. 'Your stepfather is sitting on a chair, twirling some kind of dirty car part in his hands. You sit down next to him on a nearby chair.'
  47. dynamic $fatherRep
  48. if hour >= 20 and hour < 21:
  49. act 'Move away':gt $loc, $metka
  50. else
  51. act 'Continue':gt $locM, $metkaM
  52. end
  53. if npc_rel['A28'] < 20:
  54. dynamic $d_fatherhelp[1]
  55. elseif npc_rel['A28'] >= 20 and npc_rel['A28'] < 40:
  56. dynamic $d_fatherhelp[2]
  57. elseif npc_rel['A28'] >= 40:
  58. if pcs_apprnc <= 60:
  59. dynamic $d_fatherhelp[3]
  60. end
  61. if pcs_apprnc > 60:
  62. dynamic $d_fatherhelp[4]
  63. end
  64. end
  65. end
  66. if pcs_horny > 50 and hadsexwithfather = 1:
  67. act 'Seduce your stepfather':
  68. gs 'boyStat', 28
  69. cla
  70. *clr
  71. '<center><img src="images/locations/pavlovsk/garage/father/sex/father.gar.pre<<rand(0,5)>>.jpg"></center>'
  72. 'You walk up to the Gazelle and pick up a sponge. Bending slightly forwards, you begin washing the car and simultaneously putting your ass on display for your stepfather.'
  73. '"- Oh..." - Stepfather did not expect this from you, but his involuntary exhalation and kindled eyes tell you he is enjoying it very much.'
  74. 'Your stepfather walks up behind you and puts his hands on your ass. He leisurely begins to knead your butt.'
  75. gs 'arousal', 'foreplay', 3, 'sub', 'incest'
  76. gs 'stat'
  77. act 'Get down on your knees':
  78. cla
  79. *clr
  80. gs 'stat'
  81. '<center><img src="images/shared/sex/blowjob/bimbo.knees<<rand(1,3)>>.jpg"></center>'
  82. 'You fall on your knees in front of your stepfather and place the palm of your hand on his crotch. You can feel his erection through the fabric of his jeans, and begin to caress him. After a while you unzip his pants and pull out his cock, taking a firm grasp on it with one hand.'
  83. gs 'arousal', 'hj', 3, 'sub', 'incest'
  84. gs 'stat'
  85. act 'Take his dick in your mouth':
  86. cla
  87. *clr
  88. gs 'stat'
  89. if pcs_throat < dick:pcs_throat += 1
  90. '<center><img src="images/locations/pavlovsk/garage/father/sex/father.gar.0,<<rand(0,4)>>.jpg"></center>'
  91. 'Your stepfather opens the passenger side door of the Gazelle, and you sit down on the seat. He places a hand on your head and guides his dick towards your mouth.'
  92. 'You leisurely lick your stepfather''s dick, caress his balls, and then take his cock in your mouth. Soon the cock began to throb, giving signs of an early end.'
  93. gs 'arousal', 'bj', 5, 'sub', 'incest'
  94. gs 'stat'
  95. act 'Suck him off and swallow his sperm':
  96. cls
  97. if npc_rel['A28']<100:npc_rel['A28']+=2
  98. fatherSuck+=1
  99. sexpartkno = 1
  100. spafinloc = 12
  101. gs 'cum_manage'
  102. swallow += 1
  103. water -= 10
  104. gs 'stat'
  105. ! WD: Correct Image path ~ 'СЃ0,' to 'с0,' Cyrillic Unicode broke during translation
  106. '<center><img src="images/shared/sex/cum/mouth/cum1,<<rand(0,10)>>.gif"></center>'
  107. 'You continue to suck your stepfather''s dick as it continues throbbing. Suddenly, he arches his back and you feel cum begin to pour into your mouth. Although you try your best, the amount of cum flowing from your stepfathers dick is simply too much for you, and some of it instead flows out of your mouth and down your chin. Soon your <<$boydesc>> finishes and you pull his cock out of your sperm-smelling mouth. You can feel the taste of sperm in your mouth, and your <<$liptalk3>> are wet with cum.'
  108. gs 'arousal', 'bj', 10, 'sub', 'incest'
  109. gs 'arousal', 'end'
  110. gs 'stat'
  111. act 'Move away':gt 'gargazel'
  112. end
  113. act 'Take his load on your face':
  114. cls
  115. if npc_rel['A28']<100:npc_rel['A28']+=2
  116. fatherSuck+=1
  117. sexpartkno = 1
  118. spafinloc = 11
  119. gs 'cum_manage'
  120. facial += 1
  121. gs 'stat'
  122. ! WD: Correct Image path ~ 'С„0,' to 'ф0,' Cyrillic Unicode broke during translation
  123. if rand1<49:'<center><img src="images/shared/sex/cum/facial/facial0,<<rand(0,9)>>.jpg"></center>'
  124. if rand1=>50:'<center><img src="images/shared/sex/cum/facial/facial0,<<rand(0,9)>>.jpg"></center>'
  125. 'You stop sucking on your stepfather''s cock just as he reaches orgasm, and a jet of sperm immediately hits you in the face. You squeeze your eyes shut for fear of getting cum in your eyes and feel another jet of hot sperm land on your face.'
  126. gs 'arousal', 'bj', 10, 'sub', 'incest'
  127. gs 'arousal', 'end'
  128. gs 'stat'
  129. act 'Move away':gt 'gargazel'
  130. end
  131. end
  132. act 'Bend over, leaning against the Gazelle':
  133. cla
  134. *clr
  135. if pcs_vag < dick:pcs_vag += 1
  136. '<center><img src="images/locations/pavlovsk/garage/father/sex/father.gar.1,<<rand(0,2)>>.jpg"></center>'
  137. 'Your stepfather grabs you and pulls you up from your knees, turning you to face the Gazelle. You plant your hands on the car, and arch your back to give him easier access to your ass and pussy. Once you''re in position, he begins caressing your pussy and then slams his dick in.'
  138. gs 'arousal', 'vaginal', 10, 'sub', 'incest'
  139. gs 'stat'
  140. dynamic $sexstart
  141. dynamic $sexstart2
  142. act 'Continue':
  143. cla
  144. *clr
  145. gs 'stat'
  146. sexpartkno = 1
  147. if npc_rel['A28'] < 100:npc_rel['A28'] += 3
  148. if fathersex = 0:guy += 1
  149. FatherSex += 1
  150. '<center><img src="images/locations/pavlovsk/garage/father/sex/father.gar.cum1,0.jpg"></center>'
  151. if protect = 0:
  152. 'After a thorough fucking, you feel your stepfather''s cock begin to throb within you. Your stepfather''s body spasms, his cock filling your pussy with his sperm.'
  153. gs 'arousal', 'vaginal', 10, 'sub', 'incest'
  154. gs 'cum_manage'
  155. pcs_mood -= 15
  156. pcs_willpwr -= 15
  157. gs 'cuminsidereact', 'your stepfather'
  158. else
  159. 'After a thorough fucking, you feel your stepfather''s cock begin to throb within you. Your stepfather''s body spasms, his cock filling the condom with his sperm.'
  160. gs 'arousal', 'vaginal', 10, 'sub', 'incest'
  161. gs 'cum_manage'
  162. end
  163. gs 'arousal', 'end'
  164. gs 'stat'
  165. act 'Move away':gt 'gargazel'
  166. end
  167. end
  168. end
  169. end
  170. end
  171. if fatherdrunk=1:
  172. cla
  173. cls
  174. minut+=60
  175. gs 'stat'
  176. '<center><B><font color=maroon>Your stepfather, Vladimir Mikhailovich Scriabin</font></B></center>'
  177. '<center><img src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
  178. 'Your stepfather is a greying, slightly flabby man who works as a truck driver. He is <<fatherAge>> years old. Your mother divorced your biological father and married Vladimir when you were only one year old. You''ve never seen your biological father since their divorce, and as such you have no real memory of him.'
  179. dynamic $fatherRep
  180. act 'Move away':gt $loc, $metka
  181. if npc_rel['A28']<20:
  182. dynamic $d_fatherdrunk[1]
  183. elseif npc_rel['A28']>=20 and npc_rel['A28']<40:
  184. dynamic $d_fatherdrunk[2]
  185. elseif npc_rel['A28'] >=40:
  186. if pcs_apprnc<=60:
  187. dynamic $d_fatherdrunk[3]
  188. end
  189. if pcs_apprnc>60:
  190. dynamic $d_fatherdrunk[4]
  191. end
  192. end
  193. end
  194. --- garfather ---------------------------------