1
0

krutishi.qsrc 8.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168
  1. # krutishi
  2. if npc_grupTipe['A<<numnpc>>'] = 1:
  3. if npc_gender['A<<numnpc>>'] = 0 and pcs_hairbsh = 0:
  4. npc_rel['A<<numnpc>>'] -= 5
  5. '<<$npc_firstname[''A<<numnpc>>'']>> looks at you and smiles at your messy hair.'
  6. elseif npc_gender['A<<numnpc>>'] = 1 and pcs_hairbsh = 0:
  7. npc_rel['A<<numnpc>>'] -= 5
  8. '<<$npc_firstname[''A<<numnpc>>'']>> looks at you and smiles at your messy hair.'
  9. elseif npc_gender['A<<numnpc>>'] = 0 and pcs_hairbsh > 0 and $loc = 'gdkin' and npc_rel['A<<numnpc>>'] >= 40:
  10. if PCloSkirt > 0:
  11. cla
  12. '<<$npc_firstname[''A<<numnpc>>'']>>: "Care for a dance?"'
  13. act 'Dance':
  14. cls
  15. minut += 30
  16. npc_rel['A<<numnpc>>'] += 5
  17. pcs_stam -= 5
  18. gs 'sweat', 'add', 3
  19. fat -= 1
  20. danc_exp += rand(1,3)
  21. if numnpc = 1:pcs_mood = 100
  22. gs 'stat'
  23. 'He takes you by the hand and leads you onto the dance floor. You hear the first few tunes of a song - you know and like it, it''s a classic, but if somebody asked you what it''s called, you wouldn''t be able to tell them - and feel a joyous tingling in your belly as you dance with your partner.'
  24. 'This first song is followed by another good one, then another, and another.'
  25. ''
  26. 'Time flies, as they say, and before you know it, half an hour has passed.'
  27. act 'You need a break - Move away':gt $loc, $metka
  28. if numnpc = 4 and npc_rel['A4'] >= 80:
  29. !!Igor Kruglov
  30. pcs_horny += 10
  31. gs 'stat'
  32. if IgorLoverQW > 0 and IgorDominaQW = 0:
  33. 'Igor whispers to you: "<<$pcs_nickname>>, I love you so much. Come with me."'
  34. act 'Go with Igor':gt 'IgorEv', 'din_sex'
  35. elseif IgorLoverQW > 0 and IgorDominaQW > 0:
  36. 'Igor whispers to you: "Mistress, I love you so much. Come with me."'
  37. act 'Go with Igor':
  38. if strapon >= 1:
  39. gt 'IgorEv', 'strap on'
  40. else
  41. gt 'IgorEv', 'din_sex'
  42. end
  43. end
  44. elseif IgorLoverQW = 0:
  45. 'While you two are dancing, you feel Igor''s hands wander to the small of your back and further down, down to your ass which he gives a couple of good squeezes.'
  46. if DimaRudeQW > 0:
  47. 'Igor leans to your ear and whispers: "Dimka told me that you were a fantastic cocksucker. How about we go outside and you show me if he''s right?"'
  48. act 'Go outside with him':
  49. cls
  50. gs 'stat'
  51. 'You nod him yes and walk out of the disco with Igor, then slip around a corner to have a little privacy. Once you feel you''ve found a spot that''s secluded enough, Igor gives you a hungry kiss and lets his hands roam all over you, groping anything he can reach. Suddenly, you hear the sound of a zipper and feel Igor pushed you down - you''re too confused by how he managed to open his pants while he felt you up with both hands to even think about resisting.'
  52. dynamic $din_igor_disco_bj
  53. end
  54. gs 'willpower', 'misc', 'resist', 'hard'
  55. if will_cost <= pcs_willpwr:
  56. act 'Refuse (<<will_cost>> Willpower)':
  57. cls
  58. gs 'willpower', 'pay', 'resist'
  59. gs 'stat'
  60. 'You refuse to go outside with Igor. He doesn''t say a word in response but looks angry. Dimka, as if he had sensed your refusal, comes over and asks you what''s wrong. Igor shrugs: "Your cocksucker does not want to suck me off."'
  61. 'Dimka frowns at you. "He''s my best friend. When he asks you to blow him, you just do it, as if it was me who asked. Now, let''s see about that blowjob!" He grabs your arm - you don''t know what it is about him but resistance seems futile. Igor, encouraged by Dimka''s action, takes the other, and the two of them lead you outside.'
  62. dynamic $din_igor_dima_disco_bj
  63. end
  64. else
  65. act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  66. end
  67. exit
  68. end
  69. if npc_rel['A1'] = 0:
  70. 'Igor whispers into your ear: "Dimka told me that you dumped him. I get it, he can be a real asshole sometime."'
  71. 'He pauses for a second. "<<$pcs_nickname>>, want to go outside and get some air?"'
  72. 'You feel that you could use some fresh air and agree.'
  73. dynamic $din_igor__disco
  74. exit
  75. end
  76. cla
  77. 'Igor whispers into your ear: "Hey <<$pcs_nickname>>, let''s go outside and get some fresh air."'
  78. dynamic $din_igor__disco
  79. exit
  80. end
  81. elseif numnpc = 1 and npc_rel['A1'] >= 80 and DimaRudeQW > 0:
  82. 'After the dance, Dimka holds onto your hand. "Let''s go outside."'
  83. act 'Refuse':npc_rel['A1'] -= 5 & gt $loc, $metka
  84. act 'Go outside with Dimka':
  85. cls
  86. gs 'stat'
  87. 'You leave the club with Dimka and let him lead you away, to a more secluded spot. It doesn''t come as too big of a surprise when he turns to you with an imperious look. "You''re going to suck my dick now, pig."'
  88. act 'Refuse':npc_rel['A1'] -= 5 & gt $loc, $metka
  89. dynamic $din_predlog_dima_bj
  90. end
  91. elseif numnpc = 1 and npc_rel['A1'] >= 80 and DimaRudeQW = 0:
  92. 'After the dance, Dimka keeps your hand in his. "Let''s go outside and get some fresh air."'
  93. act 'Go outside with Dimka':
  94. cls
  95. gs 'stat'
  96. 'You go outside with Dimka and walk away from the club, eventually finding a quiet corner to yourselves. You''re surprised but also happy when Dimka suddenly turns to your and hugs you tightly. "<<$pcs_nickname>>, you''re such a pretty girl. Would you go out with me?"'
  97. gs 'willpower', 'misc', 'self', 'hard'
  98. if will_cost <= pcs_willpwr:
  99. act 'No - This is all too sudden (<<will_cost>> Willpower)':
  100. cls
  101. gs 'willpower', 'pay', 'self'
  102. gs 'stat'
  103. '<center><b><font color="maroon"><<$npc_firstname[''A1'']>> <<$npc_lastname[''A1'']>></font></b></center>'
  104. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big1.jpg"></center>'
  105. 'You tell him "No" and give him an apologetic look. But to your surprise, Dimka grins. "Don''t be shy, <<$pcs_nickname>>, of course you want to go out with me. Why else would you be hanging out with me?"'
  106. act 'Well, maybe you do have a little crush on him':
  107. cls
  108. gs 'stat'
  109. '<center><b><font color="maroon"><<$npc_firstname[''A1'']>> <<$npc_lastname[''A1'']>></font></b></center>'
  110. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big1.jpg"></center>'
  111. '"I don''t know", you say, embarrassed, "maybe?"'
  112. 'Dimka smiles and hugs you. "Of course. I knew it from the start. But... You know, I can''t be going out with some sort of nun - most girls here are prudes. I want a girl who knows how to enjoy herself... and you know how to have fun, right?"'
  113. 'You nod carefully. Where is he going with this?'
  114. 'His smile get even bigger. "So, it''s simple: I''ll go out with you if you can prove to me that you''re not a prude. All you''ve gotta do... is suck my dick, right now."'
  115. dynamic $din_dima_predlog
  116. end
  117. act 'Leave - You really don''t want to go out with him':gt $loc, $metka
  118. end
  119. else
  120. act 'No - This is all too sudden (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  121. end
  122. act 'Yes - You''ve always wanted a boyfriend like him':
  123. cls
  124. gs 'stat'
  125. '<center><b><font color="maroon"><<$npc_firstname[''A1'']>> <<$npc_lastname[''A1'']>></font></b></center>'
  126. '<center><img <<$set_imgh>> src="images/pc/npc_headshots/big1.jpg"></center>'
  127. 'You were a little surprised by his directness but respond "Yes".'
  128. 'Dimka smiles. "Of course. I knew it from the start. But... You know, I can''t be going out with some sort of nun - most girls here are prudes. I want a girl who knows how to enjoy herself... and you know how to have fun, right?"'
  129. 'You nod carefully. Where is he going with this?'
  130. 'His smile get even bigger. "So, it''s simple: I''ll go out with you if you can prove to me that you''re not a prude. All you''ve gotta do... is suck my dick, right now."'
  131. dynamic $din_dima_predlog
  132. end
  133. end
  134. end
  135. end
  136. act 'Refuse':npc_rel['A<<numnpc>>'] -= 5 & gt $loc, $metka
  137. exit
  138. end
  139. end
  140. end
  141. --- krutishi ---------------------------------