grandmahelp.qsrc 16 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408
  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 grandmaQW['chore_mushrooms_given'] >= 6:
  24. gt 'grandmahelp', 'can_mushrooms'
  25. elseif grandmaQW['chore_type'] = 5 and grandmaQW['chore_berries_given'] >= 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:
  36. gt 'grandmahelp', 'harvest'
  37. elseif grandmaQW['chore_type'] = 11:
  38. gt 'grandmahelp', 'pickforest_mushrooms'
  39. elseif grandmaQW['chore_type'] = 12:
  40. gt 'grandmahelp', 'pickforest_berries'
  41. elseif grandmaQW['chore_type'] = 13:
  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. end
  62. end
  63. if $ARGS[0] = 'washclothes':
  64. '"Of course, <<$pcs_nickname>>, you can help me wash your grandfathers dirty clothes?"'
  65. grandmaQW['chore_wash_clothes'] = 1
  66. act 'Tell her you will wash them in a little bit':gt 'gadhouse', 'grandma'
  67. act 'Agree and start washing (1:00)':
  68. *clr & cla
  69. minut += 60
  70. grandmaQW['chore_wash_clothes'] = 2
  71. grandmaQW['help_amount'] += 1
  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. end
  83. end
  84. end
  85. if $ARGS[0] = 'milkcows':
  86. ' "<<$pcs_nickname>>, go to the barn and milk the cows."'
  87. grandmaQW['chore_milk_cow'] = 1
  88. act 'Tell her you will do it in a bit':gt 'gadhouse', 'grandma'
  89. act 'Agree and go to the barn (0:10)':
  90. *clr & cla
  91. minut += 10
  92. gs'stat'
  93. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  94. 'You walk over to the barn where the cows are kept.'
  95. act 'Continue':gt'gadsarai','cow'
  96. end
  97. end
  98. if $ARGS[0] = 'groceries':
  99. '"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."'
  100. grandmaQW['chore_groceries'] = 1
  101. act 'Tell her you will go to the store later':gt 'gadhouse', 'grandma'
  102. act 'Agree and go to the store (0:15)':
  103. *clr & cla
  104. minut += 15
  105. gs'stat'
  106. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/izba.jpg"></center>'
  107. '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.'
  108. act 'Continue':gt 'gadmarket'
  109. end
  110. end
  111. if $ARGS[0] = 'can_mushrooms':
  112. '"I need to get some of these mushrooms canned, <<$pcs_nickname>>, so we can store them. Can you please help me prepare them?"'
  113. grandmaQW['chore_can_mushrooms'] = 1
  114. act 'Tell her you will help her in a little while':gt 'gadhouse', 'grandma'
  115. act 'Agree to help her right now (2:00)':
  116. *clr & cla
  117. minut += 45
  118. gs'stat'
  119. grandmaQW['chore_mushrooms_given'] -= 6
  120. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cleaning_mushrooms.jpg"></center>'
  121. 'Grandma gives you a basket of mushrooms and you spend a while cleaning them, washing them, and cutting them up, in preparation for canning.'
  122. act 'Continue':
  123. *clr & cla
  124. minut += 60
  125. gs'stat'
  126. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/canning.jpg"></center>'
  127. '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.'
  128. act 'Continue':
  129. *clr & cla
  130. minut += 15
  131. gs'stat'
  132. grandmaQW['chore_can_mushrooms'] = 0
  133. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/canned_mushrooms.jpg"></center>'
  134. 'Finally, you help Grandma take them out of the canner and set them aside to cool.'
  135. '"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!"'
  136. act 'Finish':gt 'gadhouse','start'
  137. end
  138. end
  139. end
  140. end
  141. if $ARGS[0] = 'can_berries':
  142. '"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."'
  143. grandmaQW['chore_can_berries'] = 1
  144. act 'Tell her you will help her in a little while':gt 'gadhouse', 'grandma'
  145. act 'Agree to help her right now (2:00)':
  146. *clr & cla
  147. minut += 45
  148. gs'stat'
  149. grandmaQW['chore_berries_given'] -= 5
  150. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cleaning_berries.jpg"></center>'
  151. 'Grandma gives you a basket of berries and you spend a while cleaning them, removing stems, and picking out any shriveled or bad ones.'
  152. act 'Continue':
  153. *clr & cla
  154. minut += 60
  155. gs'stat'
  156. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/canning.jpg"></center>'
  157. '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.'
  158. act 'Continue':
  159. *clr & cla
  160. minut += 15
  161. gs'stat'
  162. grandmaQW['chore_can_berries'] = 0
  163. grandmaQW['help_amount'] += 2
  164. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/canned_berries.jpg"></center>'
  165. 'Finally, you help Grandma take them out of the canner and set them aside to cool.'
  166. '"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."'
  167. act 'Finish':gt 'gadhouse','start'
  168. end
  169. end
  170. end
  171. end
  172. if $ARGS[0] = 'can_veggies':
  173. '"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?"'
  174. grandmaQW['chore_can_veggies'] = 1
  175. act 'Tell her you will help her in a little while':gt 'gadhouse', 'grandma'
  176. act 'Agree to help her right now (3:00)':
  177. *clr & cla
  178. minut += 75
  179. gs'stat'
  180. grandmaQW['chore_harvest_done'] = 0
  181. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cleaning_veggies.jpg"></center>'
  182. '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.'
  183. act 'Continue':
  184. *clr & cla
  185. minut += 90
  186. gs'stat'
  187. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/canning.jpg"></center>'
  188. '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.'
  189. act 'Continue':
  190. *clr & cla
  191. minut += 15
  192. gs'stat'
  193. grandmaQW['chore_can_veggies'] = 0
  194. grandmaQW['help_amount'] += 3
  195. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/canned_veggies.jpg"></center>'
  196. 'Finally, you help Grandma take the last of the jars out of the canner and set them aside to cool.'
  197. '"You know <<$pcs_nickname>>, if you know how to can your own food, you can survive years of poor harvests," she says.'
  198. '"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!"'
  199. act 'Finish':gt 'gadhouse','start'
  200. end
  201. end
  202. end
  203. end
  204. if $ARGS[0] = 'feedchickens':
  205. '"Of course <<$pcs_nickname>>, would you be kind and feed the chickens?"'
  206. grandmaQW['chore_feed_chickens'] = 1
  207. act 'Tell her you will do it in a little while':gt 'gadhouse', 'grandma'
  208. act 'Agree and go to the yard (0:10)':
  209. *clr & cla
  210. minut += 10
  211. gs'stat'
  212. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/feed_chickens.jpg"></center>'
  213. 'You take the grain mix for the chickens with you and walk over to the yard.'
  214. act 'Continue':gt'gaddvor','chickens'
  215. end
  216. end
  217. if $ARGS[0] = 'checkplants':
  218. '"<<$pcs_nickname>>, can you please go work in the garden?"'
  219. grandmaQW['chore_work_in_garden'] = 1
  220. act 'Tell her you will get to it later':gt 'gadhouse', 'grandma'
  221. act 'Agree and go to the garden (0:10)':
  222. *clr & cla
  223. minut += 10
  224. gs'stat'
  225. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  226. 'You go to the garden.'
  227. act 'Continue':gt'gadgarden','garden'
  228. end
  229. end
  230. if $ARGS[0] = 'waterplants':
  231. '"Dear <<$pcs_nickname>>, could you go and water the plants in the garden?"'
  232. grandmaQW['chore_water_garden'] = 1
  233. act 'Tell her you will do it after a while':gt 'gadhouse', 'grandma'
  234. act 'Agree and go to the garden (0:10)':
  235. *clr & cla
  236. minut += 10
  237. gs'stat'
  238. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  239. 'You bring a watering can along with you to the garden.'
  240. act 'Continue':gt'gadgarden','garden'
  241. end
  242. end
  243. if $ARGS[0] = 'harvest':
  244. if month = 7:
  245. '"<<$pcs_nickname>> dear, the strawberries are ripe to pick. Could you go over to the plot and pick them today?"'
  246. grandmaQW['chore_collect_strawberries'] = 1
  247. act 'Tell her you will do it in a little bit':gt 'gadhouse', 'grandma'
  248. act 'Agree and go to the strawberry plot (0:10)':
  249. *clr & cla
  250. minut += 10
  251. gs'stat'
  252. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  253. 'You bring a basket with you and walk to the strawberry plot in the garden.'
  254. act 'Continue':gt'gadgarden','strawberry'
  255. end
  256. elseif month = 8:
  257. '"<<$pcs_nickname>> dear, the fruits are ripe and it is time to start collecting them, could you go and do it today?"'
  258. grandmaQW['chore_collect_fruit'] = 1
  259. act 'Tell her you will do it in a little bit':gt 'gadhouse', 'grandma'
  260. act 'Agree and go to the orchard (0:10)':
  261. *clr & cla
  262. minut += 10
  263. gs'stat'
  264. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  265. 'You bring a basket with you and walk to the fruit garden.'
  266. act 'Continue':gt'gadgarden','fruit_garden'
  267. end
  268. elseif month = 9:
  269. '"<<$pcs_nickname>> dear, could you go to the garden today? It''s time to collect the harvest."'
  270. grandmaQW['chore_harvest_garden'] = 1
  271. act 'Tell her you will do it in a little bit':gt 'gadhouse', 'grandma'
  272. act 'Agree and go to the garden (0:10)':
  273. *clr & cla
  274. minut += 10
  275. gs'stat'
  276. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  277. 'You bring the harvest tools with you and go over to the garden.'
  278. act 'Continue':gt'gadgarden','garden'
  279. end
  280. end
  281. end
  282. if $ARGS[0] = 'pickforest_mushrooms':
  283. grandmaQW['chore_gather_mushrooms'] = 1
  284. grandmaQW['chore_mushroom_quantity'] = rand(1,2)
  285. '"<<$pcs_nickname>>, it''s mushroom season. Would you mind going into the forest to pick some for us?"'
  286. '"How much do we need, Grandma?", you ask.'
  287. '"Oh, I would say you should be able to find at least <<grandmaQW[''chore_mushroom_quantity'']>> kilos," Grandma replies.'
  288. act 'Tell her you will go get some soon':gt 'gadhouse', 'grandma'
  289. act 'Agree and go to the forest (1:00)':
  290. *clr & cla
  291. if hour >= 6 and hour < 22:
  292. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad.jpg"></center>'
  293. else
  294. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad_night.jpg"></center>'
  295. end
  296. '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.'
  297. minut += 60
  298. act 'Continue': gt 'gadforest', 'forest_edge'
  299. end
  300. end
  301. if $ARGS[0] = 'pickforest_berries':
  302. grandmaQW['chore_gather_berries'] = 1
  303. grandmaQW['chore_berry_quantity'] = rand(1,2)
  304. '"<<$pcs_nickname>>, the wild berries are ripe for picking. We should gather them now while we can."'
  305. '"How much do you want, Grandma?" you ask.'
  306. '"<<grandmaQW[''chore_berry_quantity'']>> kilos will be a good start," Grandma replies.'
  307. act 'Tell her you will go get some soon':gt 'gadhouse', 'grandma'
  308. act 'Agree and go to the forest (1:00)':
  309. *clr & cla
  310. if hour >= 6 and hour < 22:
  311. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad.jpg"></center>'
  312. else
  313. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad_night.jpg"></center>'
  314. end
  315. '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.'
  316. minut += 60
  317. act 'Continue': gt 'gadforest', 'forest_edge'
  318. end
  319. end
  320. if $ARGS[0] = 'pickforest_both':
  321. grandmaQW['chore_gather_both'] = 1
  322. grandmaQW['chore_mushroom_quantity'] = rand(1,2)
  323. grandmaQW['chore_berry_quantity'] = rand(1,2)
  324. '"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?"'
  325. '"How much of each should I get?" you ask.'
  326. '"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."'
  327. act 'Tell her you will go get some soon':gt 'gadhouse', 'grandma'
  328. act 'Agree and go to the forest (1:00)':
  329. *clr & cla
  330. if hour >= 6 and hour < 22:
  331. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad.jpg"></center>'
  332. else
  333. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad_night.jpg"></center>'
  334. end
  335. '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.'
  336. minut += 60
  337. act 'Continue': gt 'gadforest', 'forest_edge'
  338. end
  339. end
  340. --- grandmahelp ---------------------------------