1
0

laketoilet 1.5 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364
  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. $gt1 = 'laketoilet'
  9. $gt2 = 'main'
  10. $location_type = 'bathroom'
  11. cla
  12. *clr
  13. LCtoiletiventrand = rand(1, 100)
  14. if hour < 4 and LCtoiletiventrand >= 83:
  15. '<center><img src="images/locations/city/industrial/bbq/sex/toiletsexstart.jpg"></center>'
  16. 'When you enter the restroom, you see a naked man slowly jerking himself off. He hasn''t noticed you yet.'
  17. act 'Seduce him':
  18. gt 'LCporn', 'toiletsex'
  19. end
  20. act 'Leave the restroom':gt 'lakecafe', 'main'
  21. else
  22. clr
  23. gs 'stat'
  24. '<center><img src="images/locations/shared/bathroom/toilet.jpg"></center>'
  25. 'The diner has a single unisex restroom. From the dirt and smell, you don''t think this toilet has ever been cleaned before. Ugh.'
  26. act 'Look in the mirror':
  27. cla
  28. gt 'portmirror', 'start'
  29. end
  30. if pcs_hairbsh = 0:
  31. act 'Brush your hair': gt 'portmirror', 'brush'
  32. end
  33. if spdirtyc > 0:
  34. act 'Wipe the cum off your clothes (0:10)':
  35. cla
  36. *clr
  37. cumspclnt = 6
  38. gs 'cum_cleanup'
  39. minut += 10
  40. '<center><img src="images/shared/sex/cum/frotsp.jpg"></center>'
  41. '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.'
  42. act 'Continue':gt 'laketoilet', 'main'
  43. end
  44. end
  45. dynamic $tampon
  46. dynamic $quickwash
  47. dynamic $basin
  48. act 'Leave the restroom':gt 'lakecafe', 'main'
  49. end
  50. end
  51. --- laketoilet ---------------------------------