123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225 |
- # Gadbana
- CLOSE ALL
- $metkaM = ''
- $locM = 'Gadbana'
- $metka = ''
- $loc = 'Gadbana'
- $location_type = 'bathroom'
- frost = 0
- '<center><h4>bath</h4></center>'
- '<center><img <<$set_imgh>> src="images/locations/gadukino/village/bana.jpg"></center>'
- '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.'
- clr
- gs 'stat'
- if night_mode = 1:
- fcolor = rgb(255, 255, 255)
- bcolor = rgb(0, 0, 0)
- lcolor = rgb(106, 90, 205)
- else
- fcolor = rgb(0, 0, 0)
- bcolor = rgb(255, 255, 255)
- lcolor = rgb(106, 90, 205)
- end
- if mira = 0:
- act 'Go outside':
- if $clothingworntype ! 'nude' or pcs_exhibition > 50:
- minut += 5 & gt'Gaddvor'
- else
- cls
- '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/noundress.jpg"></center>'
- 'You are ashamed to appear like this in the open.'
- act 'Back':gt'Gadbana'
- end
- end
- if week >= 6:
- if hour >= 12 and hour <= 18:
- canpar = 1
- 'You put the wood into the stove and start a fire. It will take several hours before the banya is ready.'
- elseif hour > 18 and hour < 22:
- canpar = 1
- '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
-
- ! WD: Missing Var ~ 'banaday'
- banaday = daystart
- if frost > 0:frost = 0
- pcs_skin += 5
- gs 'stat'
- '<center><img <<$set_imgh>> src="images/locations/gadukino/village/par.jpg"></center>'
- '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
- elseif hour >= 22:
- canpar = 0
- end
- elseif week ! 6:
- canpar = 0
- 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'
- '<center><img <<$set_imgh>> src="images/locations/gadukino/village/mit.jpg"></center>'
- '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 'Gaddvor'
- 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'
- '<center><img <<$set_imgh>> src="images/shared/sex/cum/frotsp.jpg"></center>'
- 'You remove traces of cum from the clothes.'
- act 'Finish':gt $curloc
- end
- end
- dynamic $brit
- if dirtbelo > 0 and $loc = 'Gadbana':
- act 'Wash panties (<<dirtbelo * 5>> Minutes)':
- cla
- *clr
- minut += dirtbelo * 5
- clrbelo += dirtbelo
- dirtbelo = 0
- pcs_mood -= 10
- '<center><img <<$set_imgh>> src="images/locations/gadukino/village/washclothes1.jpg"></center>'
- *nl
- 'You soak your dirty panties in the basin and pour in washing powder, then you scrub them until they are finally clean.'
- act 'Finish':gt $locM, $metkaM
- end
- end
- if dirtyclothes = 1 and $loc = 'Gadbana':
- act 'Wash your clothes (1:00)':
- cla
- *clr
- minut += 60
- clrbelo += dirtbelo
- dirtbelo = 0
- dirtyclothes = 0
- pcs_mood -= 10
- cumspclnt = 6 & gs 'cum_cleanup'
- gs 'stat'
- if $clothingworntype = 'nude':
- '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/basinwash.jpg"></center>'
- else
- '<center><img <<$set_imgh>> src="images/locations/gadukino/village/washclothes1.jpg"></center>'
- 'You undress and wash your dirty clothes.'
- end
- *nl
- 'You soak your muddy clothes and panties in the basin and pour in washing powder, then you scrub them until they are finally clean.'
- act 'Finish':gt $locM, $metkaM
- 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
- '<center><img <<$set_imgh>> src="images/shared/home/bathroom/klisma.jpg"></center>'
- '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 'stat'
- '<center><img <<$set_imgh>> src="images/characters/village/mira/miraban.jpg"></center>'
- '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'
- '<center><img <<$set_imgh>> src="images/characters/village/mira/miraban1.jpg"></center>'
- '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, 'lesbian'
- 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'
- '<center><img <<$set_imgh>> src="images/characters/village/mira/miraban2.jpg"></center>'
- '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, 'lesbian'
- gs 'arousal', 'end'
- gs 'stat'
- act 'Finish': mira = 0 & gt 'gaddvor'
- end
- end
- end
- !125ed
- end
- --- Gadbana ---------------------------------
|