swamp_yard.tw 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285
  1. :: swamp_yard[mod mod_gad]
  2. <<set $here = 'swamp_yard'>>
  3. <<set $ARGS = $location_var[$here]>>
  4. <<gs 'hunter_ambient' 'schedule'>>
  5. <<if $location_var[$here][0] == 'start'>>
  6. <<set $loc = 'swamp_yard'>>
  7. <<set $loc_arg = 'start'>>
  8. <<set $menu_loc = 'swamp_yard'>>
  9. <<set $menu_arg = 'start'>>
  10. <<set $menu_off = 0>>
  11. <<set $location_type = 'secluded'>>
  12. <<set $hunterscabin = 1>>
  13. <<gs 'gadukino_event' 'sound'>>
  14. <<if getvar("$lost_girl") == 1>>
  15. <<if $time.daystart > $forest_lostday + 1 and rand(forest_lostday - daystart, 30) >= 30 and $time.dayStage == 2>>
  16. <<gt 'gadforestlost' 'rescue' 'ranger' 'swamp_yard'>>
  17. <</if>>
  18. <</if>>
  19. <center><B>The yard in front of the hut</B></center>
  20. <<if $time.month >= 5 and $time.month <= 9>>
  21. <center><img <<$set_imgh>> src="images/locations/gadukino/hunters/'+iif(dayStage < 4,'swamp_yard.jpg','swamp_yard_night.jpg')+'"></center>
  22. <<else>>
  23. <center><img <<$set_imgh>> src="images/locations/gadukino/hunters/'+iif(dayStage < 4,'swamp_yard_winter.jpg','swamp_yard_winter_night.jpg')+'"></center>
  24. <</if>>
  25. Behind the hut, there is a <<link "spring">><<gt 'swampspring'>><</link>>. If you continue further down, there is a small <<link "creek">><<gt 'backwater'>><</link>> with relatively clean water.
  26. <<if getvar("$hunters_available") == 1>>
  27. <<if getvar("$hunters_were_met") == 0>>
  28. <<if getvar("$hunters_outside") == 1>>
  29. You spot some unfamiliar <<link "people">><<gt 'hunters' 'start'>><</link>> standing in front of the hut.
  30. <</if>>
  31. <<else>>
  32. <<if getvar("$hunters_outside") == 1>>
  33. <<if getvar("$hunters_evening") == 1>>
  34. You hear some gunshots and see <<link "Andrei">><<gt 'swamp_woods' 'shooting_practice'>><</link>>, not too far in the distance, shooting some bottles.
  35. <<link "Igor and Sergey">><<gt 'hunters' 'start'>><</link>> are standing in the front yard.
  36. <<else>>
  37. <<if getvar("$campfire") == 1 and getvar("$hunters_chattime") == 0>>
  38. You see the hunters are sitting by the <<link "campfire">><<gt 'swamp_yard' 'campfire'>><</link>>
  39. <<else>>
  40. You notice the <<link "hunters">><<gt 'hunters' 'start'>><</link>> standing in the front yard.
  41. <</if>>
  42. <</if>>
  43. <<else>>
  44. The camp is quiet, but you can hear the hunters'' voices from the hut.
  45. <</if>>
  46. <</if>>
  47. <<else>>
  48. <<if getvar("$hunters_were_met") == 0>>
  49. The camp is quiet. There''s nobody here right now, but the camp looks like it is likely in use and not abandoned.
  50. <<else>>
  51. <<if getvar("$hunters_hunting") == 1>>
  52. <p>The hunters are most likely out hunting for a couple hours. You have the camp to yourself!</p>
  53. <<else>>
  54. The camp is quiet. The hunters are asleep in the hut.
  55. <</if>>
  56. <</if>>
  57. <</if>>
  58. <<act '<b>Go to the swamp</b>'>>
  59. <<gt 'swamp_yard' 'swamp_escape'>>
  60. <</act>>
  61. <<gs 'bicycle' 'swamp_yard'>>
  62. <<act 'Go into the house'>>
  63. <<gt 'swamphouse' 'start'>>
  64. <</act>>
  65. <<act 'Approach the firepit'>>
  66. <<gt 'swamp_yard' 'campfire'>>
  67. <</act>>
  68. <<act 'Visit the spring'>>
  69. <<gt 'swampspring'>>
  70. <</act>>
  71. <<act 'Visit the creek'>>
  72. <<gt 'backwater'>>
  73. <</act>>
  74. <<actCLA 'Explore the woods'>>
  75. <<set $time.minutes += 10>> <<gt 'swamp_woods' 'start'>>
  76. <</actCLA>>
  77. <<if getvar("$hunters_outside") == 1 and getvar("$hunters_available") == 1 and rand(1,2) == 1>>
  78. <<gs 'swamp_yard' 'daytime_flavor_events'>>
  79. <</if>>
  80. <</if>>
  81. <<if $location_var[$here][0] == 'campfire'>>
  82. <!-- !TODO: Add mechanic so that fire slowly goes through wood and extinguishes when there is no more left-->
  83. <<set $loc = 'swamp_yard'>>
  84. <<set $loc_arg = 'campfire'>>
  85. <<set $menu_off = 1>>
  86. <<gs 'hunter_ambient' 'schedule'>>
  87. <<act 'Move away'>>
  88. <<gt 'swamp_yard' 'start'>>
  89. <</act>>
  90. <<if getvar("$campfire") == 1>>
  91. <<image `'locations/gadukino/hunters/'+iif(dayStage = 2,'campfire_day.jpg','campfire_night.jpg')+''`>>
  92. A nice, warm campfire you can sit and relax by. You can use it for cooking something or heating up some water to bathe.
  93. You can also put it out with the bucket if there is enough water.
  94. <<if getvar("$hunters_breakfast") == 1 or getvar("$hunters_lunch") == 1>>
  95. <<image "locations/gadukino/hunters/hanters1.jpg">>
  96. The hunters also sit around the campfire, talking and joking about all kinds of stuff before heading out hunting.
  97. <<act 'Chat (0:30)'>>
  98. <<gt 'hunter_interactions' 'chat_with_hunters'>>
  99. <</act>>
  100. <!-- !TODO: Flesh out the learning content here-->
  101. <<actCLA 'Ask for some survival tips (0:10)'>>
  102. <<set $hunter_lessons += 1>>
  103. <<if getvar("$hunter_collective_opinion") > 25>>
  104. <<set $hunter_collective_opinion -= 1>>
  105. <<run $pc.skillExperienceGain('bushcraft',1)>>
  106. <<set $time.minutes += 10>>
  107. The hunters talk to you about some of their experiences when they first started out.
  108. <<else>>
  109. <<if getvar("$hunter_lessons") > 10 AND hunter_sexual_comfort>>
  110. <!-- !TODO: Prototype implementation for the creekside event, to be revamped-->
  111. Sergei tells you to go by the creek for the next lesson about how to scope the area for a hunt.
  112. <<set $hunter_lessons -= 8>>
  113. <<act 'Further'>>
  114. <<gt 'hunter_favors' 'creekside_gangbang_request'>>
  115. <</act>>
  116. <<else>>
  117. <<set $time.minutes += 20>>
  118. The hunters do not even bother to answer you. Instead, you sit quietly for twenty minutes before getting on to other business.
  119. <</if>>
  120. <</if>>
  121. <<act 'Further'>>
  122. <<gt 'swamp_yard' 'campfire'>>
  123. <</act>>
  124. <</actCLA>>
  125. <</if>>
  126. <<if getvar("$hunters_drink") == 1>>
  127. <<image "locations/gadukino/hunters/fireside_drink.jpg">>
  128. The hunters are drinking and chatting loudly. You can join them for a chat or maybe a drink or two if you like.
  129. <<act 'Chat (0:30)'>>
  130. <<gt 'hunter_interactions' 'chat_with_hunters'>>
  131. <</act>>
  132. <<act 'Ask them for a drink'>>
  133. <<gt 'hunter_interactions' 'join_drinking'>>
  134. <</act>>
  135. <</if>>
  136. <<if getvar("$bucket") >= 3>>
  137. <<actCLA 'Put out the fire'>>
  138. <<image "locations/gadukino/hunters/campfire_put_out.jpg">>
  139. You pour some water to extinguish the campfire.
  140. <<set $campfire = 0>>
  141. <<set $time.minutes += 5>>
  142. <<set $bucket -= 3>>
  143. <<act 'Further'>>
  144. <<gt 'swamp_yard' 'campfire'>>
  145. <</act>>
  146. <</actCLA>>
  147. <</if>>
  148. <<if getvar("$bucket") > 0>>
  149. <<if getvar("$boletus") > 0 and getvar("$mushroom_soup") == 0>>
  150. <<actCLA 'Cook some mushroom soup (0:30)'>>
  151. <<gs 'hunter_favors' 'mushroom_soup'>>
  152. <</actCLA>>
  153. <</if>>
  154. <<if getvar("$raw_meat") > 0 and getvar("$meat_stew") == 0>>
  155. <<actCLA 'Cook some meat stew (1:00)'>>
  156. <<gs 'hunter_favors' 'meat_stew'>>
  157. <</actCLA>>
  158. <</if>>
  159. <</if>>
  160. <<if getvar("$bucket") >= 5 and getvar("$hotwater") == 0>>
  161. <<actCLA 'Heat up water (0:30)'>>
  162. <<image "locations/gadukino/hunters/hotwater.jpg">>
  163. <<set $time.minutes += 30>>
  164. <<set $bucket -= 5>>
  165. <<set $hotwater = 1>>
  166. <<set $water_heated += 1>>
  167. <<if getvar("$water_heated") > 5 and ($pc.pcs_inhib < 85 or getvar("$hunter_sexual_comfort") > 25)>>
  168. "It is too tedious to keep heating up water", you think to yourself.
  169. <<else>>
  170. <p>With the now-heated water, you can bathe yourself in the tub.</p>
  171. <</if>>
  172. <<act 'Continue'>>
  173. <<gt 'swamp_yard' 'campfire'>>
  174. <</act>>
  175. <</actCLA>>
  176. <</if>>
  177. <<actCLA 'Eat a meal'>>
  178. <<act 'Return'>>
  179. <<gt 'swamp_yard' 'campfire'>>
  180. <</act>>
  181. <<act 'Eat jerky and trail mix'>>
  182. <<gt 'food' 'jerky'>>
  183. <</act>>
  184. <<if getvar("$meat_stew") > 0>>
  185. <<actCLA 'Eat meat stew'>>
  186. <<gt 'beverage' 'meat_stew'>>
  187. <<set $meat_stew -= 1>>
  188. <<if getvar("$meat_stew") > 0>>
  189. <p>There's meat_stew '+iif(meat_stew > 1, 'servings','serving')+' of stew left in the pot</p>
  190. <<else>>
  191. You have finished the last of the stew. The pot is empty.
  192. <</if>>
  193. <</actCLA>>
  194. <</if>>
  195. <<if getvar("$mushroom_soup") > 0>>
  196. <<actCLA 'Eat mushroom soup'>>
  197. <<gt 'beverage' 'mush_soup'>>
  198. <<set $mushroom_soup -= 1>>
  199. <<if getvar("$mushroom_soup") > 0>>
  200. <p>There's mushroom_soup '+iif(mushroom_soup > 1, 'servings','serving')+' of soup left in the pot</p>
  201. <<else>>
  202. You have finished the last of the soup, and the pot is empty.
  203. <</if>>
  204. <</actCLA>>
  205. <</if>>
  206. <<if getvar("$bilberry") > 0>>
  207. <<act 'Eat berries'>>
  208. <<gt 'food' 'bilberry'>>
  209. <</act>>
  210. <</if>>
  211. <</actCLA>>
  212. <<if $pc.alko > 8>>
  213. <<gt 'hunter_interactions' 'drunken_blackout'>>
  214. <</if>>
  215. <<else>>
  216. <<image `'locations/gadukino/hunters/'+iif(dayStage = 2,'campfire_out_day.jpg','campfire_out_night.jpg')+''`>>
  217. You can use this firepit to light a fire if you have some firewood available.
  218. <!-- !TODO: Tie fire lighting to bushcraft, make hunters do it on their schedule or with Sveta asking-->
  219. <<if getvar("$firewood") >= 10 and getvar("$campfire") == 0>>
  220. <<actCLA 'Light fire'>>
  221. <<image `'locations/gadukino/hunters/'+iif($wardrobe.clothingworntype ! 'nude','campfire_light.jpg','campfire_light_nude.jpg')+''`>>
  222. You use some chopped wood, dry branches and twigs to light a campfire in the firepit.
  223. <<set $firewood -= 10>>
  224. <<set $campfire = 1>>
  225. <<set $time.minutes += 15>>
  226. <<act 'Further'>>
  227. <<gt 'swamp_yard' 'campfire'>>
  228. <</act>>
  229. <</actCLA>>
  230. <<elseif getvar("$firewood") < 10 and getvar("$campfire") == 0>>
  231. There is some wood and twigs by the pit but not enough to light a new fire. You will probably need to collect branches, chop some or ask a hunter to do so.
  232. <</if>>
  233. <</if>>
  234. <</if>>
  235. <<if $location_var[$here][0] == 'swamp_escape'>>
  236. <!-- !add chance to swamped by illume-->
  237. <<if getvar("$hunters_available") == 1 and getvar("$hunters_outside") == 1>>
  238. <<if $time.hour >= 6 and $time.hour < 21>>
  239. <<set $time.minutes += 5>>
  240. <<if rand(0,9) > 8>>
  241. <<gt 'swamp' 'start' else gt 'swamp' 'stuck'>>
  242. <</if>>
  243. <<else>>
  244. <<image "locations/gadukino/hunters/handshelp.jpg">>
  245. As you start moving into the swamp, Igor calls after you.
  246. <!-- !TODO: Different line depending on opinion and slut-->
  247. <p>"$pc.name_nick, where are you going? You will get stuck in there!</p>
  248. <<act 'Turn back'>>
  249. <<gt 'swamp_yard' 'start'>>
  250. <</act>>
  251. <<actCLA 'Ignore him and keep going'>>
  252. <<set $time.minutes += 5>>
  253. <!-- !TODO: Add skill clothing and temp check here instead of praying to RNGesus-->
  254. <<if rand(0,9) > 8>>
  255. <<gt 'swamp' 'start' else gt 'swamp' 'stuck'>>
  256. <</if>>
  257. <</actCLA>>
  258. <</if>>
  259. <<else>>
  260. <<set $time.minutes += 5>>
  261. <!-- !TODO: Here too, also see how to avoid duplicating. Maybe create a child event node?-->
  262. <<if ($time.hour >= 6 and $time.hour < 21) or rand(0,9) > 6>>
  263. <<gt 'swamp' 'start' else gt 'swamp' 'stuck'>>
  264. <</if>>
  265. <</if>>
  266. <</if>>
  267. <<if $location_var[$here][0] == 'daytime_flavor_events'>>
  268. <<gs 'hunter_ambient' 'schedule'>>
  269. <<if rand(1,30) == 1 and getvar("$hunters_available") > 0>>
  270. <<gt 'hunter_interactions' 'skirt_breeze'>>
  271. <<elseif rand(1,10) == 1 and getvar("$hunters_available") > 0>>
  272. <<gt 'hunter_favors' 'housekeeping_request'>>
  273. <<elseif rand(1,12) == 1 and getvar("$hunters_available") > 0>>
  274. <<gt 'hunter_ambient' 'yard_convo'>>
  275. <<elseif rand(1, hunter_sexual_comfort / 4 + 2) == 1 and getvar("$hunters_available") > 0>>
  276. <<gt 'hunter_interactions' 'naked_encounter'>>
  277. <<elseif rand(1,15) == 1 and getvar("$hunters_available") > 0>>
  278. <<gt 'hunter_ambient' 'bring_food'>>
  279. <</if>>
  280. <</if>>