1
0

Gadsarai.qsrc 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354
  1. # Gadsarai
  2. if $ARGS[0] = '':
  3. $metka = ''
  4. $loc = 'Gadsarai'
  5. $menu_loc = 'Gadsarai'
  6. $menu_arg = ''
  7. menu_off = 0
  8. $location_type = 'secluded'
  9. '<center><h4>Old Barn</h4></center>'
  10. if month >= 4 and month <= 10:
  11. if hour >= 6 and hour < 22:
  12. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/sarai.jpg"></center>'
  13. else
  14. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/sarai_night.jpg"></center>'
  15. end
  16. else
  17. if hour >= 8 and hour < 18:
  18. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/sarai_winter.jpg"></center>'
  19. else
  20. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/sarai_winter_night.jpg"></center>'
  21. end
  22. end
  23. 'An old junk filled barn that could hold some useful items.'
  24. if mira_dog > 0: 'A naked and chained <a href="exec: gt ''Gadsarai'',''mira_dog'' ">Mira</a> sits near the dog house.</a>'
  25. if month > 4 and month < 10:
  26. if hour > 9 and hour < 20:
  27. 'On your right is a cattle barn.'
  28. else
  29. 'On your right is a <a href="exec: gt ''Gadsarai'',''cow'' ">cattle</a> barn.'
  30. end
  31. if hour > 9 and hour < 20 and week < 6 or horse_river = 2:
  32. 'On your left is a horse stable.'
  33. else
  34. 'On your left is a <a href="exec: gt ''Gadsarai'',''horse'' ">horse</a> stable.'
  35. end
  36. else
  37. 'On your right is a <a href="exec: gt ''Gadsarai'',''cow'' ">cattle</a> barn.'
  38. 'On your left is a <a href="exec: gt ''Gadsarai'',''horse'' ">horse</a> stable.'
  39. end
  40. 'There''s a <a href="exec: gt ''Gadsarai'',''boar'' ">boar</a> living in a separate stable.'
  41. if findvel = 1:'You see an old <a href="exec:gt ''bicycle'',''sarai''">bike</a> in the corner.'
  42. clr
  43. gs 'stat'
  44. act 'Leave':minut += 1 & gt 'Gaddvor'
  45. act 'Poke around in the barn':
  46. if grigoryEV > 0 and grigory_barn ! daystart and hour > 8 and hour < 12: gt 'grigory', 'barn'
  47. *clr & cla
  48. minut += 15
  49. gs 'stat'
  50. if vcard = 0 and vcard_trash = 0:
  51. *clr & cla
  52. if rand(0,5) >= 4:
  53. gs 'stat'
  54. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/vcards.jpg"></center>'
  55. '"Hmm, what''s this?" You''ve found an unopened deck of vintage adult playing cards, still in its original cellophone wrapper.'
  56. vcard = 1
  57. observ_exp += 3
  58. else
  59. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
  60. 'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
  61. end
  62. act 'Leave and get some fresh air':gt 'Gadsarai'
  63. elseif findvel = 0:
  64. *clr & cla
  65. if rand(0,8) >= 7:
  66. gs 'stat'
  67. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/findbike.jpg"></center>'
  68. 'In the far corner of the barn you manage to find an old bicycle. It''s in surprisingly good condition. You pull it out of the barn and clean it up.'
  69. findvel = 1
  70. observ_exp += 3
  71. else
  72. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
  73. 'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
  74. end
  75. act 'Leave and get some fresh air':gt 'Gadsarai'
  76. elseif findbag = 0 and bag = 0:
  77. *clr & cla
  78. if rand(0,10) > 9:
  79. findbag = 1
  80. observ_exp += 3
  81. gs 'stat'
  82. '<center><img <<$set_imgh>> src="images/pc/purses/cheap/5.jpg"></center>'
  83. 'In a far corner of the barn you find a hessian sack filled with mostly junk, but at the bottom you find a good quality messenger bag.'
  84. cheap_purses[5] = 1
  85. $currentpursetype = 'cheap'
  86. currentpursenumber = 5
  87. 'You can use this cool looking bag as a handbag.'
  88. else
  89. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
  90. 'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
  91. end
  92. act 'Leave and get some fresh air':
  93. if findbag = 1: bag = 1
  94. gt 'Gadsarai'
  95. end
  96. elseif findbraclet = 0:
  97. *clr & cla
  98. if rand(0,15) >= 14:
  99. gs 'stat'
  100. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/bracelet.jpg"></center>'
  101. 'While looking through the barn you spot a glint of metal under a pile of wood. Upon closer inspection you see a bracelet made of silver and crafted into the likeness of a snake. Strange, but cool that you would find something this valuable in the barn.'
  102. findbraclet = 1
  103. observ_exp += 3
  104. else
  105. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
  106. 'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
  107. end
  108. act 'Leave and get some fresh air':gt 'Gadsarai'
  109. elseif findbraclet > 0 and findneck = 0:
  110. *clr & cla
  111. if rand(0,20) >= 19:
  112. gs 'stat'
  113. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/necklace.jpg"></center>'
  114. if altQS = 1:
  115. 'While looking through the barn your foot goes through a rotten floorboard. You suddenly feel the presence of something magical under the floor. You get on your belly and look through the hole in the floor. You find a small box made of a black wood. You pick up the box and see the box is covered in a strange writing and glyphs that look like serpents. The feeling of power is coming from within the box. You lift the lid of the box and see a black metal necklace that looks like a coiled snake with ruby eyes. You feel the power coming from the necklace, but it doesn''t feel like any power you have ever felt.'
  116. else
  117. 'While looking through the barn your foot goes through a rotten floorboard and gets stuck. As you work your foot free, you glimpse something underneath the floor - a box or something. You get on your belly and look through the hole in the floor. You find a small box made of a black wood. You pick up the box and see the box is covered in a strange writing and glyphs that look like serpents. The exotic look of the box gives you gooseflesh and you find yourself holding your breath as you prepare to open the box. You lift the lid of the box and see a black metal necklace that looks like a coiled snake with ruby eyes. You let your breath out slowly as you tilt the necklace from side to side, watching the light sparkle as it is reflected by the facets on the deep red rubies. You cannot begin to guess what this necklace must be worth.'
  118. end
  119. findneck = 1
  120. observ_exp += 3
  121. else
  122. *clr & cla
  123. gs 'stat'
  124. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
  125. 'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
  126. end
  127. act 'Leave and get some fresh air':gt 'Gadsarai'
  128. else
  129. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
  130. 'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
  131. act 'Leave and get some fresh air':gt 'Gadsarai'
  132. end
  133. end
  134. if vcard > 0: act 'View your vintage porn cards':card_deck = 0 & gt 'card'
  135. if card > 0: act 'View your new porn cards':card_deck = 1 & gt 'card'
  136. if pcs_horny >= 50: act 'Masturbate':gt 'selfplay', 'start'
  137. !! Serpent is not ready yet, so remarking out til then.
  138. !! if findneck = 1:
  139. !! act 'You hear a scrapping noice above you.':gt 'serpent'
  140. !! end
  141. !! if sunWeather = 1:
  142. !! if findvel = 1 and velday ! daystart:
  143. !! 'You decide to spend awhile riding the <a href="exec: gt ''events'', ''cycling''">bicycle</a> around.'
  144. !! end
  145. !! end
  146. end
  147. if $ARGS[0] = 'boar':
  148. *clr & cla
  149. minut += 1
  150. gs 'stat'
  151. '<center><H4>The barn</H4></center>'
  152. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/boar.jpg"></center>'
  153. 'One of your grandparents dearest possessions, the boar Nickle.'
  154. if feed_boar = 1:
  155. act 'Feed the boar':
  156. cla
  157. *clr
  158. minut += 30
  159. grandmahelp += 1
  160. feed_boar = 0
  161. hndiwrk_exp += rand(0,3)
  162. gs 'stat'
  163. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/feed_boar.jpg"></center>'
  164. 'You fed Nickle and went on about your business.'
  165. act 'Finish':gt 'Gadsarai','boar'
  166. end
  167. end
  168. act 'Go':minut += 5 & gt'Gadsarai'
  169. end
  170. if $ARGS[0] = 'cow':
  171. *clr & cla
  172. minut += 1
  173. gs 'stat'
  174. '<center><H4>The barn</H4></center>'
  175. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow.jpg"></center>'
  176. 'Grandma''s favorite animal, the cow Dawn.'
  177. if milk_cow = 1:
  178. act 'Milk the cow':
  179. cla
  180. *clr
  181. minut += 30
  182. milk_cow = 0
  183. grandmahelp += 1
  184. hndiwrk_exp += rand(0,3)
  185. gs 'stat'
  186. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/milk_cow.jpg"></center>'
  187. 'You start milking Dawn, improving for each time you do it.'
  188. act 'Finish':gt 'Gadsarai','cow'
  189. end
  190. end
  191. if feed_cow = 1:
  192. act 'Feed the cow':
  193. cla
  194. *clr
  195. minut += 30
  196. feed_cow = 0
  197. grandmahelp += 1
  198. hndiwrk_exp += rand(0,3)
  199. gs 'stat'
  200. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/feed_cow.jpg"></center>'
  201. 'You fed Dawn and continued on with your day.'
  202. act 'Finish':gt 'Gadsarai','cow'
  203. end
  204. end
  205. if cow_field = 1 or graze_cow = 1:
  206. act 'Lead the cow to the field':
  207. cla
  208. *clr
  209. minut += 60
  210. cow_field = 0
  211. grandmahelp += 1
  212. hndiwrk_exp += rand(0,3)
  213. gs 'stat'
  214. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_field.jpg"></center>'
  215. if cow_field = 1:'You lead Dawn to the field, where you let the shepherds take over.'
  216. if graze_cow = 1:'You lead Dawn to the field, where you grandfather awaits you. It''s his turn to keep an eye on the cows.'
  217. act 'Continue':gt'gadfield','cow'
  218. end
  219. end
  220. act 'Go':minut += 5 & gt'Gadsarai'
  221. end
  222. if $ARGS[0] = 'horse':
  223. *clr & cla
  224. minut += 1
  225. gs 'stat'
  226. '<center><H4>The barn</H4></center>'
  227. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/horse.jpg"></center>'
  228. 'Grandfather trusted assistant, the horse Desperado.'
  229. if feed_horse = 1:
  230. act 'Feed the horse':
  231. cla
  232. *clr
  233. minut += 30
  234. feed_horse = 0
  235. grandmahelp += 1
  236. hndiwrk_exp += rand(0,3)
  237. gs 'stat'
  238. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/feed_horse.jpg"></center>'
  239. 'You fed Desperado and went on about your business.'
  240. act 'Finish':gt 'Gadsarai','horse'
  241. end
  242. end
  243. if horse_field = 1:
  244. act 'Lead the horse to the field':
  245. cla
  246. *clr
  247. minut += 60
  248. horse_field = 0
  249. grandmahelp += 1
  250. hndiwrk_exp += rand(0,3)
  251. gs 'stat'
  252. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/horse_field.jpg"></center>'
  253. 'You took Desperado by the bridle and led it to the field. There, you let it run free in the paddock area, and went on with your business.'
  254. act 'Continue':gt'gadfield','field'
  255. end
  256. end
  257. if horse_river = 1 and sunWeather = 1 and temper >= 15:
  258. act 'Lead the horse to the river':
  259. cla
  260. *clr
  261. minut += 30
  262. horse_river = 2
  263. hndiwrk_exp += rand(0,3)
  264. gs 'stat'
  265. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/horse_field.jpg"></center>'
  266. 'You took Desperado by the bridle and led it to the river.'
  267. act 'Continue':gt'gadriver', 'gadbitch'
  268. end
  269. end
  270. if comb_horse = 1:
  271. act 'Groom the horse':
  272. cla
  273. *clr
  274. minut += 60
  275. comb_horse = 0
  276. grandmahelp += 1
  277. hndiwrk_exp += rand(0,3)
  278. gs 'stat'
  279. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/comb_horse.jpg"></center>'
  280. 'You groom Desperado for an hour. When finished, you''re satisfied with the result. Desperado is looking as healthy as ever.'
  281. act 'Continue':gt 'Gadsarai','horse'
  282. end
  283. end
  284. act 'Go':minut += 5 & gt'Gadsarai'
  285. end
  286. if $ARGS[0] = 'mira_dog':
  287. *clr & cla
  288. minut += 5
  289. gs 'stat'
  290. '<center><H4>The barn</H4></center>'
  291. '<center><img <<$set_imgh>> src="images/characters/village/mira/mira_kennel2.jpg"></center>'
  292. 'You see Mira in chains, naked, in the old dog house depicting a dog.'
  293. act 'Release':
  294. cla
  295. *clr
  296. minut += 5
  297. mira_dog = 0
  298. gs 'stat'
  299. npc_QW['A60'] = 32 & !back to mira questline by illume
  300. '<center><img <<$set_imgh>> src="images/characters/village/mira/mira_kennel3.jpg"></center>'
  301. 'Taking pity, you decide to let go the Mira ahead of time.'
  302. '"Okay Mira, I''m feeling mercyfull today. You can consider yourself forgiven." you say, removing Mira''s collar.'
  303. 'The girl looks nervously at you for a few moments, then quickly gets dressed and runs home.'
  304. act 'Continue':gt'Gadsarai'
  305. end
  306. act 'Go':gt'Gadsarai'
  307. end
  308. --- Gadsarai ---------------------------------