grandpahelp 26 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735
  1. # grandpahelp
  2. gs'stat'
  3. '<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandpa1.jpg"></center>'
  4. 'You walk up to your grandfather and ask if he needs any help. Grandpa thinks for a moment and says:'
  5. if month = 1:grandpahelping = RAND(0,5)
  6. if month = 2:grandpahelping = RAND(0,5)
  7. if month = 3:grandpahelping = RAND(0,5)
  8. if month = 4:grandpahelping = RAND(0,5)
  9. if month = 5:grandpahelping = RAND(6,11)
  10. if month = 6:grandpahelping = RAND(12,21)
  11. if month = 7:grandpahelping = RAND(22,32)
  12. if month = 8:grandpahelping = RAND(22,32)
  13. if month = 9:grandpahelping = RAND(12,21)
  14. if month = 10:grandpahelping = RAND(0,4)
  15. if month = 11:grandpahelping = RAND(0,4)
  16. if month = 12:grandpahelping = RAND(0,4)
  17. !month >= 1 and month < 5 and month > 9
  18. if grandpahelping = 0:
  19. '"- Of course <<$pcs_nickname>>, I need your help in the yard. Bring a garden tool with you."'
  20. act 'Clean up the yard (1:00)':
  21. *clr & cla
  22. if month >= 4 and month <= 10:
  23. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/clean_yard1.jpg"></center>'
  24. '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.'
  25. else
  26. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/clean_yard2.jpg"></center>'
  27. 'Armed with a shovel, you begin clearing the yard from snow. You''re pleased with yourself seeing the courtyard is free from snow. You return the shovel to the shed and continue on with your business.'
  28. end
  29. minut += 60
  30. grandmahelp += 1
  31. if month >= 4 and month <= 10:
  32. fat -= RAND(1,3)
  33. else
  34. stren_exp += 1
  35. fat -= RAND(1,5)
  36. end
  37. gs'stat'
  38. act 'Go':gt'Gaddvor'
  39. end
  40. end
  41. if grandpahelping = 1:
  42. '"- <<$pcs_nickname>>, could you bring firewood for the stove?"'
  43. act 'Fetch firewood (0:15)':
  44. *clr & cla
  45. if month >= 4 and month <= 10:
  46. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/firewood.jpg"></center>'
  47. else
  48. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/firewood_winter.jpg"></center>'
  49. end
  50. 'You put on some warm clothes and run over to the barn to collect some firewood. '
  51. '"- I''ve brought some firewood grandfather," you said to your grandfather.'
  52. '"- You are very quick <<$pcs_nickname>>." he replies with a smile. "- That''s today''s youth for ya. There is no more work today."'
  53. minut += 15
  54. grandmahelp += 1
  55. gs'stat'
  56. act 'Go':gt'Gadhouse'
  57. end
  58. end
  59. if grandpahelping = 2:
  60. '"- <<$pcs_nickname>>, I need you to go to the barn and feed Desperado."'
  61. act 'Go to the barn (0:15)':
  62. if month >= 4 and month <= 10:
  63. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  64. else
  65. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard_winter.jpg"></center>'
  66. end
  67. 'You went to the barn and fed the horse.'
  68. *clr & cla
  69. feed_horse = 1
  70. minut += 15
  71. gs'stat'
  72. act 'Further':gt'Gadsarai'
  73. end
  74. end
  75. if grandpahelping = 3:
  76. '"- <<$pcs_nickname>>, go to the barn to feed the cows."'
  77. act 'Go to the barn (0:15)':
  78. *clr & cla
  79. if month >= 4 and month <= 10:
  80. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  81. else
  82. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard_winter.jpg"></center>'
  83. end
  84. 'You went to the shed and fed the cows.'
  85. minut += 15
  86. feed_cow = 1
  87. gs'stat'
  88. act 'Further':gt'Gadsarai'
  89. end
  90. end
  91. if grandpahelping = 4:
  92. '"- Of course <<$pcs_nickname>>, I need your help to groom Desperado."'
  93. act 'Go to the barn (0:15)':
  94. *clr & cla
  95. if month >= 4 and month <= 10:
  96. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  97. else
  98. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard_winter.jpg"></center>'
  99. end
  100. 'You went to the barn, took out a brush and started grooming Desperado.'
  101. comb_horse = 1
  102. minut += 15
  103. gs'stat'
  104. act 'Further':gt'Gadsarai'
  105. end
  106. end
  107. if grandpahelping = 5:
  108. '"- <<$pcs_nickname>>, could you go to the barn and feed the hogs."'
  109. act 'Go to the barn (0:15)':
  110. *clr & cla
  111. if month >= 4 and month <= 10:
  112. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  113. else
  114. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard_winter.jpg"></center>'
  115. end
  116. 'You went to the barn and fed the hogs.'
  117. feed_boar = 1
  118. minut += 15
  119. gs'stat'
  120. act 'Further':gt'Gadsarai'
  121. end
  122. end
  123. !month = 5
  124. if grandpahelping = 6:
  125. '"- Of course <<$pcs_nickname>>, I need your help cleaning the yard. Bring a garden tool with you."'
  126. act 'Clean up the yard (1:00)':
  127. *clr & cla
  128. if month >= 4 and month <= 10:
  129. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/clean_yard1.jpg"></center>'
  130. '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.'
  131. else
  132. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/clean_yard2.jpg"></center>'
  133. 'Armed with a shovel, you begin clearing the yard from snow. You''re pleased with yourself seeing the courtyard is free from snow. You return the shovel to the shed and continue on with your business.'
  134. end
  135. minut += 60
  136. grandmahelp += 1
  137. if month >= 4 and month <= 10:
  138. fat -= RAND(1,3)
  139. else
  140. stren_exp += 1
  141. fat -= RAND(1,5)
  142. end
  143. gs'stat'
  144. act 'Go':gt'Gaddvor'
  145. end
  146. end
  147. if grandpahelping = 7:
  148. '"- <<$pcs_nickname>>, could you go to the barn and feed the hogs."'
  149. act 'Go to the barn (0:15)':
  150. *clr & cla
  151. if month >= 4 and month <= 10:
  152. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  153. else
  154. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard_winter.jpg"></center>'
  155. end
  156. 'You went to the barn and fed the hogs.'
  157. feed_boar = 1
  158. minut += 15
  159. gs'stat'
  160. act 'Further':gt'Gadsarai'
  161. end
  162. end
  163. if grandpahelping = 8 and week > 5:
  164. '"- Of course <<$pcs_nickname>>, I need your help to groom Desperado."'
  165. act 'Go to the barn (0:15)':
  166. *clr & cla
  167. if month >= 4 and month <= 10:
  168. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  169. else
  170. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard_winter.jpg"></center>'
  171. end
  172. 'You went to the barn, took out a brush and started grooming Desperado.'
  173. comb_horse = 1
  174. minut += 15
  175. gs'stat'
  176. act 'Further':gt'Gadsarai'
  177. end
  178. elseif grandpahelping = 8 and week <= 5:
  179. '"- You don''t need to help out today <<$pcs_nickname>>."'
  180. act 'Go':gt'Gadhouse'
  181. end
  182. if grandpahelping = 9 and hour >= 6 and hour < 9:
  183. '"- <<$pcs_nickname>>, take the horse to the field, my legs hurt so I need to rest for a bit. I`ll retrieve the horse up in the evening."'
  184. act 'Go to the barn (0:15)':
  185. *clr & cla
  186. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  187. 'You led the horse to the field.'
  188. horse_field = 1
  189. minut += 15
  190. gs'stat'
  191. act 'Further':& gt'Gadsarai'
  192. end
  193. elseif grandpahelping = 9 and hour >= 9:
  194. '"- You can rest today <<$pcs_nickname>>, you don''t need to help me today."'
  195. act 'Go':gt'Gadhouse'
  196. end
  197. if grandpahelping = 10 and hour >= 6 and hour < 9:
  198. '"- I have sore feet today, <<$pcs_nickname>>. My dear granddaughter could you lead the cows on the field and tell the herders to drive them home at the end of the day."'
  199. act 'Go to the barn (0:15)':
  200. *clr & cla
  201. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  202. 'You went to the shed where the cows are and led the herd to the field.'
  203. cow_field = 1
  204. minut += 15
  205. gs'stat'
  206. act 'Further':gt'Gadsarai'
  207. end
  208. elseif grandpahelping = 10 and hour >= 9:
  209. '"- You can rest today child, there is nothing to do."'
  210. act 'Go':gt'Gadhouse'
  211. end
  212. if grandpahelping = 11 and hour >= 6 and hour < 9:
  213. if graze_cow_exp = 0: '"- <<$pcs_nickname>>, we need to let the cows graze on the field today. Grab something to eat, lead the herd to the field. I''ll meet you there."'
  214. if graze_cow_exp > 0: '"- <<$pcs_nickname>>, it''s our turn to look out for the cows grazing on the field today. So grab something to eat quickly, and stop by the field where the herd is. I''ll bring back them back home."'
  215. if graze_cow_exp = 0:
  216. act 'Go to the barn (0:20)':
  217. gs 'food', 'm_meal' &! use current one, *clr & cla will clear messages
  218. *clr & cla
  219. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  220. 'You took a little nibble of a sandwich and went to the shed where the herd was. Your grandmother put a sandwich and a bottle of water in the bag for lunch.'
  221. graze_cow = 1
  222. pcs_mood += 20
  223. pcs_health += 10
  224. minut += 20
  225. bottle += 1
  226. buterbrod += 1
  227. gs'stat'
  228. act 'Further':gt'Gadsarai'
  229. end
  230. else
  231. act 'Go to the field (0:20)':
  232. gs 'food', 'm_meal' &! use current one, *clr & cla will clear messages
  233. *clr & cla
  234. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_go_field.jpg"></center>'
  235. 'You had a quick bite and went to the field where the village herd is. Your grandmother put a sandwich and a bottle of water in the bag for lunch.'
  236. graze_cow = 1
  237. pcs_mood += 20
  238. pcs_health += 10
  239. minut += 20
  240. bottle += 1
  241. buterbrod += 1
  242. gs'stat'
  243. act 'Further':gt'gadfield','cow'
  244. end
  245. end
  246. elseif grandpahelping = 11 and hour >= 9:
  247. '"- You can rest today <<$pcs_nickname>>, there is nothing to do."'
  248. act 'Go':gt'Gadhouse'
  249. end
  250. !month = 6 or month = 9
  251. if grandpahelping = 12:
  252. '"– I need your help cleaning the yard, bring the garden tools."'
  253. act 'Clean up the yard (1:00)':
  254. *clr & cla
  255. if month >= 4 and month <= 10:
  256. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/clean_yard1.jpg"></center>'
  257. '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.'
  258. else
  259. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/clean_yard2.jpg"></center>'
  260. 'Armed with a shovel, you begin clearing the yard from snow. You''re pleased with yourself seeing the courtyard is free from snow. You return the shovel to the shed and continue on with your business.'
  261. end
  262. minut += 60
  263. grandmahelp += 1
  264. if month >= 4 and month <= 10:
  265. fat -= RAND(1,3)
  266. else
  267. stren_exp += 1
  268. fat -= RAND(1,5)
  269. end
  270. gs'stat'
  271. act 'Go':gt'Gaddvor'
  272. end
  273. end
  274. if grandpahelping = 13:
  275. '"- <<$pcs_nickname>>, could you go to the barn and feed the pigs."'
  276. act 'Go to the barn (0:15)':
  277. *clr & cla
  278. if month >= 4 and month <= 10:
  279. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  280. else
  281. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard_winter.jpg"></center>'
  282. end
  283. 'You went to the barn to fed the pigs.'
  284. feed_boar = 1
  285. minut += 15
  286. gs'stat'
  287. act 'Further':gt'Gadsarai'
  288. end
  289. end
  290. if grandpahelping = 14 and week > 5:
  291. '"- <<$pcs_nickname>>, I need your help to groom Desperado."'
  292. act 'Go to the barn (0:15)':
  293. *clr & cla
  294. if month >= 4 and month <= 10:
  295. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  296. else
  297. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard_winter.jpg"></center>'
  298. end
  299. 'You went to the barn, took out a brush and started grooming Desperado.'
  300. comb_horse = 1
  301. minut += 15
  302. gs'stat'
  303. act 'Further':gt'Gadsarai'
  304. end
  305. elseif grandpahelping = 14 and week <= 5:
  306. '"- You can take the day off."'
  307. act 'Go':gt'Gadhouse'
  308. end
  309. if grandpahelping = 15 and hour >= 6 and hour < 9:
  310. '"- <<$pcs_nickname>>, take the horse to the field, my legs hurt so I need to rest for a bit. I`ll retrieve the horse up in the evening."'
  311. act 'Go to the barn (0:15)':
  312. *clr & cla
  313. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  314. 'You led the horse to the field.'
  315. horse_field = 1
  316. minut += 15
  317. gs'stat'
  318. act 'Further':& gt'Gadsarai'
  319. end
  320. elseif grandpahelping = 15 and hour >= 9:
  321. '"- There''s no work today <<$pcs_nickname>>, go and rest up."'
  322. act 'Go':gt'Gadhouse'
  323. end
  324. if grandpahelping = 16 and hour >= 6 and hour < 9:
  325. '"- I have sore feet today, <<$pcs_nickname>>. My dear granddaughter could you lead the cows on the field and tell the herders to drive them home at the end of the day."'
  326. act 'Go to the barn (0:15)':
  327. *clr & cla
  328. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  329. 'You went to the shed where the cows are and led the herd to the field.'
  330. cow_field = 1
  331. minut += 15
  332. gs'stat'
  333. act 'Further':gt'Gadsarai'
  334. end
  335. elseif grandpahelping = 16 and hour >= 9:
  336. '"- You can rest today my dear granddaughter."'
  337. act 'Go':gt'Gadhouse'
  338. end
  339. if grandpahelping = 17 and hour >= 6 and hour < 9:
  340. if graze_cow_exp = 0: '"- <<$pcs_nickname>>, we need to let the cows graze on the field today. Grab something to eat, lead the herd to the field. I''ll meet you there."'
  341. if graze_cow_exp > 0: '"- <<$pcs_nickname>>, it''s our turn to look out for the cows grazing on the field today. So grab something to eat quickly, and stop by the field where the herd is. I''ll bring back them back home."'
  342. if graze_cow_exp = 0:
  343. act 'Go to the barn (0:20)':
  344. gs 'food', 'm_meal'&!use current one, *clr & cla will clear messages
  345. *clr & cla
  346. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  347. 'You took a little nibble of a sandwich and went to the shed where the herd was. Your grandmother put a sandwich and a bottle of water in the bag for lunch.'
  348. graze_cow = 1
  349. pcs_mood += 20
  350. pcs_health += 10
  351. minut += 20
  352. bottle += 1
  353. buterbrod += 1
  354. gs'stat'
  355. act 'Further':gt'Gadsarai'
  356. end
  357. else
  358. act 'Go to the field (0:20)':
  359. gs 'food', 'm_meal'&!use current one, *clr & cla will clear messages
  360. *clr & cla
  361. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_go_field.jpg"></center>'
  362. 'You had a quick bite and went to the field where the village herd is. Your grandmother put a sandwich and a bottle of water in the bag for lunch.'
  363. graze_cow = 1
  364. pcs_mood += 20
  365. pcs_health += 10
  366. minut += 20
  367. bottle += 1
  368. buterbrod += 1
  369. gs'stat'
  370. act 'Further':gt'gadfield','field'
  371. end
  372. end
  373. elseif grandpahelping = 17 and hour >= 9:
  374. '"- You can take the day off to rest up."'
  375. act 'Go':gt'Gadhouse'
  376. end
  377. if grandpahelping = 18 and temper >= 15 and sunWeather = 1 and week > 5:
  378. '"- It''s good weather today. Take Desperado to the river and give him a bath."'
  379. act 'Go to the barn (0:10)':
  380. *clr & cla
  381. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  382. 'You went and got the horse from the barn and led it to the river.'
  383. horse_river = 1
  384. minut += 10
  385. gs'stat'
  386. act 'Further':gt'Gadsarai'
  387. end
  388. elseif grandpahelping = 18 and week <= 5 or grandpahelping = 18 and temper < 15 or grandpahelping = 18 and sunWeather = 0:
  389. '"- You don''t need to help out today <<$pcs_nickname>>."'
  390. act 'Go':gt'Gadhouse'
  391. end
  392. if grandpahelping = 19 and go_in_boletus = 0 and go_in_bilberry = 0 and go_in_boletus_bilberry = 0:
  393. grandpa_boletus = rand(2,3)
  394. go_in_boletus = 1
  395. '"- <<$pcs_nickname>>, could you go to the forest and pick mushrooms? I''m craving fried mushrooms."'
  396. '"- How much should I pick, grandpa?", you asked.'
  397. '"- <<grandpa_boletus>> kg will be enough," grandfather replied. "- Be careful so you don''t get lost."'
  398. act 'Go':gt'Gadhouse'
  399. elseif grandpahelping = 19 and go_in_boletus = 1 or grandpahelping = 19 and go_in_bilberry = 1 or grandpahelping = 19 and go_in_boletus_bilberry = 1:
  400. '"- You can rest today <<$pcs_nickname>>, you don''t need to help me today."'
  401. act 'Go':gt'Gadhouse'
  402. end
  403. if grandpahelping = 20 and go_in_boletus = 0 and go_in_bilberry = 0 and go_in_boletus_bilberry = 0:
  404. grandpa_bilberry = rand(3,5)
  405. go_in_bilberry = 1
  406. '"- <<$pcs_nickname>>, could you go to the forest to pick some berries? Grandma wants to make homemade fruit jam."'
  407. '"- How much should I pick, grandpa?" you asked.'
  408. '"- <<grandpa_bilberry>> kg will be enough," grandfather replied. "- Just be careful so you don''t get lost."'
  409. act 'Go':gt'Gadhouse'
  410. elseif grandpahelping = 20 and go_in_boletus = 1 or grandpahelping = 20 and go_in_bilberry = 1 or grandpahelping = 20 and go_in_boletus_bilberry = 1:
  411. '"- You can take the day off."'
  412. act 'Go':gt'Gadhouse'
  413. end
  414. if grandpahelping = 21 and go_in_boletus = 0 and go_in_bilberry = 0 and go_in_boletus_bilberry = 0:
  415. grandpa_boletus = rand(2,3)
  416. grandpa_bilberry = rand(2,3)
  417. go_in_boletus_bilberry = 1
  418. '"- <<$pcs_nickname>>, can you go to the forest and pick some berries and mushrooms? Your grandmother wants to make a mushroom soup, and has a craving for some fresh berries."'
  419. '"- How much should I pick, grandpa?"'
  420. '"- <<grandpa_boletus>> kg mushrooms and <<grandpa_bilberry>> kg of berries will be enough," grandfather replied. "- Just don`t get lost."'
  421. act 'Go':gt'Gadhouse'
  422. elseif grandpahelping = 21 and go_in_boletus = 1 or grandpahelping = 21 and go_in_bilberry = 1 or grandpahelping = 21 and go_in_boletus_bilberry = 1:
  423. '"- There''s no work today <<$pcs_nickname>>, go and rest up."'
  424. act 'Go':gt'Gadhouse'
  425. end
  426. !month = 7 or month = 8
  427. if grandpahelping = 22:
  428. '"- Of course <<$pcs_nickname>>, I need your help in the yard. Bring a garden tool with you."'
  429. act 'Clean up the yard (1:00)':
  430. *clr & cla
  431. if month >= 4 and month <= 10:
  432. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/clean_yard1.jpg"></center>'
  433. '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.'
  434. else
  435. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/clean_yard2.jpg"></center>'
  436. 'Armed with a shovel, you begin clearing the yard from snow. You''re pleased with yourself seeing the courtyard is free from snow. You return the shovel to the shed and continue on with your business.'
  437. end
  438. minut += 60
  439. grandmahelp += 1
  440. if month >= 4 and month <= 10:
  441. fat -= RAND(1,3)
  442. else
  443. stren_exp += 1
  444. fat -= RAND(1,5)
  445. end
  446. gs'stat'
  447. act 'Go':gt'Gaddvor'
  448. end
  449. end
  450. if grandpahelping = 23:
  451. '"- <<$pcs_nickname>>, could you go to the barn and feed the hogs."'
  452. act 'Go to the barn (0:15)':
  453. *clr & cla
  454. if month >= 4 and month <= 10:
  455. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  456. else
  457. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard_winter.jpg"></center>'
  458. end
  459. 'You went to the barn and fed the hogs.'
  460. feed_boar = 1
  461. minut += 15
  462. gs'stat'
  463. act 'Further':gt'Gadsarai'
  464. end
  465. end
  466. if grandpahelping = 24 and week > 5:
  467. '"- Of course <<$pcs_nickname>>, I need your help to groom Desperado."'
  468. act 'Go to the barn (0:15)':
  469. *clr & cla
  470. if month >= 4 and month <= 10:
  471. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  472. else
  473. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard_winter.jpg"></center>'
  474. end
  475. 'You went to the barn, took out a brush and started grooming Desperado.'
  476. comb_horse = 1
  477. minut += 15
  478. gs'stat'
  479. act 'Further':gt'Gadsarai'
  480. end
  481. elseif grandpahelping = 24 and week <= 5:
  482. '"- You don''t need to help out today <<$pcs_nickname>>."'
  483. act 'Go':gt'Gadhouse'
  484. end
  485. if grandpahelping = 25 and hour >= 6 and hour < 9:
  486. '"- <<$pcs_nickname>>, take the horse to the field, my legs hurt so I need to rest for a bit. I`ll retrieve the horse up in the evening."'
  487. act 'Go to the barn (0:10)':
  488. *clr & cla
  489. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  490. 'You led the horse to the field.'
  491. horse_field = 1
  492. minut += 10
  493. gs'stat'
  494. act 'Further':& gt'Gadsarai'
  495. end
  496. elseif grandpahelping = 25 and hour >= 9:
  497. '"- There''s no work today <<$pcs_nickname>>, go and rest up."'
  498. act 'Go':gt'Gadhouse'
  499. end
  500. if grandpahelping = 26 and hour >= 6 and hour < 9:
  501. '"- I have sore feet today, <<$pcs_nickname>>. My dear granddaughter could you lead the cows on the field and tell the herders to drive them home at the end of the day."'
  502. act 'Go to the barn (0:10)':
  503. *clr & cla
  504. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  505. 'You went to the shed where the cows are and led the herd to the field.'
  506. cow_field = 1
  507. minut += 10
  508. gs'stat'
  509. act 'Further':gt'Gadsarai'
  510. end
  511. elseif grandpahelping = 26 and hour >= 9:
  512. '"- You can rest today my dear granddaughter."'
  513. act 'Go':gt'Gadhouse'
  514. end
  515. if grandpahelping = 27 and hour >= 6 and hour < 9:
  516. if graze_cow_exp = 0: '"- <<$pcs_nickname>>, we need to let the cows graze on the field today. Grab something to eat, lead the herd to the field. I''ll meet you there."'
  517. if graze_cow_exp > 0: '"- <<$pcs_nickname>>, it''s our turn to look out for the cows grazing on the field today. So grab something to eat quickly, and stop by the field where the herd is. I''ll bring back them back home."'
  518. if graze_cow_exp = 0:
  519. act 'Go to the barn (0:20)':
  520. gs 'food', 'm_meal'&!use current one, *clr & cla will clear messages
  521. *clr & cla
  522. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  523. 'You took a little nibble of a sandwich and went to the shed where the herd was. Your grandmother put a sandwich and a bottle of water in the bag for lunch.'
  524. graze_cow = 1
  525. pcs_mood += 20
  526. pcs_health += 10
  527. minut += 20
  528. bottle += 1
  529. buterbrod += 1
  530. gs'stat'
  531. act 'Further':gt'Gadsarai'
  532. end
  533. else
  534. act 'Go to the field (0:20)':
  535. gs 'food', 'm_meal'&!use current one, *clr & cla will clear messages
  536. *clr & cla
  537. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_go_field.jpg"></center>'
  538. 'You had a quick bite and went to the field where the village herd is. Your grandmother put a sandwich and a bottle of water in the bag for lunch.'
  539. graze_cow = 1
  540. pcs_mood += 20
  541. pcs_health += 10
  542. minut += 20
  543. bottle += 1
  544. buterbrod += 1
  545. gs'stat'
  546. act 'Further':gt'gadfield','field'
  547. end
  548. end
  549. elseif grandpahelping = 27 and hour >= 9:
  550. '"- You can take the day off to rest up."'
  551. act 'Go':gt'Gadhouse'
  552. end
  553. if grandpahelping = 28 and temper >= 15 and sunWeather = 1 and week > 5:
  554. '"- It''s good weather today. Take Desperado to the river and give him a bath."'
  555. act 'Go to the barn (0:10)':
  556. *clr & cla
  557. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_yard.jpg"></center>'
  558. 'You went and got the horse from the barn and led it to the river.'
  559. horse_river = 1
  560. minut += 10
  561. gs'stat'
  562. act 'Further':gt'Gadsarai'
  563. end
  564. elseif grandpahelping = 28 and week <= 5 or grandpahelping = 28 and temper < 15 or grandpahelping = 28 and sunWeather = 0:
  565. '"- You don''t need to help out today <<$pcs_nickname>>."'
  566. act 'Go':gt'Gadhouse'
  567. end
  568. if grandpahelping = 29 and go_in_boletus = 0 and go_in_bilberry = 0 and go_in_boletus_bilberry = 0:
  569. grandpa_boletus = rand(2,3)
  570. go_in_boletus = 1
  571. '"- <<$pcs_nickname>>, could you go to the forest and pick mushrooms? I''m craving fried mushrooms."'
  572. '"- How much should I pick, grandpa?", you asked.'
  573. '"- <<grandpa_boletus>> kg will be enough," grandfather replied. "- Be careful so you don''t get lost."'
  574. act 'Go':gt'Gadhouse'
  575. elseif grandpahelping = 29 and go_in_boletus = 1 or grandpahelping = 29 and go_in_bilberry = 1 or grandpahelping = 29 and go_in_boletus_bilberry = 1:
  576. '"- You can rest today <<$pcs_nickname>>, you don''t need to help me today."'
  577. act 'Go':gt'Gadhouse'
  578. end
  579. if grandpahelping = 30 and go_in_boletus = 0 and go_in_bilberry = 0 and go_in_boletus_bilberry = 0:
  580. grandpa_bilberry = rand(3,5)
  581. go_in_bilberry = 1
  582. '"- <<$pcs_nickname>>, could you go to the forest to pick some berries? Grandma wants to make homemade fruit jam."'
  583. '"- How much should I pick, grandpa?" you asked.'
  584. '"- <<grandpa_bilberry>> kg will be enough," grandfather replied. "- Just be careful so you don''t get lost."'
  585. act 'Go':gt'Gadhouse'
  586. elseif grandpahelping = 30 and go_in_boletus = 1 or grandpahelping = 30 and go_in_bilberry = 1 or grandpahelping = 30 and go_in_boletus_bilberry = 1:
  587. '"- You can take the day off."'
  588. act 'Go':gt'Gadhouse'
  589. end
  590. if grandpahelping = 31 and go_in_boletus = 0 and go_in_bilberry = 0 and go_in_boletus_bilberry = 0:
  591. grandpa_boletus = rand(2,3)
  592. grandpa_bilberry = rand(2,3)
  593. go_in_boletus_bilberry = 1
  594. '"- <<$pcs_nickname>>, can you go to the forest and pick some berries and mushrooms? Your grandmother wants to make a mushroom soup, and has a craving for some fresh berries."'
  595. '"- How much should I pick, grandpa?"'
  596. '"- <<grandpa_boletus>> kg mushrooms and <<grandpa_bilberry>> kg of berries will be enough," grandfather replied. "- Just don`t get lost."'
  597. act 'Go':gt'Gadhouse'
  598. elseif grandpahelping = 31 and go_in_boletus = 1 or grandpahelping = 31 and go_in_bilberry = 1 or grandpahelping = 31 and go_in_boletus_bilberry = 1:
  599. '"- There''s no work today <<$pcs_nickname>>, go and rest up."'
  600. act 'Go':gt'Gadhouse'
  601. end
  602. if grandpahelping = 32 and temper >= 15 and sunWeather = 1 and hour >= 6 and hour < 9:
  603. '"- <<$pcs_nickname>>, we need to help out with hay gathering today. We have to go to the field and help out."'
  604. '"- Okay, grandfather," you replied. You grabed a rake, and started walking towards the field.'
  605. act 'Go to the field (0:40)':
  606. *clr & cla
  607. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/go_gadfield.jpg"></center>'
  608. 'With the rake in your hand you met up with the other local residents at the field. All the present at the field got assigned to a task. You work hard gathering the hay.'
  609. haying_time = 1
  610. minut += 40
  611. gs'stat'
  612. act 'Further':gt'gadfield','field'
  613. end
  614. elseif grandpahelping = 32 and hour >= 9 or grandpahelping = 32 and temper < 15 or grandpahelping = 32 and sunWeather = 0:
  615. '"- You don''t need to help out today <<$pcs_nickname>>."'
  616. act 'Go':gt'Gadhouse'
  617. end
  618. --- grandpahelp ---------------------------------