butoilet 2.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899
  1. # butoilet
  2. set minut += 5
  3. '<center><b><font color="maroon">WC</font></b></center>'
  4. '<center><img src="images/etogame/PublicToilet.jpg"></center>'
  5. ''
  6. clr
  7. gs 'stat'
  8. fcolor = rgb(0, 0, 0)
  9. bcolor = rgb(255, 255, 255)
  10. lcolor = rgb(106, 90, 205)
  11. if tanga = 1:
  12. act 'Remove Underwear':
  13. cla
  14. set 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. set $gt1 = $curloc
  23. set $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) and clrbelo > 0:
  34. act 'Quick wash (0:15)':
  35. cla
  36. *clr
  37. dynamic $showerdin
  38. set sweat -= 1
  39. set minut += 15
  40. set clrbelo -= 1
  41. set dirtbelo += 1
  42. '<center><img src="images/pics/wash5.jpg"></center>'
  43. 'You gave yourself a catlick, thus removing any traces of cum.'
  44. act 'Finish':gt $curloc
  45. end
  46. end
  47. if cumlip > 0 or cumface > 0:
  48. act 'Clean your face from sperm (0:05)':
  49. cla
  50. *clr
  51. set mop = 1
  52. set cumlip = 0
  53. set cumface = 0
  54. set sweat -= 1
  55. set minut += 5
  56. '<center><img src="images/etogame/facesp.jpg"></center>'
  57. 'You clean your face and got rid of any trace of cum.'
  58. act 'Finish':gt $curloc
  59. end
  60. end
  61. if cumfrot > 0:
  62. act 'Wipe the cum off your clothes (0:10)':
  63. cla
  64. *clr
  65. set cumfrot = 0
  66. set minut += 10
  67. !!'<center><img src="images/etogame/frotsp.jpg"></center>'
  68. 'You remove traces of semen from the clothes.'
  69. act 'Finish':gt $curloc
  70. end
  71. end
  72. !!
  73. if tampon > 0 and mesec > 0 and isprok = 0:
  74. act 'Use a tampon (0:05)':
  75. cla
  76. *clr
  77. set tampon -= 1
  78. set isprok = 1
  79. set minut += 5
  80. set manna -= 5
  81. '<center><img src="images/pics/wash3.jpg"></center>'
  82. 'You use a tampon.'
  83. act 'Finish':gt $curloc
  84. end
  85. end
  86. --- butoilet ---------------------------------