1
0

IgorHanter.qsrc 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324
  1. # IgorHanter
  2. gs 'boyStat', 'A173'
  3. $boybody = 'high'
  4. $boybod = 'athletic'
  5. $boyface = 'brunette'
  6. lover_picture_number = 31
  7. finance = 1
  8. vneshBoy = 8
  9. $boyClo = 'dressed in jeans and a sweater.'
  10. figurBoy = 1
  11. titBoy = 1
  12. hairBoy = 3
  13. harakBoy = 1
  14. izvrat = 0
  15. boyage = year - ((npc_dob['A173'] - (npc_dob['A173'] mod 10000)) / 10000)
  16. boy_birth_date = 9
  17. boy_birth_month = 6
  18. gs 'stat'
  19. '<center><b><font color = maroon>Igor Anisimov</font></b></center>'
  20. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/igorhanter.jpg"></center>'
  21. 'Igor is a hunter along with the Sergei and Andrei and is here visiting Andrei. He''s <<boyage>> years old. He is not married and lives in the City Center..'
  22. if hantersIgorQw < 0:'You and him have a bad relationship, because you offended him in the past.'
  23. if hantersIgorQw >= 0 and hantersIgorQw < 10:'You have a normal relationship with him.'
  24. if hantersIgorQw >= 10 and hantersIgorQw < 20:'You have friendly relations with him.'
  25. if hantersIgorQw >= 20 and hantersIgorQw < 25:'You''re good friends.'
  26. if hantersIgorQw >= 25 and hantersIgorQw < 30:'It seems he has a crush on you.'
  27. if hantersIgorQw >= 30 and hantersIgorQw <= 35:'You have a mutual crush on each other.'
  28. if hantersIgorQw > 35 :'You love him.'
  29. if hantersIgorLove = 1:'You two have fallen in love.'
  30. if hantersIgorLove = 2:'<<$boydesc>> is your boyfriend.'
  31. if hantersIgorLove = 3:'<<$boydesc>> is your husband.'
  32. act 'Chat':
  33. *clr & cla
  34. minut += 60
  35. if hantersIgorQw < 10:hantersIgorQw += 1
  36. gs 'stat'
  37. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/talk1.'+rand(1,3)+'.jpg"></center>'
  38. if hantersIgorQw >= 0:'You have a chat with Igor, swapping stories about life and love.'
  39. if hantersIgorQw < 0:'You talk to Igor. He wears his heart on his sleeve, so you can tell he doesn''t like you.'
  40. act'Continue':gt $loc, $metka
  41. end
  42. if hantersIgorQw >= 10:
  43. if hantersIgorLove = 0:
  44. act 'Flirt':
  45. minut += 120
  46. !!not using arousal as no orgasm chance
  47. pcs_horny += 10
  48. *clr & cla
  49. if hantersIgorQw <= 35 and hantersKnowSlut = 0:hantersIgorQw += 1
  50. if hantersAndreiQw >= 10 and hantersKnowSlut = 0:hantersAndreiQw -= 1
  51. if hantersSergeiQw >= 10 and hantersKnowSlut = 0:hantersSergeiQw -= 1
  52. gs 'stat'
  53. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterflirt1.'+rand(1,3)+'.jpg"></center>'
  54. 'You spend time with Igor, flirting all the while. He flirts back, and blushes when you catch him checking you out.'
  55. gs 'stat'
  56. if hantersIgorLove = 0 and hantersIgorQw >= 35 and hantersKnowSlut = 0 and bfA = 1 and pcs_apprnc >= 60:
  57. *clr & cla
  58. gs 'stat'
  59. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss1.jpg"></center>'
  60. 'You smile sweetly at Igor. Suddenly Igor steals a kiss when you didnt expect it. You can feel his breath on your skin, smell the scent of the soap he used to clean himself. Suddenly, he looks embarrassed by what he just did and waits to see what your response will be.'
  61. gs 'arousal', 'foreplay', 5
  62. gs 'stat'
  63. act 'Answer kiss':
  64. *clr & cla
  65. pcs_mood = 100
  66. hantersIgorLove = 1
  67. hantersIgorQw += 1
  68. gs 'stat'
  69. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss2.jpg"></center>'
  70. 'You move closer to him and begin kissing him again. Igor gently kisses you back.'
  71. gs 'arousal', 'kiss', 5
  72. gs 'stat'
  73. if pcs_horny >= 40:
  74. act'Continue':
  75. *clr & cla
  76. minut += 5
  77. gs 'stat'
  78. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss3.jpg"></center>'
  79. '"<<$pcs_nickname>>, Do you want to..?" Igor asked in a whisper, when your lips finally parted. "Yes" you say just as quietly and Igor gently took your hand and led you inside.'
  80. act 'Go inside':gt 'HanterLoveSex','Igor'
  81. end
  82. else
  83. act'Continue':
  84. *clr & cla
  85. minut += 5
  86. gs 'stat'
  87. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss3.jpg"></center>'
  88. '"It was everything I hoped for, <<$pcs_nickname>>," Igor whispered, when your lips finally parted. You melt in his hands and spend a few minutes cuddling together.'
  89. act'Continue':gt $loc, $metka
  90. end
  91. end
  92. end
  93. act 'To remove the face':
  94. *clr & cla
  95. minut += 5
  96. hantersIgorQw -= 50
  97. gs 'stat'
  98. '<center><img <<$set_imgh>> src="images/pc/speak_to_the_hand.jpg"></center>'
  99. '"No, Igor, this isn''t right", you say, and try not to look at his sorrowful face as he leaves.'
  100. act'Leave':gt $loc, $metka
  101. end
  102. else
  103. act'Leave':gt $loc, $metka
  104. end
  105. end
  106. else
  107. act 'Spend time together':
  108. *clr & cla
  109. minut += 120
  110. !!not using arousal as no orgasm chance
  111. pcs_horny += 10
  112. pcs_mood = 100
  113. hantersIgorQw += 1
  114. if hantersSergeiLove > 0 or hantersAndreiLove > 0:hanterslut += 1
  115. if hantersSergeiLove = 0 and hantersAndreiLove = 0:hanterslut -= 1
  116. if hantersIgorLove = 2:bfA += 1
  117. gs 'stat'
  118. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterlove1.'+rand(1,4)+'.jpg"></center>'
  119. 'You cuddle up with Igor, and trade gentle kisses with him. He adores you and wishes you were always with him and you wish the same.'
  120. gs 'stat'
  121. act'Leave':gt $loc, $metka
  122. end
  123. end
  124. end
  125. if hantersIgorLove > 0 and pcs_horny >= 60:
  126. act 'Have sex':
  127. *clr & cla
  128. hantersIgorQw += 1
  129. hantersIgorsex += rand(12,36)
  130. gs 'stat'
  131. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterflirt2.'+rand(1,6)+'.jpg"></center>'
  132. 'You wink seductively at Igor, and look in the direction of his bed. Igor gives you an excited hug before leading the way.'
  133. gs 'arousal', 'foreplay', 10
  134. gs 'stat'
  135. act 'Go':gt 'HanterLoveSex','Igor'
  136. end
  137. end
  138. !! I replaced the partial condition "and temp = 1" with "and rand(1,5) = 1" because temp is changed in the stat procedure. Formely the temp variable was initialized at the beginning of the file temp = rand(1,5)
  139. if hantersIgorLove > 0 and pcs_horny <= 60 and hantersIgorQw >= 10 and rand(1,5) = 1 and hantersIgorsex = 0:
  140. *clr & cla
  141. hantersIgorsex += rand(12,36)
  142. gs 'stat'
  143. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterlove1.4.jpg"></center>'
  144. 'You walked up to Igor to spend time together, but he suddenly kisses you and whispers,'
  145. '"<<$pcs_nickname>>, let''s make love."'
  146. gs 'arousal', 'foreplay', 5
  147. gs 'stat'
  148. act 'Agree':
  149. *clr & cla
  150. minut += 5
  151. hantersIgorQw += 1
  152. gs 'stat'
  153. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterflirt2.'+rand(4,6)+'.jpg"></center>'
  154. 'Smiling, you wink at Igor. He gets a childlike grin on his face and leads you by the hand to his bed.'
  155. act 'Go':gt 'HanterLoveSex','Igor'
  156. end
  157. act 'Decline':
  158. *clr & cla
  159. minut += 5
  160. hantersIgorQw -= 1
  161. gs 'stat'
  162. '<center><img <<$set_imgh>> src="images/pc/speak_to_the_hand.jpg"></center>'
  163. '"I can''t right now, Igor," you say'
  164. 'You see a look of regret on his face as you leave'
  165. act 'Leave':gt $loc, $metka
  166. end
  167. end
  168. if hantersIgorLove > 0:
  169. act 'Break up with Igor':
  170. *clr & cla
  171. minut += 5
  172. hantersIgorLove = 0
  173. if hantersIgorLove = 2:bfA = 0
  174. hantersIgorQw -= 100
  175. gs 'stat'
  176. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/brosila.jpg"></center>'
  177. '"We''re through Igor. I don''t think that this relationship was going where either of us wanted," you say. Igor looks completely blindsided but turns and leaves without saying a word.'
  178. act 'Leave':gt $loc, $metka
  179. end
  180. end
  181. act'Depart':gt $loc, $metka
  182. if hantersIgorQw < 10 and hantersIgorLove > 0:
  183. *clr & cla
  184. minut += 5
  185. hantersIgorLove = 0
  186. if hantersIgorLove = 2:bfA = 0
  187. hantersIgorQw -= 10
  188. gs 'stat'
  189. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/brosil.jpg"></center>'
  190. 'You wanted to talk to Igor, but he cuts you off with an angry look.'
  191. '"<<$pcs_nickname>>, I realized that our love wasn''t real and we need to break up," he says. As you try to find words to answer he turns and resolutely walks away.'
  192. '"This may well be for the best," you think, as you leave in the other direction.'
  193. act 'Leave':gt $loc, $metka
  194. end
  195. if hantersIgorLove < 2 and hantersIgorQw >= 35 and hantersKnowSlut = 0 and bfA < 1 and hour >= 8 and hour < 20 and pcs_apprnc >= 60:
  196. *clr & cla
  197. minut += 1
  198. gs 'stat'
  199. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss1.jpg"></center>'
  200. 'Suddenly Igor kisses you when you didn''t expect it.'
  201. 'He looks a little nervous before gathering up his courage to ask you, "Will you be my girlfriend?"'
  202. gs 'arousal', 'foreplay', 1
  203. gs 'stat'
  204. !! this part is not included properly into boyfriend system yet - rachels
  205. !! it could be simply replaced with gs 'boyfrend', 'start' but we need to check if a slot is empty
  206. !! at the moment I disable all the actions
  207. act 'Yes':
  208. *clr & cla
  209. !stopboy = 0
  210. !! $lover[lover_number] = $boy
  211. !! $loverbody[lover_number] = $boybody
  212. !! $loverbod[lover_number] = $boybod
  213. !! $loverface[lover_number] = $boyface
  214. !! loverdick[lover_number] = dick
  215. !! loversilaVag[lover_number] = silaVag
  216. !! loverfinance[lover_number] = finance
  217. !! vneshlover[lover_number] = vneshBoy
  218. !! $loverClo[lover_number] = $boyClo
  219. !! figurlover[lover_number] = figurBoy
  220. !! titlover[lover_number] = titBoy
  221. !! hairlover[lover_number] = hairBoy
  222. !! haraklover[lover_number] = harakBoy
  223. !! boyage[lover_number] = boyage
  224. !! loverday[lover_number] = day
  225. !! bfA = 1
  226. !! day[lover_number] = 0
  227. !! boyonce[lover_number] = 0
  228. !! loverizvrat[lover_number] = izvrat
  229. !! giftDay[lover_number] = 0
  230. !! giftNum[lover_number] = 0
  231. !! loverlove[lover_number] = 0
  232. !! lover_picture[lover_number] = lover_picture_number
  233. hantersIgorLove = 2
  234. pcs_mood = 100
  235. gs 'stat'
  236. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss2.jpg"></center>'
  237. 'You move closer to him and begin kissing him again. Igor gently kisses you back.'
  238. '<center><b>Be aware! Igor is not in the Boyfriend system yet!</b></center>'
  239. gs 'arousal', 'kiss', 5
  240. gs 'stat'
  241. if pcs_horny >= 40:
  242. act'Further':
  243. *clr & cla
  244. minut += 5
  245. gs 'stat'
  246. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss3.jpg"></center>'
  247. '"<<$pcs_nickname>>, Do you want to..?" Igor asked in a whisper, when your lips finally parted. "Yes" you say just as quietly and Igor gently took you by the hand and led inside.'
  248. act 'Go':gt 'HanterLoveSex','Igor'
  249. end
  250. else
  251. act'Further':
  252. *clr & cla
  253. minut += 5
  254. gs 'stat'
  255. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss3.jpg"></center>'
  256. '"It was everything I hoped for, <<$pcs_nickname>>," Igor whispered, when your lips finally parted. You melt in his hands and spend a few minutes cuddling together.'
  257. act'Further':gt $loc, $metka
  258. end
  259. end
  260. end
  261. act 'No':
  262. *clr & cla
  263. minut += 5
  264. hantersIgorQw -= 50
  265. gs 'stat'
  266. '<center><img <<$set_imgh>> src="images/pc/speak_to_the_hand.jpg"></center>'
  267. '"No, Igor, this isn''t right", you say, and try not to look at his sorrowful face as he leaves.'
  268. act'Go':gt $loc, $metka
  269. end
  270. end
  271. --- IgorHanter ---------------------------------