# bedrPar
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
<<<<<<< 154_bedrPar
'
Your bedroom'
'
'
clr
set minut += 1
gs 'stat'
fcolor = rgb(0,0,0)
bcolor = rgb(255,255,255)
LCOLOR = rgb(106,90,205)
'Small room in which hardly squeezed cabinet, your bed, desk bed and sisters.'
if AutoEnema = 1 and AEnema = 1:
set minut += 5
set klismaday = day
set klismaday1= 1
set AEnema = 0
'You put yourself an enema and clean intestines, now your ass ready for anal sex.'
end
gs 'family'
act 'Leave the room':
gt 'korrPar'
end
=======
'Your bedroom'
'
'
clr
set minut = minut + 1
gs'stat'
fcolor=rgb(0,0,0)
bcolor=rgb(255,255,255)
LCOLOR = rgb(106,90,205)
'A small room in which barely squeezed cupboard, your bed, desk Bed and sisters.'
if tanga = 0:tanga = 1
gs'family'
act 'Exit the room':
gt'korrPar'
end
>>>>>>> 154_bedrPar
if student > 0 and kursovik < 100:
<<<<<<< 154_bedrPar
act 'Write coursework (1:00)':
cla
*clr
set minut += 60
set kursovik += RAND(intel/20, intel/10)
if kursovik > 100: set kursovik = 100
set manna -= 10
'
'
'You sat on the course work and prepared her for <> percent.'
act 'Exit': gt $curloc
end
=======
act 'write kursovik 1 h':
cla
*clr
set minut = minut + 60
set kursovik = kursovik + RAND (intel/20,intel/10)
if kursovik > 100:set kursovik = 100
set manna = manna - 10
'
'
'You sat on coursework and prepare it for <> percent.'
act 'Go_Out':gt $curloc
end
>>>>>>> 154_bedrPar
end
<<<<<<< 154_bedrPar
if horny >= 50 and sisterHere = 0:
act 'Masturbate':
gt 'selfplay'
end
end
=======
if horny>=50 and sisterHere=0:
act 'mastrubirovat':
gt'selfplay'
end
end
if pornMagazine>0:
'Under the mattress you have hidden pornozhurnal.'
end
if sisterHere=0 and pornMagazine>0:
dynamic $d_read_porn
end
dynamic $d_read_book
if tovarL>0:'You have kept <> One unit of small goods. The maximum you can keep in your room 30 One unit of product.'
if card>0:
act 'Take a deck of cards':
gt'card'
end
end
if dur > 0:
'You have hidden <> doses pale lady'
end
if dur > 0 and narkday ! day:
act 'Nyuhnut pale lady 5 min':
cla
*clr
set minut = minut + 5
set narkday = day
set health = vital*10 + stren*5
set willpower = intel*5 + will*5
set manna = (intel*magik) + magik*100 + vital*10 + rikudo
set horny = 100
set nark = nark + 10
set dur = dur - 1
'
'
'You otsypali dose of powder and its nyuhnuli, then you feel just fine.'
act 'Go_Out':gt $curloc
end
end
>>>>>>> 154_bedrPar
--- bedrPar ---------------------------------