gadfield 16 KB

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