# Gadbana
CLOSE ALL
$metka = ''
$loc = 'Gadbana'
$location_type = 'bathroom'
frost = 0
'
bath
'
'> src="images/locations/gadukino/village/bana.jpg">'
'Quite a small room with a low smoky ceiling, low stove, stainless steel water tanks and a blackened wooden shelf.'
'Grandma''s enema bulb is hidden behind some stuff on the shelf.'
gs 'stat'
if mira = 0:
if $clothingworntype = 'nude':
act 'Get dressed':
gs 'clothing', 'wear_last_worn'
gs 'underwear', 'wear'
end
end
act 'Go outside':
if $clothingworntype ! 'nude':
minut += 5 & gt'Gaddvor'
else
cls
'> src="images/locations/gadukino/hunters/noundress.jpg">'
'You can''t go out without any clothes on.'
act 'Back':gt'Gadbana'
end
end
if week >= 6:
if hour >= 12 and hour <= 18:
'You put the wood into the stove to feed the fire. The banya will be ready to use around 19:00.'
elseif hour > 18 and hour < 22:
'The banya is now ready.'
if banaday ! daystart:
act 'Relax in the banya (2:00)':
cls
minut += 120
pcs_sweat = rand(0,5)
dynamic $showerdin
pcs_hairbsh = 0
pcs_makeup = 1
gs 'underwear', 'remove'
gs 'clothing', 'strip'
banaday = daystart
if frost > 0:frost = 0
pcs_skin += 5
gs 'stat'
'> src="images/locations/gadukino/village/par.jpg">'
'You strip, sit down and relax. After a proper banya session, you pick up a bucket filled with cold water and pour it over yourself and head over to the shower. You feel like a completely new person.'
act 'Go outside':gt 'Gaddvor'
end
end
else
'The banya is not in use at this time, it is available between 19:00 and 22:00 during the week.'
end
elseif week ! 6:
'The banya is not used at the weekend, it is usually ready to use from 19:00 during the week.'
end
if canpar = 0:
act 'Wash (1:00)':
cls
dynamic $showerdin
minut += 60
pcs_hairbsh = 0
pcs_makeup = 1
if frost > 0:frost = 0
gs 'stat'
'> src="images/locations/gadukino/village/mit.jpg">'
'You lather your body washcloth and start scrubbing your body. You rinse off the soap and start to lather the hair with the shampoo. After rising off the shampoo you are completely clean.'
act 'Leave':gt $loc, $metka
end
end
dynamic $bteeth
dynamic $tampon
dynamic $quickwash
dynamic $wearpan
dynamic $basin
if (cumloc[6] = 1 or cumloc[7] = 1):
act 'Rinse the cum stains off your clothes in luke warm water(0:10)':
cla
cumspclnt = 6
gs 'cum_cleanup'
minut += 10
gs 'stat'
'> src="images/shared/sex/cum/frotsp.jpg">'
'You remove traces of cum from the clothes.'
act 'Finish':gt $curloc
end
end
dynamic $brit
if dirtyclothes = 1 and $loc = 'Gadbana':
act 'Wash your clothes (1:00)':
cla
*clr
minut += 60
dirtyclothes = 0
pcs_mood -= 10
cumspclnt = 6 & gs 'cum_cleanup'
gs 'stat'
if $clothingworntype = 'nude':
'> src="images/locations/gadukino/hunters/basinwash.jpg">'
else
'> src="images/locations/gadukino/village/washclothes1.jpg">'
'You undress and wash your dirty clothes.'
end
*nl
'You soak your muddy clothes and underwear in the basin and pour in washing powder, then you scrub them until they are finally clean.'
act 'Finish':gt $loc, $metka
end
end
if (klismaday ! daystart or arrpos('sparrloc', 3) ! -1):
act 'Give yourself an enema (0:05)':
cla
*clr
cumspclnt = 7
gs 'cum_cleanup'
minut += 5
klismaday = daystart
klismaday1= 1
'> src="images/shared/home/bathroom/klisma.jpg">'
'You use Baba''s enema to clean yourself out down there. Your ass is now ready for anal sex without any awkward surprises.'
act 'Finish':gt 'Gadbana'
end
end
else
!125st
act 'Undress':
cls
gs 'clothing', 'strip'
gs 'underwear', 'remove'
gs 'stat'
'> src="images/characters/village/mira/miraban.jpg">'
'While you undress, through the corner of your eye you notice Mira removing her panties.'
gs 'arousal', 'voyeur', 10, 'lesbian'
gs 'stat'
act 'Watch Mira clean herself':
cls
gs 'stat'
'> src="images/characters/village/mira/miraban1.jpg">'
'You feel the hot steam penetrate into your pores while you blissfully watch Mira lather up. She sometimes throws at you short glances and smiles hesitantly in response...'
gs 'arousal', 'voyeur', 10
gs 'stat'
act 'Steam':
!{
dynamic $showerdin
vidageday += 1
pcs_mood += 20
pcs_health += healthmax/20
pcs_skin += 5
if pcs_skin >= 20:pcs_skin = 0 & skin += 1
}
!copy from 40~62, different sauna in Russian.
cls
dynamic $showerdin
pcs_hairbsh = 0
pcs_makeup = 1
! WD: Missing Var ~ 'banaday'
banaday = daystart
if frost > 0:frost = 0
pcs_skin += 5
gs 'stat'
'> src="images/characters/village/mira/miraban2.jpg">'
'Mira finally finishes lathering herself, you take the loofah and lather yourself from head to toe. You enjoy yourselves in the warm bath, relaxing in each other''s company, occasionally exchanging meaningless anecdotes...'
gs 'arousal', 'voyeur', 120
gs 'arousal', 'end'
gs 'stat'
act 'Finish': mira = 0 & gt 'gaddvor'
end
end
end
!125ed
end
--- Gadbana ---------------------------------