gaddvor.tw 20 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456
  1. :: gaddvor[mod mod_gad]
  2. <<set $here = 'gaddvor'>>
  3. <<set $ARGS = $location_var[$here]>>
  4. <<if !$location_var[$here][0]>>
  5. <<set $music_loop = 0>>
  6. <<set $loc_arg = ''>>
  7. <<set $loc = 'gaddvor'>>
  8. <<set $location_type = 'public_outdoors'>>
  9. <<set $menu_loc = 'gaddvor'>>
  10. <<set $menu_arg = ''>>
  11. <<set $menu_off = 0>>
  12. <<set $locclass to null>>
  13. <<gs 'gadukino_event' 'sound'>>
  14. <center><h4>Your grandparents'' yard</h4></center>
  15. <<if $time.month >= 4 and $time.month <= 10>>
  16. <<if $time.hour >= 6 and $time.hour < 22>>
  17. <<image "locations/gadukino/village/dvor.jpg">>
  18. <<else>>
  19. <<image "locations/gadukino/village/dvor_night.jpg">>
  20. <</if>>
  21. <<else>>
  22. <<if $time.hour >= 8 and $time.hour < 18>>
  23. <<image "locations/gadukino/village/dvor_winter.jpg">>
  24. <<else>>
  25. <<image "locations/gadukino/village/dvor_winter_night.jpg">>
  26. <</if>>
  27. <</if>>
  28. A fenced yard behind your grandparents'' house. The yard contains a small barn, garden, root cellar, and banya where you can bathe.
  29. <<if $wardrobe.clothingworntype == 'nude'>>
  30. You are naked and can only go into your grandparent''s house to get dressed or go to the banya.
  31. <<actCLA 'Enter your grandparents` house'>>
  32. <<set $time.minutes += 1>> <<gt 'gadhouse' 'start'>>
  33. <</actCLA>>
  34. <<actCLA 'Enter the banya'>>
  35. <<set $time.minutes += 1>> <<gt 'gadbana'>>
  36. <</actCLA>>
  37. <<else>>
  38. <<if getvar("$grandmaQW['chore_feed_chickens']") == 1 or ($time.hour >= 6 and $time.hour < 20 and $time.month >= 4 and $time.month <= 10)>>
  39. In the yard there are several <<link "chickens">><<gt 'gaddvor' 'chickens'>><</link>> running around.
  40. <</if>>
  41. <<if setup.func('homes_properties', 'is_current_home') and $time.hour > 7 and $time.hour < 20 and getvar("$rex['owned']") == 1>>
  42. <<if $status['dog'] == ''>>
  43. <<gt 'pet_dog' 'name'>>
  44. <<else>>
  45. <<if $rex['gadukino_day'] != $time.daystart>>
  46. <<setinit $rex['relationship'] += 2>>
  47. <<setinit $rex['gadukino_day'] = $time.daystart>>
  48. <</if>>
  49. '<br><<link '<<$rex[''name'']>>'>><<gt 'pet_dog' 'gadukino'>><</link>> is running around in the garden.'
  50. <</if>>
  51. <</if>>
  52. <</if>>
  53. <<if getvar("$mira_guest") == 1>>
  54. Miraloc = 7 & 'Your friend <<link 'Mira'>><<gt 'miroslava' 'Start'>><</link>> stands next to you.'
  55. <</if>>
  56. <<if getvar("$MiraLoc") != 7>>
  57. <<set $mira_guest = 0>>
  58. <</if>>
  59. <<actCLA '<b>Leave and go into the village</b>'>>
  60. <<if $wardrobe.clothingworntype != 'nude'>>
  61. <<set $time.minutes += 5>>
  62. <<gt 'gadukino'>>
  63. <<else>>
  64. <<msg '<b><font color = red>You need to get dressed.</font></b>'>>
  65. <<gt 'gaddvor'>>
  66. <</if>>
  67. <</actCLA>>
  68. <<if getvar("$grandpaQW['chore_clean_yard']") == 1>>
  69. <<actCLA 'Clean up the yard for Grandpa (1:00)'>>
  70. <<if $time.month >= 4 and $time.month <= 10>>
  71. <<image "locations/gadukino/village/clean_yard1.jpg">>
  72. Armed with a rake, you begin cleaning the yard. You're pleased seeing the yard clean. You return the rake to the shed and continue on with your business.
  73. <<else>>
  74. <<image "locations/gadukino/village/clean_yard2.jpg">>
  75. Armed with a shovel, you begin clearing the yard of snow. You're pleased with yourself seeing the courtyard is free of snow. You return the shovel to the shed and continue on with your business.
  76. <</if>>
  77. <<set $time.minutes += 60>>
  78. <<setinit $grandpaQW['chore_clean_yard'] = 2>>
  79. <<if $time.month >= 4 and $time.month <= 10>>
  80. <<set $pc.fat -= rand(1,3)>>
  81. <<set $pc.pcs_stam -= 5>>
  82. <<run $pc.sweatAdd(10)>>
  83. <<else>>
  84. <<run $pc.skillExperienceGain('strength',1)>>
  85. <<set $pc.fat -= rand(1,5)>>
  86. <<set $pc.pcs_stam -= 10>>
  87. <<run $pc.sweatAdd(5)>>
  88. <</if>>
  89. <<act 'Finish'>>
  90. <<gt 'gaddvor'>>
  91. <</act>>
  92. <<actCLA 'Return back to your grandfather'>>
  93. <<set $time.minutes += 1>> <<gt 'gadhouse' 'grandpa'>>
  94. <</actCLA>>
  95. <</actCLA>>
  96. <</if>>
  97. <<actCLA 'Enter your grandparents` house'>>
  98. <<set $time.minutes += 1>> <<gt 'gadhouse' 'start'>>
  99. <</actCLA>>
  100. <<actCLA 'Enter the banya'>>
  101. <<set $time.minutes += 1>> <<gt 'gadbana'>>
  102. <</actCLA>>
  103. <<actCLA 'Go to the barn'>>
  104. <<set $time.minutes += 1>> <<gt 'gadsarai'>>
  105. <</actCLA>>
  106. <<actCLA 'Go to the root cellar'>>
  107. <<set $time.minutes += 1>> <<gt 'gaddvor' 'root_cellar'>>
  108. <</actCLA>>
  109. <<actCLA 'Go to the garden'>>
  110. <<set $time.minutes += 1>> <<gt 'gadgarden' 'garden'>>
  111. <</actCLA>>
  112. <<if getvar("$grandmaQW['chore_feed_chickens']") == 1 or ($time.hour >= 6 and $time.hour < 20 and $time.month >= 4 and $time.month <= 10)>>
  113. <<act 'Look at your grandparents` chickens'>>
  114. <<gt 'gaddvor' 'chickens'>>
  115. <</act>>
  116. <</if>>
  117. <<if rand(1,5) == 1 and $time.hour >= 9 and $time.hour <= 19 and $npc('A60').rel >= 15 and getvar("$Mira_no") == 0 and !$weather.isRaining and $mira_guestday != $time.daystart and ($npc('A63').QW < 13 or $npc('A60').QW >= 10 or getvar("$mirasex") > 1)>>
  118. <<set $menu_off = 1>>
  119. <<gs 'miroslava' 'miraclothes'>>
  120. You went out into the yard and noticed Mira standing there.
  121. <p>"Oh, $pc.name_nick, hi. I hope you don't mind me visiting. I was bored being home alone," she said, smiling.</p>
  122. <<set $mira_guestday = $time.daystart>>
  123. <<set $time.minutes += 5>>
  124. <<set $mira_guest = 1>>
  125. <<act 'Continue'>>
  126. <<gt 'gaddvor'>>
  127. <</act>>
  128. <</if>>
  129. <<set $clothesAtLocation = setup.func('lost_clothes_here',$CURLOC)>>
  130. <<if getvar("$clothesAtLocation") == 1>>
  131. <<if $wardrobe.clothingworntype == 'nude'>>
  132. <<actCLA 'Get dressed'>>
  133. <<gs 'clothing' 'recover_lost_clothes' 'gaddvor' 1>>
  134. <<gs 'underwear' 'wear'>>
  135. <<gt 'gaddvor'>>
  136. <</actCLA>>
  137. <<else>>
  138. <<actCLA 'Pick up your clothes'>>
  139. <<gs 'clothing' 'recover_lost_clothes' 'gaddvor'>>
  140. You picked up your clothes.
  141. <<gt 'gaddvor'>>
  142. <</actCLA>>
  143. <</if>>
  144. <</if>>
  145. <</if>>
  146. <<if $location_var[$here][0] == 'root_cellar'>>
  147. <<set $loc_arg = 'root_cellar'>>
  148. <center><h4>Root Cellar</h4></center>
  149. <<image "locations/gadukino/village/root_cellar.jpg">>
  150. <<if $boletus_stored + getvar("$bilberry_stored") >= 20>>
  151. Your grandparents'' root cellar is full.
  152. <<elseif $boletus_stored + getvar("$bilberry_stored") > 0>>
  153. Your grandparents'' root cellar is partially full.
  154. <<else>>
  155. Your grandparents'' root cellar is empty.
  156. <</if>>
  157. Even though your grandparents allow you to store extra mushrooms and berries you pick, they reserve the right to use them, too, so you aren''t surprised if any go missing.
  158. <<if getvar("$boletus_stored") > 0>>
  159. You currently are storing <b><<boletus_stored>></b> kg of raw mushrooms.
  160. <</if>>
  161. <<if getvar("$bilberry_stored") > 0>>
  162. You currently are storing <b><<bilberry_stored>></b> kg of raw berries.
  163. <</if>>
  164. <<if $boletus + $boletus_cooked + getvar("$bilberry") >= 5>>
  165. Your basket is full and you cannot carry more.
  166. <<elseif $boletus + $boletus_cooked + getvar("$bilberry") > 0>>
  167. Your basket is partially full.
  168. <<else>>
  169. Your basket is empty.
  170. <</if>>
  171. <<if getvar("$boletus") > 0>>
  172. You currently are carrying <b><<boletus>></b> kg of raw mushrooms.
  173. <</if>>
  174. <<if getvar("$boletus_cooked") > 0>>
  175. You currently are carrying <b><<boletus_cooked>></b> kg of cooked mushrooms.
  176. <</if>>
  177. <<if getvar("$bilberry") > 0>>
  178. You currently are carrying <b><<bilberry>></b> kg of raw berries.
  179. <</if>>
  180. <<actCLA 'Go back to the yard'>>
  181. <<set $time.minutes += 1>> <<gt 'gaddvor'>>
  182. <</actCLA>>
  183. <<if ($boletus_stored + getvar("$bilberry_stored") < 20) and (getvar("$boletus") > 0 or getvar("$bilberry") > 0)>>
  184. <<actCLA 'Store as many raw mushrooms and berries that will fit (Max 20 kgs):'>>
  185. <<warn 'JUMP MARKER ENCOUNTERED: :store_bb_loop'>>
  186. <<if getvar("$boletus") > 0>>
  187. <<set $boletus_stored += 1>>
  188. <<set $boletus -= 1>>
  189. <<if $boletus_stored + getvar("$bilberry_stored") < 20>>
  190. <<warn 'JUMP COMMAND ENCOUNTERED: jump store_bb_loop'>>
  191. <</if>>
  192. <</if>>
  193. <<if getvar("$bilberry") > 0>>
  194. <<set $bilberry_stored += 1>>
  195. <<set $bilberry -= 1>>
  196. <<if $boletus_stored + getvar("$bilberry_stored") < 20>>
  197. <<warn 'JUMP COMMAND ENCOUNTERED: jump store_bb_loop'>>
  198. <</if>>
  199. <</if>>
  200. <<gt 'gaddvor' 'root_cellar'>>
  201. <</actCLA>>
  202. <<if getvar("$boletus") > 0>>
  203. <<actCLA 'Store 1 kg of raw mushrooms'>>
  204. <<set $boletus_stored += 1>>
  205. <<set $boletus -= 1>>
  206. <<gt 'gaddvor' 'root_cellar'>>
  207. <</actCLA>>
  208. <</if>>
  209. <<if getvar("$bilberry") > 0>>
  210. <<actCLA 'Store 1 kg of raw berries'>>
  211. <<set $bilberry_stored += 1>>
  212. <<set $bilberry -= 1>>
  213. <<gt 'gaddvor' 'root_cellar'>>
  214. <</actCLA>>
  215. <</if>>
  216. <</if>>
  217. <<if (getvar("$boletus_stored") > 0 or getvar("$bilberry_stored") > 0) and $boletus + $boletus_cooked + getvar("$bilberry") < 5>>
  218. <<actCLA 'Retrieve as many raw mushrooms and berries as you can carry (Max 5 kgs)'>>
  219. <<warn 'JUMP MARKER ENCOUNTERED: :retrieve_bb_loop'>>
  220. <<if getvar("$boletus_stored") > 0>>
  221. <<set $boletus += 1>>
  222. <<set $boletus_stored -= 1>>
  223. <<if $boletus + $boletus_cooked + getvar("$bilberry") < 5>>
  224. <<warn 'JUMP COMMAND ENCOUNTERED: jump retrieve_bb_loop'>>
  225. <</if>>
  226. <</if>>
  227. <<if getvar("$bilberry_stored") > 0>>
  228. <<set $bilberry += 1>>
  229. <<set $bilberry_stored -= 1>>
  230. <<if $boletus + $boletus_cooked + getvar("$bilberry") < 5>>
  231. <<warn 'JUMP COMMAND ENCOUNTERED: jump retrieve_bb_loop'>>
  232. <</if>>
  233. <</if>>
  234. <<gt 'gaddvor' 'root_cellar'>>
  235. <</actCLA>>
  236. <<if (getvar("$boletus_stored") > 0 and getvar("$grandmaQW['chore_can_mushrooms']") != 1) or (getvar("$boletus_stored") > 5 and getvar("$grandmaQW['chore_can_mushrooms']") == 1)>>
  237. <<actCLA 'Retrieve 1 kg of raw mushrooms'>>
  238. <<set $boletus += 1>>
  239. <<set $boletus_stored -= 1>>
  240. <<gt 'gaddvor' 'root_cellar'>>
  241. <</actCLA>>
  242. <</if>>
  243. <<if (getvar("$bilberry_stored") > 0 and getvar("$grandmaQW['chore_can_berries']") != 1) or (getvar("$bilberry_stored") > 5 and getvar("$grandmaQW['chore_can_berries']") == 1)>>
  244. <<actCLA 'Retrieve 1 kg of raw berries'>>
  245. <<set $bilberry += 1>>
  246. <<set $bilberry_stored -= 1>>
  247. <<gt 'gaddvor' 'root_cellar'>>
  248. <</actCLA>>
  249. <</if>>
  250. <</if>>
  251. <</if>>
  252. <<if $location_var[$here][0] == 'chickens'>>
  253. <<set $loc_arg = 'chickens'>>
  254. <<image "locations/gadukino/village/chickens1.jpg">>
  255. Ordinary chickens clucking about their pen.
  256. <<set $time.minutes += 1>>
  257. <<act 'Leave'>>
  258. <<gt 'gaddvor'>>
  259. <</act>>
  260. <!-- !job Granny-->
  261. <<if getvar("$grandmaQW['chore_feed_chickens']") == 1>>
  262. <<actCLA 'Feed the chickens'>>
  263. <<image "locations/gadukino/village/chickens2.jpg">>
  264. You decide to feed the chickens. You pick up a bucket full of bird''s seed and grain mix and toss it on the ground. They immediately rush over and start to greedily eat. You watch them for a bit before you go about your business.
  265. <<set $time.minutes += 30>>
  266. <<setinit $grandmaQW['chore_feed_chickens'] = 2>>
  267. <<run $pc.skillExperienceGain('handyWork',rand(0,3))>>
  268. <<act 'Finish'>>
  269. <<gt 'gaddvor'>>
  270. <</act>>
  271. <<actCLA 'Return back to your grandmother'>>
  272. <<set $time.minutes += 1>> <<gt 'gadhouse' 'grandma'>>
  273. <</actCLA>>
  274. <</actCLA>>
  275. <</if>>
  276. <</if>>
  277. <<if $location_var[$here][0] == 'cikl'>>
  278. <!-- !! vovan, from 1.2.5-->
  279. <<set $hunters_check = 0>>
  280. <<set $mushroom_pickers = 0>>
  281. <<set $mira_go_river = 0>>
  282. <<set $forestpicnic = 0>>
  283. <<if getvar("$Mira_no") > 0>>
  284. <<setn $Mira_no -= 1>>
  285. <</if>>
  286. <<if getvar("$Mira_no") < 0>>
  287. <<set $Mira_no = 0>>
  288. <</if>>
  289. <!-- !! new grandparent chore stuff, for 0.8.0-->
  290. <<if getvar("$gadstay") == 1 and getvar("$lost_girl") == 0>>
  291. <<if $time.daystart > $CON_HELPER_0 and $time.daystart > $CON_HELPER_1>>
  292. <<if ($time.daystart - grandmaQW['last_day_helped'])>>
  293. <p>You haven't helped your grandparents with any chores in daystart - grandmaQW['last_day_helped'] days. You should help out more often to stay on your grandparents' good side.</p>
  294. <<else>>
  295. <p>You haven't helped your grandparents with any chores in daystart - grandpaQW['last_day_helped'] days. You should help out more often to stay on your grandparents' good side.</p>
  296. <</if>>
  297. <<setinit $grandmaQW['help_amount'] -= 1>>
  298. <</if>>
  299. <</if>>
  300. <!-- !! disappointing grandma-->
  301. <<if getvar("$grandmaQW['chore_clean_floor']") == 1 or getvar("$grandmaQW['chore_clean_floor']") == 2>>
  302. <<setinit $grandmaQW['chore_clean_floor'] = 0>>
  303. <<setinit $grandmaQW['disappointment'] = 1>>
  304. <<elseif getvar("$grandmaQW['chore_wash_clothes']") == 1 or getvar("$grandmaQW['chore_wash_clothes']") == 2>>
  305. <<setinit $grandmaQW['chore_wash_clothes'] = 0>>
  306. <<setinit $grandmaQW['disappointment'] = 1>>
  307. <<elseif getvar("$grandmaQW['chore_milk_cow']") == 1 or getvar("$grandmaQW['chore_milk_cow']") == 2>>
  308. <<setinit $grandmaQW['chore_milk_cow'] = 0>>
  309. <<setinit $grandmaQW['disappointment'] = 1>>
  310. <<elseif getvar("$grandmaQW['chore_groceries']") == 1 or getvar("$grandmaQW['chore_groceries']") == 2>>
  311. <<setinit $grandmaQW['chore_groceries'] = 0>>
  312. <<setinit $grandmaQW['disappointment'] = 1>>
  313. <<elseif getvar("$grandmaQW['chore_can_mushrooms']") == 1 or getvar("$grandmaQW['chore_can_mushrooms']") == 2>>
  314. <<setinit $grandmaQW['chore_can_mushrooms'] = 0>>
  315. <<setinit $grandmaQW['disappointment'] = 1>>
  316. <<elseif getvar("$grandmaQW['chore_can_berries']") == 1 or getvar("$grandmaQW['chore_can_berries']") == 2>>
  317. <<setinit $grandmaQW['chore_can_berries'] = 0>>
  318. <<setinit $grandmaQW['disappointment'] = 1>>
  319. <<elseif getvar("$grandmaQW['chore_can_veggies']") == 1 or getvar("$grandmaQW['chore_can_veggies']") == 2>>
  320. <<setinit $grandmaQW['chore_can_veggies'] = 0>>
  321. <<setinit $grandmaQW['disappointment'] = 1>>
  322. <<elseif getvar("$grandmaQW['chore_feed_chickens']") == 1 or getvar("$grandmaQW['chore_feed_chickens']") == 2>>
  323. <<setinit $grandmaQW['chore_feed_chickens'] = 0>>
  324. <<setinit $grandmaQW['disappointment'] = 1>>
  325. <<elseif getvar("$grandmaQW['chore_work_in_garden']") == 1 or getvar("$grandmaQW['chore_work_in_garden']") == 2>>
  326. <<setinit $grandmaQW['chore_work_in_garden'] = 0>>
  327. <<setinit $grandmaQW['disappointment'] = 1>>
  328. <<elseif getvar("$grandmaQW['chore_water_garden']") == 1 or getvar("$grandmaQW['chore_water_garden']") == 2>>
  329. <<setinit $grandmaQW['chore_water_garden'] = 0>>
  330. <<setinit $grandmaQW['disappointment'] = 1>>
  331. <<elseif getvar("$grandmaQW['chore_collect_strawberries']") == 1 or getvar("$grandmaQW['chore_collect_strawberries']") == 2>>
  332. <<setinit $grandmaQW['chore_collect_strawberries'] = 0>>
  333. <<setinit $grandmaQW['disappointment'] = 1>>
  334. <<elseif getvar("$grandmaQW['chore_collect_fruit']") == 1 or getvar("$grandmaQW['chore_collect_fruit']") == 2>>
  335. <<setinit $grandmaQW['chore_collect_fruit'] = 0>>
  336. <<setinit $grandmaQW['disappointment'] = 1>>
  337. <<elseif getvar("$grandmaQW['chore_harvest_garden']") == 1 or getvar("$grandmaQW['chore_harvest_garden']") == 2>>
  338. <<setinit $grandmaQW['chore_harvest_garden'] = 0>>
  339. <<setinit $grandmaQW['disappointment'] = 1>>
  340. <<elseif getvar("$grandmaQW['chore_gather_mushrooms']") == 1 or getvar("$grandmaQW['chore_gather_mushrooms']") == 2>>
  341. <<setinit $grandmaQW['disappointment'] = 2>>
  342. <<elseif getvar("$grandmaQW['chore_gather_mushrooms']") == 1 or getvar("$grandmaQW['chore_gather_mushrooms']") == 2 and getvar("$grandmaQW['disappointment']") == 2>>
  343. <<setinit $grandmaQW['chore_gather_mushrooms'] = 0>>
  344. <<setinit $grandmaQW['chore_mushroom_quantity'] = 0>>
  345. <<setinit $grandmaQW['disappointment'] = 1>>
  346. <<elseif getvar("$grandmaQW['chore_gather_berries']") == 1 or getvar("$grandmaQW['chore_gather_berries']") == 2>>
  347. <<setinit $grandmaQW['disappointment'] = 2>>
  348. <<elseif getvar("$grandmaQW['chore_gather_berries']") == 1 or getvar("$grandmaQW['chore_gather_berries']") == 2 and getvar("$grandmaQW['disappointment']") == 2>>
  349. <<setinit $grandmaQW['chore_gather_berries'] = 0>>
  350. <<setinit $grandmaQW['chore_berry_quantity'] = 0>>
  351. <<setinit $grandmaQW['disappointment'] = 1>>
  352. <<elseif getvar("$grandmaQW['chore_gather_both']") == 1 or getvar("$grandmaQW['chore_gather_both']") == 2>>
  353. <<setinit $grandmaQW['disappointment'] = 2>>
  354. <<elseif getvar("$grandmaQW['chore_gather_both']") == 1 or getvar("$grandmaQW['chore_gather_both']") == 2 and getvar("$grandmaQW['disappointment']") == 2>>
  355. <<setinit $grandmaQW['chore_gather_both'] = 0>>
  356. <<setinit $grandmaQW['chore_mushroom_quantity'] = 0>>
  357. <<setinit $grandmaQW['chore_berry_quantity'] = 0>>
  358. <<setinit $grandmaQW['disappointment'] = 1>>
  359. <</if>>
  360. <!-- !! disappointing grandpa-->
  361. <<if getvar("$grandpaQW['chore_fetch_firewood']") == 1 or getvar("$grandpaQW['chore_fetch_firewood']") == 2>>
  362. <<setinit $grandpaQW['chore_fetch_firewood'] = 0>>
  363. <<setinit $grandpaQW['disappointment'] = 1>>
  364. <<elseif getvar("$grandpaQW['chore_feed_horse']") == 1 or getvar("$grandpaQW['chore_feed_horse']") == 2>>
  365. <<setinit $grandpaQW['chore_feed_horse'] = 0>>
  366. <<setinit $grandpaQW['disappointment'] = 1>>
  367. <<elseif getvar("$grandpaQW['chore_feed_cow']") == 1 or getvar("$grandpaQW['chore_feed_cow']") == 2>>
  368. <<setinit $grandpaQW['chore_feed_cow'] = 0>>
  369. <<setinit $grandpaQW['disappointment'] = 1>>
  370. <<elseif getvar("$grandpaQW['chore_clean_yard']") == 1 or getvar("$grandpaQW['chore_clean_yard']") == 2>>
  371. <<setinit $grandpaQW['chore_clean_yard'] = 0>>
  372. <<setinit $grandpaQW['disappointment'] = 1>>
  373. <<elseif getvar("$grandpaQW['chore_feed_boar']") == 1 or getvar("$grandpaQW['chore_feed_boar']") == 2>>
  374. <<setinit $grandpaQW['chore_feed_boar'] = 0>>
  375. <<setinit $grandpaQW['disappointment'] = 1>>
  376. <<elseif getvar("$grandpaQW['chore_bathe_horse']") == 1 or getvar("$grandpaQW['chore_bathe_horse']") == 2>>
  377. <<setinit $grandpaQW['chore_bathe_horse'] = 0>>
  378. <<setinit $grandpaQW['chore_bathe_horse_prog'] = 0>>
  379. <<setinit $grandpaQW['disappointment'] = 1>>
  380. <<elseif getvar("$grandpaQW['chore_brush_horse']") == 1 or getvar("$grandpaQW['chore_brush_horse']") == 2>>
  381. <<setinit $grandpaQW['chore_brush_horse'] = 0>>
  382. <<setinit $grandpaQW['disappointment'] = 1>>
  383. <<elseif getvar("$grandpaQW['chore_lead_horse_to_field']") == 1 or getvar("$grandpaQW['chore_lead_horse_to_field']") == 2>>
  384. <<setinit $grandpaQW['chore_lead_horse_to_field'] = 0>>
  385. <<setinit $grandpaQW['disappointment'] = 1>>
  386. <<elseif getvar("$grandpaQW['chore_herd_cattle']") == 1 or getvar("$grandpaQW['chore_herd_cattle']") == 2>>
  387. <<setinit $grandpaQW['chore_herd_cattle'] = 0>>
  388. <<setinit $grandpaQW['disappointment'] = 1>>
  389. <<elseif getvar("$grandpaQW['chore_lead_cow_to_field']") == 1 or getvar("$grandpaQW['chore_lead_cow_to_field']") == 2>>
  390. <<setinit $grandpaQW['chore_lead_cow_to_field'] = 0>>
  391. <<setinit $grandpaQW['disappointment'] = 1>>
  392. <<elseif getvar("$grandpaQW['chore_gather_mushrooms']") == 1 or getvar("$grandpaQW['chore_gather_mushrooms']") == 2>>
  393. <<setinit $grandpaQW['disappointment'] = 2>>
  394. <<elseif getvar("$grandpaQW['chore_gather_mushrooms']") == 1 or getvar("$grandpaQW['chore_gather_mushrooms']") == 2 and getvar("$grandpaQW['disappointment']") == 2>>
  395. <<setinit $grandpaQW['chore_gather_mushrooms'] = 0>>
  396. <<setinit $grandpaQW['chore_mushroom_quantity'] = 0>>
  397. <<setinit $grandpaQW['disappointment'] = 1>>
  398. <<elseif getvar("$grandpaQW['chore_gather_berries']") == 1 or getvar("$grandpaQW['chore_gather_berries']") == 2>>
  399. <<setinit $grandpaQW['disappointment'] = 2>>
  400. <<elseif getvar("$grandpaQW['chore_gather_berries']") == 1 or getvar("$grandpaQW['chore_gather_berries']") == 2 and getvar("$grandpaQW['disappointment']") == 2>>
  401. <<setinit $grandpaQW['chore_gather_berries'] = 0>>
  402. <<setinit $grandpaQW['chore_berry_quantity'] = 0>>
  403. <<setinit $grandpaQW['disappointment'] = 1>>
  404. <<elseif getvar("$grandpaQW['chore_gather_both']") == 1 or getvar("$grandpaQW['chore_gather_both']") == 2>>
  405. <<setinit $grandpaQW['disappointment'] = 2>>
  406. <<elseif getvar("$grandpaQW['chore_gather_both']") == 1 or getvar("$grandpaQW['chore_gather_both']") == 2 and getvar("$grandpaQW['disappointment']") == 2>>
  407. <<setinit $grandpaQW['chore_gather_both'] = 0>>
  408. <<setinit $grandpaQW['chore_mushroom_quantity'] = 0>>
  409. <<setinit $grandpaQW['chore_berry_quantity'] = 0>>
  410. <<setinit $grandpaQW['disappointment'] = 1>>
  411. <<elseif getvar("$grandpaQW['chore_bale_hay']") == 1 or getvar("$grandpaQW['chore_bale_hay']") == 2>>
  412. <<setinit $grandpaQW['chore_bale_hay'] = 0>>
  413. <<setinit $grandpaQW['disappointment'] = 1>>
  414. <</if>>
  415. <!-- !! grandparents use root cellar-->
  416. <<if getvar("$boletus_stored") > 0>>
  417. <<set $boletus_stored -= rand(0,1)>>
  418. <</if>>
  419. <<if getvar("$bilberry_stored") > 0>>
  420. <<set $bilberry_stored -= rand(0,1)>>
  421. <</if>>
  422. <<if getvar("$boletus_stored") < 0>>
  423. <<set $boletus_stored = 0>>
  424. <</if>>
  425. <<if getvar("$bilberry_stored") < 0>>
  426. <<set $bilberry_stored = 0>>
  427. <</if>>
  428. <!-- !! end of new grandparent chore stuff, for 0.8.0-->
  429. <<if getvar("$catout") != 0>>
  430. <<set $catout = 0>>
  431. <</if>>
  432. <<if getvar("$feedcat") != 0>>
  433. <<set $feedcat = 0>>
  434. <</if>>
  435. <</if>>