gadroad.qsrc 7.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170
  1. # gadroad
  2. if $ARGS[0] = '':
  3. $loc = 'gadroad'
  4. $metka = ''
  5. $location_type = 'public_outdoors'
  6. $menu_loc = 'gadroad'
  7. $menu_arg = ''
  8. menu_off = 0
  9. CLOSE ALL
  10. gs 'gadukino_event', 'sound'
  11. gs'stat'
  12. '<center><H4>Forest road</H4></center>'
  13. if month >= 4 and month <= 10:
  14. if hour >= 6 and hour < 22:
  15. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad.jpg"></center>'
  16. else
  17. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad_night.jpg"></center>'
  18. end
  19. else
  20. if hour >= 8 and hour < 18:
  21. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad_winter.jpg"></center>'
  22. else
  23. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad_winter_night.jpg"></center>'
  24. end
  25. end
  26. *nl
  27. 'A dirt road leading to the outskirts of Gadukino. You are surrounded by grainfields where the grains appear reaching all the way to the heavens.'
  28. 'The forest '+iif(meadow > 0, 'and meadow ','')+'can be found further down the road away from the village.'
  29. *nl
  30. ! 10% chance of meeting Mitka once per day on the road when Sveta is not the village boys slut or whole villages whore
  31. mitkarand = rand(1,10)
  32. if mitka_first_drink > 0 and mitkaday ! daystart and hour >= 17 and hour < 20 and mitkarand = 1 and (npc_QW['A63'] < 11 or gadriver_gang > 2):
  33. '<a href="exec:gt ''mitka''">Mitka</a> is smoking near the road, he smiles at you as you walk by.'
  34. ! Meet the boys to drink with them at 20 if Sveta has been invited by Mitka already
  35. elseif mitka_first_drink > 0 and hour = 20 and alko < 10 and mitkadrinkday ! daystart:
  36. '<a href="exec:gt ''gadroad'',''drinking_invite''">Mitka, Kolyamba, and Vasyan</a> are walking down the road towards the woods, drinking moonshine and talking loudly.'
  37. ! If Sveta is late to go drink with the boys if she already knows where the trailer is she can still get there
  38. elseif mitka_first_drink = 2 and hour > 20 and alko < 10 and mitkadrinkday ! daystart:
  39. ! if Sveta did not bring Mira with her and Mira has met the boys already then there is a 50% chance she will show up too
  40. if MiraLoc ! 5 and npc_QW['A60'] >= 1:
  41. mirarand = rand(1,10)
  42. if mirarand >= 6:
  43. MiraLoc = 5
  44. 'You can go drink with Mira, Mitka, Kolyamba and Vasyan at their <a href="exec:gt ''mitkabuh'',''partywithMira''">trailer</a> hidden in the woods.'
  45. else
  46. 'You can go drink with Mitka, Kolyamba and Vasyan at their <a href="exec:gt ''mitkabuh'',''partyalone''">trailer</a> hidden in the woods.'
  47. end
  48. else
  49. 'You can go drink with the Mitka, Kolyamba and Vasyan at their <a href="exec:gt ''mitkabuh'',''partyalone''">trailer</a> hidden in the woods.'
  50. end
  51. end
  52. act 'Go to Gadukino':minut += 20 & gt'gadukino'
  53. act 'Go into the woods':minut += 30 & gt'gadforest','1'
  54. if meadow > 0: act 'Go to the meadow':minut += 20 & gt 'Meadow'
  55. act 'Go to the fields':minut += 10 & gt'gadfield','field'
  56. if $clothingworntype = 'exercise' and $shoeworntype = 'trainers' and hour >= 6 and hour < 22 and gadrunday ! daystart:
  57. act 'Go for a run (1:00)':
  58. *clr & cla
  59. menu_off = 1
  60. minut += 60
  61. fat -= RAND(5,15)
  62. run_exp += RAND(3,6)
  63. gs 'sweat', 'add', 20
  64. gadrunday = daystart
  65. gs'stat'
  66. if month <= 3 or month >= 11:
  67. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadbeg4.jpg"></center>'
  68. elseif month=9 or month=10 or month=4 or month=5:
  69. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadbeg3.jpg"></center>'
  70. else
  71. if musle >= salo:
  72. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadbeg1.jpg"></center>'
  73. else
  74. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadbeg2.jpg"></center>'
  75. end
  76. end
  77. 'You run for an hour enjoying the scenery.'
  78. act 'Finish':gt'gadroad'
  79. end
  80. elseif ($clothingworntype ! 'exercise' or $shoeworntype ! 'trainers') and hour >= 6 and hour < 22 and gadrunday ! daystart:
  81. 'You could go for a run here if you were wearing sports clothes and shoes.'
  82. end
  83. end
  84. if $ARGS[0] = 'drinking_invite':
  85. $loc = 'gadroad'
  86. $metka = 'drinking_invite'
  87. $location_type = 'secluded'
  88. $menu_loc = 'gadroad'
  89. $menu_arg = 'drinking_invite'
  90. menu_off = 1
  91. minut += 5
  92. gs 'stat'
  93. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunk.jpg"></center>'
  94. 'You quickly catch up to the boys who have already started drinking.'
  95. !School girl Sveta
  96. if StoryLine = 1:
  97. ! Sveta has never been drinking with Mitka before
  98. if mitka_first_drink = 1:
  99. 'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
  100. 'Kolyamba and Vasyan nod in agreement as they look you over.'
  101. '"We know this great spot in the woods to hang out. No one ever bothers us there."'
  102. else
  103. 'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
  104. 'Kolyamba and Vasyan nod in agreement as they look you over.'
  105. end
  106. ! Transformation or New In Town Sveta
  107. else
  108. if mitka_first_drink = 1:
  109. 'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
  110. '"These are my two best friends, Kolyamba and Vasyan. We have grown up in this village our whole lives and do just about everything together."'
  111. 'Kolyamba and Vasyan quickly introduce themselves and look you over.'
  112. '"We know this great spot in the woods to hang out. No one ever bothers us there."'
  113. else
  114. 'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
  115. 'Kolyamba and Vasyan nod in agreement as they look you over.'
  116. end
  117. end
  118. 'Mitka asks, "Are you ready to go?"'
  119. ! if Sveta did not bring Mira with her and Mira has met the boys already then there is a 50% chance she will show up too
  120. if MiraLoc ! 5 and npc_QW['A60'] >= 1:
  121. mirarand = rand(1,10)
  122. if mirarand >= 6: MiraLoc = 5
  123. 'Just as the words leave Mitka''s mouth, Mira comes bounding around the corner.'
  124. '"Hey guys, thanks for the invite! <<$pcs_nickname>> is here too, awesome! Let''s go!"'
  125. end
  126. ! Mira is here and both her and Sveta are the town whores
  127. ! mitkabuh_group has the drinking events for group sex for 2 girls and 3 boys
  128. if MiraLoc = 5 and npc_QW['A60'] >= 16 and gadriver_gang = 2:
  129. act 'Go with them': minut += 15 & npc_drunk['A60'] = 0 & gt 'mitkabuh_group'
  130. ! Mira is here and neither or only 1 out 2 of them is the town whore
  131. ! mitkabuh has the drinking events for group sex for 1 girl and 3 boys or no sex at all if quest is not far enough along
  132. elseif MiraLoc = 5:
  133. act 'Go with them': minut += 15 & npc_drunk['A60'] = 0 & gt 'mitkabuh'
  134. ! Mira is not here so Sveta goes by herself
  135. else
  136. act 'Go with them': minut += 15 & gt 'mitkabuh'
  137. end
  138. ! if Sveta came here to kick off Miras quest then she cannot leave otherwise Sveta is free to decline the offer
  139. if npc_QW['A60'] > 0 or (MiraLoc ! 5 and npc_QW['A60'] = 0):
  140. gs 'willpower', 'drink', 'resist'
  141. if will_cost <= pcs_willpwr:
  142. act 'No thanks, not tonight. (<<will_cost>> Willpower)':
  143. gs 'willpower', 'drink', 'resist'
  144. gs 'willpower', 'pay', 'resist'
  145. gs 'stat'
  146. gt 'gadroad'
  147. end
  148. else
  149. act 'No thanks, not tonight. (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  150. end
  151. end
  152. end
  153. --- gadroad ---------------------------------