IgorHanter 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321
  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 Sergey and Andrew and is here visiting Andrew. 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 to 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. *clr & cla
  46. if hantersIgorQw <= 35 and hantersKnowSlut = 0:hantersIgorQw += 1
  47. if hantersAndreiQw >= 10 and hantersKnowSlut = 0:hantersAndreiQw -= 1
  48. if hantersSergeiQw >= 10 and hantersKnowSlut = 0:hantersSergeiQw -= 1
  49. gs 'stat'
  50. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterflirt1.'+rand(1,3)+'.jpg"></center>'
  51. 'You spend time with Igor, flirting all the while. He flirts back, and blushes when you catch him checking you out.'
  52. gs 'arousal', 'foreplay', 120
  53. gs 'stat'
  54. if hantersIgorLove = 0 and hantersIgorQw >= 35 and hantersKnowSlut = 0 and bfA = 1 and pcs_apprnc >= 60:
  55. *clr & cla
  56. gs 'stat'
  57. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss1.jpg"></center>'
  58. 'You smile sweetly at Igor. Suddenly Igor takes 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.'
  59. gs 'arousal', 'foreplay', 5
  60. gs 'stat'
  61. act 'Answer kiss':
  62. *clr & cla
  63. pcs_mood = 100
  64. hantersIgorLove = 1
  65. hantersIgorQw += 1
  66. gs 'stat'
  67. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss2.jpg"></center>'
  68. 'You move closer to him and begin kissing him again. Igor gently kisses you back.'
  69. gs 'arousal', 'kiss', 5
  70. gs 'stat'
  71. if pcs_horny >= 40:
  72. act'Continue':
  73. *clr & cla
  74. minut += 5
  75. gs 'stat'
  76. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss3.jpg"></center>'
  77. '"<<$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.'
  78. act 'Go':gt 'HanterLoveSex','Igor'
  79. end
  80. else
  81. act'Continue':
  82. *clr & cla
  83. minut += 5
  84. gs 'stat'
  85. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss3.jpg"></center>'
  86. '"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.'
  87. act'Continue':gt $loc, $metka
  88. end
  89. end
  90. end
  91. act 'To remove the face':
  92. *clr & cla
  93. minut += 5
  94. hantersIgorQw -= 50
  95. gs 'stat'
  96. '<center><img <<$set_imgh>> src="images/pc/speak_to_the_hand.jpg"></center>'
  97. '"No, Igor, this isn''t right", you say, and try not to look at his sorrowful face as he leaves.'
  98. act'Go':gt $loc, $metka
  99. end
  100. else
  101. act'Depart':gt $loc, $metka
  102. end
  103. end
  104. else
  105. act 'Spend time together':
  106. *clr & cla
  107. pcs_mood = 100
  108. hantersIgorQw += 1
  109. if hantersSergeiLove > 0 or hantersAndreiLove > 0:hanterslut += 1
  110. if hantersSergeiLove = 0 and hantersAndreiLove = 0:hanterslut -= 1
  111. if hantersIgorLove = 2:bfA += 1
  112. gs 'stat'
  113. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterlove1.'+rand(1,4)+'.jpg"></center>'
  114. '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.'
  115. gs 'arousal', 'foreplay', 120
  116. gs 'stat'
  117. act'Depart':gt $loc, $metka
  118. end
  119. end
  120. end
  121. if hantersIgorLove > 0 and pcs_horny >= 60:
  122. act 'Have sex':
  123. *clr & cla
  124. hantersIgorQw += 1
  125. hantersIgorsex += rand(12,36)
  126. gs 'stat'
  127. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterflirt2.'+rand(1,6)+'.jpg"></center>'
  128. 'You wink seductively at Igor, and look in the direction of his bed. Igor gives you an excited hug before leading the way.'
  129. gs 'arousal', 'foreplay', 10
  130. gs 'stat'
  131. act 'Go':gt 'HanterLoveSex','Igor'
  132. end
  133. end
  134. !! 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)
  135. if hantersIgorLove > 0 and pcs_horny <= 60 and hantersIgorQw >= 10 and rand(1,5) = 1 and hantersIgorsex = 0:
  136. *clr & cla
  137. hantersIgorsex += rand(12,36)
  138. gs 'stat'
  139. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterlove1.4.jpg"></center>'
  140. 'You walked up to Igor to spend time together, but he suddenly kisses and whispered,'
  141. '"<<$pcs_nickname>>, let''s make love."'
  142. gs 'arousal', 'foreplay', 5
  143. gs 'stat'
  144. act 'Agree':
  145. *clr & cla
  146. minut += 5
  147. hantersIgorQw += 1
  148. gs 'stat'
  149. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterflirt2.'+rand(4,6)+'.jpg"></center>'
  150. 'Smiling you wink Igor. He gets a childlike grin on his face and takes leads you by the hand.'
  151. act 'Go':gt 'HanterLoveSex','Igor'
  152. end
  153. act 'Decline':
  154. *clr & cla
  155. minut += 5
  156. hantersIgorQw -= 1
  157. gs 'stat'
  158. '<center><img <<$set_imgh>> src="images/pc/speak_to_the_hand.jpg"></center>'
  159. '"I can''t right now, Igor ," you say'
  160. 'You see a look of regret on his face as you leave'
  161. act 'Go':gt $loc, $metka
  162. end
  163. end
  164. if hantersIgorLove > 0:
  165. act 'Part with a guy':
  166. *clr & cla
  167. minut += 5
  168. hantersIgorLove = 0
  169. if hantersIgorLove = 2:bfA = 0
  170. hantersIgorQw -= 100
  171. gs 'stat'
  172. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/brosila.jpg"></center>'
  173. '"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.'
  174. act 'Go':gt $loc, $metka
  175. end
  176. end
  177. act'Depart':gt $loc, $metka
  178. if hantersIgorQw < 10 and hantersIgorLove > 0:
  179. *clr & cla
  180. minut += 5
  181. hantersIgorLove = 0
  182. if hantersIgorLove = 2:bfA = 0
  183. hantersIgorQw -= 10
  184. gs 'stat'
  185. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/brosil.jpg"></center>'
  186. 'You wanted to talk to Igor, but he cuts you off with an angry look.'
  187. '"<<$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.'
  188. '"This may well be for the best," you thought, going in the other direction.'
  189. act 'Go':gt $loc, $metka
  190. end
  191. if hantersIgorLove < 2 and hantersIgorQw >= 35 and hantersKnowSlut = 0 and bfA < 1 and hour >= 8 and hour < 20 and pcs_apprnc >= 60:
  192. *clr & cla
  193. minut += 1
  194. gs 'stat'
  195. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss1.jpg"></center>'
  196. 'Suddenly Igor takes 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.'
  197. gs 'arousal', 'foreplay', 1
  198. gs 'stat'
  199. !! this part is not included properly into boyfriend system yet - rachels
  200. !! it could be simply replaced with gs 'boyfrend', 'start' but we need to check if a slot is empty
  201. !! at the moment I disable all the actions
  202. act 'Answer kiss':
  203. *clr & cla
  204. !stopboy = 0
  205. !! $lover[lover_number] = $boy
  206. !! $loverbody[lover_number] = $boybody
  207. !! $loverbod[lover_number] = $boybod
  208. !! $loverface[lover_number] = $boyface
  209. !! loverdick[lover_number] = dick
  210. !! loversilaVag[lover_number] = silaVag
  211. !! loverfinance[lover_number] = finance
  212. !! vneshlover[lover_number] = vneshBoy
  213. !! $loverClo[lover_number] = $boyClo
  214. !! figurlover[lover_number] = figurBoy
  215. !! titlover[lover_number] = titBoy
  216. !! hairlover[lover_number] = hairBoy
  217. !! haraklover[lover_number] = harakBoy
  218. !! boyage[lover_number] = boyage
  219. !! loverday[lover_number] = day
  220. !! bfA = 1
  221. !! day[lover_number] = 0
  222. !! boyonce[lover_number] = 0
  223. !! loverizvrat[lover_number] = izvrat
  224. !! giftDay[lover_number] = 0
  225. !! giftNum[lover_number] = 0
  226. !! loverlove[lover_number] = 0
  227. !! lover_picture[lover_number] = lover_picture_number
  228. hantersIgorLove = 2
  229. pcs_mood = 100
  230. gs 'stat'
  231. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss2.jpg"></center>'
  232. 'You move closer to him and begin kissing him again. Igor gently kisses you back.'
  233. '<center><b>Be aware! Igor is not in the Boyfriend system yet!</b></center>'
  234. gs 'arousal', 'kiss', 5
  235. gs 'stat'
  236. if pcs_horny >= 40:
  237. act'Further':
  238. *clr & cla
  239. minut += 5
  240. gs 'stat'
  241. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss3.jpg"></center>'
  242. '"<<$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.'
  243. act 'Go':gt 'HanterLoveSex','Igor'
  244. end
  245. else
  246. act'Further':
  247. *clr & cla
  248. minut += 5
  249. gs 'stat'
  250. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterkiss3.jpg"></center>'
  251. '"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.'
  252. act'Further':gt $loc, $metka
  253. end
  254. end
  255. end
  256. act 'To remove the face':
  257. *clr & cla
  258. minut += 5
  259. hantersIgorQw -= 50
  260. gs 'stat'
  261. '<center><img <<$set_imgh>> src="images/pc/speak_to_the_hand.jpg"></center>'
  262. '"No, Igor, this isn''t right", you say, and try not to look at his sorrowful face as he leaves.'
  263. act'Go':gt $loc, $metka
  264. end
  265. end
  266. --- IgorHanter ---------------------------------