# dom_gor
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
$location_type = 'private'
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
'
Your room'
''
'Your room in a hostel. The room is small, there is only the minimum necessary. 2 beds, a mirror, a wardrobe (where you can organize your clothes or pick something to wear) and a small TV.'
if $clothingworntype = 'exercise' and teachlevel > 20 and parkrunday ! daystart and hour < 21 and hour > 6:
act 'Go for a jog around the Square (1:00)':
cla
*clr
parkrunday = daystart
minut += 30
pcs_mood += 10
pcs_willpwr -= 10
run_exp += 2
fat -= 8
pcs_sweat += 30
''
'You did a few laps around the park. Out of breath, sweaty and tired.'
parkrand = rand (0, 10)
if parkrand > 4 and beguch < 3:
'In the park you met a disciple of the school and asked to go for a run with you.'
act 'Run together':
cla
*clr
beguch += 1
''
'You run with the pupil sometimes stopping and chatting with ease.'
'Disciple:- Svetlana, you are so beautiful, you are all so fond of! You:- Hmm, thank you!'
act 'Complete a run':gt 'gskver'
end
elseif parkrand >4 and beguch >= 3 and beguch < 6:
'In the park you met a disciple of the school and asked to go for a run with you.'
act 'Run together':
cla
*clr
beguch += 1
''
'Have you stopped to do stretching exercises muscles.'
'Disciple:- Ahh if our girls would be at least a little like you! You:- You just got used to them, get to know them!'
act 'Complete a run':gt 'gskver'
end
elseif parkrand >4 and beguch >= 6 and beguch < 9:
'In the park you met a disciple of the school and asked to go for a run with you.'
act 'Run together':
cla
*clr
beguch += 1
pcs_horny += 3
''
'You run with the pupil sometimes stopping and chatting with ease.'
''
'Disciple:- Svetlana, can I take a picture of you! You are:- What are you going to do then with my photo, and the wretch!'
'Disciple:- No, no, I will not forgive her masturbate! You:- Aha! I did not say that!'
'Student:- Im sorry, was a bad idea. You:- Yes, Im kidding! Fotkay, just me then do not forget to copy.'
''
'You picked up a background, stood in a pose and you photographed.'
act 'Complete a run':gt 'gskver'
end
end
act 'Complete a run':gt 'gskver'
end
end
if hour < 23:
act 'Lie on the couch (1:00)':
cla
minut += 60
if pcs_sleep < 90:
pcs_sleep += 10
else
pcs_sleep = 100
end
'I relax lying on the couch.'
act 'Stretch':gt 'dom_gor'
end
end
if eda > 0:'In the refrigerator stored food that''s good for <> servings.'
if edaD = 0 and eda = 0:'The fridge is almost empty, nothing to eat at all.'
if edaD > 0:'The refrigerator is kept healthy meal that''s good for <> servings.'
if eda >= 1:
act 'Prepare meals (2:00)':
cla
*clr
eda -= 1
minut += 120
frost = 0
edahot = 0
pcs_health += 10
pcs_mood += 20
gs 'stat'
if pcs_energy >= 100:
fat += 5
'You do not want to eat.'
elseif pcs_energy >= 80:
fat += 3
pcs_energy = pcs_energy + 40
else
pcs_energy += 80
fat += 1
'You ate with pleasure.'
end
if water >= 80:
'You don''t need any more tea.'
else
water += 80
cumspclnt = 2
gs 'cum_cleanup'
pcs_breath = 0
'You gladly drank a cup of tea.'
end
act 'Get up from the table':gt 'dom_gor'
end
end
if edaD > 0:
act 'Eat diet food (0:30)':
cla
*clr
frost = 0
minut += 30
pcs_health += 10
pcs_mood += 20
edaD -= 1
''
if pcs_energy >= 100:
'You can no longer eat.'
elseif pcs_energy >= 80:
pcs_energy += 40
'You pushed through the power of a meal.'
else
pcs_energy += 80
'You gladly ate cooked food.'
end
if water >= 80:
'You don''t need any more tea.'
else
water += 80
cumspclnt = 2
gs 'cum_cleanup'
pcs_breath = 0
'You gladly drank a cup of tea.'
end
act 'Get up from the table':gt 'dom_gor'
end
end
if gor_dorm > 0:act 'In a shared bathroom':gt 'etoexhib', 'pos41'
act 'Go out onto the street':
cls
if $clothingworntype = 'nude':
'You need to get dressed.'
xgt $curloc
elseif sick > 72:
'You are too ill to take to the streets.'
xgt $curloc
else
xgt 'pavCommercial'
end
end
--- dom_gor ---------------------------------