1
0

laketoilet 1.5 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465
  1. # laketoilet
  2. if $ARGS[0] = 'main':
  3. CLOSE ALL
  4. $metka = $ARGS[0]
  5. $loc = $CURLOC
  6. $metkaM = $ARGS[0]
  7. $locM = $CURLOC
  8. $location_type = 'bathroom'
  9. cla
  10. *clr
  11. LCtoiletiventrand = rand(1, 100)
  12. if hour < 4 and LCtoiletiventrand >= 83:
  13. '<center><img src="images/lakecafe/toiletsexstart.jpg"></center>'
  14. 'When you enter the restroom, you see a naked man slowly jerking himself off. He hasn''t noticed you yet.'
  15. act 'Seduce him':
  16. gt 'LCporn', 'toiletsex'
  17. end
  18. act 'Leave the restroom':gt 'lakecafe', 'main'
  19. else
  20. clr
  21. gs 'stat'
  22. '<center><img src="images/lakecafe/toilet.jpg"></center>'
  23. 'The diner has a single unisex restroom. From the dirt and smell, you don''t think this toilet has ever been cleaned before. Ugh.'
  24. act 'Look in the mirror':
  25. cla
  26. $gt1 = 'laketoilet'
  27. $gt2 = 'main'
  28. gt 'portmirror'
  29. act 'Move away from the mirror':
  30. cla
  31. gt 'laketoilet', 'main'
  32. end
  33. end
  34. if spdirtyc > 0:
  35. act 'Wipe the cum off your clothes (0:10)':
  36. cla
  37. *clr
  38. cumspclnt = 6
  39. gs 'cum_cleanup'
  40. minut += 10
  41. '<center><img src="images/etogame/frotsp.jpg"></center>'
  42. 'You spend ten minutes wiping and rinsing the cum stains out of your clothes. By the end, all that remain of them are some damp spots that should dry up in a few minutes.'
  43. act 'Continue':gt 'laketoilet', 'main'
  44. end
  45. end
  46. dynamic $tampon
  47. dynamic $quickwash
  48. dynamic $basin
  49. act 'Leave the restroom':gt 'lakecafe', 'main'
  50. end
  51. end
  52. --- laketoilet ---------------------------------