1
0

din_van 13 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459
  1. # din_van
  2. $showerdin = {
  3. cumspclnt = 1
  4. gs 'cum_cleanup'
  5. }
  6. $bteeth = {
  7. if fbreath ! 1:
  8. act 'Brush your teeth (0.05)':
  9. cla
  10. *clr
  11. minut += 5
  12. cumspclnt = 2
  13. gs 'cum_cleanup'
  14. fbreath = 1
  15. '<center><img src="images/pics/brushteeth.jpg"></center>'
  16. 'You brush your teeth and now they are clean and minty fresh'
  17. act 'Finish':gt $locM, $metkaM
  18. end
  19. end
  20. }
  21. $shower = {
  22. act 'Wash in the shower (0:15)':
  23. cla
  24. *clr
  25. shampoo -= 1
  26. minut += 15
  27. horny += 1
  28. hapri = 0
  29. mop = 1
  30. sweat = -3
  31. if clrbelo > 0 and tanga = 1:
  32. clrbelo -= 1
  33. dirtbelo += 1
  34. elseif clrbelo = 0 and tanga = 1:
  35. tanga = 0
  36. dirtbelo += 1
  37. end
  38. if shampoo < 0:
  39. shampoo = 0
  40. end
  41. dynamic $showerdin
  42. if frost > 0:frost = 0
  43. '<center><img src="images/pics/dush.jpg"></center>'
  44. if daystart < 10 and StoryLine = 0:
  45. 'It is really wild to see your new body with all its smooth curves, breasts with large nipples, wide hips, and smooth legs. You begin to lather your body in the shower noticing how soft and tender it feels. Once you lather yourself with soap you wash in the shower, continuing to experience new and strange sensations.'
  46. elseif daystart >= 10 and daystart < 30 and StoryLine = 0:
  47. 'You have already gotten used to a woman''s body and its softness doesn''t surprise you very much.'
  48. else
  49. 'You carefully lather soap over your body trying not to miss any spot, and then wash off in the shower.'
  50. end
  51. if vanr_lock = 0 and $loc = 'vanrPar':
  52. 'Trying to quickly wash up and get back to business, you forget to close the door - not before.'
  53. '<br>The idea that the door is open, overtakes you at the end when you wipe with a towel. It would be very embarrassing if the brother or stepfather looked at wrong times.'
  54. cla
  55. act 'Dry off':
  56. if indorf = 0:
  57. gs 'vanrPar', 'peek'
  58. else
  59. mirror_steam = hour & gt $locM, $metkaM
  60. end
  61. end
  62. end
  63. if (leghair > 0 or lobok > 0) and stanok > 0:
  64. act 'Get razor':dynamic $brit
  65. end
  66. if horny >= 90:
  67. act 'Use the showerhead on your pussy':
  68. cla
  69. *clr
  70. horny = 0
  71. minut += 30
  72. mastr += 1
  73. orgasm += 1
  74. manna += 15
  75. willpower += 15
  76. '<center><img src="images/pics/wash2.jpg"></center>'
  77. 'You place the showerhead onto your pussy and a powerful jet of warm water begins to caress you. Soon you feel a warm wave covers your entire body and you begin to shudder as the orgasm overtakes you.'
  78. act 'Get dressed and get out':mirror_steam = hour & gt $locM, $metkaM
  79. end
  80. elseif horny >= 40 and horny < 90:
  81. act 'Send shower pussy':
  82. cla
  83. *clr
  84. horny += 5
  85. minut += 30
  86. manna += 10
  87. willpower += 10
  88. '<center><img src="images/pics/wash2.jpg"></center>'
  89. 'You place the showerhead onto your pussy and a powerful jet of warm water begins to caress you. At first it feels very nice, but after a while it starts to be a little bit painful. You decide to stop masturbating.'
  90. act 'Get dressed and get out':mirror_steam = hour & gt $locM, $metkaM
  91. end
  92. end
  93. act 'Get dressed and get out':mirror_steam = hour & gt $locM, $metkaM
  94. end
  95. }
  96. $bath = {
  97. act 'Soak in the bath (1:00)':
  98. cla
  99. *clr
  100. shampoo -= 1
  101. minut += 60
  102. sweat = -3
  103. horny += 1
  104. hapri = 0
  105. mop = 1
  106. manna += 10
  107. if clrbelo > 0 and tanga = 1:
  108. clrbelo -= 1
  109. dirtbelo += 1
  110. elseif clrbelo = 0 and tanga = 1:
  111. tanga = 0
  112. dirtbelo += 1
  113. end
  114. if shampoo < 0:
  115. shampoo = 0
  116. end
  117. dynamic $showerdin
  118. if frost > 0:frost = 0
  119. skinvan += 1
  120. gs 'stat'
  121. '<center><img src="images/pics/wash4.jpg"></center>'
  122. if daystart < 10:
  123. 'You got into the bathroom and sat down in the warm water, sticking out of the water your knees are rounded and smooth, which you blinked, you still have not got used to his new body was wildly like to look at all these roundness. Starting lather body you unwittingly turned their attention to the chest, it''s so soft and big, and when you touch her body appear in what is unfamiliar but pleasant sensations. Then you washed with soap yourself and you can already out of the bathroom.'
  124. elseif daystart >= 10 and daystart < 30:
  125. 'You got into the bathroom and sat down in the warm water, you have a little accustomed to his new body and calmly soaping all these curves and bulges, then you flushed the soap.'
  126. else
  127. 'You got into the bathroom and went into the warm water stolidly staring at his smooth legs sticking out of the water. You lathered his body and then washed soap rubbing his hands over his curves of the female body.'
  128. end
  129. if $loc = 'vanrPar':
  130. dynamic $brother_voyeurism
  131. end
  132. if leghair > 0 and stanok > 0 or lobok > 0 and stanok > 0:
  133. act 'Get razor':dynamic $brit
  134. end
  135. if obdysh = 1:vannmastrand = rand(0, 5)
  136. if horny >= 90:
  137. act 'Direct water on pussy':
  138. cla
  139. *clr
  140. if obdysh = 1 and vannmastrand = 1:gt 'vann', 'v4'
  141. horny = 0
  142. minut += 30
  143. mastr += 1
  144. orgasm += 1
  145. manna += 15
  146. willpower += 15
  147. '<center><img src="images/pics/wash7.jpg"></center>'
  148. 'You sent a water faucet on pussy and tight jet of warm water began to caress you. Soon you will feel like a warm wave covers your entire body and you began to shudder in orgasm.'
  149. act 'Get dressed and get out':mirror_steam = hour & gt $locM, $metkaM
  150. end
  151. elseif horny >= 40 and horny < 90:
  152. act 'Direct water on pussy':
  153. cla
  154. *clr
  155. if obdysh = 1 and vannmastrand = 1:gt 'vann', 'v4'
  156. horny += 5
  157. minut += 30
  158. manna += 10
  159. willpower += 10
  160. '<center><img src="images/pics/wash7.jpg"></center>'
  161. 'You sent a water faucet on pussy and tight jet of warm water began to caress you. At first it was not even bad, but then sleep and arousal, even as it was not nice. So you stopped masturbating.'
  162. act 'Get dressed and get out':mirror_steam = hour & gt $locM, $metkaM
  163. end
  164. end
  165. if horny >= 50:
  166. act 'Masturbate':gt 'selfplay'
  167. end
  168. act 'Get dressed and get out':mirror_steam = hour & gt $locM, $metkaM
  169. end
  170. }
  171. $brit = {
  172. cla
  173. 'You rinse the razor blade which looks in good enough shape for <b><<stanok>></b> more shaves.'
  174. if leghair > 0 and stanok > 0:
  175. act 'Shave your legs (0:15)':
  176. cla
  177. *clr
  178. minut += 15
  179. leghair = -5
  180. horny += 5
  181. stanok -= 1
  182. '<center><img src="images/pics/shave.jpg"></center>'
  183. if daystart < 10:'You have decided to shave your pussy and picking up a razor realized that you do not know how to shave. To begin, you have shaved pubic hair, it was not difficult, but then you notice that near your newfound pussy hair grow too. Here you have difficulties began, you tried to pull one hand, all these soft folds to the side so the second hand to shave all the hairs. Gradually, you still managed to shave off all his hair with your new vagina. As long as you shave you hardly came out of shock contemplating his crotch which was not at all what you''re used to. But finally it was done with shaving and you flushed with foam pussy stroking your hand and wondering sensations.'
  184. if daystart >= 10 and daystart < 30:'You lathered her soft feet and took in hand razor. You have grown accustomed to his new body and shaved legs calmly knowing that hairy legs with your new body is not beautiful. Finally shaving was done with and you flushed foam stroking his smooth as silk legs.'
  185. if daystart >= 30:'You lathered his feet and took a razor. Habitual movements you shaved hair on the legs and washed shaving foam.'
  186. !!'You lathered up and shaved hair with them.'
  187. act 'Postpone machine':dynamic $brit
  188. end
  189. end
  190. if lobok > 0 and stanok > 0:
  191. act 'Shave pubis (0:15)':
  192. cla
  193. *clr
  194. minut += 15
  195. lobok = -5
  196. horny += 5
  197. stanok -= 1
  198. if obdysh = 1 and obbritinvent = 0:
  199. britrand = rand(0, 5)
  200. if britrand = 5:gt 'vann', 'brit1'
  201. end
  202. '<center><img src="images/pics/shave3.jpg"></center>'
  203. if daystart < 10:'You have decided to shave pubis, lathered his foam and picking up a razor realized that he did not imagine how it shaved. To begin, you have shaved pubic hair, it was not difficult, but then you notice that near your newfound pussy hair grow too. Here you have difficulties began, you tried to pull one hand, all these soft folds to the side so the second hand to shave all the hairs. Gradually, you still managed to shave off all his hair with your new vagina. As long as you shave you hardly came out of shock contemplating his crotch which was not at all what you''re used to. But finally it was done with shaving and you flushed with foam pussy stroking her hand and wondering sensations.'
  204. if daystart >= 10 and daystart < 30:'You foam lathered his groin, trying not to miss a single crease on her pussy. Then neat movements began shave pussy trying not to cut. Finally you did it and you flushed foam pubic hair and pussy.'
  205. if daystart >= 30:'You lathered crotch and took a razor habitual movements began to shave pubic hairs and shave pussy vokurug. Finally shaving was finished and you flushed with foam pussy.'
  206. !!'You lathered pubis, then shaved all the hair from it.'
  207. act 'Postpone machine':dynamic $brit
  208. end
  209. end
  210. act 'Get out and get dressed':gt $locM, $metkaM
  211. }
  212. $tampon = {
  213. if sanpad > 0 and mesec > 0 and isprokp = 0 and isprok = 0 and tanga = 1:
  214. act 'Use a sanitary napkin (0:05)':
  215. cla
  216. *clr
  217. sanpad -= 1
  218. isprokp = 1
  219. minut += 5
  220. manna -= 5
  221. '<center><img src="images/pics/wash3.jpg"></center>'
  222. 'You use a sanitary napkin.'
  223. act 'Finish':gt $locM, $metkaM
  224. end
  225. end
  226. if tampon > 0 and mesec > 0 and isprok = 0 and isprokp = 0:
  227. act 'Use a tampon (0:05)':
  228. cla
  229. *clr
  230. tampon -= 1
  231. isprok = 1
  232. minut += 5
  233. manna -= 5
  234. '<center><img src="images/pics/wash3.jpg"></center>'
  235. 'You use a tampon.'
  236. act 'Finish':gt $locM, $metkaM
  237. end
  238. end
  239. }
  240. $quickwash = {
  241. if spdirty > 0:
  242. act 'Quick wash (0:15)':
  243. cla
  244. *clr
  245. if clrbelo > 0 and tanga = 1:
  246. clrbelo -= 1
  247. dirtbelo += 1
  248. elseif clrbelo = 0 and tanga = 1:
  249. tanga = 0
  250. dirtbelo += 1
  251. end
  252. cumspclnt = 20
  253. gs 'cum_cleanup'
  254. sweat -= 1
  255. minut += 15
  256. '<center><img src="images/pics/wash5.jpg"></center>'
  257. 'You gave yourself a catlick, thus removing any traces of cum.'
  258. act 'Finish':gt $locM, $metkaM
  259. end
  260. end
  261. }
  262. $wearpan = {
  263. if tanga = 0 and clrbelo > 0:
  264. act 'Wear Underwear':
  265. cla
  266. tanga = 1
  267. clrbelo -= 1
  268. gt $locM, $metkaM
  269. end
  270. end
  271. }
  272. $basin = {
  273. if tanga = 1:
  274. act 'Remove Underwear':
  275. cla
  276. tanga = 0
  277. dirtbelo += 1
  278. gt $locM, $metkaM
  279. end
  280. end
  281. if spdirtyv > 0 or spdirtyb > 0:
  282. act 'Clean your face from sperm (0:10)':
  283. cla
  284. *clr
  285. mop = 1
  286. cumspclnt = 9
  287. gs 'cum_cleanup'
  288. cumspclnt = 13
  289. gs 'cum_cleanup'
  290. sweat -= 1
  291. minut += 10
  292. '<center><img src="images/etogame/facesp.jpg"></center>'
  293. 'You clean your face and got rid of any trace of cum.'
  294. act 'Finish':gt $locM, $metkaM
  295. end
  296. end
  297. if body_write > 0 or face_write > 0:
  298. act 'Wash writing off your body':
  299. cla
  300. body_write = 0
  301. face_write = 0
  302. minut = minut + 5
  303. gs'stat'
  304. !'You need a picture'
  305. 'You wiped indecent inscriptions.'
  306. act 'Finish':gt $locM, $metkaM
  307. end
  308. end
  309. if mop ! 1:
  310. act 'Wash off cosmetics (0:10)':
  311. cla
  312. mop = 1
  313. cumspclnt = 9
  314. gs 'cum_cleanup'
  315. cumspclnt = 11
  316. gs 'cum_cleanup'
  317. minut += 10
  318. 'You washed off your makeup.'
  319. act 'Finish':gt $locM, $metkaM
  320. end
  321. end
  322. }
  323. $pirManage = {
  324. cls
  325. cla
  326. *nl
  327. if pirsA > 0:
  328. if pirsA = 1:
  329. '<a href="exec:pirsA = 2 & dynamic $pirManage">Remove tongue barbell</a>.'
  330. else
  331. '<a href="exec:pirsA = 1 & dynamic $pirManage">Insert tongue barbell</a>.'
  332. end
  333. end
  334. if pirsB > 0:
  335. if pirsB = 1:
  336. '<a href="exec:pirsB = 2 & dynamic $pirManage">Remove lip ring</a>.'
  337. else
  338. '<a href="exec:pirsB = 1 & dynamic $pirManage">Insert lip ring</a>.'
  339. end
  340. end
  341. if pirsC > 0:
  342. if pirsC = 1:
  343. '<a href="exec:pirsC = 2 & dynamic $pirManage">Remove ear piercings</a>.'
  344. else
  345. '<a href="exec:pirsC = 1 & dynamic $pirManage">Insert ear piercings</a>.'
  346. end
  347. end
  348. if pirsD > 0:
  349. if pirsD = 1:
  350. '<a href="exec:pirsD = 2 & dynamic $pirManage">Remove nose ring</a>.'
  351. else
  352. '<a href="exec:pirsD = 1 & dynamic $pirManage">Insert nose ring</a>.'
  353. end
  354. end
  355. if pirsE > 0:
  356. if pirsE = 1:
  357. '<a href="exec:pirsE = 2 & dynamic $pirManage">Remove eyebrow stud</a>.'
  358. else
  359. '<a href="exec:pirsE = 1 & dynamic $pirManage">Insert eyebrow stud</a>.'
  360. end
  361. end
  362. if pirsF > 0:
  363. if pirsF = 1:
  364. '<a href="exec:pirsF = 2 & dynamic $pirManage">Remove nipple piercings</a>.'
  365. else
  366. '<a href="exec:pirsF = 1 & dynamic $pirManage">Insert nipple piercings</a>.'
  367. end
  368. end
  369. if pirsN > 0:
  370. if pirsN = 1:
  371. '<a href="exec:pirsN = 2 & dynamic $pirManage">Remove navel piercing</a>.'
  372. else
  373. '<a href="exec:pirsN = 1 & dynamic $pirManage">Insert navel piercing</a>.'
  374. end
  375. end
  376. if pirsG > 0:
  377. if pirsG = 1:
  378. '<a href="exec:pirsG = 2 & dynamic $pirManage">Remove labia piercings</a>.'
  379. else
  380. '<a href="exec:pirsG = 1 & dynamic $pirManage">Insert labia piercings</a>.'
  381. end
  382. end
  383. if pirsGL > 0:
  384. if pirsGL = 1:
  385. '<a href="exec:pirsGL = 2 & dynamic $pirManage">Remove clit piercing</a>.'
  386. else
  387. '<a href="exec:pirsGL = 1 & dynamic $pirManage">Insert clit piercing</a>.'
  388. end
  389. end
  390. act'<b>Back</b>':gt $locM, $metkaM
  391. }
  392. --- din_van ---------------------------------