swamp_yard.qsrc 21 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548
  1. # swamp_yard
  2. if $ARGS[0] = 'start' or $ARGS[0] = '':
  3. $loc = 'swamp_yard'
  4. $metka = ''
  5. $menu_loc = 'swamp_yard'
  6. $menu_arg = ''
  7. menu_off = 0
  8. $location_type = 'secluded'
  9. gs 'gadukino_event', 'sound'
  10. gs 'stat'
  11. !the chance of encountering hunters
  12. if week = 6 or week = 7:huntersrand = RAND(1,3)
  13. if week < 6:huntersrand = RAND(1,5)
  14. if huntersrand = 1:hunters = 1
  15. !the chance of hitting GG, if she`s a slut
  16. huntslutsexrand = rand(1,3)
  17. ! to remember were cowards or not
  18. !if lost_girl = 0:lost_girl += rand(40,60)
  19. if StoryLine = 1 and lost_girl = 0 and forest_lostday > 0: lost_girl=daystart+2
  20. swiss_army_random_number = rand(1,10)
  21. '<center><B>The yard in front of the hut</B></center>'
  22. if month >= 5 and month <= 9:
  23. if hour >= 6 and hour < 22:
  24. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/swamp_yard.jpg"></center>'
  25. else
  26. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/swamp_yard_night.jpg"></center>'
  27. end
  28. else
  29. if hour >= 8 and hour < 18:
  30. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/swamp_yard_winter.jpg"></center>'
  31. else
  32. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/swamp_yard_winter_night.jpg"></center>'
  33. end
  34. end
  35. 'The yard in front of the hut.'
  36. 'Behind the hut there is a <a href="exec: gt ''swampspring'' ">spring</a>, if you continue a little further down there is a small <a href="exec: gt ''backwater'' ">creek</a> with relatively clean water.'
  37. if findvel = 3:'On the side of the hut is an old <a href="exec:gt ''bicycle'',''swamp''">bike</a>.'
  38. if hunters > 0 and huntersKnow = 0:'You spot some unfamiliar people standing in front of the hut.'
  39. if hunters > 0 and huntersKnow > 0 and hour >= 8 and hour < 20:'You notice the <a href="exec: gt ''hunters'', ''check_opinion'' ">hunters</a> standing in the front yard.'
  40. if huntersknow = 1:
  41. act 'Go into the hut':
  42. minut += 2
  43. gt 'swamphouse'
  44. end
  45. end
  46. act 'Sit by the firepit': gt 'swamp_yard', 'campfire'
  47. act 'Look around the nearby woods': minut += 10 & gt 'swamp_yard', 'nearby_woods'
  48. !Conditional acts
  49. if dirty_swamp_yard > 5:act 'Clean up the trash outside': gs 'hunter_favors', 'yard_cleanup'
  50. if hunter_collective_opinion < 10: act '<b>Escape to the swamp</b>': gs 'swamp_yard', 'swamp_escape'
  51. ! TODO: Figure how to remove the sneaky gotos if not tied to other locations
  52. if hunterhelp = 1:
  53. gs 'swamp_yard', 'rescued_from_swamp'
  54. end
  55. if hunterhelp = 2 and huntersKnow = 0:
  56. gs 'hunter_interactions', 'meet_hunters_after_rescue'
  57. elseif huntersKnow = 0:
  58. act 'Approach the men': gt 'hunter_interactions', 'meet_hunters'
  59. end
  60. if hour >= 8 and hour < 20:
  61. gs 'swamp_yard', 'daytime_flavor_events'
  62. end
  63. end
  64. !Code blocks for leaf events (events not calling other events)
  65. if $ARGS[0] = 'swamp_escape':
  66. !add chance to swamped by illume
  67. if hunters = 1:
  68. if hour >= 6 and hour < 21:
  69. minut += 5
  70. if rand(1,10)>9:
  71. gt 'swamp'
  72. else
  73. gt 'gadforestswamp','2'
  74. end
  75. else
  76. *clr & cla
  77. gs 'stat'
  78. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/igorhanter.jpg"></center>'
  79. 'As you start moving into the swamp Igor calls after you.'
  80. !TODO: Different line depending on opinion and slut
  81. '"<<$pcs_nickname>>, where are you going? You will get stuck in there!'
  82. act 'Turn back':gt 'swamp_yard'
  83. act 'Ignore him and keep going':
  84. minut += 5
  85. !TODO: Add skill clothing and temp check here instead of praying to RNGesus
  86. if rand(1,10)>8:
  87. gt 'swamp'
  88. else
  89. gt 'gadforestswamp','2'
  90. end
  91. end
  92. end
  93. else
  94. minut += 5
  95. !TODO: Here too, also see how to avoid duplicating. Maybe create a child event node?
  96. if (hour >= 6 and hour < 21) or rand(1,10)>7:
  97. gt 'swamp'
  98. else
  99. gt 'gadforestswamp','2'
  100. end
  101. end
  102. gt 'gadforestswamp','2'
  103. end
  104. if $ARGS[0] = 'rescued_from_swamp':
  105. *clr & cla
  106. minut += 5
  107. gs 'stat'
  108. if $clothingworntype ! 'nude':
  109. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterhelp.jpg"></center>'
  110. else
  111. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterhelp1.jpg"></center>'
  112. end
  113. if $clothingworntype = 'nude':
  114. if huntersKnow = 0:
  115. if pcs_apprnc >= 100:
  116. '"Are you... a mermaid?" You hear one of the men blurt out before blushing'
  117. else
  118. 'What the hell happened to you? Are you alright?'
  119. end
  120. end
  121. if huntersKnow = 1 and huntersKnowSlut = 0:'"<<$pcs_nickname>>, what happened to you? Where are your clothes?" Andrei said concernedly.'
  122. if huntersKnow = 1 and huntersKnowSlut = 1:'Well isn''t this our favorite damsel in distress. And she''s even naked and ready for us so we can jump straight to the happy ending! Andrei grinned.'
  123. end
  124. if huntersKnow = 0:
  125. 'The hunters help you to a dry place. For some time you just sit there, staring blankly ahead, trying to catch your breath. After a while feeling better you decide to find out where you are and who it was that saved you.'
  126. act 'Look':hunterhelp = 2 & gt 'swamp_yard'
  127. else
  128. 'The hunters help you to a dry place. For some time you just sit there, staring blankly ahead, trying to catch your breath. After a short rest you go out to the yard.'
  129. act 'Further':hunterhelp = 0 & gt 'swamp_yard'
  130. end
  131. end
  132. !TODO: Move these to the interactions or favors files
  133. !TODO: Redo the events here after working on the other locations
  134. if $ARGS[0] = 'confronted_after_drunken_gangbang':
  135. if huntdanceslut = 1:
  136. cla
  137. *clr
  138. minut+=5
  139. gs 'stat'
  140. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/andreihanter.jpg"></center>'
  141. 'As soon as you walk into the yard, you immediately walk up to Andrei.'
  142. '"I need to talk to you, <<$pcs_nickname>>," he said. "Can you recall what happened last night?"'
  143. '"Well... uh... Yes, I think I can..." you reply, blushing, staring down at the ground.'
  144. '"I used to say that you look just like your mother," said Andrei looking at you. "After your little show yesterday, as it turns out, the resemblance doesn''t stop at just the looks."'
  145. 'Andrei paused looking at you while you try to collect your thoughts to understand what he''s trying to imply.'
  146. '"To be frank, you''re as slutty as your mother was in her youth, the apple doesn''t fall far away from the tree as they say..." he chuckles. "Take it as a compliment."'
  147. 'You look at Andrei, completely stunned by what you just heard.'
  148. '"And what are sluts best at?" he continues. "That''s right, to pleasure men. Don''t you agree?"'
  149. if pcs_dom > 0 and alko < 8:act'Refuse':huntdanceslut = 3 & gt 'hunters', 'start'
  150. act'Agree':huntdanceslut = 2 & gt 'hunters', 'start'
  151. end
  152. end
  153. !Assorted sex scenes specifically for the yard
  154. if $ARGS[0] = 'skirt_breeze':
  155. if CloSkirtShortness > 1 and $pantyworntype = 'none':
  156. *clr & cla
  157. hunter_sexual_comfort += 2
  158. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/no_tanga.jpg"></center>'
  159. 'You walk across the yard, when suddenly the wind lifts your skirt.'
  160. '"I forgot to put on panties...," you realize this seeing your bare pussy.'
  161. 'You nervously started looking around if anyone caught a glimpse of your little wardrobe malfunction...'
  162. 'You hoped that the men missed the opportunity seeing you exposed, however, Igor''s face had turned red and you see Andrei grinning, you realize quite quickly that your little show did not pass unappreciated.'
  163. gs 'arousal', 'flashlite', 1
  164. gs 'arousal', 'end'
  165. gs 'stat'
  166. act 'Further':gt 'swamp_yard'
  167. end
  168. end
  169. !TODO: This will be revamped. Temporary to keep the dialogue for now
  170. if $ARGS[0] = 'hunter_group_sex':
  171. ! sex if GG whore
  172. if hunters > 0 and huntersRape = 5 and huntslutsexrand = 1 and huntslutsex = 0:
  173. *clr & cla
  174. minut += 5
  175. temphunt = rand(1,3)
  176. ! the choice of who will fuck GG
  177. slutgosex = 1
  178. gs 'stat'
  179. if temphunt = 1:'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/andreihanter.jpg"></center>'
  180. if temphunt = 2:'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/sergeihanter.jpg"></center>'
  181. if temphunt = 3:'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/igorhanter.jpg"></center>'
  182. if temphunt = 1:'Andrei steps out of the hut, heading straight towards you. "<<$pcs_nickname>>, walk with me..." without uttering another word he grabs you by the arm and leads you to the nearest tree...'
  183. if temphunt = 2:'Sergei steps out of the hut, heading straight towards you. "<<$pcs_nickname>>, let''s go a bit aside you need to help me out with my itch," he said and lead you in the direction of the nearest thicket.'
  184. if temphunt = 3:'Igor steps out of the hut, heading straight towards you. "<<$pcs_nickname>>, I need you to help me with this bulge," he says pointing at his groin, leading you away from the yard...'
  185. if pcs_horny < 40:' You obediently follow along, well knowing the reason he wanted you to tag along.'
  186. if pcs_horny >= 40 and pcs_horny < 70:'"I need you to take me..." is all you manage to say while he''s leading you away.'
  187. if pcs_horny >= 70:'"I was hoping this would happened," you think to yourself, feeling your wet pussy pulsating with desire. You jump onto him, taking charge, leaving him stunned about who wants it more, you or him.'
  188. act 'Go':gt 'hunters', 'start'
  189. end
  190. ! trio if GG whore
  191. if hunters > 0 and huntersRape = 5 and huntslutsexrand = 2 and huntslutsex = 0:
  192. *clr & cla
  193. minut += 5
  194. temphunt = rand(1,3)
  195. slutgosex = 2
  196. gs 'stat'
  197. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanterswork1.2.jpg"></center>'
  198. if temphunt = 1:
  199. 'You see Andrei talking with Sergei in the yard. They notice you, and start moving towards you. "Come with us <<$pcs_nickname>>," without uttering another word Andrei grabs you by the arm and leads you to the nearest tree.... Sergei follows after.'
  200. elseif temphunt = 2:
  201. 'Andrei and Igor notice you enter the yard, they call you over. "Come with us <<$pcs_nickname>>, you need to help us out with our itch," said Andrei pulling you in the direction of the nearest thicket. Igor follows behind.'
  202. elseif temphunt = 3:
  203. 'You notice Igor and Sergei standing in the yard whispering something to each other. Igor approaches you and says "<<$pcs_nickname>>, "<<$pcs_nickname>>, I need you to help me with this bulge," he says pointing at his groin. He calls Sergei over and they start leading you away from the yard...'
  204. end
  205. if pcs_horny < 40:
  206. 'You obediently follow along, well knowing the reason they wanted you to tag along.'
  207. elseif pcs_horny >= 40 and pcs_horny < 70:
  208. '"I need you to take me..." is all you manage to say while they''re leading you away.'
  209. elseif pcs_horny >= 70:
  210. '"I was hoping this would happened," you think to yourself, feeling your wet pussy pulsating with desire. You jump onto one of them, taking charge, leaving the other one stunned about who wants it more, they or you.'
  211. end
  212. act 'Go with the guys':
  213. *clr & cla
  214. minut += 5
  215. pcs_horny += 5
  216. gs 'stat'
  217. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/doublehanterlove.jpg"></center>'
  218. 'You go along with the men holding their hands, knowing where they''re about to lead you. You don''t mind you want them as bad as they wants you...'
  219. act 'Further':gt 'huntersex', 'sluthomesex'
  220. end
  221. end
  222. end
  223. !Code blocks for branch events (events calling other events)
  224. if $ARGS[0] = 'campfire':
  225. !TODO: Add mechanic so that fire slowly goes through wood and extinguishes when there is no more left
  226. cla
  227. *clr
  228. menu_off = 1
  229. minut += 1
  230. gs 'stat'
  231. act 'Move away': gt 'swamp_yard', 'start'
  232. if campfire = 1:
  233. if hour >= 8 and hour < 20:
  234. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/campfire_day.jpg"></center>'
  235. else
  236. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/campfire_night.jpg"></center>'
  237. end
  238. 'A nice, warm campfire you can sit and relax by. You can use it to cook something or heat up some water to bathe.'
  239. 'You can also put it out with the bucket if there is enough water in it'
  240. if bucket >= 3:
  241. act 'Put out the fire':
  242. cla & *clr
  243. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/campfire_put_out.jpg"></center>'
  244. 'You pour some water to extinguish the campfire'
  245. campfire = 0
  246. minut += 5
  247. bucket -= 3
  248. act 'Further': gt 'swamp_yard', 'campfire'
  249. end
  250. end
  251. if bucket > 0 and boletus > 0 and mushroom_soup = 0:
  252. act 'Cook some mushroom soup (0:30)': gs 'hunter_favors', 'mushroom_soup'
  253. end
  254. if bucket > 0 and raw_meat > 0 and meat_stew = 0:
  255. act 'Cook some meat stew (1:00)': gs 'hunter_favors', 'meat_stew'
  256. end
  257. if bucket >= 5 and hotwater = 0:
  258. act 'Heat up water (0:30)':
  259. cla
  260. *clr
  261. minut += 30
  262. bucket -= 5
  263. hotwater = 1
  264. gs 'stat'
  265. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hotwater.jpg"></center>'
  266. *nl
  267. 'With the now heated water, you can bathe yourself in the tub.'
  268. act 'Continue': gt 'swamp_yard', 'campfire'
  269. end
  270. end
  271. else:
  272. if hour >= 8 and hour < 20:
  273. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/campfire_out_day.jpg"></center>'
  274. else
  275. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/campfire_out_night.jpg"></center>'
  276. end
  277. 'You can use this firepit to light a fire, if you have some firewood available.'
  278. !TODO: Tie fire lighting to bushcraft, make hunters do it on their schedule or with Sveta asking
  279. if firewood >= 10:
  280. act 'Light fire':
  281. cla & *clr
  282. if $clothingworntype ! 'nude':
  283. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/campfire_light.jpg"></center>'
  284. else
  285. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/campfire_light_nude.jpg"></center>'
  286. end
  287. 'You use some chopped wood, dry branches and twigs to light a campfire in the firepit'
  288. firewood -= 10
  289. campfire = 1
  290. minut += 15
  291. act 'Further': gt 'swamp_yard', 'campfire'
  292. end
  293. elseif firewood > 1:
  294. *nl
  295. 'There is some wood and twigs by the pit but not enough to light a new fire'
  296. else
  297. 'You do not see any firewood nearby. You will probably need to collect some branches, chop some or ask a hunter to do so.'
  298. end
  299. end
  300. !TODO: Initial fireside chat dynamics, to be fleshed out
  301. !TODO: Do a hunter in hut behavior check rather than hard coding it into the time
  302. if hour >= 8 and hour < 20:
  303. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanters1.jpg"></center>'
  304. 'Hunters are also sitting around the campfire, talking and joking about all kinds of stuff'
  305. act 'Chat (1:00)':
  306. *clr & cla
  307. minut += 60
  308. hunter_collective_opinion += 2
  309. gs 'stat'
  310. *nl
  311. 'You start chating with the guys about trivial stuff...'
  312. act 'Further': gt 'swamp_yard', 'campfire'
  313. end
  314. !TODO: Flesh out the learning content here
  315. act 'Ask for some tips on how to survive in the woods (1:00)':
  316. hunter_lessons += 1
  317. *clr & cla
  318. if hunter_collective_opinion > 25:
  319. hunter_collective_opinion -= 1
  320. pcs_bushcraft += 1
  321. gs 'stat'
  322. minut += 60
  323. *nl
  324. 'Hunters talk to you about some of their experiences when they first started out'
  325. else
  326. if hunter_lessons > 10 AND hunter_sexual_comfort > 25:
  327. !TODO: Prototype implementation for the creekside event, to be revamped
  328. 'Sergei tells you to go by the creek for the next lesson about how to scope the area for a hunt.'
  329. hunter_lessons -= 8
  330. act 'Further': gt 'hunter_favors', 'creekside_gangbang_request'
  331. else
  332. minut += 20
  333. 'The hunters do not even bother to answer you. You simply sit in awkward silence for twenty minutes before getting to to other business'
  334. end
  335. end
  336. act 'Further': gt 'swamp_yard', 'campfire'
  337. end
  338. end
  339. end
  340. !Auxilliary locations
  341. if $ARGS[0] = 'nearby_woods':
  342. cla & *clr
  343. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/nearby_woods.jpg"></center>'
  344. 'You are in the woods near the hut. You can see it not too far in the distance.'
  345. 'You can also venture deeper into woods to circle around the swamp, granted you do not get lost trying.'
  346. *nl
  347. act 'Go back to the hut': minut += 10 & gt 'swamp_yard'
  348. if firewood < 25:
  349. 'You can pick up some firewood around here to keep the fire going.'
  350. act 'Collect firewood (0:45)':
  351. cla & *clr
  352. if $clothingworntype ! 'nude':
  353. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/firewood_normal.jpg"></center>'
  354. else
  355. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/firewood_nude.jpg"></center>'
  356. end
  357. firewood += 10
  358. minut += 45
  359. 'You pick up some dry branches and twigs, putting them in a pile near the fire pit before coming back.'
  360. if firewood < 10:
  361. 'You think you might need to pick some more to get a fire going'
  362. else:
  363. 'You think you have enough firewood to get a fire going'
  364. end
  365. act 'Further': gt 'swamp_yard', 'nearby_woods'
  366. end
  367. else
  368. 'You think about picking up some firewood before you remember you have plenty back at the yard.'
  369. end
  370. act 'Try to circle around the swamp':
  371. *clr & cla
  372. if pcs_bushcraft < 15:
  373. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/thinks1.jpg"></center>'
  374. 'You consider trying to circle around the swamp but then think it is better if you did not get too far from the hut.'
  375. 'If only you were a skilled pathfinder or knew nearby people that could help you get back...'
  376. act 'Further': gt 'swamp_yard', 'nearby_woods'
  377. elseif pcs_bushcraft < 30:
  378. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/thinks2.jpg"></center>'
  379. 'You consider trying to circle around the swamp. You have a vague idea on how to accomplish that but there is a good chance you may get lost.'
  380. act 'Stay around for now': gt 'swamp_yard', 'nearby_woods'
  381. act 'Try anyway':
  382. *clr & cla
  383. minut += 180
  384. nearby_woods_check = rand(1,10)
  385. if nearby_woods_check = 1:
  386. !Make it to the other side fine
  387. if $clothingworntype ! 'nude':
  388. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/nearby_woods_success.jpg"></center>'
  389. else
  390. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/nearby_woods_success_nude.jpg"></center>'
  391. end
  392. 'You stick as close to the swamp as possible and follow the edge in one direction.'
  393. 'Even though you occassionally step into the swamp you manage to not get stuck'
  394. 'After some time walking and struggling not to get stuck you can see the hut on the opposite side'
  395. act 'Success!': pcs_bushcraft += 5 & gt 'gadforest','4'
  396. elseif nearby_woods_check <= 3:
  397. !End up stuck in the swamp
  398. if $clothingworntype ! 'nude':
  399. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/nearby_woods_stuck.jpg"></center>'
  400. else
  401. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/nearby_woods_stuck_nude.jpg"></center>'
  402. end
  403. 'You stick as close to the swamp as possible and follow the edge in one direction.'
  404. 'Trusting the ground you keep going but at some point you sink right into the swamp without even realizing.'
  405. *nl
  406. 'Seems like the forest can camouflage parts of the swamp, fooling careless hikers.'
  407. act 'If only you knew': pcs_bushcraft += 3 & gt 'gadforestswamp','2'
  408. else
  409. if $clothingworntype ! 'nude':
  410. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/nearby_woods_hike.jpg"></center>'
  411. else
  412. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/nearby_woods_hike_nude.jpg"></center>'
  413. end
  414. if nearby_woods_check <= 5:
  415. !Circle back to where the pcs started
  416. 'You start going into the woods in a direction you think will take you around the swamp.'
  417. 'After a few hours walking you realize your surroundings are a bit familiar.'
  418. 'Then you look around you and can see the hut in the distance. Seems like you just walked around in circles and ended up where you started'
  419. *nl
  420. 'You can see some broken branches and prints near ahead of you, marking the direction you initially started walking towards'
  421. act 'That''s interesting...': pcs_bushcraft += 2 & gt 'swamp_yard','nearby_woods'
  422. else
  423. !Get lost in the woods
  424. 'You start going into the woods in a direction you think will take you around the swamp.'
  425. 'After a few hours walking you realize you have no idea where you are going.'
  426. 'You look back to see if you can get back to the hut but nothing around seems familiar'
  427. act 'This can''t be good': gt 'gadforestlost','1'
  428. end
  429. end
  430. end
  431. else
  432. minut += 120
  433. !Make it back without effort
  434. if $clothingworntype ! 'nude':
  435. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/pathfinder.jpg"></center>'
  436. else
  437. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/pathfinder_nude.jpg"></center>'
  438. end
  439. 'You have a rough idea of how the forest curves around the swamp from having seen part of the swamp''s edge from the hut yard'
  440. 'With that in mind, you go into the forest, aware of your surroundings to make sure you are not stepping too far from the edge of the swamp'
  441. 'After a couple hours you are on the other edge of the forest'
  442. act 'Further': gt 'gadforest','4'
  443. end
  444. end
  445. end
  446. if $ARGS[0] = 'daytime_flavor_events':
  447. if rand(1,50) = 1:
  448. gs 'swamp_yard', 'skirt_breeze'
  449. elseif rand(1,20) = 1:
  450. gs 'hunter_favors', 'housekeeping_request'
  451. elseif rand(1,25) = 1:
  452. gs 'hunter_ambient' , 'yard_convo'
  453. elseif rand(1,10) = 1:
  454. gs 'hunter_interactions', 'naked_encounter'
  455. elseif rand(1,15) = 1:
  456. gs 'hunter_ambient', 'bring_food'
  457. end
  458. end
  459. if $ARGS[0] = 'nighttime_flavor_events':
  460. !TODO: Add stuff here
  461. end
  462. --- swamp_yard ---------------------------------