krutishi.qsrc 8.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169
  1. # krutishi
  2. !2020/10/16
  3. if npc_grupTipe['A<<numnpc>>'] = 1:
  4. if npc_gender['A<<numnpc>>'] = 0 and pcs_hairbsh = 0:
  5. npc_rel['A<<numnpc>>'] -= 5
  6. '<<$npc_firstname[''A<<numnpc>>'']>> looks at you and smiles at your messy hair.'
  7. elseif npc_gender['A<<numnpc>>'] = 1 and pcs_hairbsh = 0:
  8. npc_rel['A<<numnpc>>'] -= 5
  9. '<<$npc_firstname[''A<<numnpc>>'']>> looks at you and smiles at your messy hair.'
  10. elseif npc_gender['A<<numnpc>>'] = 0 and pcs_hairbsh > 0 and $loc = 'gdkin' and npc_rel['A<<numnpc>>'] >= 40:
  11. if PCloSkirt > 0:
  12. cla
  13. '<<$npc_firstname[''A<<numnpc>>'']>>: "Care for a dance?"'
  14. act 'Dance':
  15. cls
  16. minut += 30
  17. npc_rel['A<<numnpc>>'] += 5
  18. pcs_stam -= 5
  19. gs 'sweat', 'add', 3
  20. fat -= 1
  21. danc_exp += rand(1,3)
  22. if numnpc = 1:pcs_mood = 100
  23. gs 'stat'
  24. '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.'
  25. 'This first song is followed by another good one, then another, and another.'
  26. ''
  27. 'Time flies, as they say, and before you know it, half an hour has passed.'
  28. act 'You need a break - Move away':gt $loc, $loc_arg
  29. if numnpc = 4 and npc_rel['A4'] >= 80:
  30. !!Igor Kruglov
  31. pcs_horny += 10
  32. gs 'stat'
  33. if IgorLoverQW > 0 and IgorDominaQW = 0:
  34. 'Igor whispers to you: "<<$pcs_nickname>>, I love you so much. Come with me."'
  35. act 'Go with Igor':gt 'igorev', 'din_sex'
  36. elseif IgorLoverQW > 0 and IgorDominaQW > 0:
  37. 'Igor whispers to you: "Mistress, I love you so much. Come with me."'
  38. act 'Go with Igor':
  39. if strapon >= 1:
  40. gt 'igorev', 'strap on'
  41. else
  42. gt 'igorev', 'din_sex'
  43. end
  44. end
  45. elseif IgorLoverQW = 0:
  46. '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.'
  47. if DimaRudeQW > 0:
  48. '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?"'
  49. act 'Go outside with him':
  50. cls
  51. gs 'stat'
  52. '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.'
  53. dynamic $din_igor_disco_bj
  54. end
  55. gs 'willpower', 'misc', 'resist', 'hard'
  56. if will_cost <= pcs_willpwr:
  57. act 'Refuse (<<will_cost>> Willpower)':
  58. cls
  59. gs 'willpower', 'pay', 'resist'
  60. gs 'stat'
  61. '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."'
  62. '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.'
  63. dynamic $din_igor_dima_disco_bj
  64. end
  65. else
  66. act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  67. end
  68. exit
  69. end
  70. if npc_rel['A1'] = 0:
  71. 'Igor whispers into your ear: "Dimka told me that you dumped him. I get it, he can be a real asshole sometime."'
  72. 'He pauses for a second. "<<$pcs_nickname>>, want to go outside and get some air?"'
  73. 'You feel that you could use some fresh air and agree.'
  74. dynamic $din_igor__disco
  75. exit
  76. end
  77. cla
  78. 'Igor whispers into your ear: "Hey <<$pcs_nickname>>, let''s go outside and get some fresh air."'
  79. dynamic $din_igor__disco
  80. exit
  81. end
  82. elseif numnpc = 1 and npc_rel['A1'] >= 80 and DimaRudeQW > 0:
  83. 'After the dance, Dimka holds onto your hand. "Let''s go outside."'
  84. act 'Refuse':npc_rel['A1'] -= 5 & gt $loc, $loc_arg
  85. act 'Go outside with Dimka':
  86. cls
  87. gs 'stat'
  88. '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."'
  89. act 'Refuse':npc_rel['A1'] -= 5 & gt $loc, $loc_arg
  90. dynamic $din_predlog_dima_bj
  91. end
  92. elseif numnpc = 1 and npc_rel['A1'] >= 80 and DimaRudeQW = 0:
  93. 'After the dance, Dimka keeps your hand in his. "Let''s go outside and get some fresh air."'
  94. act 'Go outside with Dimka':
  95. cls
  96. gs 'stat'
  97. '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?"'
  98. gs 'willpower', 'misc', 'self', 'hard'
  99. if will_cost <= pcs_willpwr:
  100. act 'No - This is all too sudden (<<will_cost>> Willpower)':
  101. cls
  102. gs 'willpower', 'pay', 'self'
  103. gs 'stat'
  104. '<center><b><font color="maroon"><<$npc_firstname[''A1'']>> <<$npc_lastname[''A1'']>></font></b></center>'
  105. '<center><img <<$set_imgh>> src="images/pc/characters/shared/photos/big1.jpg"></center>'
  106. '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?"'
  107. act 'Well, maybe you do have a little crush on him':
  108. cls
  109. gs 'stat'
  110. '<center><b><font color="maroon"><<$npc_firstname[''A1'']>> <<$npc_lastname[''A1'']>></font></b></center>'
  111. '<center><img <<$set_imgh>> src="images/pc/characters/shared/photos/big1.jpg"></center>'
  112. '"I don''t know", you say, embarrassed, "maybe?"'
  113. '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?"'
  114. 'You nod carefully. Where is he going with this?'
  115. '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."'
  116. dynamic $din_dima_predlog
  117. end
  118. act 'Leave - You really don''t want to go out with him':gt $loc, $loc_arg
  119. end
  120. else
  121. 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>'
  122. end
  123. act 'Yes - You''ve always wanted a boyfriend like him':
  124. cls
  125. gs 'stat'
  126. '<center><b><font color="maroon"><<$npc_firstname[''A1'']>> <<$npc_lastname[''A1'']>></font></b></center>'
  127. '<center><img <<$set_imgh>> src="images/pc/characters/shared/photos/big1.jpg"></center>'
  128. 'You were a little surprised by his directness but respond "Yes".'
  129. '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?"'
  130. 'You nod carefully. Where is he going with this?'
  131. '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."'
  132. dynamic $din_dima_predlog
  133. end
  134. end
  135. end
  136. end
  137. act 'Refuse':npc_rel['A<<numnpc>>'] -= 5 & gt $loc, $loc_arg
  138. exit
  139. end
  140. end
  141. end
  142. --- krutishi ---------------------------------