backwater 9.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283
  1. # backwater
  2. $location_type = 'secluded'
  3. $metka = $ARGS[0]
  4. $loc = $CURLOC
  5. gs 'gadukino_event', 'sound'
  6. cls
  7. gs'stat'
  8. clothesAtLocation = FUNC('lost_clothes_here',$CURLOC)
  9. !events before everything
  10. if $clothingworntype = 'nude' and hantersKnowSlut = 0 and hanters = 1 and hour > 8 and hour < 20 and hanterknowday < day:
  11. cla
  12. *clr
  13. minut += 5
  14. gs 'stat'
  15. '<center><B>Backwater</B></center>'
  16. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hunter_looks.jpg"></center>'
  17. 'While cleaning yourself in the backwater, you suddenly get the feeling that you are not alone here. Turning around, you see one of the hunters. He''s just standing there watching you, his camouflage is almost indistinguishable compared to the bushes and trees.'
  18. if clothesAtLocation = 1 and clearclothes = 0 :
  19. act'Get dressed':
  20. cls
  21. minut += 5
  22. gs 'underwear', 'wear'
  23. gs 'clothing', 'recover_lost_clothes', $CURLOC, 1
  24. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/swampbackwaternude1.jpg"></center>'
  25. 'Noticing the hunter, you rush over to your clothes and begin dressed yourself in panic. As you get fully dressed, you look over your shoulder, expecting the hunter standing there, but there is no one there.'
  26. act'Further':gt 'backwater'
  27. end
  28. else
  29. act'Hide':
  30. cls
  31. minut += 1
  32. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/swampbackwaternude2.jpg"></center>'
  33. 'Covering your Breasts and crotch you jump into the nearest bush. In your state of fear and confusion, you start scanning the area but you don''t see anyone there. You quickly run back towards the cabin.'
  34. act'Further':gt 'swamp_yard'
  35. end
  36. end
  37. act'Stay naked':
  38. cls
  39. hanterslut += 1
  40. hanterknowday = day
  41. gs'stat'
  42. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/swampbackwaternude3.jpg"></center>'
  43. 'You decide that you have nothing to be afraid of, and continue on completely nude. The hunter looks at you for a minute or so, all of a sudden you hear a "Hmph", him turning around and going away.'
  44. act'Further':gt 'backwater'
  45. end
  46. exit
  47. end
  48. !start location
  49. '<center><B>Backwater</B></center>'
  50. if month >= 4 and month <= 10:
  51. if hour >= 6 and hour < 22:
  52. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwater.jpg"></center>'
  53. else
  54. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwater_night.jpg"></center>'
  55. end
  56. else
  57. if hour >= 8 and hour < 18:
  58. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwater_winter.jpg"></center>'
  59. else
  60. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwater_winter_night.jpg"></center>'
  61. end
  62. end
  63. 'A small creek with relatively clean water. If the weather is warm you can clean yourself up. Also, if your clothes are dirty you can wash them here.'
  64. if clothesAtLocation = 1:'Your clothes lie on the shore.'
  65. !re-arrange it, there should be no logic error now by illume
  66. if clothesAtLocation = 0:
  67. if $clothingworntype ! 'nude' and temper >= 15:
  68. act'Undress':
  69. if hantersKnowSlut > 0 or hanters = 0 or hour < 8 or hour >= 20 or pcs_exhibition > 35:
  70. cla
  71. *clr
  72. minut+=5
  73. gs 'underwear', 'remove'
  74. if hantersRape = 1: hantersRape = 2
  75. if CloSkirtShortness > 0:
  76. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterundress_ski.jpg"></center>'
  77. else
  78. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterundress.jpg"></center>'
  79. end
  80. gs 'clothing', 'strip', $CURLOC
  81. 'You do not hesitate getting undressed, not caring if anyone is watching.'
  82. act'Back':gt'backwater'
  83. else
  84. cla
  85. *clr
  86. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/noundress.jpg"></center>'
  87. 'You hesitate getting undressed, what if someone suddenly sees you?'
  88. act'Back':gt'backwater'
  89. end
  90. end
  91. end
  92. else
  93. if $clothingworntype ! 'nude':
  94. act 'Pick up your clothes':
  95. cla
  96. *clr
  97. gs 'clothing', 'recover_lost_clothes', $CURLOC
  98. 'You pick up your clothes laying on the ground.'
  99. gt $loc, $metka
  100. end
  101. else
  102. act 'Get dressed':
  103. cla
  104. *clr
  105. gs 'clothing', 'recover_lost_clothes', $CURLOC, 1
  106. gs 'underwear', 'wear'
  107. 'You pick up your clothes laying on the ground and get dressed.'
  108. gt $loc, $metka
  109. end
  110. end
  111. end
  112. if $clothingworntype = 'nude':
  113. act 'Wash self':
  114. cla
  115. *clr
  116. dynamic $showerdin
  117. face_write = 0
  118. body_write = 0
  119. minut += 30
  120. pcs_mood += 10
  121. pcs_willpwr += 5
  122. if hantersRape = 1: hantersRape = 2
  123. if $pantyworntype = 'none':
  124. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterswim2.jpg"></center>'
  125. else
  126. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterswim3.jpg"></center>'
  127. end
  128. 'You washed yourself in the creek.'
  129. act 'Further':gt 'backwater'
  130. end
  131. if dirtyclothes = 1 and clothesAtLocation = 1:
  132. act 'Wash your clothes':
  133. cla
  134. *clr
  135. if hantersRape = 1: hantersRape = 2
  136. minut += 60
  137. dirtyclothes = 0
  138. cumspclnt = 6 & gs 'cum_cleanup'
  139. gs 'stat'
  140. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterwash.jpg"></center>'
  141. 'You get undressed and wash your dirty clothes. Unfortunately the clothes didn''t get fully clean because of the cold water.'
  142. !fix logic by illume
  143. act 'Hang the clothes in the hut':
  144. cla
  145. *clr
  146. minut += 5
  147. clearclothes = 5
  148. gs 'clothing','recover_lost_clothes',$CURLOC, 1
  149. gs 'clothing', 'strip', 'swamphouse'
  150. if $clothingworntype = 'nude':
  151. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/basinwash1.jpg"></center>'
  152. else
  153. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/washclothes2.jpg"></center>'
  154. end
  155. 'You hang the clothes near the stove so they could dry.'
  156. act 'Further':gt $loc, $metka
  157. end
  158. if month >= 5 and month <= 9:
  159. act 'Hang clothes on the clothesline':
  160. cla
  161. *clr
  162. minut += 10
  163. clearclothes = 3
  164. gs 'clothing','recover_lost_clothes',$CURLOC, 1
  165. gs 'clothing', 'strip', 'clothesline_swamp'
  166. if $clothingworntype = 'nude':
  167. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/basinwash2.jpg"></center>'
  168. else
  169. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/washclothes2.jpg"></center>'
  170. end
  171. 'You hang the clothes on the clothesline to dry.'
  172. act 'Further':gt'swamp_yard'
  173. end
  174. end
  175. end
  176. end
  177. else
  178. !not nude
  179. if dirtyclothes = 1 and temper >= 10:
  180. act 'Clean your dirty clothes':
  181. cla
  182. *clr
  183. if hantersRape = 1: hantersRape = 2
  184. minut += 30
  185. dirtyclothes = 0
  186. cumspclnt = 6 & gs 'cum_cleanup'
  187. gs 'stat'
  188. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterwash2.jpg"></center>'
  189. 'You start undressing as you enter the water thinking you''ll be able to clean your dirty clothes. Unfortunately you don''t seem able to get the clothes clean because you didn''t want to get undressed not wanting to freeze your butt off in the cold water.'
  190. act 'Further':gt'swamp_yard'
  191. end
  192. end
  193. if arrsize('sparrvol') > 0:
  194. act 'Wash off sperm':
  195. cla
  196. *clr
  197. dynamic $showerdin
  198. lubonus = 0
  199. pcs_sweat -= 1
  200. minut += 10
  201. if hantersRape = 1: hantersRape = 2
  202. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterswim1.jpg"></center>'
  203. 'You carefully wash off the sperm in the creek.'
  204. act 'Further':gt 'backwater'
  205. end
  206. end
  207. if (cumloc[6] = 1 or cumloc[7] = 1):
  208. act 'Clean the sperm off your clothes':
  209. cla
  210. cumspclnt = 6 & gs 'cum_cleanup'
  211. minut += 5
  212. if hantersRape = 1: hantersRape = 2
  213. gs'stat'
  214. '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/cumwash.jpg"></center>'
  215. 'You clean the cum stains off your clothes.'
  216. act 'Finish':gt 'backwater'
  217. end
  218. end
  219. if temper >= 10:
  220. act 'Wash your face':
  221. cla
  222. *clr
  223. pcs_makeup = 1
  224. cumspclnt = 9
  225. gs 'cum_cleanup'
  226. cumspclnt = 11
  227. gs 'cum_cleanup'
  228. cumspclnt = 13
  229. gs 'cum_cleanup'
  230. if pcs_sweat > 19 : pcs_sweat -= 5
  231. '<center><img <<$set_imgh>> src="images/shared/home/bathroom/facesp.jpg"></center>'
  232. *nl
  233. 'You clean your face and get rid of any trace of cum.'
  234. face_write = 0
  235. '<center><img <<$set_imgh>> src="images/shared/home/bathroom/facesp.jpg"></center>'
  236. 'You carefully wash your face, removing your makeup.'
  237. minut += 5
  238. gs'stat'
  239. act 'Further':gt 'backwater'
  240. if hantersRape = 1: hantersRape = 2
  241. end
  242. end
  243. end
  244. act 'Go':minut += 5 & gt'swamp_yard'
  245. if hantersRape = 2:
  246. cla
  247. *clr
  248. minut += 5
  249. hantersRape = 3
  250. gs 'stat'
  251. '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/backwaterrelax.jpg"></center>'
  252. 'You sit down by the shore, resting.'
  253. act 'Further':gt 'hanters', 'start'
  254. end
  255. --- backwater ---------------------------------