gadfield.qsrc 17 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531
  1. # gadfield
  2. !MiraLoc tells us where Mira is Located
  3. !----------------------------------------------
  4. !MiraLoc = 0 (Mira at home)
  5. !MiraLoc = 1 (Mira at river)
  6. !MiraLoc = 2 (Mira at meadow)
  7. !MiraLoc = 3 (Mira at forest)
  8. !MiraLoc = 4 (Mira at field)
  9. !MiraLoc = 5 (Mira with gop)
  10. !---------------------------------------------
  11. if $ARGS[0] = 'field':
  12. $loc = 'gadfield'
  13. $metka = 'field'
  14. $location_type = 'secluded'
  15. $menu_loc = 'gadfield'
  16. $menu_arg = 'field'
  17. menu_off = 0
  18. gs 'gadukino_event', 'sound'
  19. gs'stat'
  20. '<center><H4>Field</H4></center>'
  21. if month >= 4 and month <= 10:
  22. if hour >= 6 and hour < 22:
  23. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadfield.jpg"></center>'
  24. else
  25. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadfield_night.jpg"></center>'
  26. end
  27. if hour >= 9 and hour <= 17 and grigoryEV = 0: gs 'grigory', 'meet' & exit
  28. else
  29. if hour >= 8 and hour < 18:
  30. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadfield_winter.jpg"></center>'
  31. else
  32. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadfield_winter_night.jpg"></center>'
  33. end
  34. end
  35. 'A field outside the village.'
  36. if hour >= 9 and hour <= 19 and week < 6:'Grandfather''s horse <a href="exec: gt ''gadfield'',''horse''">Desperado</a> is grazing the field.'
  37. if hour >= 9 and hour <= 19 and graze_cow = 0:'You see <a href="exec: gt ''gadfield'',''cow''">a herd of cows</a> in the middle of the field.'
  38. if hour >= 6 and hour <= 20 and graze_cow = 1:'You notice <a href="exec: gt ''gadfield'',''cow''">a herd of cows</a>.'
  39. if hour >= 7 and hour <= 20 and haying_time = 1:'You see a crowd of people working on the field.'
  40. if hour >= 7 and hour <= 20 and haying_time = 1:
  41. act 'Go to the hayfield':
  42. gs 'food', 'm_meal'
  43. *clr & cla
  44. if npc_rel['A60'] >= 15:
  45. npc_rel['A60'] += 1
  46. '<center><img <<$set_imgh>> src="images/characters/village/mira/haying_time_mira.jpg"></center>'
  47. 'Most of the village has shown up to help out with the hay. You and Mira also partake in the activities. You are really enjoying yourself, especially considering you''re spending time, sitting on the fresh cut hay, talking to Mira.'
  48. else
  49. fat -= 5
  50. stren_exp += 1
  51. agil_exp += 1
  52. vital_exp += 1
  53. pcs_sweat += 20
  54. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/haying_time.jpg"></center>'
  55. 'Almost all of the villagers have shown up to help out with the fresh cut hay. You decide to join them.'
  56. end
  57. minut += 360
  58. grandmahelp += 1
  59. haying_time = 0
  60. hndiwrk_exp += rand(0,2)
  61. gs 'stat'
  62. act 'Continue':gt'gadfield','field'
  63. end
  64. end
  65. act 'Back to the road':minut += 10 & gt'gadroad'
  66. end
  67. if $ARGS[0] = 'horse':
  68. $loc = 'gadfield'
  69. $metka = 'horse'
  70. $location_type = 'public_outdoors'
  71. $menu_loc = 'gadfield'
  72. $menu_arg = 'horse'
  73. menu_off = 0
  74. gs 'gadukino_event', 'sound'
  75. gs'stat'
  76. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/horse.jpg"></center>'
  77. 'Your grandfather''s horse Desperado.'
  78. if hour = 19:
  79. act 'Lead the horse home (1:00)':
  80. *clr & cla
  81. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/horse_field.jpg"></center>'
  82. 'You spot your grandfather''s horse wandering loose in the field and decide to help out by taking Desperado home. Reaching for the bridle, you start leading Desperado towards the village.'
  83. minut += 60
  84. grandmahelp += rand(0,1)
  85. hndiwrk_exp += rand(0,3)
  86. gs 'stat'
  87. act 'To your grandparent''s barn':gt'Gadsarai'
  88. end
  89. end
  90. act 'To the field':gt'gadfield','field'
  91. end
  92. if $ARGS[0] = 'cow':
  93. $loc = 'gadfield'
  94. $metka = 'cow'
  95. $location_type = 'secluded'
  96. $menu_loc = 'gadfield'
  97. $menu_arg = 'cow'
  98. menu_off = 0
  99. gs 'gadukino_event', 'sound'
  100. gs'stat'
  101. temp = rand(1,5)
  102. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow.jpg"></center>'
  103. 'The cow herd is standing in the middle of the field.'
  104. if mira = 1: MiraLoc = 41 & '<a href="exec: gt ''Miroslava'', ''Start''">Mira</a> is standing next to you.'
  105. if hour = 19 and graze_cow = 0:
  106. act 'Lead the cows home (1:00)':
  107. *clr & cla
  108. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_field.jpg"></center>'
  109. 'Seeing the cow herd on the field, you decide to help your grandfather bring the cows home...'
  110. minut += 60
  111. grandmahelp += rand(0,1)
  112. hndiwrk_exp += rand(0,3)
  113. gs 'stat'
  114. act 'To your grandparent''s barn':gt'Gadsarai'
  115. end
  116. end
  117. if graze_cow = 1:
  118. if hour < 10:
  119. act 'Wait until the herd is gathered':
  120. *clr & cla
  121. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_wait.jpg"></center>'
  122. if graze_cow_exp = 0:'Some time flies by while waiting for the locals to finish their gathering.'
  123. if graze_cow_exp = 1:'Some time flies by while waiting for the locals and their children to finish their gathering.'
  124. if hour >= 9:minut += 20
  125. if hour < 9:minut += 60
  126. hndiwrk_exp += rand(0,4)
  127. gs 'stat'
  128. act 'Continue':gt'gadfield','cow'
  129. end
  130. end
  131. if hour >= 10 and hour < 13:
  132. act 'Herd cows with your grandfather (1:00)':
  133. *clr & cla
  134. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow'+rand(1,4)+'.jpg"></center>'
  135. 'You manage to herd all the cows within the hour. Instead of letting your grandfather do all the work, you roll up the sleeves and do most of the work.'
  136. minut += 60
  137. if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
  138. graze_cow_exp = 1
  139. grandmahelp += 1
  140. hndiwrk_exp += rand(0,3)
  141. gs 'stat'
  142. act 'Continue':gt'gadfield','cow'
  143. end
  144. if mira = 0:
  145. act 'Take a run on the field (1:00)':
  146. *clr & cla
  147. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_run.jpg"></center>'
  148. 'Since you have nothing to do, you run intervals across the field for an hour.'
  149. frost = 0
  150. minut += 60
  151. fat -= 5
  152. run_exp += 1
  153. pcs_sweat += 10
  154. pcs_mood += 5
  155. if temper >= 25 and sunWeather = 1:pcs_hydra -= 24
  156. gs 'stat'
  157. act 'Continue':gt'gadfield','cow'
  158. end
  159. end
  160. if temper >= 15 and sunWeather = 1 and mira = 0:
  161. act 'Tan (1:00)':
  162. *clr & cla
  163. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_sun.jpg"></center>'
  164. 'It''s really warm outside so you decide to sunbathe for an hour.'
  165. minut += 60
  166. pcs_mood += 10
  167. pcs_tan += 1
  168. pcs_sweat += 10
  169. gs 'stat'
  170. act 'Continue':gt'gadfield','cow'
  171. end
  172. if pcs_sleep < 40:
  173. act 'Take a nap (1:00)':
  174. *clr & cla
  175. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_lying.jpg"></center>'
  176. 'You lie down on the grass and doze off for an hour.'
  177. minut += 60
  178. pcs_mood += 10
  179. pcs_sleep+= 9
  180. if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
  181. gs 'stat'
  182. act 'Continue':gt'gadfield','cow'
  183. end
  184. end
  185. act 'Pick flowers (1:00)':
  186. *clr & cla
  187. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_flowers.jpg"></center>'
  188. 'You spend an hour wandering the field, picking flowers.'
  189. minut += 60
  190. pcs_mood += 20
  191. if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
  192. gs 'stat'
  193. act 'Continue':gt'gadfield','cow'
  194. end
  195. act 'Read a book (1:00)':
  196. *clr & cla
  197. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_book'+rand(1,2)+'.jpg"></center>'
  198. minut += 60
  199. if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
  200. if pcs_nerd > 0:
  201. lastread = totminut
  202. lastreadday = daystart
  203. pcs_nerd += 1
  204. blizoruk += 1
  205. pcs_mood = 100
  206. if pcs_stren > 1: stren_deg -= 1
  207. if pcs_vital > 5: vital_deg -= 1
  208. 'You start reading a book you brought with you. You are so engrossed in the story you forget about the time.'
  209. else
  210. blizoruk += 1
  211. pcs_mood += 10
  212. 'While reading the book, time flies by cause you are really engaged in the books'' plot.'
  213. end
  214. gs 'stat'
  215. act 'Close the book':gt $loc, $metka
  216. end
  217. end
  218. end
  219. if hour >= 13 and hour < 16:
  220. *clr & cla
  221. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_go.jpg"></center>'
  222. 'Looking at his watch, grandpa turns to you and says "The time is around lunchtime so it''s time to take the herd to the watering hole." You begin to gather the cows and lead them to the river.'
  223. if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
  224. grandmahelp += 1
  225. minut += 60
  226. hndiwrk_exp += rand(0,3)
  227. gs 'stat'
  228. act 'Herd the cows to the river':gt'gadfield','cow2'
  229. end
  230. end
  231. if graze_cow = 0:act 'Back':gt'gadfield','field'
  232. end
  233. !MiaLoc tells us where Mira is Located
  234. !----------------------------------------------
  235. !MiraLoc = 0 (Mira at home)
  236. !MiraLoc = 1 (Mira at river)
  237. !MiraLoc = 2 (Mira at meadow)
  238. !MiraLoc = 3 (Mira at forest)
  239. !MiraLoc = 4 (Mira at field)
  240. !MiraLoc = 5 (Mira with gop)
  241. !---------------------------------------------
  242. if graze_cow = 1 and npc_rel['A60'] >= 15 and mira = 0 and sunWeather = 1 and hour >= 10 and temp = 1 and Mira_no = 0 and(npc_QW['A63'] < 13 or npc_QW['A60'] >= 10 or mirasex > 1):
  243. *clr & cla
  244. '<center><img <<$set_imgh>> src="images/characters/village/mira/mira2.jpg"></center>'
  245. 'While keeping an eye on the cow herd, you see Mira in the distance, approaching. You happily wave to her.'
  246. '" - Hi, <<$pcs_nickname>>. I wanted to visit you and brought water with me," she says nearing you. " - Have you missed me?"'
  247. minut += 5
  248. npc_rel['A60'] += 1
  249. mira = 1
  250. gs 'stat'
  251. act 'Continue':pcs_hydra +=40 & gt'gadfield','cow'
  252. end
  253. if $ARGS[0] = 'cow2':
  254. $loc = 'gadfield'
  255. $metka = 'cow2'
  256. $location_type = 'secluded'
  257. $menu_loc = 'gadfield'
  258. $menu_arg = 'cow2'
  259. menu_off = 0
  260. gs 'gadukino_event', 'sound'
  261. gs'stat'
  262. '<center><H4>River</H4></center>'
  263. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_river.jpg"></center>'
  264. 'The cow herd is standing by the river.'
  265. if mira = 1: MiraLoc = 42 & '<a href="exec: gt ''Miroslava'', ''Start''">Mira</a> is sitting next to you.'
  266. if temper >= 15 and sunWeather = 1:'- "You can go for a swim while there is time, <<$pcs_nickname>>. I`ll keep an eye on the herd," said your grandfather.'
  267. if graze_cow = 1:
  268. if hour < 16:
  269. act 'Herd cows with your grandfather (1:00)':
  270. *clr & cla
  271. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow'+rand(1,4)+'.jpg"></center>'
  272. 'You manage to herd all the cows within the hour. Instead of letting your grandfather do all the work, you roll up the sleeves and do most of the work.'
  273. minut += 60
  274. if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
  275. grandmahelp += 1
  276. graze_cow_exp = 1
  277. hndiwrk_exp += rand(0,3)
  278. gs 'stat'
  279. act 'Continue':gt'gadfield','cow2'
  280. end
  281. if temper >= 15 and sunWeather = 1 and mira = 0:
  282. act 'Swim (0:15)':
  283. *clr & cla
  284. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_river.jpg"></center>'
  285. 'You take a quick swim, cooling off your body.'
  286. minut += 15
  287. cumspclnt = 4 & gs 'cum_cleanup'
  288. pcs_sweat = 10 + rand(0,4)
  289. pcs_mood += 5
  290. pcs_willpwr += 5
  291. if pcs_stren < 30:stren_exp += 1
  292. gs 'stat'
  293. act 'Continue':gt'gadfield','cow2'
  294. end
  295. act 'Tan (0:30)':
  296. *clr & cla
  297. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_sun.jpg"></center>'
  298. 'You lie down to sunbathe, while grandpa looks after the herd.'
  299. minut += 30
  300. pcs_sweat += 10
  301. pcs_mood += 5
  302. pcs_tan += 1
  303. gs 'stat'
  304. act 'Continue':gt'gadfield','cow2'
  305. end
  306. act 'Read a book (1:00)':
  307. *clr & cla
  308. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_book'+rand(1,2)+'.jpg"></center>'
  309. minut += 60
  310. if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
  311. if pcs_nerd > 0:
  312. lastread = totminut
  313. lastreadday = daystart
  314. pcs_nerd += 1
  315. blizoruk += 1
  316. pcs_mood = 100
  317. if pcs_stren > 1: stren_deg -= 1
  318. if pcs_vital > 5: vital_deg -= 1
  319. 'You start reading a book you brought with you. You are so engrossed in the story you forget about the time.'
  320. else
  321. blizoruk += 1
  322. pcs_mood += 10
  323. 'While reading the book, time flies by cause you are really engaged in the books'' plot.'
  324. end
  325. gs 'stat'
  326. act 'Close the book':gt $loc, $metka
  327. end
  328. end
  329. end
  330. if hour >= 16 and hour < 19:
  331. *clr & cla
  332. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_go.jpg"></center>'
  333. 'Looking at his watch, grandpa says that it''s time to drive the herd back on the field, but now closer to the forest. The two of you begin to gather the scattered herd and head toward the forest.'
  334. grandmahelp += 1
  335. if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
  336. minut += 60
  337. hndiwrk_exp += rand(0,3)
  338. gs 'stat'
  339. act 'Herd the cows to the forest':gt'gadfield','cow3'
  340. end
  341. end
  342. end
  343. if $ARGS[0] = 'cow3':
  344. $loc = 'gadfield'
  345. $metka = 'cow3'
  346. $location_type = 'secluded'
  347. $menu_loc = 'gadfield'
  348. $menu_arg = 'cow3'
  349. menu_off = 0
  350. gs 'gadukino_event', 'sound'
  351. gs'stat'
  352. '<center><H4>Field near the forest</H4></center>'
  353. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_forest.jpg"></center>'
  354. 'The cow herd is standing on a field near the forest.'
  355. if mira = 1: MiraLoc = 43 & '<a href="exec: gt ''Miroslava'', ''Start''">Mira</a> is sitting next to you.'
  356. if graze_cow = 1:
  357. if hour < 19:
  358. act 'Herd cows with your grandfather (1:00)':
  359. *clr & cla
  360. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow'+rand(1,4)+'.jpg"></center>'
  361. 'You manage to herd all the cows within the hour. Instead of letting your grandfather do all the work, you roll up the sleeves and do most of the work.'
  362. minut += 60
  363. if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
  364. grandmahelp += 1
  365. graze_cow_exp = 1
  366. hndiwrk_exp += rand(0,3)
  367. gs 'stat'
  368. act 'Continue':gt'gadfield','cow3'
  369. end
  370. if mira = 0:
  371. act 'Take a run (1:00)':
  372. *clr & cla
  373. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_run.jpg"></center>'
  374. 'Since you have nothing to do, you run intervals across the field for an hour.'
  375. frost = 0
  376. minut += 60
  377. fat -= 5
  378. run_exp += 1
  379. pcs_sweat += 10
  380. pcs_mood += 5
  381. if temper >= 25 and sunWeather = 1:pcs_hydra -= 24
  382. gs 'stat'
  383. act 'Continue':gt'gadfield','cow3'
  384. end
  385. end
  386. if temper >= 15 and sunWeather = 1 and mira = 0:
  387. act 'Pick flowers (1:00)':
  388. *clr & cla
  389. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_flowers.jpg"></center>'
  390. 'You spent an hour wandering around the field, picking flowers.'
  391. minut += 60
  392. pcs_mood += 20
  393. if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
  394. gs 'stat'
  395. act 'Continue':gt'gadfield','cow3'
  396. end
  397. act 'Tan (1:00)':
  398. *clr & cla
  399. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_sun.jpg"></center>'
  400. 'You sunbathe for an hour.'
  401. minut += 60
  402. pcs_mood += 10
  403. pcs_tan += 1
  404. pcs_sweat += 10
  405. gs 'stat'
  406. act 'Continue':gt'gadfield','cow3'
  407. end
  408. if pcs_sleep < 40:
  409. act 'Nap on the grass (1:00)':
  410. *clr & cla
  411. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_lying.jpg"></center>'
  412. 'You lie down on the grass and doze off for an hour.'
  413. minut += 60
  414. pcs_mood += 10
  415. pcs_sleep+= 9
  416. if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
  417. gs 'stat'
  418. act 'Continue':gt'gadfield','cow3'
  419. end
  420. end
  421. act 'Read a book (1:00)':
  422. *clr & cla
  423. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_book'+rand(1,2)+'.jpg"></center>'
  424. minut += 60
  425. if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
  426. if pcs_nerd > 0:
  427. lastread = totminut
  428. lastreadday = daystart
  429. pcs_nerd += 1
  430. blizoruk += 1
  431. pcs_mood = 100
  432. if pcs_stren > 1: stren_deg -= 1
  433. if pcs_vital > 5: vital_deg -= 1
  434. 'You start reading a book you brought with you. You are so engrossed in the story you forget about the time.'
  435. else
  436. blizoruk += 1
  437. pcs_mood += 10
  438. 'While reading the book, time flies by cause you are really engaged in the books'' plot.'
  439. end
  440. gs 'stat'
  441. act 'Close the book':gt $loc, $metka
  442. end
  443. end
  444. end
  445. if hour >= 19:
  446. *clr & cla
  447. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_go_home.jpg"></center>'
  448. 'Looking at his watch, grandpa says that it is late and time to drive the herd home. You hurry and gather up the cows and drive them towards the village.'
  449. if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
  450. minut += 60
  451. mira = 0
  452. graze_cow = 0
  453. grandmahelp += 1
  454. hndiwrk_exp += rand(0,3)
  455. gs 'stat'
  456. act 'Back to the village':gt'gadukino'
  457. end
  458. end
  459. end
  460. --- gadfield ---------------------------------