1
0

vanrPar 6.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246
  1. # vanrPar
  2. act 'Leave the room':gt 'korrPar'
  3. $metkaM = $ARGS[0]
  4. $locM = $CURLOC
  5. $metka = $ARGS[0]
  6. $loc = $CURLOC
  7. '<center><b><font color="maroon">Bath</font></b></center>'
  8. '<center><img src="images/qwest/alter/<<$loc>>.jpg"></center>'
  9. clr
  10. set minut += 1
  11. gs 'stat'
  12. fcolor = rgb(0, 0, 0)
  13. bcolor = rgb(255, 255, 255)
  14. lcolor = rgb(106, 90, 205)
  15. 'Bathroom cramped and very unpretentious.'
  16. if stanok > 0:'Your razor will suffice for <b><<stanok>></b> time.'
  17. act 'Wash in the shower (0:15)':
  18. cls
  19. dynamic $showerdin
  20. minut += 15
  21. set horny += 1
  22. set hapri = 0
  23. set mop = 1
  24. set sweat = -3
  25. if frost > 0:frost = 0
  26. gs 'stat'
  27. '<center><img src="images/pics/dush.jpg"></center>'
  28. 'You got into the shower and began to lather your body washcloth. After washed soap and washed hair with shampoo. Rinse off the shampoo you become completely clean.'
  29. act 'Out of the bath':gt $locM, $metkaM
  30. end
  31. act 'Wash in the bathroom (1:00)':
  32. cls
  33. dynamic $showerdin
  34. minut += 60
  35. set sweat = -3
  36. set horny += 3
  37. set hapri = 0
  38. set mop = 1
  39. set manna += 10
  40. if frost > 0:frost = 0
  41. set skinvan += 1
  42. if skinvan = 20:set skinvan = 0 & set skin += 1
  43. gs 'stat'
  44. '<center><img src="images/pics/wash4.jpg"></center>'
  45. 'Turn on the water, you got into the bathroom and went into the warm water. Ponaslazhdatsya pleasant warmth you lathered his body sponge and hair shampoo. Then all you have washed off with water.'
  46. act 'Out of the bath':gt $locM, $metkaM
  47. if horny >= 90:
  48. act 'Direct water on pussy':
  49. cla
  50. *clr
  51. set horny = 0
  52. set minut += 30
  53. set mastr += 1
  54. set orgasm += 1
  55. set manna += 15
  56. set willpower += 15
  57. '<center><img src="images/pics/wash7.jpg"></center>'
  58. '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.'
  59. act 'Get out and get dressed':gt $locM, $metkaM
  60. end
  61. end
  62. if horny >= 40 and horny < 90:
  63. act 'Direct water on pussy':
  64. cla
  65. *clr
  66. set horny += 5
  67. set minut += 30
  68. set manna += 10
  69. set willpower += 10
  70. '<center><img src="images/pics/wash7.jpg"></center>'
  71. '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.'
  72. act 'Get out and get dressed':gt $locM, $metkaM
  73. end
  74. end
  75. if horny >= 50:
  76. act 'Masturbate':gt 'selfplay'
  77. end
  78. end
  79. end
  80. if tampon > 0 and mesec > 0 and isprok = 0:
  81. act 'Use a tampon (0:05)':
  82. cla
  83. *clr
  84. set tampon -= 1
  85. set isprok = 1
  86. set minut += 5
  87. set manna -= 5
  88. gs 'stat'
  89. '<center><img src="images/pics/wash3.jpg"></center>'
  90. 'You use a tampon.'
  91. act 'Finish':gt $curloc
  92. end
  93. end
  94. !!0.2.6 extension: Removed sweat =- 1 when cum is wiped off clothes
  95. !!Washing off cosmetics also removes cum from face
  96. if mop ! 1:
  97. act 'Wash off cosmetics (0:15)':
  98. cla
  99. set mop = 1
  100. set cumface = 0
  101. set minut += 15
  102. gs 'stat'
  103. '<center><img src="images/etogame/facesp.jpg"></center>'
  104. 'You washed off your makeup.'
  105. act 'Finish':gt $curloc
  106. end
  107. end
  108. if cumfrot > 0:
  109. act 'Wipe the cum off your clothes (0:10)':
  110. cla
  111. *clr
  112. set cumfrot = 0
  113. set minut += 10
  114. gs 'stat'
  115. '<center><img src="images/etogame/frotsp.jpg"></center>'
  116. 'You remove traces of cum from your clothes.'
  117. act 'Finish':gt $curloc
  118. end
  119. end
  120. !!
  121. if leghair > 0 and stanok > 0:
  122. act 'Shave your legs (0:15)':
  123. cla
  124. *clr
  125. set minut += 15
  126. set leghair = -5
  127. set horny += 5
  128. set stanok -= 1
  129. '<center><img src="images/pics/shave.jpg"></center>'
  130. 'You lathered his feet and took a razor. Deft movements you shaved hair on the legs and washed shaving foam.'
  131. !!'You lathered up and shaved off the hair with them.'
  132. act 'postpone machine':gt $curloc
  133. end
  134. end
  135. if lobok > 0 and stanok > 0:
  136. act 'Shave pubis (0:15)':
  137. cla
  138. *clr
  139. set minut += 15
  140. set lobok = -5
  141. set horny += 5
  142. set stanok -= 1
  143. '<center><img src="images/pics/shave3.jpg"></center>'
  144. 'You lathered crotch and took a razor deft movements began to shave pubic hairs and shave pussy vokurug. Finally shaving was finished and you flushed with foam pussy.'
  145. !!'You lathered pubis, then shaved off his hair all.'
  146. act 'postpone machine':gt $curloc
  147. end
  148. end
  149. if analplug = 1 and analplugin = 0 and klismaday1= 1 and plugday ! daystart:
  150. act 'Insert a butt plug (0:05)':
  151. cla
  152. *clr
  153. plugday = daystart
  154. set minut += 5
  155. set analplugIN = 1
  156. if anus < 10:set anus += 5
  157. if anus >= 10 and anus < 20:anus += rand(1, 2)
  158. if anus >= 20 and anus < 30:anus += rand(0, 1)
  159. '<center><img src="images/pic/analplug.jpg"></center>'
  160. if butpluguse > 0:'You bent over and inserted the butt plug.'
  161. if butpluguse = 0:set butpluguse = 1 & '"If I don''t use it then why did I buy it!" you thought. You decided to take a closer look while thinking, "It is necessary to start developing my ass so I could have great adventures someday, you could even say a huge and thick adventures with crimson heads, uh, now I got carried away." You scratched your head. Then you directed it in your ass, it was a bit painful at first, but as soon as the widest part was plunged into the murky depths of your anus it became easier to push it all the way.'
  162. act 'Leave':gt $curloc
  163. end
  164. end
  165. if analplug = 1 and analplugin = 1:
  166. act 'Remove the butt plug (0:05)':
  167. cla
  168. *clr
  169. set minut += 5
  170. set analplugIN = 0
  171. if anus < 30:set anus += 1
  172. '<center><img src="images/etogame/analplug.jpg"></center>'
  173. 'You bent over and took out the butt plug.' !!0.2.6: Removed unneccessary var check
  174. act 'Finish':gt $curloc
  175. end
  176. end
  177. if klisma = 1 and klismaday ! day:
  178. act 'Give yourself an enema (0:05)':
  179. cla
  180. *clr
  181. set minut += 5
  182. set klismaday = day
  183. set klismaday1 = 1
  184. '<center><img src="images/picV/klisma.jpg"></center>'
  185. 'You put yourself an enema and clean intestines, now your ass is ready for anal sex.'
  186. act 'Finish':gt $curloc
  187. end
  188. end
  189. if pregtest > 0:
  190. act 'Do a pregnancy test':
  191. pregtest -= 1
  192. cla
  193. gs 'stat'
  194. if preg = 1:
  195. 'The test showed the two strips. you are pregnant.'
  196. 'you think, that the father <<$father>>.'
  197. else
  198. 'The test showed one band.'
  199. end
  200. act 'Further':gt $curloc
  201. end
  202. end
  203. --- vanrPar ---------------------------------