glife/locations/451_dom_gor

# dom_gor
ACT 'On the street':
	cls
	if sick <= 72 and nude = 0:
	xgt 'gorodok'
	elseif nude = 0:
	'<B><font color=red>You are too ill to take to the streets.</font></B>'
	xgt $curloc
	else
	'<B><font color=red>YOU HAVE TO GET DRESSED.</font></B>'
	xgt $curloc
	end

END
$metkaM = $ARGS[0]
	$locM = $CURLOC

	'<center><B><font color = maroon>Your room</font></B></center>'
	'<center><img src="images\etogame\kom_gor.jpg"></center>'
	'Your room in a hostel. The room is small, there is only the minimum necessary. 2 sleepers, <a href="exec:GT ''gor_mirror'',''start''">mirror</a>, <a href="exec:GT ''gor_exh'',''pos1''">hanger</a>, <a href="exec:GT ''loker'',''start''">cupboard</a> for things and a small TV.'
	clr
	gs 'stat'
	gs 'time'
	fcolor = rgb(0,0,0)
	bcolor = rgb(255,255,255)
	LCOLOR = rgb(106,90,205)

if cloth_vid = 2 and teachlevel > 20 and parkrunday ! day and hour < 21 and hour > 6:
	act 'Jogging on the Square (1:00)':
		 cla
		 *clr
		 set parkrunday = day
		 set minut = minut + 30
		 set manna = manna + 10
		 set willpower = willpower - 10
		 set beg = beg + 1
		 set fat = fat - 8
		 set speed = speed + 1
		 set sweat = sweat + 3
		 '<center><img src="images\pic\parkbeg.jpg" ></center>'
		 '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
					 '<center><img src="images\etogame\stop.jpg" ></center>'
					 '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
			 end
			 if 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
					 '<center><img src="images\etogame\stop2.jpg" ></center>'
					 '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
			 end
			 if 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
					 horny+=3
					 '<center><img src="images\etogame\stop3.jpg" ></center>'
					 'You run with the pupil sometimes stopping and chatting with ease.'
					 *nl
					 '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.'
					 *nl
					 '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 son < 30:
			son += 5
			else
			son = 29
			end
			'I relax lying on the couch.'
		act 'stretch':gt'dom_gor'
		end
	end

	if hour >= 23:
		act 'Sleep in a bed':
			cla
			*clr
			'<center><img src="images\pics\son.jpg"></center>'
		 cloth_vid=0
			if analplugIN = 1: set analplugIN = 0 & 'Before going to bed you remove the butt plug.'
			if vibratorIN = 1: set vibratorIN = 0 & 'Before going to bed you remove the vibrator.'
			if mop > 1: set mop = 0 & set vidageday -= 1 & 'Cosmetics smeared face, you think that looks bad for sleeping with makeup, skin ages faster from it.'
			set tanga = 1
			set health += 5
			set hapri = 0
			InSleep = 1
			gs 'stat'
			'you slept'
				act 'Get Up':
				cla
				InSleep = 0
				minut += 480
				son = 30
				gt 'dom_gor'
				end
		end
	end

	if eda > 0:
	'In the refrigerator stored food that´s good for <B><<eda>></B> servings.'
	end
	if edaD = 0 and eda = 0:
	'<B><font color = red>The fridge is almost empty, nothing to eat at all.</font></B>'
	end
	if edaD > 0:
	'The refrigerator is kept healthy meal that´s good for <B><<edaD>></B> servings.'
	end
	if eda >= 1:
		act 'Have meal (1:00)':
			cla
			*clr
			eda -= 1
			minut += 60
			gs 'stat'
			frost = 0
			!set edahot = 0
			set health += 10
			set manna += 20
			if water < 20:
		'You gladly drank a cup of tea.'
		set water += 20
		end
		if water >= 20:
		'Tea in you no longer climbs.'
		end
			if energy >= 30:
				set fat += 2
				'You no longer want to eat and drink.'
				end
			if energy < 30:
				energy += 25
				fat += 1
				'You gladly ate.'
				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
		'<center><img src="images\pics\food.jpg"></center>'
		set minut += 30
		set health += 10
		set manna += 20
		set edaD -= 1
		if energy >= 30:
		'You can no longer have.'
		end
		if energy >= 20 and energy < 30:
		set energy += 10
		'You pushed through the power of a meal.'
		end
		if energy < 20:
		set energy += 20
		'You gladly ate.'
		end
		if water >= 20:
		'Tea in you no longer climbs.'
		end
		if water < 20:
		'You gladly drank a cup of tea.'
		set water += 20
		end
		act 'Get up from the table': gt 'dom_gor'
		end
	end

	if gor_dorm > 0: act 'In a shared bathroom': gt 'etoexhib','pos41'
--- dom_gor ---------------------------------