123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107 |
- # laketoilet
- set LCtoiletiventrand = RAND(1,100)
- if $ARGS[0] = 'main':
- cla
- *clr
- if hour < 4 and LCtoiletiventrand >= 83 and LCtoiletivent = 0:
- '<center><img src="images\LakeCafe\ToiletSexStart.jpg"></center>'
- 'You went to the bathroom and saw a man in the corner drochaschego. It seems he did not see you.'
- act 'Be company':
- set LCtoiletivent = 1
- gt 'LCporn','toiletsex'
- end
- act 'Off the toilet': gt 'lakecafe','main'
- else
- '<center><img src="images\LakeCafe\Toilet.jpg"></center>'
- 'Dirty and smelly toilet that seems to have never been cleaned'
- clr
- gs 'stat'
- if tanga = 1:
- act 'Remove Underwear':
- cla
- set tanga = 0
- gt 'laketoilet','main'
- end
- end
- act 'Look in the mirror':
- cla
- gs 'portmirror'
- set $goto1 = 'laketoilet'
- set $goto2 = 'main'
- dynamic $portmirror
- act 'Move away from the mirror':
- cla
- gt 'laketoilet','main'
- end
- end
- if cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0:
- act 'Wash up (0:15)':
- cla
- *clr
- set cumpussy = 0
- set cumbelly = 0
- set cumass = 0
- set cumanus =0
- set cumlip = 0
- set cumface = 0
- set sweat -= 1
- set minut += 15
- '<center><img src="images\pics\wash5.jpg"></center>'
- 'You carefully washed sperm with yourself.'
- act 'Exit': gt 'laketoilet','main'
- end
- end
- if cumlip > 0 or cumface > 0:
- act 'Wash cum off face (0:15)':
- cla
- *clr
- set cumlip = 0
- set cumface = 0
- set sweat -= 1
- set minut += 15
- '<center><img src="images\etogame\facesp.jpg"></center>'
- 'You carefully washed sperm from her face.'
- act 'Exit': gt 'laketoilet','main'
- end
- end
- if cumfrot > 0:
- act 'Wipe the cum from clothing (0:15)':
- cla
- *clr
- set cumfrot = 0
- set sweat -= 1
- set minut += 15
- !'<center><img src="images\etogame\facesp.jpg"></center>'
- 'You erase traces of semen from the clothes.'
- act 'Exit': gt 'laketoilet','main'
- end
- end
- if tampon > 0 and mesec > 0 and isprok = 0:
- act 'Change a tampon':
- cla
- *clr
- set tampon -= 1
- set isprok = 1
- set minut += 5
- set manna -= 5
- '<center><img src="images\pics\wash3.jpg"></center>'
- 'You change a tampon.'
- act 'Finish': gt 'laketoilet','main'
- end
- end
- act 'Off the toilet': gt 'lakecafe','main'
- end
- end
- --- laketoilet ---------------------------------
|