gadfield.qsrc 18 KB

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