IgorHanter.qsrc 12 KB

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