'
clr
gs 'stat'
act 'Swim (0:15)':
cla
*clr
set cumpussy = 0
set cumbelly = 0
set cumass = 0
set cumanus =0
set cumlip = 0
set cumface = 0
set cumfrot = 0
set minut += 15
if sweat > -3: set sweat = -3
set manna += 5
set willpower += 5
if stren < 40: set stren += 1
'
'
'You swim in the pool, the water is refreshing and invigorating.'
act 'Out of the water': gt 'ybass'
end
act 'Go to your house': minut += 5 & gt 'youplace'
=======
'