gadroad.qsrc 7.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162
  1. # gadroad
  2. if $ARGS[0] = '':
  3. $loc = 'gadroad'
  4. $loc_arg = ''
  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. if npc_QW['A60'] >= 16 and gadriver_gang = 2:
  45. 'You can go drink with Mira, Mitka, Kolyamba and Vasyan at their <a href="exec:gt ''mitkabuh_group'',''partywithMira''">trailer</a> hidden in the woods.'
  46. else
  47. 'You can go drink with Mira, Mitka, Kolyamba and Vasyan at their <a href="exec:gt ''mitkabuh'',''partywithMira''">trailer</a> hidden in the woods.'
  48. end
  49. else
  50. 'You can go drink with Mitka, Kolyamba and Vasyan at their <a href="exec:gt ''mitkabuh'',''partyalone''">trailer</a> hidden in the woods.'
  51. end
  52. else
  53. 'You can go drink with the Mitka, Kolyamba and Vasyan at their <a href="exec:gt ''mitkabuh'',''partyalone''">trailer</a> hidden in the woods.'
  54. end
  55. end
  56. act 'Walk to Gadukino (0:10)':minut += 10 & gt'gadukino'
  57. act 'Walk down to the river (0:10)':minut += 10 & gt 'gadriver', 'start'
  58. act 'Walk into the woods (0:15)':minut += 15 & gt'gadforest','forest_edge'
  59. act 'Walk to the fields (0:10)':minut += 10 & gt'gadfield','field'
  60. if $clothingworntype = 'danilovich_outfits' and $shoeworntype = 'danilovich' and hour >= 6 and hour < 22:
  61. if pcs_energy >= 5 and pcs_stam >= stammax / 5:
  62. act 'Go for a run (1:00)':
  63. *clr & cla
  64. menu_off = 1
  65. gs 'exercise', 'tier1', 60, 'run'
  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 strenbuf >= 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 pcs_stam >= stammax / 5:
  81. act 'Go for a run (1:00)': '<br><font color="red">You are so hungry you cannot face going for a run.</font>'
  82. else
  83. act 'Go for a run (1:00)': '<br><font color="red">You are to exhausted to do this. Recover your stamina before trying to go for a run.</font>'
  84. end
  85. elseif ($clothingworntype ! 'danilovich_outfits' or $shoeworntype ! 'danilovich') and hour >= 6 and hour < 22:
  86. 'You could go for a run here if you were wearing sports clothes and shoes.'
  87. end
  88. end
  89. if $ARGS[0] = 'drinking_invite':
  90. $loc = 'gadroad'
  91. $loc_arg = 'drinking_invite'
  92. $location_type = 'secluded'
  93. $menu_loc = 'gadroad'
  94. $menu_arg = 'drinking_invite'
  95. menu_off = 1
  96. minut += 5
  97. gs 'stat'
  98. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunk.jpg"></center>'
  99. 'You quickly catch up to the boys who have already started drinking.'
  100. ! Sveta has never been drinking with Mitka before
  101. if mitka_first_drink = 1:
  102. 'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
  103. 'Kolyamba and Vasyan nod in agreement as they look you over.'
  104. '"We know this great spot in the woods to hang out. No one ever bothers us there."'
  105. else
  106. 'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
  107. 'Kolyamba and Vasyan nod in agreement as they look you over.'
  108. end
  109. 'Mitka asks, "Are you ready to go?"'
  110. ! if Sveta came here to kick off Miras quest then she cannot leave otherwise Sveta is free to decline the offer
  111. if npc_QW['A60'] > 0 or (MiraLoc ! 5 and npc_QW['A60'] = 0):
  112. gs 'willpower', 'drink', 'resist'
  113. if will_cost <= pcs_willpwr:
  114. act 'No thanks, not tonight. (<<will_cost>> Willpower)':
  115. gs 'willpower', 'drink', 'resist'
  116. gs 'willpower', 'pay', 'resist'
  117. gs 'stat'
  118. gt 'gadroad'
  119. end
  120. else
  121. 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>'
  122. end
  123. end
  124. ! 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
  125. if MiraLoc ! 5 and npc_QW['A60'] >= 1:
  126. mirarand = rand(1,10)
  127. if mirarand >= 6: MiraLoc = 5
  128. 'Just as the words leave Mitka''s mouth, Mira comes bounding around the corner.'
  129. '"Hey guys, thanks for the invite! <<$pcs_nickname>> is here, too, awesome! Let''s go!"'
  130. end
  131. ! Mira is here and both her and Sveta are the town whores
  132. ! mitkabuh_group has the drinking events for group sex for 2 girls and 3 boys
  133. if MiraLoc = 5 and npc_QW['A60'] >= 16 and gadriver_gang = 2:
  134. act 'Go with them': minut += 15 & npc_drunk['A60'] = 0 & gt 'mitkabuh_group'
  135. ! Mira is here and neither or only 1 out 2 of them is the town whore
  136. ! 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
  137. elseif MiraLoc = 5:
  138. act 'Go with them': minut += 15 & npc_drunk['A60'] = 0 & gt 'mitkabuh'
  139. ! Mira is not here so Sveta goes by herself
  140. else
  141. act 'Go with them': minut += 15 & gt 'mitkabuh'
  142. end
  143. end
  144. --- gadroad ---------------------------------