1
0

Gadbana 2.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130
  1. # Gadbana
  2. CLOSE ALL
  3. $metkaM = $ARGS[0]
  4. $locM = $CURLOC
  5. $metka = $ARGS[0]
  6. $loc = $CURLOC
  7. frost = 0
  8. '<center><h4>bath</h4></center>'
  9. '<center><img src="images/qwest/gadukino/bana.jpg"></center>'
  10. 'Not a big room with a low oven, water tanks of stainless steel, low smoky ceiling, and blackened wooden shelf.'
  11. clr
  12. gs 'stat'
  13. fcolor = rgb(0, 0, 0)
  14. bcolor = rgb(255, 255, 255)
  15. lcolor = rgb(106, 90, 205)
  16. act 'Go outside':minut += 5 & gt 'Gaddvor'
  17. if week = 6:
  18. if hour >= 12 and hour <= 18:
  19. canpar = 1
  20. 'bath fired. Somewhere to seven hours can be steamed.'
  21. elseif hour > 18 and hour < 22:
  22. canpar = 1
  23. 'In the bath can be steamed'
  24. if banaday ! daystart:
  25. act 'Steamed in the sauna (2:00)':
  26. cls
  27. minut += 120
  28. dynamic $showerdin
  29. hapri = 0
  30. mop = 1
  31. sweat = -3
  32. ! WD: Missing Var ~ 'banaday'
  33. banaday = daystart
  34. if frost > 0:frost = 0
  35. skinvan += 5
  36. gs 'stat'
  37. '<center><img src="images/qwest/gadukino/par.jpg"></center>'
  38. 'You soared in the bath, then doused with cold water and finally showered.'
  39. act 'Go outside':gt 'Gaddvor'
  40. end
  41. end
  42. elseif hour >= 22:
  43. canpar = 0
  44. end
  45. elseif week ! 6:
  46. canpar = 0
  47. end
  48. if canpar = 0:
  49. act 'Wash (1:00)':
  50. cls
  51. dynamic $showerdin
  52. minut += 60
  53. hapri = 0
  54. mop = 1
  55. sweat = -3
  56. if frost > 0:frost = 0
  57. gs 'stat'
  58. '<center><img src="images/qwest/gadukino/mit.jpg"></center>'
  59. 'You began to lather your body washcloth. After washed off the soap and washed her hair with shampoo. Rinse off the shampoo you become completely clean.'
  60. act 'Leave':gt 'Gaddvor'
  61. end
  62. end
  63. dynamic $bteeth
  64. dynamic $tampon
  65. dynamic $quickwash
  66. dynamic $wearpan
  67. dynamic $basin
  68. if spdirtyc > 0:
  69. act 'Wipe the cum off your clothes (0:10)':
  70. cla
  71. cumspclnt = 6
  72. gs 'cum_cleanup'
  73. minut += 10
  74. gs 'stat'
  75. '<center><img src="images/etogame/frotsp.jpg"></center>'
  76. 'You remove traces of cum from your clothes.'
  77. act 'Finish':gt $curloc
  78. end
  79. end
  80. if leghair > 0 and stanok > 0:
  81. act 'Shaving legs 15 min':
  82. cla
  83. *clr
  84. minut = minut + 15
  85. leghair = -5
  86. horny = horny + 5
  87. stanok = stanok - 1
  88. '<center><img src="images/pics/shave.gif"></center>'
  89. 'You lathered his feet and took a razor. You deftly shaved hair on the legs washed and shaving foam.'
  90. act 'Takeout machine':gt $curloc
  91. end
  92. end
  93. if lobok > 0 and stanok > 0:
  94. act 'Shaved 15 min':
  95. cla
  96. *clr
  97. minut = minut + 15
  98. lobok = -5
  99. horny = horny + 5
  100. stanok = stanok - 1
  101. '<center><img src="images/pics/shave3.gif"></center>'
  102. 'You lathered pubis and taking a razor deft movements began to shave the pubic area and shave the hair around the pussy. Finally shaving was over and you washed the foam from the pussy.'
  103. act 'Takeout machine':gt $curloc
  104. end
  105. end
  106. --- Gadbana ---------------------------------