# yvan $metkaM = $ARGS[0] $locM = $CURLOC $metka = $ARGS[0] $loc = $CURLOC clr gs 'stat' '
House
' '
Bathroom
' if ymanrem[5] = 0:'
' if ymanrem[5] = 1:'
' if ymanrem[5] = 2:'
' if ymanrem[5] = 2:'On the wall hangs a mirror' if tampon > 0: 'On a shelf are tampons in a pack. You have <> left' else 'You have no tampons left.' end if stanok > 0:'On a shelf you have razor blades, you can use them <> times.' if dirtbelo > 0:'In the cart is <> pieces of dirty laundry.' if poroshok > 0: 'Under the bath is some washing powder, which is enough for <> washes.' else 'You do not have any detergent to wash your clothes.' end if clrbelo > 0: 'In the locker there are <> clean underwear.' else 'You can not wash yourself, because you do not have clean underwear.' end if husband > 0 and husbanday > 0 and husporday ! day and poroshok >= 2: husband += 5 poroshok -= 2 husporday = day 'Washing machine washed your husbands smelly socks and his clothes.' end if dirtbelo > 0 and poroshok >= dirtbelo: clrbelo += dirtbelo poroshok -= dirtbelo dirtbelo = 0 'Washing machine washed your laundry' elseif poroshok < dirtbelo: 'You ran out of powder for washing machine.' end act 'Leave the room':minut += 1 & gt 'ymans' if tanga = 0: act 'Wear underwear': cla tanga = 1 gt $curloc end elseif tanga = 1: act 'Take off underwear': cla tanga = 0 gt $curloc end end if tampon > 0 and mesec > 0 and isprok = 0: act 'Use a tampon (0:05)': cla *clr tampon -= 1 isprok = 1 minut += 5 manna -= 5 '
' 'You use a tampon.' act 'Finish':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 !!Washing off cosmetics also removes cum from face !!clrbelo: Amount of clean panties availableniform in all toilet/bathroom locations if cumpussy > 0 or cumbelly > 0 or cumass > 0 or cumanus > 0 and clrbelo > 0: act 'Quick wash (0:15)': cla *clr if clrbelo > 0 and tanga = 1: clrbelo -= 1 dirtbelo += 1 elseif clrbelo = 0 and tanga = 1: tanga = 0 dirtbelo += 1 end dynamic $showerdin sweat -= 1 minut += 15 '
' '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 cumlip = 0 cumface = 0 sweat -= 1 minut += 5 '
' 'You clean your face and got rid of any trace of cum.' act 'Finish':gt $curloc end end if mop ! 1: act 'Wash off cosmetics (0:15)': cla mop = 1 cumface = 0 minut += 15 'You washed off your makeup.' act 'Finish':gt $curloc end end !! if klisma = 1 and klismaday ! day: act 'Give yourself an enema (0:05)': cla *clr minut += 5 klismaday = day klismaday1= 1 '
' 'You put yourself an enema and clean intestines, now your ass is ready for anal sex.' act 'Finish':gt $curloc end end if vibrator = 1 and vibratorIN = 0: act 'Insert the vibrator in your vagina (0:05)': cla *clr minut += 5 vibratorIN = 1 if vagina < 30:vagina += 2 '
' 'You bend over the sink and inserted the vibrator in your pussy.' act 'Finish':gt $curloc end elseif vibrator = 1 and vibratorIN = 1: act 'Remove the vibrator (0:05)': cla *clr minut += 5 vibratorIN = 0 if vagina < 30:vagina += 1 '
' 'You bend over the sink and take the vibrator out of your pussy.' act 'Finish':gt $curloc end end if analplug = 1 and analplugin = 0 and klismaday1 = 1: act 'Insert a butt plug (0:05)': cla *clr minut += 5 analplugIN = 1 if anus < 30:anus += 5 '
' if butpluguse > 0:'You bent over and inserted the butt plug.' if butpluguse = 0:butpluguse = 1 & '"If I don''t use it then why did I buy it!" you thought. You decided to take a closer look while thinking, "It is necessary to start developing my ass so I could have great adventures someday, you could even say a huge and thick adventures with crimson heads, uh, now I got carried away." You scratched your head. Then you directed it in your ass, it was a bit painful at first, but as soon as the widest part was plunged into the murky depths of your anus it became easier to push it all the way.' act 'Finish':gt $curloc end elseif analplug = 1 and analplugin = 1: act 'Remove the butt plug (0:05)': cla *clr minut += 5 analplugIN = 0 if anus < 30:anus += 1 '
' 'You bent over and took out the butt plug.' !!0.2.6: Removed unneccessary var check act 'Finish':gt $curloc end end --- yvan ---------------------------------