grandmahelp.qsrc 16 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411
  1. # grandmahelp
  2. menu_off = 1
  3. gs 'stat'
  4. frost = 0
  5. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/grandmahelp.jpg"></center>'
  6. 'You ask your grandmother if you there is anything you could help out with. Your grandmother turns to you and says:'
  7. if $ARGS[0] = 'start':
  8. if month <= 4 or month >= 10:
  9. grandmaQW['chore_type'] = rand(0,6)
  10. elseif month = 5:
  11. grandmaQW['chore_type'] = rand(0,9)
  12. elseif month >= 6 and month <= 9:
  13. grandmaQW['chore_type'] = rand(0,14)
  14. end
  15. if grandmaQW['chore_type'] = 0:
  16. gt 'grandmahelp', 'cleanfloor'
  17. elseif grandmaQW['chore_type'] = 1:
  18. gt 'grandmahelp', 'washclothes'
  19. elseif grandmaQW['chore_type'] = 2 and hour < 9 and hour > 20:
  20. gt 'grandmahelp', 'milkcows'
  21. elseif grandmaQW['chore_type'] = 3:
  22. gt 'grandmahelp', 'groceries'
  23. elseif grandmaQW['chore_type'] = 4 and boletus_stored >= 5:
  24. gt 'grandmahelp', 'can_mushrooms'
  25. elseif grandmaQW['chore_type'] = 5 and bilberry_stored >= 5:
  26. gt 'grandmahelp', 'can_berries'
  27. elseif grandmaQW['chore_type'] = 6 and grandmaQW['chore_harvest_done'] = 1:
  28. gt 'grandmahelp', 'can_veggies'
  29. elseif grandmaQW['chore_type'] = 7:
  30. gt 'grandmahelp', 'feedchickens'
  31. elseif grandmaQW['chore_type'] = 8 and sunWeather = 1:
  32. gt 'grandmahelp', 'checkplants'
  33. elseif grandmaQW['chore_type'] = 9 and sunWeather = 1:
  34. gt 'grandmahelp', 'waterplants'
  35. elseif grandmaQW['chore_type'] = 10 and sunWeather = 1 and month >= 6 and month <= 9:
  36. gt 'grandmahelp', 'harvest'
  37. elseif grandmaQW['chore_type'] = 11 and boletus_stored <= 18:
  38. gt 'grandmahelp', 'pickforest_mushrooms'
  39. elseif grandmaQW['chore_type'] = 12 and bilberry_stored <= 18:
  40. gt 'grandmahelp', 'pickforest_berries'
  41. elseif grandmaQW['chore_type'] = 13 and ((boletus_stored + bilberry_stored) <= 16):
  42. gt 'grandmahelp', 'pickforest_both'
  43. else
  44. '"There is nothing to do today <<$pcs_nickname>>, take the day off.'
  45. act 'Continue':gt 'gadhouse', 'grandma'
  46. end
  47. end
  48. if $ARGS[0] = 'cleanfloor':
  49. '"There is always something to do, <<$pcs_nickname>>. I''ve gotten quite old and my strength is not what it used to be. Could you help me out by cleaning the floor?"'
  50. grandmaQW['chore_clean_floor'] = 1
  51. act 'Tell her you will do it soon':gt 'gadhouse', 'grandma'
  52. act 'Agree and start cleaning (1:00)':
  53. *clr & cla
  54. minut += 60
  55. grandmaQW['chore_clean_floor'] = 2
  56. grandmaQW['help_amount'] += 1
  57. gs'stat'
  58. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/washfloor.jpg"></center>'
  59. 'You grab a bucket and a rag, and get down on your knees and begin scrubbing the floor. Within the hour the floor shines and you are satisfied with the work you''ve done. You put the cleaning supplies into a corner and continue on with your day.'
  60. act 'Continue':gt 'gadhouse', 'start'
  61. act 'Return back to your grandmother': minut += 1 & gt 'gadhouse', 'grandma'
  62. end
  63. end
  64. if $ARGS[0] = 'washclothes':
  65. '"Of course, <<$pcs_nickname>>, you can help me wash your grandfathers dirty clothes?"'
  66. grandmaQW['chore_wash_clothes'] = 1
  67. act 'Tell her you will wash them in a little bit':gt 'gadhouse', 'grandma'
  68. act 'Agree and start washing (1:00)':
  69. *clr & cla
  70. minut += 60
  71. grandmaQW['chore_wash_clothes'] = 2
  72. gs'stat'
  73. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/washclothes1.jpg"></center>'
  74. 'You pick up grandfather''s dirty clothes and take them with you outside, where you soak them in the metal basin for an hour.'
  75. act 'Hang the Laundry':
  76. *clr & cla
  77. minut += 10
  78. gs'stat'
  79. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/washclothes2.jpg"></center>'
  80. 'Once you are done with the washing, you walk over to the clothesline where you carefully hang the clothes to dry.'
  81. act 'Continue':gt'gaddvor'
  82. act 'Return back to your grandmother': minut += 1 & gt 'gadhouse', 'grandma'
  83. end
  84. end
  85. end
  86. if $ARGS[0] = 'milkcows':
  87. ' "<<$pcs_nickname>>, go to the barn and milk the cows."'
  88. grandmaQW['chore_milk_cow'] = 1
  89. act 'Tell her you will do it in a bit':gt 'gadhouse', 'grandma'
  90. act 'Agree and go to the barn (0:10)':
  91. *clr & cla
  92. minut += 10
  93. gs'stat'
  94. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  95. 'You walk over to the barn where the cows are kept.'
  96. act 'Continue':gt'gadsarai','cow'
  97. end
  98. end
  99. if $ARGS[0] = 'groceries':
  100. '"Oh yes, <<$pcs_nickname>>. I was going to go down to the store today to buy some groceries, but my knees are aching. Do you think you could go down there and get them for me? I have a list of what we need and the grocer will come by later to collect the money."'
  101. grandmaQW['chore_groceries'] = 1
  102. act 'Tell her you will go to the store later':gt 'gadhouse', 'grandma'
  103. act 'Agree and go to the store (0:15)':
  104. *clr & cla
  105. minut += 15
  106. gs'stat'
  107. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/izba.jpg"></center>'
  108. 'Your grandmother shuffles around looking for her list for a few minutes, finally finding it and giving it to you. You grab a basket and set out for the store.'
  109. act 'Continue':gt 'gadmarket'
  110. end
  111. end
  112. if $ARGS[0] = 'can_mushrooms':
  113. '"I need to get some of these mushrooms canned, <<$pcs_nickname>>, so we can store them. Can you please help me prepare them?"'
  114. grandmaQW['chore_can_mushrooms'] = 1
  115. act 'Tell her you will help her in a little while':gt 'gadhouse', 'grandma'
  116. act 'Agree to help her right now (2:00)':
  117. *clr & cla
  118. minut += 45
  119. gs'stat'
  120. boletus_stored -= 5
  121. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cleaning_mushrooms.jpg"></center>'
  122. 'Grandma gives you a basket of mushrooms and you spend a while cleaning them, washing them, and cutting them up, in preparation for canning.'
  123. act 'Continue':
  124. *clr & cla
  125. minut += 60
  126. gs'stat'
  127. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/canning.jpg"></center>'
  128. 'Once they are prepared, you help put them in glass jars. Once they are all ready, Grandma places the jars in her canner and boils them for an hour.'
  129. act 'Continue':
  130. *clr & cla
  131. minut += 15
  132. gs'stat'
  133. grandmaQW['chore_can_mushrooms'] = 0
  134. grandmaQW['help_amount'] += 2
  135. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/canned_mushrooms.jpg"></center>'
  136. 'Finally, you help Grandma take them out of the canner and set them aside to cool.'
  137. '"Thank you, <<$pcs_nickname>>," she says. "It is important to save food up for the hard winter months. Sure, now you can just walk to the store and get whatever you want, but it wasn''t always that way!"'
  138. act 'Finish':gt 'gadhouse','start'
  139. end
  140. end
  141. end
  142. end
  143. if $ARGS[0] = 'can_berries':
  144. '"It is time to can these berries, <<$pcs_nickname>>. Can you please help me? My fingers aren''t as spry as they used to be."'
  145. grandmaQW['chore_can_berries'] = 1
  146. act 'Tell her you will help her in a little while':gt 'gadhouse', 'grandma'
  147. act 'Agree to help her right now (2:00)':
  148. *clr & cla
  149. minut += 45
  150. gs'stat'
  151. bilberry_stored -= 5
  152. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cleaning_berries.jpg"></center>'
  153. 'Grandma gives you a basket of berries and you spend a while cleaning them, removing stems, and picking out any shriveled or bad ones.'
  154. act 'Continue':
  155. *clr & cla
  156. minut += 60
  157. gs'stat'
  158. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/canning.jpg"></center>'
  159. 'Once they are prepared, you help pour them into glass jars. Once they are all ready, Grandma places the jars in her canner and boils them for an hour.'
  160. act 'Continue':
  161. *clr & cla
  162. minut += 15
  163. gs'stat'
  164. grandmaQW['chore_can_berries'] = 0
  165. grandmaQW['help_amount'] += 2
  166. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/canned_berries.jpg"></center>'
  167. 'Finally, you help Grandma take them out of the canner and set them aside to cool.'
  168. '"There, now we will have berries for the winter," she says. "I think your grandfather could live off of these berries alone! He will be very grateful that you helped me."'
  169. act 'Finish':gt 'gadhouse','start'
  170. end
  171. end
  172. end
  173. end
  174. if $ARGS[0] = 'can_veggies':
  175. '"We have had good luck with the garden this year, <<$pcs_nickname>>. But now we need to can these vegetables before they spoil. Can you help me please?"'
  176. grandmaQW['chore_can_veggies'] = 1
  177. act 'Tell her you will help her in a little while':gt 'gadhouse', 'grandma'
  178. act 'Agree to help her right now (3:00)':
  179. *clr & cla
  180. minut += 75
  181. gs'stat'
  182. grandmaQW['chore_harvest_done'] = 0
  183. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cleaning_veggies.jpg"></center>'
  184. 'You and Grandma spend some time sorting out all of the different vegetables from the garden. Once they are sorted you begin cleaning them, cutting them up, removing stems and leaves, and preparing them for canning.'
  185. act 'Continue':
  186. *clr & cla
  187. minut += 90
  188. gs'stat'
  189. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/canning.jpg"></center>'
  190. 'It is a tedious process, but eventually you finish, and help Grandma put them all in jars. You stand by while she boils the jars, helping her remove them from the canner when needed and replacing them with others.'
  191. act 'Continue':
  192. *clr & cla
  193. minut += 15
  194. gs'stat'
  195. grandmaQW['chore_can_veggies'] = 0
  196. grandmaQW['help_amount'] += 3
  197. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/canned_veggies.jpg"></center>'
  198. 'Finally, you help Grandma take the last of the jars out of the canner and set them aside to cool.'
  199. '"You know <<$pcs_nickname>>, if you know how to can your own food, you can survive years of poor harvests," she says.'
  200. '"Your grandfather and I had many hard times when we were younger, but saving our crops during the good times kept us from starving to death in the bad times. You would do well to remember that, young lady!"'
  201. act 'Finish':gt 'gadhouse','start'
  202. end
  203. end
  204. end
  205. end
  206. if $ARGS[0] = 'feedchickens':
  207. '"Of course <<$pcs_nickname>>, would you be kind and feed the chickens?"'
  208. grandmaQW['chore_feed_chickens'] = 1
  209. act 'Tell her you will do it in a little while':gt 'gadhouse', 'grandma'
  210. act 'Agree and go to the yard (0:10)':
  211. *clr & cla
  212. minut += 10
  213. gs'stat'
  214. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/feed_chickens.jpg"></center>'
  215. 'You take the grain mix for the chickens with you and walk over to the yard.'
  216. act 'Continue':gt'gaddvor','chickens'
  217. end
  218. end
  219. if $ARGS[0] = 'checkplants':
  220. '"<<$pcs_nickname>>, can you please go work in the garden?"'
  221. grandmaQW['chore_work_in_garden'] = 1
  222. act 'Tell her you will get to it later':gt 'gadhouse', 'grandma'
  223. act 'Agree and go to the garden (0:10)':
  224. *clr & cla
  225. minut += 10
  226. gs'stat'
  227. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  228. 'You go to the garden.'
  229. act 'Continue':gt'gadgarden','garden'
  230. end
  231. end
  232. if $ARGS[0] = 'waterplants':
  233. '"Dear <<$pcs_nickname>>, could you go and water the plants in the garden?"'
  234. grandmaQW['chore_water_garden'] = 1
  235. act 'Tell her you will do it after a while':gt 'gadhouse', 'grandma'
  236. act 'Agree and go to the garden (0:10)':
  237. *clr & cla
  238. minut += 10
  239. gs'stat'
  240. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  241. 'You bring a watering can along with you to the garden.'
  242. act 'Continue':gt'gadgarden','garden'
  243. end
  244. end
  245. if $ARGS[0] = 'harvest':
  246. if month = 7:
  247. '"<<$pcs_nickname>> dear, the strawberries are ripe to pick. Could you go over to the plot and pick them today?"'
  248. grandmaQW['chore_collect_strawberries'] = 1
  249. act 'Tell her you will do it in a little bit':gt 'gadhouse', 'grandma'
  250. act 'Agree and go to the strawberry plot (0:10)':
  251. *clr & cla
  252. minut += 10
  253. gs'stat'
  254. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  255. 'You bring a basket with you and walk to the strawberry plot in the garden.'
  256. act 'Continue':gt'gadgarden','strawberry'
  257. end
  258. elseif month = 8 or month = 9:
  259. '"<<$pcs_nickname>> dear, the fruits are ripe and it is time to start collecting them, could you go and do it today?"'
  260. grandmaQW['chore_collect_fruit'] = 1
  261. act 'Tell her you will do it in a little bit':gt 'gadhouse', 'grandma'
  262. act 'Agree and go to the orchard (0:10)':
  263. *clr & cla
  264. minut += 10
  265. gs'stat'
  266. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  267. 'You bring a basket with you and walk to the fruit garden.'
  268. act 'Continue':gt'gadgarden','fruit_garden'
  269. end
  270. elseif month = 6:
  271. '"<<$pcs_nickname>> dear, could you go to the garden today? It''s time to collect the harvest."'
  272. grandmaQW['chore_harvest_garden'] = 1
  273. act 'Tell her you will do it in a little bit':gt 'gadhouse', 'grandma'
  274. act 'Agree and go to the garden (0:10)':
  275. *clr & cla
  276. minut += 10
  277. gs'stat'
  278. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  279. 'You bring the harvest tools with you and go over to the garden.'
  280. act 'Continue':gt'gadgarden','garden'
  281. end
  282. end
  283. end
  284. if $ARGS[0] = 'pickforest_mushrooms':
  285. grandmaQW['chore_gather_mushrooms'] = 1
  286. grandmaQW['chore_mushroom_quantity'] = rand(1,2)
  287. '"<<$pcs_nickname>>, it''s mushroom season. Would you mind going into the forest to pick some for us?"'
  288. '"How much do we need, Grandma?", you ask.'
  289. '"Oh, I would say you should be able to find at least <<grandmaQW[''chore_mushroom_quantity'']>> kilos," Grandma replies.'
  290. act 'Tell her you will go get some soon':gt 'gadhouse', 'grandma'
  291. act 'Agree and go to the forest (1:00)':
  292. *clr & cla
  293. if hour >= 6 and hour < 22:
  294. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad.jpg"></center>'
  295. else
  296. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad_night.jpg"></center>'
  297. end
  298. 'You decide that now is as good a time as any to do it. You grab a basket and head out, walking to the forest.'
  299. minut += 60
  300. act 'Continue': gt 'gadforest', 'forest_edge'
  301. end
  302. end
  303. if $ARGS[0] = 'pickforest_berries':
  304. grandmaQW['chore_gather_berries'] = 1
  305. grandmaQW['chore_berry_quantity'] = rand(1,2)
  306. '"<<$pcs_nickname>>, the wild berries are ripe for picking. We should gather them now while we can."'
  307. '"How much do you want, Grandma?" you ask.'
  308. '"<<grandmaQW[''chore_berry_quantity'']>> kilos will be a good start," Grandma replies.'
  309. act 'Tell her you will go get some soon':gt 'gadhouse', 'grandma'
  310. act 'Agree and go to the forest (1:00)':
  311. *clr & cla
  312. if hour >= 6 and hour < 22:
  313. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad.jpg"></center>'
  314. else
  315. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad_night.jpg"></center>'
  316. end
  317. 'You decide that now is as good a time as any to do it. You grab a basket and head out, walking to the forest.'
  318. minut += 60
  319. act 'Continue': gt 'gadforest', 'forest_edge'
  320. end
  321. end
  322. if $ARGS[0] = 'pickforest_both':
  323. grandmaQW['chore_gather_both'] = 1
  324. grandmaQW['chore_mushroom_quantity'] = rand(1,2)
  325. grandmaQW['chore_berry_quantity'] = rand(1,2)
  326. '"This is the time of year that the forest provides us its gifts, <<$pcs_nickname>>. Can you go and harvest some mushrooms and berries for us?"'
  327. '"How much of each should I get?" you ask.'
  328. '"If you could, try to find <<grandmaQW[''chore_mushroom_quantity'']>> kilos of mushrooms and <<grandmaQW[''chore_berry_quantity'']>> kilos of berries," Grandma replies. "It is important to stock up while we can."'
  329. act 'Tell her you will go get some soon':gt 'gadhouse', 'grandma'
  330. act 'Agree and go to the forest (1:00)':
  331. *clr & cla
  332. if hour >= 6 and hour < 22:
  333. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad.jpg"></center>'
  334. else
  335. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad_night.jpg"></center>'
  336. end
  337. 'You decide that now is as good a time as any to do it. You grab a basket and head out, walking to the forest.'
  338. minut += 60
  339. act 'Continue': gt 'gadforest', 'forest_edge'
  340. end
  341. end
  342. --- grandmahelp ---------------------------------