butoilet 2.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106
  1. # butoilet
  2. minut += 5
  3. clr
  4. gs 'stat'
  5. fcolor = rgb(0, 0, 0)
  6. bcolor = rgb(255, 255, 255)
  7. lcolor = rgb(106, 90, 205)
  8. '<center><b><font color="maroon">WC</font></b></center>'
  9. '<center><img src="images/etogame/PublicToilet.jpg"></center>'
  10. ''
  11. if tanga = 1:
  12. act 'Remove Underwear':
  13. cla
  14. tanga = 0
  15. gt $curloc
  16. end
  17. end
  18. act 'Off the toilet':gt 'burger', 'start'
  19. act 'Look in the mirror':
  20. cla
  21. gs 'portmirror'
  22. $gt1 = $curloc
  23. $gt2 = ''
  24. dynamic $portmirror
  25. act 'Move away from the mirror':
  26. cla
  27. gt $curloc
  28. end
  29. end
  30. !!0.2.6 extension: reworked how quick wash and face wash was supposed to work, it is now uniform in all toilet/bathroom locations
  31. !!Removed sweat =- 1 when cum is wiped off clothes
  32. !!clrbelo: Amount of clean panties available
  33. if cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0:
  34. act 'Quick wash (0:15)':
  35. cla
  36. *clr
  37. if clrbelo > 0 and tanga = 1:
  38. clrbelo -= 1
  39. dirtbelo += 1
  40. elseif clrbelo <= 0 and tanga = 1:
  41. tanga = 0
  42. dirtbelo += 1
  43. end
  44. dynamic $showerdin
  45. sweat -= 1
  46. minut += 15
  47. '<center><img src="images/pics/wash5.jpg"></center>'
  48. 'You gave yourself a catlick, thus removing any traces of cum.'
  49. act 'Finish':gt $curloc
  50. end
  51. end
  52. if cumlip > 0 or cumface > 0:
  53. act 'Clean your face from sperm (0:05)':
  54. cla
  55. *clr
  56. mop = 1
  57. cumlip = 0
  58. cumface = 0
  59. sweat -= 1
  60. minut += 5
  61. '<center><img src="images/etogame/facesp.jpg"></center>'
  62. 'You clean your face and got rid of any trace of cum.'
  63. act 'Finish':gt $curloc
  64. end
  65. end
  66. if cumfrot > 0:
  67. act 'Wipe the cum off your clothes (0:10)':
  68. cla
  69. *clr
  70. cumfrot = 0
  71. minut += 10
  72. !!'<center><img src="images/etogame/frotsp.jpg"></center>'
  73. 'You remove traces of semen from the clothes.'
  74. act 'Finish':gt $curloc
  75. end
  76. end
  77. !!
  78. if tampon > 0 and mesec > 0 and isprok = 0:
  79. act 'Use a tampon (0:05)':
  80. cla
  81. *clr
  82. tampon -= 1
  83. isprok = 1
  84. minut += 5
  85. manna -= 5
  86. '<center><img src="images/pics/wash3.jpg"></center>'
  87. 'You use a tampon.'
  88. act 'Finish':gt $curloc
  89. end
  90. end
  91. --- butoilet ---------------------------------