laketoilet 2.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117
  1. # laketoilet
  2. if $ARGS[0] = 'main':
  3. cla
  4. *clr
  5. LCtoiletiventrand = rand(1, 100)
  6. if hour < 4 and LCtoiletiventrand >= 83:
  7. '<center><img src="images/LakeCafe/ToiletSexStart.jpg"></center>'
  8. 'You went to the bathroom and saw a man in the corner drochaschego. It seems he did not see you.'
  9. act 'Be company':
  10. gt 'LCporn', 'toiletsex'
  11. end
  12. act 'Off the toilet':gt 'lakecafe', 'main'
  13. else
  14. clr
  15. gs 'stat'
  16. '<center><img src="images/LakeCafe/Toilet.jpg"></center>'
  17. 'Dirty and smelly toilet that seems to have never been cleaned'
  18. if tanga = 1:
  19. act 'Remove Underwear':
  20. cla
  21. tanga = 0
  22. gt 'laketoilet', 'main'
  23. end
  24. end
  25. act 'Look in the mirror':
  26. cla
  27. gs 'portmirror'
  28. $gt1 = 'laketoilet'
  29. $gt2 = 'main'
  30. dynamic $portmirror
  31. act 'Move away from the mirror':
  32. cla
  33. gt 'laketoilet', 'main'
  34. end
  35. end
  36. !!0.2.6 extension: reworked how quick wash and face wash was supposed to work, it is now uniform in all toilet/bathroom locations
  37. !!Removed sweat =- 1 when cum is wiped off clothes
  38. !!clrbelo: Amount of clean panties available
  39. if cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0:
  40. act 'Quick wash (0:15)':
  41. cla
  42. *clr
  43. if clrbelo > 0 and tanga = 1:
  44. clrbelo -= 1
  45. dirtbelo += 1
  46. elseif clrbelo = 0 and tanga = 1:
  47. tanga = 0
  48. dirtbelo += 1
  49. end
  50. dynamic $showerdin
  51. sweat -= 1
  52. minut += 15
  53. '<center><img src="images/pics/wash5.jpg"></center>'
  54. 'You gave yourself a catlick, thus removing any traces of cum.'
  55. act 'Finish':gt 'laketoilet', 'main'
  56. end
  57. end
  58. if cumlip > 0 or cumface > 0:
  59. act 'Clean your face from sperm (0:05)':
  60. cla
  61. *clr
  62. cumlip = 0
  63. cumface = 0
  64. sweat -= 1
  65. minut += 5
  66. '<center><img src="images/etogame/facesp.jpg"></center>'
  67. 'You clean your face and got rid of any trace of cum.'
  68. act 'Finish':gt 'laketoilet', 'main'
  69. end
  70. end
  71. if cumfrot > 0:
  72. act 'Wipe the cum off your clothes (0:10)':
  73. cla
  74. *clr
  75. cumfrot = 0
  76. minut += 10
  77. '<center><img src="images/pic/frotsp.jpg"></center>'
  78. 'You remove traces of cum from your clothes.'
  79. act 'Finish':dynamic $kafetualet
  80. end
  81. end
  82. !!
  83. if tampon > 0 and mesec > 0 and isprok = 0:
  84. act 'Use a tampon (0:05)':
  85. cla
  86. *clr
  87. tampon -= 1
  88. isprok = 1
  89. minut += 5
  90. manna -= 5
  91. '<center><img src="images/pics/wash3.jpg"></center>'
  92. 'You use a tampon.'
  93. act 'Finish':dynamic $kafetualet
  94. end
  95. end
  96. act 'Off the toilet':gt 'lakecafe', 'main'
  97. end
  98. end
  99. --- laketoilet ---------------------------------