gadgarden.qsrc 7.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235
  1. # gadgarden
  2. if $ARGS[0] = 'garden':
  3. $location_type = 'secluded'
  4. $metka = 'garden'
  5. $loc = 'gadgarden'
  6. $menu_loc = 'gadgarden'
  7. $menu_arg = 'garden'
  8. menu_off = 0
  9. gs 'gadukino_event', 'sound'
  10. cls
  11. gs'stat'
  12. !gs'time'
  13. if month >= 4 and month <= 10:
  14. if hour >= 6 and hour < 21:
  15. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/garden.jpg"></center>'
  16. else
  17. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/garden_night.jpg"></center>'
  18. end
  19. else
  20. if hour >= 8 and hour < 18:
  21. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/garden_winter.jpg"></center>'
  22. else
  23. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/garden_winter_night.jpg"></center>'
  24. end
  25. end
  26. 'A large vegetable garden that your grandparents are very proud of.'
  27. if month >= 4 and month <= 10:
  28. 'There is also a small land plot is dedicated to growing <a href="exec: gt ''gadgarden'',''strawberry'' ">strawberries</a> and a <a href="exec: gt ''gadgarden'',''fruit_garden'' ">fruit tree orchard</a>.'
  29. else
  30. 'There is also a small plot of land dedicated to growing strawberries and a small fruit tree orchard, but they are not in season right now.'
  31. end
  32. act 'Go back to the yard':minut += 1 & gt 'gaddvor'
  33. !job Granny
  34. if grandmaQW['chore_work_in_garden'] = 1:
  35. act 'Work in the garden (3:00)':
  36. cla
  37. *clr
  38. menu_off = 1
  39. minut += 180
  40. gs 'sweat', 'add', 10
  41. grandmaQW['chore_work_in_garden'] = 2
  42. stren_exp += 1
  43. fat -= rand(1,5)
  44. hndiwrk_exp += rand(3,9)
  45. gs 'stat'
  46. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/work_garden'+rand(1,5)+'.jpg"></center>'
  47. 'You spend some time doing some gardening.'
  48. act 'Finish':gt'gadgarden','garden'
  49. end
  50. end
  51. !job Granny
  52. if grandmaQW['chore_water_garden'] = 1:
  53. act 'Water the plants (1:00)':
  54. cla
  55. *clr
  56. menu_off = 1
  57. gs 'sweat', 'add', 10
  58. minut += 60
  59. grandmaQW['chore_water_garden'] = 2
  60. vital_exp += 1
  61. fat -= rand(1,2)
  62. hndiwrk_exp += rand(0,3)
  63. gs 'stat'
  64. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/water_garden.jpg"></center>'
  65. 'You spend an hour watering the garden.'
  66. act 'Finish':gt'gadgarden','garden'
  67. end
  68. end
  69. !job Granny
  70. if grandmaQW['chore_harvest_garden'] = 1:
  71. act 'Harvest (3:00)':
  72. cla
  73. *clr
  74. menu_off = 1
  75. minut += 180
  76. gs 'sweat', 'add', 10
  77. grandmaQW['chore_harvest_garden'] = 2
  78. stren_exp += 1
  79. fat -= rand(1,3)
  80. hndiwrk_exp += rand(3,9)
  81. gs 'stat'
  82. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/harvest_garden'+rand(1,5)+'.jpg"></center>'
  83. 'You spend a few hours harvesting vegetables in the garden.'
  84. act 'Finish':gt'gadgarden','garden'
  85. end
  86. end
  87. end
  88. if $ARGS[0] = 'strawberry':
  89. $metka = 'strawberry'
  90. $loc = 'gadgarden'
  91. $menu_loc = 'gadgarden'
  92. $menu_arg = 'strawberry'
  93. menu_off = 0
  94. gs 'gadukino_event', 'sound'
  95. cls
  96. gs'stat'
  97. !gs'time'
  98. if month = 6 or month = 7:
  99. if hour >= 6 and hour < 21:
  100. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/strawberry1.jpg"></center>'
  101. else
  102. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/strawberry_night.jpg"></center>'
  103. end
  104. else
  105. if hour >= 6 and hour < 21:
  106. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/strawberry2.jpg"></center>'
  107. else
  108. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/strawberry_night.jpg"></center>'
  109. end
  110. end
  111. 'It''s strawberry season, you approach the field where the strawberries grow, searching for some ripe strawberries.'
  112. act 'Go back to the garden':minut += 1 & gt'gadgarden','garden'
  113. if month >= 7 and month <= 9 and strawberriesday ! daystart:
  114. act 'Eat some strawberries (1:00)':
  115. cla
  116. *clr
  117. menu_off = 1
  118. strawberriesday = daystart
  119. minut += 60
  120. pcs_mood += 10
  121. pcs_hydra += 40
  122. pcs_energy += 15
  123. cumspclnt = 2 & gs 'cum_cleanup' & pcs_breath = 0
  124. gs 'stat'
  125. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/eat_strawberries.jpg"></center>'
  126. 'You spend some time wandering through the plot searching for ripe strawberries. You walk along, picking off the ones that you find and popping them in your mouth.'
  127. act 'Finish':gt'gadgarden','strawberry'
  128. end
  129. end
  130. !job Granny
  131. if grandmaQW['chore_collect_strawberries'] = 1:
  132. act 'Collect strawberries (3:00)':
  133. cla
  134. *clr
  135. menu_off = 1
  136. minut += 180
  137. gs 'sweat', 'add', 10
  138. grandmaQW['chore_collect_strawberries'] = 2
  139. agil_exp += 1
  140. fat -= 1
  141. hndiwrk_exp += rand(3,9)
  142. gs 'stat'
  143. if PCloSkirt = 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/village/collect_strawberries.jpg"></center>'
  144. if PCloSkirt > 0 and $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/locations/gadukino/village/collect_strawberries_ski.jpg"></center>'
  145. if PCloSkirt > 0 and $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/locations/gadukino/village/collect_strawberries_tanga.jpg"></center>'
  146. 'You wander through the plot for several hours, collecting ripe strawberries and placing them in the basket.'
  147. act 'Finish':gt'gadgarden','strawberry'
  148. end
  149. end
  150. end
  151. if $ARGS[0] = 'fruit_garden':
  152. $metka = 'fruit_garden'
  153. $loc = 'gadgarden'
  154. $menu_loc = 'gadgarden'
  155. $menu_arg = 'fruit_garden'
  156. menu_off = 0
  157. gs 'gadukino_event', 'sound'
  158. cls
  159. gs'stat'
  160. !gs'time'
  161. if hour >= 6 and hour < 21:
  162. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/fruit_garden.jpg"></center>'
  163. else
  164. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/fruit_garden_night.jpg"></center>'
  165. end
  166. 'There are apples and pears growing in the fruit orchard.'
  167. act 'Go back to the garden':minut += 1 & gt'gadgarden','garden'
  168. if month >= 7 and month <= 9 and fruitday ! daystart:
  169. act 'Eat the fruit (1:00)':
  170. cla
  171. *clr
  172. menu_off = 1
  173. fruitday = daystart
  174. minut += 60
  175. pcs_mood += 10
  176. pcs_hydra += 20
  177. pcs_energy += 30
  178. cumspclnt = 2 & gs 'cum_cleanup' & pcs_breath = 0
  179. gs 'stat'
  180. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/eat_fruit.jpg"></center>'
  181. 'You spend some time wandering around the orchard munching on the ripe fruit.'
  182. act 'Finish':gt 'gadgarden','fruit_garden'
  183. end
  184. end
  185. !job Granny
  186. if grandmaQW['chore_collect_fruit'] = 1:
  187. act 'Collect fruit (3:00)':
  188. cla
  189. *clr
  190. menu_off = 1
  191. minut += 180
  192. gs 'sweat', 'add', 10
  193. grandmaQW['chore_collect_fruit'] = 2
  194. agil_exp += 1
  195. fat -= rand(1,3)
  196. hndiwrk_exp += rand(3,9)
  197. gs 'stat'
  198. if PCloSkirt = 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/village/fruit_collect.jpg"></center>'
  199. if PCloSkirt > 0 and $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/locations/gadukino/village/fruit_collect_ski.jpg"></center>'
  200. if PCloSkirt > 0 and $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/locations/gadukino/village/fruit_collect_tanga.jpg"></center>'
  201. 'You walk around the orchard and pick the ripe fruit hanging from the trees.'
  202. act 'Finish':gt 'gadgarden','fruit_garden'
  203. end
  204. end
  205. end
  206. --- gadgarden ---------------------------------