150_vanr 7.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297
  1. # vanr
  2. act 'Go to the corridor':gt 'korr'
  3. $metka = $ARGS[0]
  4. $loc = $CURLOC
  5. $metkaM = $ARGS[0]
  6. $locM = $CURLOC
  7. $stirkad = {
  8. cla
  9. *clr
  10. set minut += dirtbelo * 5
  11. set suhbelo += dirtbelo
  12. set poroshok -= 1
  13. set dirtbelo = 0
  14. set manna -= 10
  15. '<center><img src="images/etogame/stir.jpg"></center>'
  16. 'You soak the dirty linen in a basin and pour the powder on them. You wash the clothes until they are finally clean.'
  17. act 'Hang the laundry out to dry':gt 'korr'
  18. }
  19. '<center><b><font color="maroon">Bathroom</font></b></center>'
  20. if remvanr = 0:'<center><img src="images/etogame/vanr.jpg"></center>'
  21. if remvanr = 1:'<center><img src="images/etogame/vanr2.jpg"></center>'
  22. clr
  23. gs 'stat'
  24. fcolor="rgb"(0, 0, 0)
  25. bcolor="rgb"(255, 255, 255)
  26. lcolor="rgb"(106, 90, 205)
  27. set minut += 1
  28. set housrA = 1
  29. set elektro += 1
  30. if stiralka > 0:
  31. if husband > 0 and husbanday > 0 and husporday ! day and poroshok >= 2:
  32. husband += 5
  33. set poroshok -= 2
  34. husporday = day
  35. 'Washing machine washed smelly socks husband and his prossannye and properdannye truselya.'
  36. end
  37. if dirtbelo > 0 and poroshok >= dirtbelo:
  38. clrbelo += dirtbelo
  39. poroshok -= dirtbelo
  40. dirtbelo = 0
  41. 'The washing machine washed your laundry'
  42. elseif poroshok<dirtbelo:
  43. 'You ran out of powder for washing machine.'
  44. end
  45. end
  46. if tampon > 0:
  47. 'A box of tampons is on a shelf. There is enough for <b><<tampon>></b> uses'
  48. else
  49. '<b><font color="red">You have no tampons.</font></b>'
  50. end
  51. if stanok > 0:'A package of razors is on a shelf above the sink. You have enough blades for <b><<stanok>></b> shaves.'
  52. if dirtbelo>0:'The laundry basket currently has <font color = red><b><<dirtbelo>></b></font> pieces of dirty laundry.'
  53. if poroshok > 0:
  54. if dirtbelo = 0:$stirka = ''
  55. if dirtbelo > 0:$stirka = '<a href="exec:dynamic $stirkad">You can wash clothes</a>'
  56. 'Under the sink there''s detergent powder, which is enough for <b><<poroshok>></b> washes. <<$stirka>>'
  57. else
  58. '<b><font color="red">You have no detergent powder and nothing to wash clothes with.</font></b>'
  59. end
  60. if clrbelo > 0:
  61. *p 'A cupboard contains <font color = blue><b><<clrbelo>></b></font> pairs of clean underwear. '
  62. else
  63. *p '<b><font color = red>You do not have any clean underwear.</font></b> '
  64. end
  65. if shampoo > 0:
  66. 'You have enough shampoo for <b><<shampoo>></b> washes. You can <a href="exec:gt ''vann'', ''start''">wash yourself</a>.'
  67. else
  68. 'You''ve ran out of shampoo.'
  69. end
  70. if mosolmaz>0:'On a shelf is a tube of ointment protivomozolnoy, which will be enough for <b><<mosolmaz>><b> applications.'
  71. if stiralka > 0:'In the bathroom is a washing machine.'
  72. !'if tanga = 0 and clrbelo > 0:
  73. act 'Wear underwear':
  74. cla
  75. set tanga = 1
  76. gt 'vanr'
  77. end
  78. end
  79. if tanga = 1:
  80. act 'Do not wear underwear':
  81. cla
  82. set tanga = 0
  83. gt 'vanr'
  84. end
  85. end'
  86. if tampon > 0 and mesec > 0 and isprok = 0:
  87. act 'Change a tampon':
  88. cla
  89. *clr
  90. set tampon -= 1
  91. set isprok = 1
  92. set minut += 5
  93. set manna -= 5
  94. '<center><img src="images/pics/wash3.jpg"></center>'
  95. 'You change a tampon.'
  96. act 'Exit':gt 'vanr'
  97. end
  98. end
  99. if cumpussy > 0 and clrbelo > 0 or cumbelly > 0 and clrbelo > 0 or cumass > 0 and clrbelo > 0:
  100. act 'Wash up (0:05)':
  101. cla
  102. *clr
  103. set cumpussy = 0
  104. set cumbelly = 0
  105. set cumass = 0
  106. set cumlip = 0
  107. set cumface = 0
  108. set cumanus = 0
  109. set cumfrot = 0
  110. set sweat -= 1
  111. set minut += 5
  112. set clrbelo -= 1
  113. set dirtbelo += 1
  114. '<center><img src="images/pics/wash5.jpg"></center>'
  115. 'You carefully wash the sperm off yourself.'
  116. act 'Exit':gt 'vanr'
  117. end
  118. end
  119. if cumlip > 0 or cumface > 0:
  120. act 'Wash cum off your face (0:05)':
  121. cla
  122. *clr
  123. set mop = 1
  124. set cumlip = 0
  125. set cumface = 0
  126. set sweat -= 1
  127. set minut += 5
  128. '<center><img src="images/etogame/facesp.jpg"></center>'
  129. 'You carefully wash the sperm off your face.'
  130. act 'Exit':gt 'vanr'
  131. end
  132. end
  133. if mop ! 1:
  134. act 'Wash off cosmetics':
  135. cla
  136. set mop = 1
  137. set minut += 15
  138. 'You wash the makeup from your face.'
  139. act 'Exit':gt 'vanr'
  140. end
  141. end
  142. if klisma = 1 and klismaday ! day:
  143. act 'Give yourself an enema (0:05)':
  144. cla
  145. *clr
  146. set minut += 5
  147. set klismaday = day
  148. set klismaday1= 1
  149. '<center><img src="images/picV/klisma.jpg"></center>'
  150. 'You give yourself an enema and clean your intestines. Your ass is now ready for anal sex.'
  151. act 'Exit':gt 'vanr'
  152. end
  153. end
  154. if vibrator = 1 and vibratorIN = 0:
  155. act 'Insert the vibrator (0:05)':
  156. cla
  157. *clr
  158. set minut += 5
  159. set vibratorIN = 1
  160. if vagina < 30:set vagina += 2
  161. '<center><img src="images/etogame/vibrator.jpg"></center>'
  162. 'You bend over the sink and insert the vibrator in your pussy.'
  163. act 'Exit':gt 'vanr'
  164. end
  165. end
  166. if vibrator = 1 and vibratorIN = 1:
  167. act 'Remove the vibrator (0:05)':
  168. cla
  169. *clr
  170. set minut += 5
  171. set vibratorIN = 0
  172. if vagina < 30:set vagina += 1
  173. '<center><img src="images/etogame/vibrator.jpg"></center>'
  174. 'You bend over the sink and take the vibrator out of your pussy.'
  175. act 'Exit':gt 'vanr'
  176. end
  177. end
  178. if analplug = 1 and analplugin = 0 and klismaday1= 1:
  179. act 'Insert a butt plug (0:05)':
  180. cla
  181. *clr
  182. set minut += 5
  183. set analplugIN = 1
  184. if anus < 30:set anus += 5
  185. '<center><img src="images/etogame/analplug.jpg"></center>'
  186. if butpluguse > 0:'You bend over and easily insert the anal plug.'
  187. if butpluguse = 0:set butpluguse = 1 & '"I do this not even touch, and why I bought it!" you thought. Then still decided to take a closer look. Feel, smell, in general, that ordinary gag. "Oh, was not, " you think, "Wow priest ever to develop, it will have great adventures, you could even say a huge and thick adventures with crimson heads, uh, that I got carried away." You scratched thin fingers unusually hairy head. Then you sent peg his ass, it was a bit painful when rastyagivatsya anus started taking a foreign object, but as soon as the widest part plunged into the murky depths of anal, it became easier and almost gag herself flew to the end, and got put on the manufacturer place.'
  188. act 'Exit':gt 'vanr'
  189. end
  190. end
  191. if analplug = 1 and analplugin = 1:
  192. act 'Remove the butt plug (0:05)':
  193. cla
  194. *clr
  195. set minut += 5
  196. set analplugIN = 0
  197. if anus < 30:set anus += 1
  198. '<center><img src="images/etogame/analplug.jpg"></center>'
  199. if butpluguse > 0:'You bend over and pull the butt plug out.'
  200. act 'Exit':gt 'vanr'
  201. end
  202. end
  203. if husband > 0 and husbanday > 0 and husporday ! day and poroshok >= 2:
  204. act 'Wash your husbands clothes (2 units of washing powder) (1:00)':
  205. cla
  206. *clr
  207. husband += 5
  208. set poroshok -= 2
  209. set minut += 60
  210. husporday = day
  211. manna -= 25
  212. '<center><img src="images/etogame/stir.jpg"></center>'
  213. 'You spend an hour washing your husbands smelly socks and his prossannye and properdannye truselya.'
  214. act 'Move away from the bathroom':gt 'vanr'
  215. end
  216. end
  217. if husband > 0 and husbanday > 0 and huspolday ! day:
  218. act 'Clean the apartment (1:00)':
  219. cla
  220. *clr
  221. husband += 5
  222. set minut += 60
  223. huspolday = day
  224. manna -= 25
  225. !'<center><img src="images/pics/cook.jpg"></center>'
  226. 'You take a rag and start cleaning the apartment.'
  227. act 'Leave':gt 'vanr'
  228. end
  229. end
  230. if pregtest > 0:
  231. act 'Do a pregnancy test':
  232. pregtest -= 1
  233. cla
  234. gs'stat'
  235. if preg = 1:
  236. 'The test showed the two strips. you are pregnant.'
  237. !'father - <<$father>>.'
  238. else
  239. 'The test showed one band.'
  240. end
  241. act 'further': gt $curloc
  242. end
  243. end
  244. --- vanr ---------------------------------