# butoilet set minut += 5 '
WC
' '
' '' clr gs 'stat' fcolor = rgb(0, 0, 0) bcolor = rgb(255, 255, 255) lcolor = rgb(106, 90, 205) if tanga = 1: act 'Remove Underwear': cla set tanga = 0 gt $curloc end end act 'Off the toilet':gt 'burger', 'start' act 'Look in the mirror': cla gs 'portmirror' set $gt1 = $curloc set $gt2 = '' dynamic $portmirror act 'Move away from the mirror': cla gt $curloc end end !!0.2.6 extension: reworked how quick wash and face wash was supposed to work, it is now uniform in all toilet/bathroom locations !!Removed sweat =- 1 when cum is wiped off clothes !!clrbelo: Amount of clean panties available if (cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0) and clrbelo > 0: act 'Quick wash (0:15)': cla *clr dynamic $showerdin set sweat -= 1 set minut += 15 set clrbelo -= 1 set dirtbelo += 1 '
' 'You gave yourself a catlick, thus removing any traces of cum.' act 'Finish':gt $curloc end end if cumlip > 0 or cumface > 0: act 'Clean your face from sperm (0:05)': cla *clr set mop = 1 set cumlip = 0 set cumface = 0 set sweat -= 1 set minut += 5 '
' 'You clean your face and got rid of any trace of cum.' act 'Finish':gt $curloc end end if cumfrot > 0: act 'Wipe the cum off your clothes (0:10)': cla *clr set cumfrot = 0 set minut += 10 !!'
' 'You remove traces of semen from the clothes.' act 'Finish':gt $curloc end end !! if tampon > 0 and mesec > 0 and isprok = 0: act 'Use a tampon (0:05)': cla *clr set tampon -= 1 set isprok = 1 set minut += 5 set manna -= 5 '
' 'You use a tampon.' act 'Finish':gt $curloc end end --- butoilet ---------------------------------