1
0

Gadhouse 17 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350
  1. # Gadhouse
  2. $metkaM = $ARGS[0]
  3. $locM = $CURLOC
  4. $metka = $ARGS[0]
  5. $loc = $CURLOC
  6. frost = 0
  7. CLOSE ALL
  8. $grandma = {
  9. cls
  10. minut += 2
  11. if grandmatalkday ! daystart:grandmatalk = 0
  12. gs 'stat'
  13. '<center><img src="images/qwest/gadukino/grandma.jpg"></center>'
  14. 'She is already very old and almost never goes, so most of my time sitting on the bed, or somewhere else-some in the house.'
  15. if hour >= grandmatalk + 3:
  16. act 'Chat':
  17. cla
  18. *clr
  19. grandmatalk = hour
  20. grandmatalkday = daystart
  21. minut += 10
  22. manna += mannamax/RAND(10,15)
  23. gs 'stat'
  24. '<center><img src="images/qwest/gadukino/grandma.jpg"></center>'
  25. 'You some time talking with her grandmother, but that, on-samka old woman`s almost toothless mouth, almost all of the grousing about, that youth is not the same.'
  26. act 'Finish':gt 'Gadhouse'
  27. end
  28. end
  29. if grandmastory ! daystart:
  30. act 'Ask them to tell the story':
  31. cla
  32. *clr
  33. grandmastory = daystart
  34. minut += 20
  35. manna += mannamax/RAND(5,10)
  36. temp = RAND(0,7)
  37. gs 'stat'
  38. '<center><img src="images/qwest/gadukino/Babushka.jpg"></center>'
  39. 'Are you asking your grandma to tell you what-some of her many stories and she, grumbled a little, still readily agrees...'
  40. if temp = 0:
  41. '- Once gathered boys and girls, one friend, guests, - begins his story grandma. - Parents of the guests left, and were they home alone, five people-seven. That`s the time to sleep already, lay, and, this 195.. Oh, I do not remember, forgive, granddaughter, long ago it was... Generally, light in the villages, and one girl, which lay near the wall, I was just kidding, and start, softly-quietly into the wall knocking. All scared, and winter, the wind whistles quietly, well I learned that the girl pounded, shout at her a little-slightly, and went to sleep again.
  42. And here again the wall banging began, girl bed on the floor, but here again knocking. All got scared and in the center of the room gathered, all sitting to each other cuddling. But here it is in one wall knock, the other.At four o`clock, the Blizzard stopped, and the snow was, and he ceased to go, in the window was visible.
  43. So until six in the morning pounded. And in seven parents came. All children, parents told, and they don`t believe. Children ran out into the street, and around the house no trace in the snow no.
  44. Since then, none of them, even the door didn`t knock, a voice called.'
  45. elseif temp = 1:
  46. ' - I had when-the girlfriend, starts Granny. - Died in her husband, a drunkard he was. Got drunk and died. And once, she came from work, sat down on the sofa, and hears, who-the corridor is. Boards under the feet of whom-the creak. And the door from the hallway into the room, wooden with glass, in the middle. And ribbed glass, and my friend saw only the shadow of a man, her husband is very similar. Not a little consternation at the thought, she said: "Get out, and if you don`t leave the poker to chase..." - And he went. Next week she comes from work, and she has a cupboard with a glass door. She decided to read a book, took the book, turns, and behind the glass her husband is. It is like a glass door in it will start, he was hit on the head door, he looked at her and walked away. Then her other friend told, and she advised her animals what ever to have, the cat or dog. She brought the dog. Back again from work, comes into the room, and he lies on the sofa. Well, she`s a dog and ordered "you dismiss it, do" - well the dog let him bark, and her husband stood, waved at her and left. More he will not come, but the dog still 15 years lived... Glorious was...'
  47. elseif temp = 2:
  48. '- I was born, how are you, surely, you know, in a different village, begins to tell grandma. - So, this story happened a long time ago, I was still small. One man from our village died father, and then, less than two weeks, died and brother. And in the village believed we had, if not passed, forty days from the death of one of the deceased died and other, then wait for the third. Thing in the winter was. And here is the man, whose relatives died, went on sleigh rides to visit relatives for ten kilometers, ago and returned already-dark. Road through the field was, even in the winter, one of the sledge trail and the, if the snow doesn`t sweep. Suddenly the horse around woods rooted to the spot stood up and began to snore. Muzhik, his name I don`t remember, I`m sorry, granddaughter, thought on the wolves, the gun grabbed... Turned, and on sledge, behind him, deceased brother and father sitting. And the father says:
  49. - Will drive up to the house?
  50. The man with the sled jumped and rushed to run towards the village, right through the snow and ran, until head to Church, what it`s worth, not crashed. The next morning the service in the Church came, the father repented. His horse was never found, and the guy in ten days found in the well... dead...'
  51. elseif temp = 3:
  52. ' - This story happened, even then, when I was very young, almost like you, young. healthy. It was the post-war period, when no one believed in any supernatural forces, and people thought only about the, how to feed yourself and your family. Well, the night has come, we all went to bed??, only the cat was sitting anxiously in a dark corner and what-it hissed. And when anyone-my parents stood up to look at, what is it, not found anything strange. The next morning, cleaning the furnace of ashes, a cat found dead in the oven. How it got there is unknown! None of us had heard more weird sounds at night. What the hell-then, I swear, - shrugs grandma, cunningly squinting his watery eyes.'
  53. elseif temp = 4:
  54. '- Will tell you this time about this case: In the village "Secluded", Pervomaisky district, I`ve lived a couple of years, came a woman from the North from the Arctic. She lived alone and her house wandered handsome dog - white, great, calm. After a while he died. It now, but what good to disappear? Stripped him of his shoes and made himself raskalennye collar. It took about two months. She got sick...I came, everything looked fine. But suddenly slammed the door, originated a draft and as a reaction to knock the wind, she had characteristic of rabies convulsions. It was too late to vaccinate and the woman died... So here was...'
  55. elseif temp = 5:
  56. '- How-in his youth during the Christmas holidays one winter evening we were sitting with friends in the kitchen my girlfriend, - starts Granny. - To her came to visit our school friend, so we come then. So the three of us sat. My friend says, pier, let`s read on wax, now Christmas time just. And began to wonder to himself by turns. I get a figure of the male profile, his nose was straight and aquiline. This profile was holding, that-some sort of bouquet of flowers. A friend of my got an abstract figure, similar to kettle. And her school friend – the image of an infant. Decided to fix again, burn the paper and watch the shadows on the wall. This time I clearly drew a large steamer. My friend – nothing special, but the third girl`s baby again, only with a stroller. The school friend was not married and the children she never had. All, he sat and began to disperse. To me at that time was to drive up my young man. I went down, and he came out of the car and pulls out a beautiful bouquet of roses for me. The reason was not any, he just wanted to please me. I was surprised, because I remembered at once the profile of a man on the wax with a bouquet of flowers. But after 4 months I met another man, your grandfather, which was released and then married. And he, as you know, really has a straight nose with a small hump. It turns out, the flowers gave me one, and I got married to another... But the most interesting thing from this high school friend – she really had a baby at the end of the year, when we wondered. So do not believe these fortune-telling...'
  57. elseif temp = 6:
  58. '- I remember, we sat as-then, starts Granny, but then, like that-then remembering, sadly sighs. - And matches-no more...
  59. Surprised you look at your grandma, and FIHM ask, what does she mean, after all, he matches they, in the kitchen lie, and in store you can buy, what-Granny you will be responsible:
  60. - You don`t get it, granddaughter. Isn`t these matches, there used to be. And ended the, I during the war the factory was stolen... Oh and matches were, not like now... Ugh...'
  61. elseif temp = 7:
  62. '- How-my mom, may God rest her soul, all four of us sent to the forest for berry, tells you Granny. - We, armed with the appropriate packaging, friendly crowd went there. Reaching the glade, we dispersed to their cherished places and silently gathered berries. I dostalsya plot around a huge stump, round which grew a dense Bush. Here I saw a very large number of ripe strawberry. I squatted and, rejoicing, I will gather more, than my brothers, slowly collect the berries and put it in a glass, tied at the waist. Suddenly I heard what-noise. I turn on the sound, but again silently. Place is dead, I don`t see anybody. I once again gather berries. This was repeated several times. And suddenly... I see on the stump, through the Bush, on the haunches of a seated man. His hands parted the bushes and looked at me. I was scared. I ran screaming and crying to the brothers. They tried to stop me, calm, but I continued with my running. The brothers ran after me, and behind us ran the man. Suddenly the elder brother shouted: «Run on team*!». As a team we have a Central collective farm was called, - explains to you grandma. - She was very close to the forest. When we ran out of the woods, this man was not following us. Resorting to the brigade, the brothers told this to the foreman. He immediately grabbed the phone and began where-it is possible to call. And we were reassured farmers. Few come to himself, we went home. At home mom us fed, watered and comforted.
  63. The next day we were informed, near the station Ratomka were dismantled railroad rails.
  64. Apparently it was the man, who ran for us. The fact, in the pre-war years we were infiltrated by spies, saboteurs, who led subversive activities, and pronanut was easy, as the territory is covered by forests, stretching to the borders.
  65. This fear, this horror, I experienced then, in children, even pre-school age, fuse my soul so, I nezabudu it for the rest of my life...'
  66. end
  67. act 'Finish':gt 'Gadhouse'
  68. end
  69. end
  70. act 'Escape':gt 'Gadhouse'
  71. }
  72. $grandpa = {
  73. cls
  74. minut += 2
  75. if grandpatalkday ! daystart:grandpatalk = 0
  76. gs 'stat'
  77. '<center><img src="images/qwest/gadukino/grandpa.jpg"></center>'
  78. 'Grandfather is very old and barely moves his feet, leaving the house only out of necessity.'
  79. if hour >= grandpatalk + 3:
  80. act 'Chat':
  81. cla
  82. *clr
  83. grandpatalk = hour
  84. grandpatalkday = daystart
  85. minut += 10
  86. manna += mannamax/RAND(10,15)
  87. gs 'stat'
  88. '<center><img src="images/qwest/gadukino/grandma.jpg"></center>'
  89. 'You some time talking with my grandfather, and he grumbles about you, the times are not the same and what the Russian man is now the afternoon with fire will not find.'
  90. act 'Finish':gt 'Gadhouse'
  91. end
  92. end
  93. act 'Escape':gt 'Gadhouse'
  94. }
  95. $villagecat = {
  96. cls
  97. minut += 2
  98. gs 'stat'
  99. '<center><img src="images/qwest/gadukino/villcat.jpg"></center>'
  100. 'This Fat cat is aware of your coming, just ignore you.'
  101. act 'Pat':
  102. cla
  103. *clr
  104. minut += 5
  105. manna += mannamax/RAND(30,50)
  106. gs 'stat'
  107. '<center><img src="images/qwest/gadukino/villcat1.jpg"></center>'
  108. 'You gently touch behind it ears, it start purring, but immediately stops, as soon as you stop.'
  109. act 'Escape':minut += 2 & gt 'Gadhouse'
  110. end
  111. act 'Escape':minut += 2 & gt 'Gadhouse'
  112. }
  113. '<center><H4>Cottage</H4></center>'
  114. '<center><img src="images/qwest/gadukino/izba.jpg"></center>'
  115. 'Simple village hut. In a small room is a wardrobe (where you can <a href="exec:gt ''clothing'', ''view_clothing_list'', ''wardrobe''">organize your clothes</a> or <a href="exec:gt ''clothing_QV'', ''list''">pick something to wear</a>) and <a href="exec:gad = 1 & gt ''bed2''">bed</a> where you can sleep. In a large room is <a href="exec:gt ''tvPar''">tv_set</a>. TV stands next to an ancient <a href="exec:gt ''mirror'', ''start''">trellis</a>'
  116. if catday = daystart:
  117. 'On the table by the window lazily lying cat <a href="exec: dynamic $villagecat ">Boniface</a>.'
  118. else
  119. if hour < 8:
  120. temp = RAND(0,30)
  121. if temp = 15:catday = daystart & 'On the table by the window lazily lying cat <a href="exec: dynamic $villagecat ">Boniface</a>.'
  122. elseif hour >= 8 and hour < 12:
  123. temp = RAND(0,2)
  124. if temp = 1:catday = daystart & 'On the table by the window lazily lying cat <a href="exec: dynamic $villagecat ">Boniface</a>.'
  125. elseif hour >= 12 and hour < 18:
  126. temp = RAND(0,5)
  127. if temp = 3:catday = daystart & 'On the table by the window lazily lying cat <a href="exec: dynamic $villagecat ">Boniface</a>.'
  128. elseif hour >= 18 and hour < 22:
  129. temp = RAND(0,10)
  130. if temp = 5:catday = daystart & 'On the table by the window lazily lying cat <a href="exec: dynamic $villagecat ">Boniface</a>.'
  131. elseif hour >= 22:
  132. temp = RAND(0,20)
  133. if temp = 10:catday = daystart & 'On the table by the window lazily lying cat <a href="exec: dynamic $villagecat ">Boniface</a>.'
  134. end
  135. end
  136. if hour >= 6 and hour < 22:
  137. 'Sitting on the bed your <a href="exec: dynamic $grandma ">grandma</a>.'
  138. 'The room, leaning on a cane, slowly walk your <a href="exec: dynamic $grandpa ">grandpa</a>.'
  139. else
  140. 'Your grandparents sleep in the separate beds.'
  141. end
  142. clr
  143. gs 'stat'
  144. fcolor = rgb(0, 0, 0)
  145. bcolor = rgb(255, 255, 255)
  146. lcolor = rgb(106, 90, 205)
  147. act 'Go outside':
  148. if $clothingworntype ! 'nude':
  149. minut += 5 & gt'Gaddvor'
  150. else
  151. msg'<b><font color = red>You need to get dressed.</font></b>'
  152. gt $curloc
  153. end
  154. end
  155. act 'Eat a full meal (0:30)':gs 'food', 'm_meal'
  156. act 'Eat a light meal (0:20)':gs 'food', 's_meal'
  157. act 'Have a snack (0:15)':gs 'food', 'snack'
  158. act 'Have a cup of tea (0:05)':
  159. cls
  160. minut += 5
  161. if water >= 20:
  162. 'You don''t need any more tea.'
  163. else
  164. water += 20
  165. cumspclnt = 2
  166. gs 'cum_cleanup'
  167. fbreath = 0
  168. 'You have a cup of tea, quenching your thirst.'
  169. end
  170. gs 'stat'
  171. act 'Get up from the table':gt 'Gadhouse'
  172. end
  173. if pranik > 0:
  174. 'You have <<pranik>> cookies.'
  175. act 'Drink tea with cookies (0:05)':
  176. cla
  177. *clr
  178. minut += 5
  179. pranik -= 1
  180. health += 30
  181. manna += 100
  182. energy += 20
  183. water += 20
  184. cumspclnt = 2
  185. gs 'cum_cleanup'
  186. fbreath = 0
  187. fat += 4
  188. frost = 0
  189. gs 'stat'
  190. '<center><img src="images/pics/food.jpg"></center>'
  191. 'You drank tea and enjoyed the cookies. You know they''re too sweet and can''t be good for your figure, but they taste so good!'
  192. act 'Get up from the table':gt 'Gadhouse'
  193. end
  194. end
  195. if edaD > 0:
  196. act 'Eat diet food (0:30)':
  197. cla
  198. *clr
  199. frost = 0
  200. minut += 30
  201. health += 10
  202. manna += 20
  203. edaD -= 1
  204. '<center><img src="images/pics/food.jpg"></center>'
  205. if energy >= 30:
  206. 'You prepare a diet meal and try to eat it, but you're really not hungry at all. You can't finish the meal.'
  207. elseif energy >= 20 and energy < 30:
  208. energy += 10
  209. 'You try to enjoy the diet meal, but half-way in you realize you weren''t all that hungry yet. You manage to finish the meal, but feel like it was kind of wasted.'
  210. elseif energy < 20:
  211. energy += 20
  212. 'The diet meal is tasty, and you enjoy eating it.'
  213. end
  214. if water >= 20:
  215. 'You don''t need any more tea.'
  216. else
  217. water += 20
  218. cumspclnt = 2
  219. gs 'cum_cleanup'
  220. fbreath = 0
  221. 'You have a cup of tea, quenching your thirst.'
  222. end
  223. act 'Get up from the table':gt 'Gadhouse'
  224. end
  225. end
  226. if fatdel > 0:
  227. act 'Consume fat burners':
  228. cla
  229. *clr
  230. if fat > salo:fat = salo
  231. fatdel -= 1
  232. fat -= 25
  233. if fat < 0:fat = 0
  234. 'You throw the capsule of fat burners in a glass, add some water and drink it. You''re amazed at how fast the capsule works, feeling your body slim down almost immediately.'
  235. act 'Get up from the table':gt 'Gadhouse'
  236. end
  237. end
  238. if lekarstvo > 0:
  239. 'You have <<lekarstvo>> tablet(s).'
  240. if sick > 0 and lekarday ! daystart:
  241. act 'Take a pill (0:05)':
  242. cla
  243. *clr
  244. minut += 5
  245. lekarday = daystart
  246. lekarstvo -= 1
  247. sick -= sick * 20 / 100
  248. '<center><img src="images/inBed/lekr<<picrand>>.jpg"></center>'
  249. 'You swallow the pill, and shortly after you feel a bit better.'
  250. act 'Continue':gt 'Gadhouse'
  251. end
  252. end
  253. end
  254. if vitamin > 0:
  255. 'You have <<vitamin>> vitamin pills.'
  256. if vitaminday ! daystart:
  257. act 'Take vitamins (0:05)':
  258. cla
  259. *clr
  260. if fat > salo:fat = salo
  261. minut += 5
  262. vitaminday = daystart
  263. vitamin -= 1
  264. frost = 0
  265. if KandidozOnce = 1:Kandidoz -= 2
  266. if GerpesOnce = 1:Gerpes -= 2
  267. if SifacOnce = 1 and Sifilis >= 10:Sifilis -= rand(0, 1)
  268. skinvan += 1
  269. 'You take some vitamins to stay healthy.'
  270. act 'Continue':gt 'Gadhouse'
  271. end
  272. end
  273. end
  274. dynamic $d_read_book
  275. if indorf = 1:
  276. 'The room resting parents.'
  277. if week = 7:
  278. if hour >= 20:gt 'farmhomeride'
  279. end
  280. end
  281. if monthbabkapay ! month:
  282. monthbabkapay = month
  283. money += 2000
  284. gs 'stat'
  285. 'Grandma gives you two thousand.'
  286. end
  287. if rand (0,2) ! 0:gs 'din_bad' & dynamic $mobile_check
  288. --- Gadhouse ---------------------------------