Merging changes from heromaster's branch

locations/169_famdorfride

@@ -0,0 +1,16 @@
+# famdorfride
+hour = 12
+minut = 0
+
+gs 'stat'
+
+minut += 60
+
+gs 'stat'
+
+'You got into the Volga and an hour reached the village in which they live Gadyukino your grandparents.'
+
+act 'Going into the house':
+	gt 'Gadhouse'
+end
+--- famdorfride ---------------------------------

locations/475_sistersleep

@@ -0,0 +1,14 @@
+# sistersleep
+if lesbian > 0:
+	horny +=10 & siswath += 1
+end
+
+gs'stat'
+'<center><B><font color=maroon>Anya</font></B></center>'
+'<center><img src="qwest/alter/Ev/sleep.jpg" ></center>'
+'on the bed, Anya is putting the ass'
+
+act 'Exit':
+	gt $loc, $metka
+end
+--- sistersleep ---------------------------------

locations/476_sistersobir

@@ -0,0 +1,13 @@
+# sistersobir
+!if lesbian>0:horny+=10&siswath+=1
+
+gs'stat'
+'<center><B><font color=maroon>Anya</font></B></center>'
+'<center><img src="qwest/alter/sobir.jpg" ></center>'
+'Walks around the room going to work your sister Anya.'
+'Anya says turning to you "Sveta, I`m so late, do not distract."'
+
+act 'Exit':
+	gt $loc, $metka
+end
+--- sistersobir ---------------------------------

locations/477_sisterprogulka

@@ -0,0 +1,13 @@
+# sisterprogulka
+!if lesbian>0:horny+=10&siswath+=1
+
+gs'stat'
+'<center><B><font color=maroon>Anya</font></B></center>'
+'<center><img src="qwest/alter/progulka.jpg" ></center>'
+'Walks around the room going for a walk on your sister Anya. She admires itself in a mirror and turned the ass trying to see yourself better'
+'Anya says turning to you "Sveta, if you decide to take a walk, I`m outside the club with her friends."'
+
+act 'Exit':
+	gt $loc, $metka
+end
+--- sisterprogulka ---------------------------------

locations/478_seeporn

@@ -0,0 +1,314 @@
+# seeporn
+gs'stat'
+
+'Together with all the guys you`ve come to bear and he turned on the video player, by which immediately began to show porn.'
+
+act 'watch':
+	cls
+	minut += 15
+	seepornofut += 1
+	horny += (seepornofut + mastr) * 2
+
+	gs'stat'
+
+	if seepornofut < 3:
+		'Boys looking at what is happening on the screen clearly at ease and embarrassed shoot you in the eyes.'
+	end
+
+	if seepornofut >= 3 and seepornofut < 10:
+		'Guys have become accustomed to watching porn , sometimes even comment on it.'
+	end
+
+	if seepornofut >= 10:
+		'Guys look hard porn, you notice, that all vyzdybilis shirinki.'
+		evgenrand = rand(0, 5)
+
+		if evgenqw = 4:
+			cls
+			boyseeporn += 1
+
+			gs'stat'
+
+			'Guys look hard porn, you notice, that all vyzdybilis shirinki. Zhendos offers "Svetsik, What about work mouth?"'
+			
+			act 'Be silent':
+				cls
+				bj += 3
+				sub += 5
+				gang += 1
+
+				gs 'stat'
+
+				'<center><img src="images/qwest/alter/ev2/seepornblowbang.jpg" ></center>'
+				'Zhendos got dick out of his pants and pulled your face to its members, You dutifully wrapped around his lips and began to suck. Your brother Kolka and Bear also got members and put them to you to face, you started to masturbate and suck dick.'
+
+				act 'suck':
+					cls
+					cumface += 3
+					cumlip += 2
+					cumfrot += 1
+
+					gs 'stat'
+
+					'<center><img src="qwest/alter/ev2/seepornbbcum.jpg" ></center>'
+					'The boys did not last long and become cum on your face, Soon almost all of your face was covered with a layer of smelly mucus and the sperm even hit you on your clothes.'
+
+					act 'Get_Away':
+						gt 'gorodok'
+					end
+				end
+			end
+
+			if dom > boyseeporn * 2:
+				act 'Beat it':
+					cls
+					dom += 1
+
+					gs 'stat'
+
+					!'<center><img src="qwest/alter/ev2/seepornHand.jpg" ></center>'
+					'You indignantly rejected the proposal boys.'
+
+					act 'Exit':
+						gt 'gorodok'
+					end
+				end
+			end
+
+			exit
+		end
+
+		if evgenqw = 3:
+			cls
+			gs 'stat'
+			'<center><img src="qwest/alter/ev2/seeporn.jpg" ></center>'
+			'Guys look hard porn, you notice, that all vyzdybilis shirinki. Zhendos suddenly takes your hand and puts it in the groin, just goes and Bear. Your brother Kolka laughed nervously. A Bear told you conspiratorially "Svetsik, vzdrochni us."'
+
+			act 'Jerk kid':
+				cls
+				hj += 2
+				boyseeporn += 1
+				sub += 1
+
+				gs 'stat'
+
+				!brotherrand=rand(3,10)
+
+				if boyseeporn < 2:
+					'<center><img src="qwest/alter/ev2/seepornHJ.jpg" ></center>'
+					'You glide skin on both members of their handles, Zhendos rapidly groaned and of its members flew jet of sperm on your foot, immediately joined by Mishan and also finished on your foot.'
+
+					act 'vozmuschatsya':
+						cls
+						cumfrot += 2
+
+						gs 'stat'
+
+						'<center><img src="images/qwest/alter/ev2/seeporncumhj.jpg" ></center>'
+						'you have rebelled "look assholes, you all I smeared!" But the boys blissfully sprawled on the couch "Very best in your palms Svetsik, such small, soft and warm."'
+
+						act 'Exit':
+							gt 'gorodok'
+						end
+					end
+				end
+
+				if boyseeporn >= 2:
+					bj += 1
+					evgenqw = 4
+
+					if brotherSex = 0:
+						brotherSex = 1 & guy += 1
+					end
+
+					'<center><img src="images/qwest/alter/ev2/seepornfirst.jpg" ></center>'
+					'You glide skin on both members of their handles, your brother Kolka broke down and with a strangled groan. You have eyes widened by this turn of events. Zhendos rapidly groaned and of its members flew jet of sperm on your foot, immediately joined by Mishan and also finished on your foot.'
+
+					act 'To_get':
+						cls
+						cumfrot += 2
+						cumface += 1
+						facial += 1
+
+						gs 'stat'
+
+						'<center><img src="images/qwest/alter/ev2/seepornfacial.jpg" ></center>'
+						'Suddenly. Mishan laughed "Kolyamba, you just fucked his sister in the mouth. ohrenet" Kohl wiping the sweat from his forehead choked said "Yes, she asks that this slut. That could not resist."'
+
+						act 'Exit':
+							gt 'gorodok'
+						end
+					end
+				end
+			end 
+
+			if dom > boyseeporn * 2:
+				act 'Remove hand':
+					cls
+					dom += 1
+
+					gs'stat'
+
+					!'<center><img src="qwest/alter/ev2/seepornHand.jpg" ></center>'
+					'You angrily removes his hands and yelling angrily at the boys.'
+
+					act 'Exit':
+						gt 'gorodok'
+					end
+				end
+			end
+
+			exit
+		end
+
+		if evgenqw = 2 and evgenrand = 0:
+			cls
+
+			gs'stat'
+
+			'<center><img src="images/qwest/alter/ev2/seeporn.jpg" ></center>'
+			'Guys look hard porn, you notice, that all vyzdybilis shirinki. Zhendos suddenly takes your hand and puts it in the groin, just goes and Bear. Your brother Kolka laughed nervously. A Bear told you conspiratorially "Svetsik, vzdrochni us."'
+
+			act 'Yes you ohueli!!!':
+				cls
+				gs 'stat'
+
+				'<center><img src="images/qwest/alter/ev2/seeporn.jpg" ></center>'
+				'You rebelled actions boys. What Bear said "Come, you`re a girl, moreover, we just peredernesh gate in a friendly."'
+
+				if horny>=70:
+					act 'jerk kid':
+						cls
+						hj += 2
+						boy += 2
+						evgenqw = 3
+
+						gs'stat'
+						'<center><img src="images/qwest/alter/ev2/seepornHJ.jpg" ></center>'
+						'You glide skin on both members of their handles, Zhendos rapidly groaned and of its members flew jet of sperm on your foot, immediately joined by Mishan and also finished on your foot.'
+
+						act 'vozmuschatsya':
+							cls
+							cumfrot += 2
+
+							gs 'stat'
+
+							'<center><img src="images/qwest/alter/ev2/seeporncumhj.jpg" ></center>'
+							'you have rebelled "look assholes, you all I smeared!" But the boys blissfully sprawled on the couch "Very best in your palms Svetsik, such small, soft and warm."'
+
+							act 'Exit':
+								gt 'gorodok'
+							end
+						end
+					end
+				end
+
+				if horny < 70:
+					act 'remove hands':
+						cls
+						dom += 1
+
+						gs 'stat'
+
+						!'<center><img src="qwest/alter/ev2/seepornHand.jpg" ></center>'
+						'You angrily removes his hands and yelling angrily at the boys.'
+
+						act 'Exit':
+							gt 'gorodok'
+						end
+					end
+				end
+			end
+		exit
+	end
+
+	if evgenqw = 1 and evgenrand = 0:
+		cls
+		horny += 10
+
+		gs'stat'
+
+		'Guys look hard porn, you notice, that all vyzdybilis shirinki. You feel like a hand Zhendosa accidentally stroking your ass.'
+
+		if horny<70:
+			act 'Remove his hands':
+				cls
+				dom += 1
+
+				gs'stat'
+				!'<center><img src="qwest/alter/ev2/seepornHand.jpg" ></center>'
+				'You angrily removes his hands from his priests Zhendosa.'
+				act 'Exit':
+					gt 'gorodok'
+				end
+			end
+		end
+
+		if horny >= 70:
+			act 'Pretend that nothing is happening':
+				cls
+				sub += 1
+				evgenqw = 2
+
+				gs'stat'
+
+				!'<center><img src="qwest/alter/ev2/seepornHand.jpg" ></center>'
+				'You sit on the couch red as a lobster enjoying a nice touch to his priest.'
+
+				act 'Exit':
+					gt 'gorodok'
+				end
+			end
+		end
+
+		exit
+	end
+
+	if evgenqw = 0 and evgenrand = 0:
+		cls
+
+		gs'stat'
+
+		'Guys look hard porn, you notice, that all vyzdybilis shirinki. Zhendos looking at porn asks you "And you did that <<$name>> ever?"'
+
+		if horny < 70:
+			act 'Jerk dick':
+				cls
+				dom += 1
+
+				gs 'stat'
+
+				!'<center><img src="qwest/alter/ev2/seepornHand.jpg" ></center>'
+				'You sent Zhendosa on dick with such conversations.'
+
+				act 'Exit':
+					gt 'gorodok'
+				end
+			end
+		end 
+
+		if horny >= 70:
+			act 'Be silent':
+				cls
+				sub += 1
+				evgenqw = 1
+
+				gs 'stat'
+
+				!'<center><img src="qwest/alter/ev2/seepornHand.jpg" ></center>'
+				'You swallowed and said nothing eyeing porn. Mishan chuckled "And she asks how flushed. It turns out the girls also like porn."'
+
+				act 'Exit':
+					gt 'gorodok'
+				end
+			end
+
+			exit
+		end
+	end
+
+	act 'Exit':
+		gt 'gorodok'
+	end
+end
+--- seeporn ---------------------------------

locations/479_gadhouse

@@ -0,0 +1,85 @@
+# gadhouse
+$metkaM = $ARGS[0]
+$locM = $CURLOC
+$metka = $ARGS[0]
+$loc = $CURLOC
+'<center><H4>cottage</H4></center>'
+'<center><img src="images/qwest/gadukino/izba.jpg" ></center>'
+'Simple village hut. In a small room is <a href="exec:GT ''loker'',''start''">cupboard</a> and <a href="exec:GT ''bedPar''">bed</a> where you can sleep. In a large room is <a href="exec:GT ''tvPar''">tv_set</a>. TV stands next to an ancient <a href="exec:GT ''mirror'',''start''">trellis</a>'
+clr
+gs'stat'
+fcolor=rgb(0,0,0)
+bcolor=rgb(255,255,255)
+LCOLOR = rgb(106,90,205)
+
+act 'Go outside':
+	minut += 5 & gt'Gaddvor'
+end
+
+act 'Eat':
+	cla
+	*clr
+	gs'stat'
+
+	frost=0
+	'<center><img src="images/pics/food.jpg" ></center>'
+	set minut += 30
+	set health += 10
+	set manna += 20
+	wipo += 5
+	salo += 1
+
+	if energy >= 30:
+		set fat += 5
+		'You can no longer have.'
+	end
+
+	if energy >= 20 and energy < 30:
+		set fat += 3
+		set energy += 10
+		'You pushed through the power of a meal.'
+	end
+
+	if energy < 20:
+		set energy += 20
+		!set fat = fat + 1
+		'You gladly ate cooked food.'
+	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
+
+	gs 'stat'
+
+	act 'Get up from the table':
+		gt $locM, $metkaM
+	end
+end
+
+dynamic $d_read_book
+
+if indorf = 1:
+	'The room resting parents.'
+
+	if week = 7:
+		if hour >= 20:
+			gt 'farmhomeride'
+		end
+	end
+end
+
+if monthbabkapay ! month:
+	monthbabkapay = month
+	money += 2000
+
+	gs 'stat'
+
+	'Grandma gives you two thousand.'
+end
+--- gadhouse ---------------------------------

locations/480_farmhomeride

@@ -0,0 +1,16 @@
+# farmhomeride
+hour = 20
+minut = 0
+
+gs 'stat'
+
+minut += 60
+
+gs 'stat'
+
+'You got into the Volga River with his family and an hour reached the town.'
+
+act'Go home':
+	gt'korrPar'
+end
+--- farmhomeride ---------------------------------

locations/481_seeparentsex

@@ -0,0 +1,29 @@
+# seeparentsex
+parentsexday = daystart
+
+gs'stat'
+
+'<center><img src="images/qwest/alter/ev2/see.jpg" ></center>'
+'Looking at the door to his parents in the bedroom as you saw your mother `s stepfather fucks cancer.'
+
+act 'Leave':
+	gt'korrPar'
+end
+
+if horny >= 50:
+	act'peep':
+		cls
+		horny += 10
+		minut += 15
+
+		gs'stat'
+
+		'<center><img src="images/qwest/alter/ev2/see.jpg" ></center>'
+		'You pry as your nurse podmahivaet asshole stepfather.'
+
+		act 'Leave':
+			gt 'korrPar'
+		end
+	 end
+end
+--- seeparentsex ---------------------------------

locations/482_dinSex2

@@ -0,0 +1,716 @@
+$d_vag_sex_dildo={
+	frost=0
+
+	if mesec > 0:
+		!periods, orgasm is not possible
+		set horny = 0
+		set manna = manna - 10
+		set willpower = willpower - 10
+		'You have monthly and while you tuck a <<dick>> inch dildo, vaginal blood flows slowly.'
+	end
+
+	if mesec <= 0 and vagina > 0:
+		!no monthly
+		!horny - excitement
+		!vagina - the elasticity of the vagina
+		!silavag - skill Man 0-sad_sack, 1-middle_peasant 2-stud
+		!dick - penis Man
+		!orgazm - Total coefficient of pleasure
+		!0 - very painful, 1 - it_hurts, 2 - not nice, 3 - so-so, 4 - nedoorgazm 5 - orgasm
+
+		set smazka = horny / 10
+		set prinat = smazka + vagina
+
+		if dick >= prinat * 2:
+			!member of the critical features more years
+			set orgazm = 0
+		end
+
+		if dick < prinat*2 and dick > prinat:
+			!member more options gg
+			if horny >= 100:
+				set orgazm = 5
+			end
+
+			if horny >= 90 and horny < 100:
+				set orgazm = 4
+			end
+
+			if horny >= 80 and horny < 90:
+				set orgazm = 3
+			end
+
+			if horny >= 70 and horny < 80:
+				set orgazm = 2
+			end
+
+			if horny >= 60 and horny < 70:
+				set orgazm = 1
+			end
+
+			if horny < 60:
+				set orgazm = 0
+			end
+		end
+
+		if dick <= prinat and dick >= vagina:
+			!Member fewer opportunities gg
+			if horny >= 80:
+				set orgazm = 5
+			end
+
+			 if horny >= 60 and horny < 80:
+				set orgazm = 4
+			 end
+
+			 if horny >= 40 and horny < 60:
+				set orgazm = 3
+			 end
+
+			 if horny < 40:
+				set orgazm = 2
+			 end
+		end
+
+		if dick <= prinat and dick < vagina:
+			if horny >= 100:
+				set orgazm = 5
+			end
+		end
+
+		if horny >= 90 and horny < 100:
+			set orgazm = 4
+		end
+
+		if horny < 90:
+			set orgazm = 6
+		end
+
+		 if oragazm = 5:
+			preOrg += 1
+
+			if razeba < 4:
+				oragazm = 4
+			end
+
+			if razeba=4:
+				orgrand = rand(50, 300)
+
+				if orgrand > preOrg:
+					oragazm=4
+				end
+			end
+
+			if razeba >= 5:
+				orgrand = rand(0, 100)
+
+				if orgrand > preOrg:
+					oragazm=4
+				end
+			end
+		end
+
+		if orgazm = 0:
+			vgape = 3
+			vgapetime = totminut
+			set horny = 0
+			set manna -= 15
+			set willpower -= 15
+			'You groaned in pain when stuck into itself <<dick>> inch dildo, tears flowed from the eyes and between the legs feeling as if you drove a red-hot rod.'
+		end
+
+		if orgazm = 1:
+			if vgape < 2:
+				vgape=2
+			end
+
+			vgapetime = totminut
+			set horny -= 10
+			set manna -= 10
+			set willpower -= 10
+			'You bit her lip in pain when stuck into itself <<dick>> inch dildo, between the legs pain.'
+		end
+
+		if orgazm = 2:
+			if vgape < 1:
+				vgape=1
+			end
+
+			vgapetime = totminut
+			set horny -= 5
+			set manna -= 5
+			set willpower -= 5
+			'You flinched at the sudden pain when stuck into itself <<dick>> inch dildo, but the pain between her legs slowly calm down and become quite tolerable. Are you trying to be excited while moving <<dick>> inch dildo in your pussy, but you will not go out.'
+		end
+
+		if orgazm = 3:
+			!set horny = horny + 5
+			set manna += 5
+			set willpower += 5
+			'You flinched from feeling, your pussy stretched, when a thrust <<dick>> inch dildo. Between the legs becomes a little nice, when you fuck themselves with dildos.'
+		end
+
+		if orgazm = 4:
+			!set horny = horny + 10
+			set manna += 10
+			set willpower += 10
+			'You flinched from feeling, your pussy stretched, when a thrust <<dick>> inch dildo. Between the legs becomes a little nice, when you fuck themselves with dildos. Gradually pritno warm and throbbing grow in the lower abdomen, then feeling slightly reduced and remain until the end of. '
+		end
+
+		if orgazm = 5:
+			set horny = 0
+			set manna += 15
+			set willpower += 15
+			set orgasm += 1
+			vaginalOrgasm += 1
+			'You startled by the pleasant sensation, when your pussy rastyagivatsya start taking a dildo. Between the legs becomes very warm and pleasant, when strong <<dick>> inch dildo moves in your pussy. Gradually pritno warm and throbbing grow in the lower abdomen, then feeling descend on you and your entire body covered hot waves of orgasm, you involuntarily shout of pleasure writhing on dildo.'
+		end
+
+		if orgazm = 6:
+			set horny += 5
+			set manna += 5
+			set willpower += 5
+			'You feel like dildo penetrates your pussy. Between her legs nice, but much less Dildo your pussy and <<dick>> centimeters for you little. Gradually pritno warm and throbbing grow in the lower abdomen, then feeling slightly reduced and remain until the end of.'
+		end
+
+		if vagina <= dick:
+			set vagina += 1
+		end
+	end
+
+	if vagina = 0 and mesec <= 0:
+		set horny = 0
+		set manna -= 15
+		set willpower -= 15
+		set vagina += 1
+		'You bit her lip in pain and tears streamed from his eyes when <<dick>> inch dildo went in you, break your hymen. You cried out in pain and was taken out of themselves bloody dildo.'
+	end
+
+	if vagina < dick:
+		vagina += 1
+	end
+}
+
+$d_analsex_dildo={
+	frost=0
+
+	if analplugin = 1:
+		analpluginbonus = 10
+		analplugin=0
+		'You pulled out of your more narrow and tight ass plug,'
+	end
+
+	if dick >= anus:
+		set anus += 3
+	end
+
+	'You parted my buttocks began to massage the anus with your fingers, first one, then two.'
+
+	if lubri > 0:
+		lubri -= 1
+		lubonus+=rand(1, 5)
+		'You squeezed anal smaski in his hand and began to spread his ass. After that.'
+	end
+
+	if anus < 10:
+		'When your ass you entered three fingers involuntarily groaned in pain.'
+	end
+
+	if anus >= 10:
+		'Then you have entered yourself three fingers and began to stretch the anus.'
+	end
+
+	'You pulled his fingers out of his priests and placed a dildo to her the hole.'
+
+	if anus + 10 < dick:
+		'You screamed and bit his lip from a sharp pain when his <<dick>> inch dildo apart your ass you entered.'
+	end
+
+	if anus + 10 >= dick:
+		'You groaned feeling of fullness when it <<dick>> inch dildo apart your ass you entered.'
+	end
+
+	'You froze for a moment, giving his priest adapt to hang around in her dildo, and then began to drive them all the more insistent, stretching his anus.'
+
+	if anus + lubonus + 2 < dick:
+		if mop > 1:
+			set mop = 0
+		end
+
+		horny-=20
+		manna-=20
+
+		if agape < 3:
+			agape=3
+		end
+
+		agapetime = totminut
+		'Your ass pierced a sharp pain when you started moving in her ass <<dick>> inch dildo.'
+	end
+
+	if anus + lubonus + 2 >= dick:
+		horny += 10
+
+		if agape < 2 and lubonus = 0:
+			agape=2
+		end
+
+		agapetime=totminut
+		'You started moaning rhythmically in time with the movements <<dick>> centimeter dildo inside you. You feel like your anus is stretched when dildo moves inside the ass.'
+
+		if horny >= 100:
+			if anal >= 10 and orgasm > 0:
+				manna += 20
+
+				if agape < 1 and lubonus = 0:
+					agape = 1 & agapetime = totminut
+				end
+
+				'You get a little nice when dildo moves inside your ass and you moan with pleasure.'
+			end
+		end
+	end
+
+	lubonus = 0
+}
+
+$d_strapon_vag={
+	frost=0
+
+	if mesec > 0:
+		!periods, orgasm is not possible
+		set horny = 0
+		set manna -= 10
+		set willpower -= 10
+		'You have monthly and while yet <<$boy>> drives in your pussy <<dick>> cm strap, vaginal blood flows slowly.'
+	end
+
+	if mesec <= 0 and vagina > 0:
+		!no monthly
+		!horny - excitement
+		!vagina - the elasticity of the vagina
+		!silavag - skill Man 0-sad_sack, 1-middle_peasant 2-stud
+		!dick - penis Man
+		!orgazm - Total coefficient of pleasure
+		!0 - very painful, 1 - it_hurts, 2 - not nice, 3 - so-so, 4 - nedoorgazm 5 - orgasm
+
+		set smazka = horny/10
+		set prinat = smazka + vagina
+
+		if dick >= prinat * 2:
+			!member of the critical features more years
+			set orgazm = 0
+		end
+
+		if dick < prinat * 2 and dick > prinat:
+			!member more options gg
+
+			if horny >= 100:
+				set orgazm = 5
+			end
+
+			if horny >= 90 and horny < 100:
+				set orgazm = 4
+			end
+
+			if horny >= 80 and horny < 90:
+				set orgazm = 3
+			end
+
+			if horny >= 70 and horny < 80:
+				set orgazm = 2
+			end
+
+			if horny >= 60 and horny < 70:
+				set orgazm = 1
+			end
+
+			if horny < 60:
+				set orgazm = 0
+			end
+		end
+
+		if dick <= prinat and dick >= vagina:
+			!Member fewer opportunities gg
+
+			if horny >= 80:
+				set orgazm = 5
+			end
+
+			if horny >= 60 and horny < 80:
+				set orgazm = 4
+			end
+
+			if horny >= 40 and horny < 60:
+				set orgazm = 3
+			end
+
+			if horny < 40:
+				set orgazm = 2
+			end
+		end
+
+		if dick <= prinat and dick < vagina:
+			if horny >= 100:
+				set orgazm = 5
+			end
+
+			if horny >= 90 and horny < 100:
+				set orgazm = 4
+			end
+
+			if horny < 90:
+				set orgazm = 6
+			end
+		end
+
+		if oragazm=5:
+			preOrg += 1
+
+			if razeba<4:
+				oragazm=4
+			end
+
+			if razeba=4:
+				orgrand = rand(50, 300)
+
+				if orgrand > preOrg:
+					oragazm=4
+				end
+			end
+
+			if razeba >= 5:
+				orgrand = rand(0, 100)
+
+				if orgrand > preOrg:
+					oragazm=4
+				end
+			end
+		end
+
+		if orgazm = 0:
+			vgape = 3
+			vgapetime = totminut
+			set horny = 0
+			set manna -= 15
+			set willpower -= 15
+			'You groaned in pain when <<$boy>> stuck in you <<dick>> cm strap, tears flowed from the eyes and between the legs feeling as if you drove a red-hot rod.'
+		end
+
+		if orgazm = 1:
+			if vgape < 2:
+				vgape=2
+			end
+
+			vgapetime = totminut
+			set horny -= 10
+			set manna -= 10
+			set willpower -= 10
+			'You bit her lip in pain when <<$boy>> stuck in you <<dick>> cm strap, between the legs pain.'
+		end
+
+		if orgazm = 2:
+			if vgape < 1:
+				vgape=1
+			end
+
+			vgapetime = totminut
+			set horny -= 5
+			set manna -= 5
+			set willpower -= 5
+			'You flinched at the sudden pain when <<$boy>> stuck in you <<dick>> cm strap, but the pain between her legs slowly calm down and become quite tolerable. Are you trying to be excited until <<$boy>> moves <<dick>> inch strap-on in your pussy, but you will not go out.'
+		end
+
+		if orgazm = 3:
+			!set horny += 5
+			set manna += 5
+			set willpower += 5
+			'You flinched from feeling, your pussy stretched, when <<$boy>> stuck in you <<dick>> cm strap. Between the legs becomes a little nice, when <<$boy>> you fucking threesome.'
+		end
+
+		if orgazm = 4:
+			!set horny = horny + 10
+			set manna = manna + 10
+			set willpower = willpower + 10
+			'You flinched from feeling, your pussy stretched, when <<$boy>> stuck in you <<dick>> cm strap. Between the legs becomes a little nice, when <<$boy>> fuck you using the strap. Gradually pritno warm and throbbing grow in the lower abdomen, then feeling slightly reduced and remain until the end of. '
+		end
+
+		if orgazm = 5:
+			set horny = 0
+			set manna += 15
+			set willpower += 15
+			set orgasm += 1
+			vaginalOrgasm += 1
+			'You startled by the pleasant sensation, when your pussy rastyagivatsya start taking a strapon. Between the legs becomes very warm and pleasant, when strong <<dick>> inch strap moves in your pussy. Gradually pritno warm and throbbing grow in the lower abdomen, then feeling descend on you and your entire body covered hot waves of orgasm, you involuntarily shout of pleasure writhing on dildo. '
+		end
+
+		if orgazm = 6:
+			set horny += 5
+			set manna += 5
+			set willpower += 5
+			'You feel like strap penetrates your pussy. Between her legs nice, but much less than the strap and your pussy <<dick>> centimeters for you little. Gradually pritno warm and throbbing grow in the lower abdomen, then feeling slightly reduced and remain until the end of. '
+			end
+
+		if vagina <= dick:
+			set vagina += 1
+		end
+	end
+
+
+	if vagina = 0 and mesec <= 0:
+		set horny = 0
+		set manna -= 15
+		set willpower -= 15
+		set vagina += 1
+		'You bit her lip in pain and tears streamed from his eyes when <<dick>> inch strap came in you, break your hymen. You cried out in pain and <<$boy>> You took out a bloody strap.'
+	end
+
+	if vagina < dick:
+		vagina +=1
+	end
+}
+
+$d_strapon_anal={
+	frost=0
+
+	if analplugin=1:
+		analpluginbonus = 10
+		analplugin=0
+		'You pulled out of your more narrow and tight ass plug,'
+	end
+
+	if dick >= anus:
+		set anus += 3
+	end
+
+	'<<$boy>> apart your buttocks massaged anus fingers, first one, then two.'
+
+	if lubri > 0:
+		lubri -= 1
+		lubonus += RAND(1, 5)
+		'You squeezed anal smaski in his hand and began to spread his ass. after that <<$boy>> oiled strapon.'
+	end
+
+	if anus < 10:
+		'When your ass you entered three fingers involuntarily groaned in pain.'
+	end
+
+	if anus >= 10:
+		'then <<$boy>> introduced you to three fingers and began to stretch the anus.'
+	end
+
+	'<<$boy>> pulled his fingers out of your priests and put the strap to your the hole.'
+		if anus + 10 < dick:
+			'You screamed and bit his lip from a sharp pain when <<dick>> cm apart strap your ass you entered.'
+		end
+
+		if anus + 10 >= dick:
+			'You groaned when Fullness <<dick>> cm apart strap your ass you entered.'
+		end
+
+		'<<$boy>> paused for a moment, giving your ass adapt to hang around in her strapon, then began to drive them insistently, stretching your anus.'
+
+		if anus + lubonus + 2 < dick:
+			if mop > 1:
+				set mop = 0
+			end
+
+			horny -= 20
+			manna -= 20
+
+			if agape < 3:
+				agape = 3
+			end
+
+			agapetime = totminut
+			'Your ass pierced a sharp pain when <<$boy>> began to fuck your ass with the help of <<dick>> cm strap.'
+		end
+
+		if anus + lubonus + 2 >= dick:
+			horny += 10
+
+			if agape < 2 and lubonus = 0:
+				agape = 2
+			end
+
+			agapetime = totminut
+			'You started moaning rhythmically in time with the movements <<dick>> centimeter strap inside you. You feel like your anus is stretched when the strap is moving inside the ass.'
+
+			if horny >= 100:
+				if anal >= 10 and orgasm > 0:
+					manna += 20
+
+				if agape < 1 and lubonus = 0:
+					agape = 1 & agapetime = totminut
+				end
+
+				'You get a little nice when the strap is moving inside your ass and you moan with pleasure.'
+			end
+		end
+	end
+
+	lubonus = 0
+}
+
+$doublepenetration={
+	frost = 0
+	set smazka = horny / 10
+	set prinat = smazka + vagina
+
+	if dick > prinat:
+		!member more options gg
+
+		if vgape < 3:
+			vgape = 3
+		end
+
+		vgapetime = totminut
+		DPvag = 2
+	end
+
+	if dick <= prinat and dick >= vagina:
+		!Member fewer opportunities gg
+
+		if vgape = 2:
+			vgape = 3
+		end
+
+		if vgape < 2:
+			vgape=2
+		end
+
+		vgapetime = totminut
+		DPvag = 1
+	end
+
+	if dick < vagina:
+		if vgape = 2:
+			vgape = 3
+		end
+
+		if vgape = 1:
+			vgape = 2
+		end
+
+		if vgape < 1:
+			vgape = 1
+		end
+
+		vgapetime = totminut
+		DPvag = 0
+	end
+
+	if lubri > 0:
+		lubri -= 1
+		lubonus += RAND(1, 5)
+	end
+
+	if anus + lubonus + 5 < dick2:
+		if agape < 3:
+			agape = 3
+		end
+
+		agapetime = totminut
+		DPass = 2
+	end
+
+	if anus + lubonus < dick2 and anus + lubonus + 5 >= dick2:
+		if agape = 2:
+			agape = 3
+		end
+
+		if agape < 2:
+			agape = 2
+		end
+
+		agapetime = totminut
+		DPass = 1
+	end
+
+	if anus + lubonus >= dick2:
+		if agape = 2:
+			agape = 3
+		end
+
+		if agape = 1:
+			agape = 2
+		end
+
+		if agape < 1:
+			agape = 1
+		end
+
+		agapetime = totminut
+		DPass = 0
+	end
+
+	if mesec > 0:
+		!periods, orgasm is not possible
+		set horny = 0
+		set manna -= 10
+		set willpower -= 10
+		'Do you monthly and you do not hurt until nice and <<dick>> inch dick rams your vagina bleeding. At the same time you like your chustvuete <<$anustipe>> ass fucks the second term -long <<dick2>> centimeters.'
+	end
+
+	totPAIN = DPvag + DPass + (agape - 1) + (vgape - 1)
+
+	if totPAIN = 0:
+		'Feelings merge together when you move inside two members in contact with each other through a thin stenochku share your vagina filled <<dick>> centimeter and a member of your <<$anustipe>> anus filled <<dick2>> centimeter member. Abdomen burns pleasant light spreading heat throughout the body.'
+		bonusManna= (manna * 100) / mannamax
+		DPplus = (vaginalOrgasm * 10) + horny + bonusManna
+		DPminus = rand(250, 350)
+
+		if DPplus > DPminus:
+			vaginalOrgasm += 1
+			DPorgasm += 1
+			orgasm += 1
+			manna = mannamax
+			horny = 0
+			'Suddenly you covered orgasm and you do not remember myself moan and scream until your muscles are reduced frantically around two members of the inside of your body.'
+		end
+	end
+
+	if totPAIN = 1:
+		'Feelings merge together when you move inside two members in contact with each other through a thin stenochku share your vagina filled <<dick>> centimeter and a member of your <<$anustipe>> anus filled <<dick2>> centimeter member. hurt a little, but still very nice chustvovat all the free holes are filled by members.'
+	end
+
+	if totPAIN = 2:
+		horny /= 2
+		manna /= 2
+		'You chustvuete themselves so, as if that`s just about ready to burst from overflowing when you move inside two members in contact with each other through a thin stenochku share your vagina filled <<dick>> centimeter and a member of your <<$anustipe>> anus filled <<dick2>> centimeter member. Feeling very strange, in a tangle of mixed pain, pleasure and painful overcrowding.'
+	end
+
+	if totPAIN = 3:
+		manna /= 4
+		horny /= 4
+
+		if mop > 1:
+			set mop = 0
+		end
+
+		'You hurt and sometimes sharp bursts of pain makes you groan when you move inside two members in contact with each other through a thin stenochku share your vagina filled <<dick>> centimeter and a member of your <<$anustipe>> anus filled <<dick2>> centimeter member. You chustvuete itself ready to burst, your ass and pussy feels merged into one pretty painful lump. Your eyes are not arbitrarily veiled veil of tears.'
+	end
+
+	if totPAIN >= 4:
+		manna = 0
+		horny = 0
+		willpower = willpower / 2
+
+		if mop > 1:
+			set mop = 0
+		end
+
+		'You squeals and tears stream pouring out of your eyes from the terrible pain, your entire abdomen and the priest gives a sharp pain while you fuck <<$boy>> her vagina <<dick>> centimeter and a member of the <<$boy2>> almost tearing your <<$anustipe>> his anus <<dick2>> centimeter instrument.'
+	end
+
+	if vagina < dick:
+		vagina += 1
+	end
+
+	if anus < dick2:
+		anus += 1
+	end
+
+	!sex+=1
+	gs'stat'
+}

locations/483_npc

@@ -0,0 +1,149 @@
+i = NPCnow
+:markgenernpc
+i += 1
+!power and moral qualities
+
+slut[i] = 0
+
+musle[i] = RAND(25, 100)
+flex[i] = RAND(25, 80)
+stamina[i] = RAND(200, 300)
+wipo[i] = RAND(30, 60)
+!equipment
+Bteh[i] = RAND(0, 100)
+Uteh[i] = RAND(0, 100)
+Zteh[i] = RAND(0, 100)
+
+if i = 2:
+	musle[i] = 200
+	flex[i] = 100
+	stamina[i] = 300
+	wipo[i] = 100
+	!equipment
+	Bteh[i] += 200
+	Uteh[i] += 200
+	Zteh[i] += 200
+end
+
+if i = 10:
+	musle[i] += 50
+	wipo[i] += 30
+end
+
+if i = 15:
+	musle[i] += 30
+	flex[i] += 40
+	stamina[i] += 100
+	wipo[i] += 20
+	!equipment
+	Bteh[i] += 20
+	Uteh[i] += 20
+	Zteh[i] += 20
+end
+
+if i = 32:
+	musle[i] += 100
+	flex[i] += 100
+end
+
+if i = 36:
+	flex[i] += 100
+end
+
+if i = 51:
+	Bteh[i] += 100
+	Uteh[i] += 100
+	Zteh[i] += 100
+end
+
+if i = 52:
+	stamina[i] += 300
+	wipo[i] += 60
+end
+
+if i = 60:
+	musle[i] += 200
+	wipo[i] += 40
+end
+
+if i = 78:
+	flex[i] += 50
+	wipo[i] += 30
+end
+
+if i = 100:
+	musle[i] += 100
+	flex[i] += 100
+	stamina[i] += 200
+	wipo[i] += 30
+	!equipment
+	Bteh[i] += 100
+	Uteh[i] += 100
+	Zteh[i] += 100
+end
+
+if i = 107:
+	musle[i] += 10
+	flex[i] += 10
+	stamina[i] += 100
+	wipo[i] += 100
+end
+
+if i = 123:
+	flex[i] += 100
+	stamina[i] += 100
+	wipo[i] += 30
+end
+
+if i = 137:
+	musle[i] += 70
+	wipo[i] += 20
+end
+
+if i = 170:
+	musle[i] += 100
+	stamina[i] += 100
+	wipo[i] += 30
+end
+
+if i = 235:
+	Bteh[i] += 100
+	Uteh[i] += 100
+	Zteh[i] += 100
+end
+
+if i = 236:
+	flex[i] += 60
+	stamina[i] += 100
+	wipo[i] += 20
+end
+
+if i = 255:
+	musle[i] += 30
+	flex[i] += 30
+	stamina[i] += 100
+	wipo[i] += 60
+	!equipment
+	Bteh[i] += 400
+	Uteh[i] += 400
+	Zteh[i] += 400
+end
+
+if i = 265:
+	musle[i] += 100
+	flex[i] += 100
+	stamina[i] += 150
+	wipo[i] += 80
+	!equipment
+	Bteh[i] += 60
+	Uteh[i] += 60
+	Zteh[i] += 60
+end
+
+irand = i
+
+gs'namer'
+
+if i < NPCnum:
+	jump'markgenernpc'
+end

locations/484_namer

@@ -0,0 +1,1319 @@
+!irand=RAND(2, 100)
+
+if irand=2:
+	$nikname[i] = 'Sid Blekovich'
+end
+
+if irand=3:
+	$nikname[i] = 'The same'
+end
+
+if irand=4:
+	$nikname[i] = 'Shard of Happiness'
+end
+
+if irand=5:
+	$nikname[i] = 'prikolistka'
+end
+
+if irand=6:
+	$nikname[i] = 'damned_wretch'
+end
+
+if irand=7:
+	$nikname[i] = 'surprise'
+end
+
+if irand=8:
+	$nikname[i] = 'angel'
+end
+
+if irand=9:
+	$nikname[i] = 'diva'
+end
+
+if irand=10:
+	$nikname[i] = 'puzzle'
+end
+
+if irand=11:
+	$nikname[i] = 'rainbow'
+end
+
+if irand=12:
+	$nikname[i] = 'ocharovashka'
+end
+
+if irand=13:
+	$nikname[i] = 'Zaya'
+end
+
+if irand=14:
+	$nikname[i] = 'vredina'
+end
+
+if irand=15:
+	$nikname[i] = 'hooligan'
+end
+
+if irand=16:
+	$nikname[i] = 'Shady Layden'
+end
+
+if irand=17:
+	$nikname[i] = 'Lucy'
+end
+
+if irand=18:
+	$nikname[i] = 'shooting star'
+end
+
+if irand=19:
+	$nikname[i] = 'princess'
+end
+
+if irand=20:
+	$nikname[i] = 'summer'
+end
+
+if irand=21:
+	$nikname[i] = 'bunting'
+end
+
+if irand=22:
+	$nikname[i] = 'shocking'
+end
+
+if irand=23:
+	$nikname[i] = 'Saharok'
+end
+
+if irand=24:
+	$nikname[i] = 'Marmeladka'
+end
+
+if irand=25:
+	$nikname[i] = 'rogue'
+end
+
+if irand=26:
+	$nikname[i] = 'Kitty'
+end
+
+if irand=27:
+	$nikname[i] = 'chocolate'
+end
+
+if irand=28:
+	$nikname[i] = 'Knop'
+end
+
+if irand=29:
+	$nikname[i] = 'Barbie'
+end
+
+if irand=30:
+	$nikname[i] = 'spring'
+end
+
+if irand=31:
+	$nikname[i] = 'Bambi'
+end
+
+if irand=32:
+	$nikname[i] = 'tigress'
+end
+
+if irand=33:
+	$nikname[i] = 'dragonfly'
+end
+
+if irand=34:
+	$nikname[i] = 'Carmen'
+end
+
+if irand=35:
+	$nikname[i] = 'melody'
+end
+
+if irand=36:
+	$nikname[i] = 'black Mamba'
+end
+
+if irand=37:
+	$nikname[i] = 'second'
+end
+
+if irand=38:
+	$nikname[i] = 'dream'
+end
+
+if irand=39:
+	$nikname[i] = 'Indira'
+end
+
+if irand=40:
+	$nikname[i] = 'conflict'
+end
+
+if irand=41:
+	$nikname[i] = 'cat'
+end
+
+if irand=42:
+	$nikname[i] = 'bead'
+end
+
+if irand=43:
+	$nikname[i] = 'snowflake'
+end
+
+if irand=44:
+	$nikname[i] = 'Dejavu'
+end
+
+if irand=45:
+	$nikname[i] = 'SFA-Murka'
+end
+
+if irand=46:
+	$nikname[i] = 'wally'
+end
+
+if irand=47:
+	$nikname[i] = 'Amelie'
+end
+
+if irand=48:
+	$nikname[i] = 'fairy'
+end
+
+if irand=49:
+	$nikname[i] = 'moon'
+end
+
+if irand=50:
+	$nikname[i] = 'Nochka'
+end
+
+if irand=51:
+	$nikname[i] = 'rebel'
+end
+
+if irand=52:
+	$nikname[i] = 'zamorochka'
+end
+
+if irand=53:
+	$nikname[i] = 'Laffka'
+end
+
+if irand=54:
+	$nikname[i] = 'lady'
+end
+
+if irand=55:
+	$nikname[i] = 'Buttons'
+end
+
+if irand=56:
+	$nikname[i] = 'ice'
+end
+
+if irand=57:
+	$nikname[i] = 'imp'
+end
+
+if irand=58:
+	$nikname[i] = 'calypso'
+end
+
+if irand=59:
+	$nikname[i] = 'caprice'
+end
+
+if irand=60:
+	$nikname[i] = 'enema Karlovna'
+end
+
+if irand=61:
+	$nikname[i] = 'cobra'
+end
+
+if irand=62:
+	$nikname[i] = 'sweetie'
+end
+
+if irand=63:
+	$nikname[i] = 'Kysya'
+end
+
+if irand=64:
+	$nikname[i] = 'lagoon'
+end
+
+if irand=65:
+	$nikname[i] = 'Laletta'
+end
+
+if irand=66:
+	$nikname[i] = 'ocean'
+end
+
+if irand=67:
+	$nikname[i] = 'vamp'
+end
+
+if irand=68:
+	$nikname[i] = 'dark'
+end
+
+if irand=69:
+	$nikname[i] = 'legend'
+end
+
+if irand=70:
+	$nikname[i] = 'Lorelei'
+end
+
+if irand=71:
+	$nikname[i] = 'Foxy'
+end
+
+if irand=72:
+	$nikname[i] = 'young_lion'
+end
+
+if irand=73:
+	$nikname[i] = 'luxury'
+end
+
+if irand=74:
+	$nikname[i] = 'era'
+end
+
+if irand=75:
+	$nikname[i] = 'shrew'
+end
+
+if irand=76:
+	$nikname[i] = 'Brunnhilde'
+end
+
+if irand=77:
+	$nikname[i] = 'manyachka'
+end
+
+if irand=78:
+	$nikname[i] = 'Hella Gelot'
+end
+
+if irand=79:
+	$nikname[i] = 'Medea'
+end
+
+if irand=80:
+	$nikname[i] = 'Vega'
+end
+
+if irand=81:
+	$nikname[i] = 'Vivian Undo'
+end
+
+if irand=82:
+	$nikname[i] = 'Magari'
+end
+
+if irand=83:
+	$nikname[i] = 'Skyler'
+end
+
+if irand=84:
+	$nikname[i] = 'Frau Barracuda'
+end
+
+if irand=85:
+	$nikname[i] = 'Kakunov'
+end
+
+if irand=86:
+	$nikname[i] = 'Pandora`s box'
+end
+
+if irand=87:
+	$nikname[i] = 'The Black Widow'
+end
+
+if irand=88:
+	$nikname[i] = 'Yunibra'
+end
+
+if irand=89:
+	$nikname[i] = 'Fraulein Farbisianna'
+end
+
+if irand=90:
+	$nikname[i] = 'viper'
+end
+
+if irand=91:
+	$nikname[i] = 'sun'
+end
+
+if irand=92:
+	$nikname[i] = 'fox'
+end
+
+if irand=93:
+	$nikname[i] = 'nymph'
+end
+
+if irand=94:
+	$nikname[i] = 'steel'
+end
+
+if irand=95:
+	$nikname[i] = 'Fa la la'
+end
+
+if irand=96:
+	$nikname[i] = 'Daniel Ankaran'
+end
+
+if irand=97:
+	$nikname[i] = 'babe'
+end
+
+if irand=98:
+	$nikname[i] = 'bomb'
+end
+
+if irand=99:
+	$nikname[i] = 'viola'
+end
+
+if irand=100:
+	$nikname[i] = 'Poyson'
+end
+
+
+
+if irand=101:
+	$nikname[i] = 'Shiz'
+end
+
+if irand=102:
+	$nikname[i] = 'Kukaryamba'
+end
+
+if irand=103:
+	$nikname[i] = 'Tobacco'
+end
+
+if irand=104:
+	$nikname[i] = 'Kapitolka'
+end
+
+if irand=105:
+	$nikname[i] = 'heron'
+end
+
+if irand=106:
+	$nikname[i] = 'princess'
+end
+
+if irand=107:
+	$nikname[i] = 'domino'
+end
+
+if irand=108:
+	$nikname[i] = 'Tyapa'
+end
+
+if irand=109:
+	$nikname[i] = 'hedgehog'
+end
+
+if irand=110:
+	$nikname[i] = 'thorn'
+end
+
+if irand=111:
+	$nikname[i] = 'nut'
+end
+
+if irand=112:
+	$nikname[i] = 'Zara'
+end
+
+if irand=113:
+	$nikname[i] = 'Jussi'
+end
+
+if irand=114:
+	$nikname[i] = 'arrow'
+end
+
+if irand=115:
+	$nikname[i] = 'twilight'
+end
+
+if irand=116:
+	$nikname[i] = 'black beast'
+end
+
+if irand=117:
+	$nikname[i] = 'Vectra'
+end
+
+if irand=118:
+	$nikname[i] = 'Extreme'
+end
+
+if irand=119:
+	$nikname[i] = 'Crazy'
+end
+
+if irand=120:
+	$nikname[i] = 'mixer'
+end
+
+if irand=121:
+	$nikname[i] = 'Midnight'
+end
+
+if irand=122:
+	$nikname[i] = 'Tantsorsha'
+end
+
+if irand=123:
+	$nikname[i] = 'gymnast'
+end
+
+if irand=124:
+	$nikname[i] = 'Gerda'
+end
+
+if irand=125:
+	$nikname[i] = 'mini'
+end
+
+if irand=126:
+	$nikname[i] = 'Verona'
+end
+
+if irand=127:
+	$nikname[i] = 'Klepa'
+end
+
+if irand=128:
+	$nikname[i] = 'Wadjet'
+end
+
+if irand=129:
+	$nikname[i] = 'maya'
+end
+
+if irand=130:
+	$nikname[i] = 'Selene'
+end
+
+if irand=131:
+	$nikname[i] = 'Rhea'
+end
+
+if irand=132:
+	$nikname[i] = 'Nuth'
+end
+
+if irand=133:
+	$nikname[i] = 'Loy'
+end
+
+if irand=134:
+	$nikname[i] = 'ha ha'
+end
+
+if irand=135:
+	$nikname[i] = 'breeze'
+end
+
+if irand=136:
+	$nikname[i] = 'shadow'
+end
+
+if irand=137:
+	$nikname[i] = 'She_Wolf'
+end
+
+if irand=138:
+	$nikname[i] = 'muskrat'
+end
+
+if irand=139:
+	$nikname[i] = 'Catan'
+end
+
+if irand=140:
+	$nikname[i] = 'avalanche'
+end
+
+if irand=141:
+	$nikname[i] = 'Chernosnezhka'
+end
+
+if irand=142:
+	$nikname[i] = 'ballerina'
+end
+
+if irand=143:
+	$nikname[i] = 'Wild Cat'
+end
+
+if irand=144:
+	$nikname[i] = 'el terrible of'
+end
+
+if irand=145:
+	$nikname[i] = 'infanta'
+end
+
+if irand=146:
+	$nikname[i] = 'Lissa Be-spendthrift'
+end
+
+if irand=147:
+	$nikname[i] = 'Gagalu'
+end
+
+if irand=148:
+	$nikname[i] = 'Moonshine_Township'
+end
+
+if irand=149:
+	$nikname[i] = 'Gingemma'
+end
+
+if irand=150:
+	$nikname[i] = 'Belfeba'
+end
+
+if irand=151:
+	$nikname[i] = 'Karkalyga'
+end
+
+if irand=152:
+	$nikname[i] = 'Shayzi'
+end
+
+if irand=153:
+	$nikname[i] = 'Pledovka'
+end
+
+if irand=154:
+	$nikname[i] = 'ruler'
+end
+
+if irand=155:
+	$nikname[i] = 'fuzz'
+end
+
+if irand=156:
+	$nikname[i] = 'harpy'
+end
+
+if irand=157:
+	$nikname[i] = 'Chuchundra'
+end
+
+if irand=158:
+	$nikname[i] = 'spider'
+end
+
+if irand=159:
+	$nikname[i] = 'baggage'
+end
+
+if irand=160:
+	$nikname[i] = 'Dvuhstvolka'
+end
+
+if irand=161:
+	$nikname[i] = 'tomboy'
+end
+
+if irand=162:
+	$nikname[i] = 'taiga'
+end
+
+if irand=163:
+	$nikname[i] = 'Mistress Belladonna'
+end
+
+if irand=164:
+	$nikname[i] = 'Asia'
+end
+
+if irand=165:
+	$nikname[i] = 'Split Sky'
+end
+
+if irand=166:
+	$nikname[i] = 'JUST Mi'
+end
+
+if irand=167:
+	$nikname[i] = 'Miss Bainbridge'
+end
+
+if irand=168:
+	$nikname[i] = 'jazz'
+end
+
+if irand=169:
+	$nikname[i] = 'Dilishes'
+end
+
+if irand=170:
+	$nikname[i] = 'big Momma'
+end
+
+if irand=171:
+	$nikname[i] = 'Defiance'
+end
+
+if irand=172:
+	$nikname[i] = 'Iron Blonde'
+end
+
+if irand=173:
+	$nikname[i] = 'geisha'
+end
+
+if irand=174:
+	$nikname[i] = 'lily_of_the_valley'
+end
+
+if irand=175:
+	$nikname[i] = 'Vortex'
+end
+
+if irand=176:
+	$nikname[i] = 'Cruella DeVill'
+end
+
+if irand=177:
+	$nikname[i] = 'cyclist'
+end
+
+if irand=178:
+	$nikname[i] = 'Ragnarok'
+end
+
+if irand=179:
+	$nikname[i] = 'lady Dragon'
+end
+
+if irand=180:
+	$nikname[i] = 'Flora'
+end
+
+if irand=181:
+	$nikname[i] = 'boorish'
+end
+
+if irand=182:
+	$nikname[i] = 'chaos'
+end
+
+if irand=183:
+	$nikname[i] = 'lamp'
+end
+
+if irand=184:
+	$nikname[i] = 'predator'
+end
+
+if irand=185:
+	$nikname[i] = 'The April moon'
+end
+
+if irand=186:
+	$nikname[i] = 'black Star'
+end
+
+if irand=187:
+	$nikname[i] = 'shrapnel'
+end
+
+if irand=188:
+	$nikname[i] = 'euphoria'
+end
+
+if irand=189:
+	$nikname[i] = 'Electra'
+end
+
+if irand=190:
+	$nikname[i] = 'ogress'
+end
+
+if irand=191:
+	$nikname[i] = 'Nutty'
+end
+
+if irand=192:
+	$nikname[i] = 'fantasy'
+end
+
+if irand=193:
+	$nikname[i] = 'short_story'
+end
+
+if irand=194:
+	$nikname[i] = 'Snow'
+end
+
+if irand=195:
+	$nikname[i] = 'Sinister'
+end
+
+if irand=196:
+	$nikname[i] = 'crumb'
+end
+
+if irand=197:
+	$nikname[i] = 'melons'
+end
+
+if irand=198:
+	$nikname[i] = 'Lolita'
+end
+
+if irand=199:
+	$nikname[i] = 'wagtail'
+end
+
+if irand=200:
+	$nikname[i] = 'Fairy_Tale'
+end
+
+if irand=201:
+	$nikname[i] = 'branch'
+end
+
+if irand=202:
+	$nikname[i] = 'heart of the Ocean'
+end
+
+if irand=203:
+	$nikname[i] = 'fallen Angel'
+end
+
+if irand=204:
+	$nikname[i] = 'Medvedka'
+end
+
+if irand=205:
+	$nikname[i] = 'explosion'
+end
+
+if irand=206:
+	$nikname[i] = 'Whack'
+end
+
+if irand=207:
+	$nikname[i] = 'sinner'
+end
+
+if irand=208:
+	$nikname[i] = 'keeper'
+end
+
+if irand=209:
+	$nikname[i] = 'mistress of Death'
+end
+
+if irand=210:
+	$nikname[i] = 'pathos'
+end
+
+if irand=211:
+	$nikname[i] = 'Ston Falls'
+end
+
+if irand=212:
+	$nikname[i] = 'Lost'
+end
+
+if irand=213:
+	$nikname[i] = 'mustard'
+end
+
+if irand=214:
+	$nikname[i] = 'hysterics'
+end
+
+if irand=215:
+	$nikname[i] = 'Lenore'
+end
+
+if irand=216:
+	$nikname[i] = 'Tumanik'
+end
+
+if irand=217:
+	$nikname[i] = 'Grand lady'
+end
+
+if irand=218:
+	$nikname[i] = 'Fanny Hill'
+end
+
+if irand=219:
+	$nikname[i] = 'Nosolomka'
+end
+
+if irand=220:
+	$nikname[i] = 'Basta'
+end
+
+if irand=221:
+	$nikname[i] = 'milk'
+end
+
+if irand=222:
+	$nikname[i] = 'granny'
+end
+
+if irand=223:
+	$nikname[i] = 'The old lady Flo'
+end
+
+if irand=224:
+	$nikname[i] = 'magpie'
+end
+
+if irand=225:
+	$nikname[i] = 'icicle'
+end
+
+if irand=226:
+	$nikname[i] = 'meridian'
+end
+
+if irand=227:
+	$nikname[i] = 'module'
+end
+
+if irand=228:
+	$nikname[i] = 'Strekotusha'
+end
+
+if irand=229:
+	$nikname[i] = 'Azazel'
+end
+
+if irand=230:
+	$nikname[i] = 'Gabriella'
+end
+
+if irand=231:
+	$nikname[i] = 'tiara'
+end
+
+if irand=232:
+	$nikname[i] = 'huntsman'
+end
+
+if irand=233:
+	$nikname[i] = 'dream'
+end
+
+if irand=234:
+	$nikname[i] = 'supernova'
+end
+
+if irand=235:
+	$nikname[i] = 'Karnedzh'
+end
+
+if irand=236:
+	$nikname[i] = 'blackout'
+end
+
+if irand=237:
+	$nikname[i] = 'schoolgirl'
+end
+
+if irand=238:
+	$nikname[i] = 'Kasia'
+end
+
+if irand=239:
+	$nikname[i] = 'Caprice Night'
+end
+
+if irand=240:
+	$nikname[i] = 'Tomboy'
+end
+
+if irand=241:
+	$nikname[i] = 'Wild Horse'
+end
+
+if irand=242:
+	$nikname[i] = 'sweetheart'
+end
+
+if irand=243:
+	$nikname[i] = 'splinter'
+end
+
+if irand=244:
+	$nikname[i] = 'log'
+end
+
+if irand=245:
+	$nikname[i] = 'gymnast'
+end
+
+if irand=246:
+	$nikname[i] = 'Zhep Ebrilo'
+end
+
+if irand=247:
+	$nikname[i] = 'Hearts Spades'
+end
+
+if irand=248:
+	$nikname[i] = 'Heartbreakers'
+end
+
+if irand=249:
+	$nikname[i] = 'Roxy Devine'
+end
+
+if irand=250:
+	$nikname[i] = 'The worst'
+end
+
+if irand=251:
+	$nikname[i] = 'arrow'
+end
+
+if irand=252:
+	$nikname[i] = 'bully'
+end
+
+if irand=253:
+	$nikname[i] = 'emerald'
+end
+
+if irand=254:
+	$nikname[i] = 'Rosalind'
+end
+
+if irand=255:
+	$nikname[i] = 'Bounty hunter'
+end
+
+if irand=256:
+	$nikname[i] = 'The coolest'
+end
+
+if irand=257:
+	$nikname[i] = 'doublet'
+end
+
+if irand=258:
+	$nikname[i] = 'secretary Lulu'
+end
+
+if irand=259:
+	$nikname[i] = 'officer Sandy'
+end
+
+if irand=260:
+	$nikname[i] = 'water dancer'
+end
+
+if irand=261:
+	$nikname[i] = 'chess_player'
+end
+
+if irand=262:
+	$nikname[i] = 'Sportwoman'
+end
+
+if irand=263:
+	$nikname[i] = 'Miss January'
+end
+
+if irand=264:
+	$nikname[i] = 'Beretta'
+end
+
+if irand=265:
+	$nikname[i] = 'Preacher`s daughter'
+end
+
+if irand=266:
+	$nikname[i] = 'la Guerra'
+end
+
+if irand=267:
+	$nikname[i] = 'amazing'
+end
+
+if irand=268:
+	$nikname[i] = 'Koalmayner'
+end
+
+if irand=269:
+	$nikname[i] = 'Brown Sugar'
+end
+
+if irand=270:
+	$nikname[i] = 'Stilhand'
+end
+
+if irand=271:
+	$nikname[i] = 'Honey Girl'
+end
+
+if irand=272:
+	$nikname[i] = 'islander'
+end
+
+if irand=273:
+	$nikname[i] = 'La Poeta del Ring'
+end
+
+if irand=274:
+	$nikname[i] = 'Mary Jo Sanders'
+end
+
+if irand=275:
+	$nikname[i] = 'pupa'
+end
+
+if irand=276:
+	$nikname[i] = 'bee Sting'
+end
+
+if irand=277:
+	$nikname[i] = 'lady daisy'
+end
+
+if irand=278:
+	$nikname[i] = 'Fury'
+end
+
+if irand=279:
+	$nikname[i] = 'A Matador'
+end
+
+if irand=280:
+	$nikname[i] = 'Mary Sue'
+end
+
+if irand=281:
+	$nikname[i] = 'la Maravilla'
+end
+
+if irand=282:
+	$nikname[i] = 'Sarah Rosenblum'
+end
+
+if irand=283:
+	$nikname[i] = 'Parazitka'
+end
+
+if irand=284:
+	$nikname[i] = 'heat'
+end
+
+if irand=285:
+	$nikname[i] = 'Meydzhik'
+end
+
+if irand=286:
+	$nikname[i] = 'stealth Bomber'
+end
+
+if irand=287:
+	$nikname[i] = 'phrase'
+end
+
+if irand=288:
+	$nikname[i] = 'Alcorn'
+end
+
+if irand=289:
+	$nikname[i] = 'Smoker'
+end
+
+if irand=290:
+	$nikname[i] = 'El Dynamite'
+end
+
+if irand=291:
+	$nikname[i] = 'Anna Pascal'
+end
+
+if irand=292:
+	$nikname[i] = 'Panama'
+end
+
+if irand=293:
+	$nikname[i] = 'bird Tracy'
+end
+
+if irand=294:
+	$nikname[i] = 'Knizhnitsa'
+end
+
+if irand=295:
+	$nikname[i] = 'bluestocking'
+end
+
+if irand=296:
+	$nikname[i] = 'canteen-keeper'
+end
+
+if irand=297:
+	$nikname[i] = 'Baroness Meredith DeKavalkal'
+end
+
+if irand=298:
+	$nikname[i] = 'warrior'
+end
+
+if irand=299:
+	$nikname[i] = 'killer'
+end
+
+if irand=300:
+	$nikname[i] = 'Capitol Hill'
+end
+
+if irand=301:
+	$nikname[i] = ''
+end
+
+if irand=302:
+	$nikname[i] = ''
+end
+
+if irand=303:
+	$nikname[i] = ''
+end
+
+if irand=304:
+	$nikname[i] = ''
+end
+
+if irand=305:
+	$nikname[i] = ''
+end
+
+if irand=306:
+	$nikname[i] = ''
+end
+
+if irand=307:
+	$nikname[i] = ''
+end
+
+if irand=308:
+	$nikname[i] = ''
+end
+
+if irand=309:
+	$nikname[i] = ''
+end
+
+if irand=310:
+	$nikname[i] = ''
+end
+
+if irand=311:
+	$nikname[i] = ''
+end
+
+if irand=312:
+	$nikname[i] = ''
+end
+
+if irand=313:
+	$nikname[i] = ''
+end
+
+if irand=314:
+	$nikname[i] = ''
+end
+
+if irand=315:
+	$nikname[i] = ''
+end
+
+if irand=316:
+	$nikname[i] = ''
+end
+
+if irand=317:
+	$nikname[i] = ''
+end
+
+if irand=318:
+	$nikname[i] = ''
+end
+
+if irand=319:
+	$nikname[i] = ''
+end
+
+if irand=320:
+	$nikname[i] = ''
+end
+
+if irand=321:
+	$nikname[i] = ''
+end
+
+if irand=322:
+	$nikname[i] = ''
+end
+
+if irand=323:
+	$nikname[i] = ''
+end
+
+if irand=324:
+	$nikname[i] = ''
+end
+
+if irand=325:
+	$nikname[i] = ''
+end
+
+if irand=326:
+	$nikname[i] = ''
+end
+
+if irand=327:
+	$nikname[i] = ''
+end
+
+if irand=328:
+	$nikname[i] = ''
+end
+
+if irand=329:
+	$nikname[i] = ''
+end
+
+if irand=330:
+	$nikname[i] = ''
+end

locations/485_generation

@@ -0,0 +1,28 @@
+y = 0
+:markmonthfightx
+y += 1
+:markturnirotbory
+x = 0
+:markturnirotborz
+x += 1
+turnirFighter[x] = RAND(2, NPCrost)
+
+if x < 2:
+	jump'markturnirotborz'
+end
+
+if turnirFighter[1] = turnirFighter[2]:
+	jump'markturnirotbory'
+end
+
+a = turnirFighter[1]
+i = turnirFighter[2]
+
+gs 'Autofight'
+
+turnirFighter[1] = 0
+turnirFighter[2] = 0
+
+if y < 20:
+	jump'markmonthfightx'
+end

locations/486_autofight

@@ -0,0 +1,167 @@
+if Formula = 0:
+	Formula=3
+end
+$endurdin = {
+	Ken= (musle / 100) * Kus / 100
+
+	if ken <= 0:
+		ken = 1
+	end
+
+	Kene = (musle[i] / 100) * Kuse / 100
+
+	if kene <= 0:
+		kene = 1
+	end
+
+	KoefUder = rand(Uder * 20 / 100, Uder)
+	KoefUderE = rand(Udere * 20 / 100, Udere)
+	KoefBros = rand(Brosok * 20 / 100, Brosok)
+	KoefBrosE = rand(Brosoke * 20 / 100, Brosoke)
+	KoefProt = rand(Zash * 20 / 100, Zash)
+	KoefProtE = rand(Zashe * 20 / 100, Zashe)
+}
+
+$uderdin = {
+	Kus = 5
+	Kuse = 10
+	dynamic $endurdin
+	endur -= ken
+	endurE -= kene
+	Aktiv = (strenw / 2) + agilw + rand(0, lustw) + KoefUder
+	Aktiv = Aktiv * endur / endurMax
+	Passiv = (((strenwE + (agilwE / 2)) * koefE) / 100) + rand (0, lustwE) + KoefProtE
+	Passiv = Passiv * endurE / endurMaxE
+}
+
+$uderdinE = {
+	Kus = 10
+	Kuse = 5
+	dynamic $endurdin
+	endur -= ken
+	endurE -= kene
+	Aktiv = (strenwE / 2) + agilwE + rand(0, lustwE) + KoefUdere
+	Aktiv = Aktiv * endurE / endurMaxE
+	Passiv = (((strenw + (agilw / 2)) * koef) / 100) + rand(0, lustw) + KoefProt
+	Passiv = Passiv * endur / endurMaxE
+}
+
+$brosdin = {
+	Kus = 10
+	Kuse = 10
+	dynamic $endurdin
+	endur -= ken
+	endurE -= kene
+	Aktiv = strenw + (agilw / 2) + rand(0, lustw) + KoefBros
+	Aktiv = Aktiv * endur / endurMax
+	Passiv = (((strenwE / 2) + agilwE) * koefE / 100) + rand(0, lustwE) + KoefProtE
+	Passiv = Passiv * endurE / endurMaxE
+}
+
+$brosdinE = {
+	Kus = 10
+	Kuse = 10
+	dynamic $endurdin
+	endur -= ken
+	endurE -= kene
+	Aktiv = strenwE + (agilwE / 2) + rand(0, lustwE) + KoefBrosE
+	Aktiv = Aktiv * endurE / endurMaxE
+	Passiv = (((strenw / 2) + agilw) * koef / 100) + rand(0, lustw) + KoefProt
+	Passiv = Passiv * endur / endurMax
+}
+
+!power, throws
+!flexibility, protection, 
+!speed, initiative
+!equipment, 
+!endurance
+a = 1
+point = 0
+pointE = 0
+$nameE = $nikname[i]
+$nameA = $nikname[a]
+strenw = musle[1] / 10
+strenwE = musle[i] / 10
+agilw = flex[1] / 10
+agilwE = flex[i] / 10
+lustMax = wipo[1]
+lustMaxE = wipo[i]
+lustw = lustMax
+lustwe = lustMaxe
+Brosok = Bteh[1] / 10
+BrosokE = Bteh[i] / 10
+Uder = Uteh[1] / 10
+Udere = Uteh[i] / 10
+Zash = Zteh[1] / 10
+Zashe = Zteh[i] / 10
+
+resultFight = 0
+endurMax = stamina[1] / 10
+endurMaxE = stamina[i] / 10
+endur = endurMax
+endurE = endurMaxE
+croonce = 0
+round = 1
+rMin = 8
+stoper = 0
+
+Ku = 0
+Kb = 0
+Kz = 0
+KuE =0
+KbE= 0
+KzE = 0
+!minus the endurance of fat
+!force depends on the endurance
+!speed depends on the endurance
+
+if Formula = 0:
+	Formula = 3
+end
+
+'<center><b>before round</b></center>'
+'<center><img src="images/pic/fight/bef.jpg" ></center>'
+'you and <<$nameE>> greeted each other.'
+'Referee required to start a fight on his hands.'
+!picture
+
+act 'Fight on his hands':
+	cls
+	!picture
+	'<center><img src="pic/fight/arm.jpg" ></center>'
+
+	if strenw > strenwE:
+		point += 1
+		lustw += 1
+		$text = 'Stand your opponent on all fours, and you catch him from behind.'
+		'You won the fight on his hands.'
+		crouch = 1
+	end
+
+	if strenw < strenwE:
+		pointE += 1
+		lustwE += 1
+		$text = 'You get up on all fours, and your opponent to catch him from behind.'
+		'You lost the battle on his hands.'
+		crouch = 0
+	end
+
+	if strenw = strenwE:
+		'Quest on hand ended in a draw. The referee tossed the coin, that would determine the winner.'
+		varrand = rand(0, 1)
+
+		if varrand = 0:
+			crouch = 1 & $text = 'Stand your opponent on all fours, and you catch him from behind.'
+		end
+
+		if varrand = 1:
+			crouch = 0 & $text = 'You get up on all fours, and your opponent to catch him from behind.'
+		end
+	end
+
+	'Refferi stopped you and commanded <<$text>>'
+
+	act 'Follow the instructions referees':
+		gt 'FightCrouch'
+	end
+end

locations/487_fightcrouch

@@ -0,0 +1,149 @@
+!rMin-=1
+
+gs 'fightStat'
+
+stoper = 0
+'<center><img src="pic/fight/cro.jpg" ></center>'
+
+if crouch = 1:
+	enrand = RAND(0, 1)
+
+	if enrand=0:
+		$text='<<$nameE>> prizhimetsya to the floor'
+	end
+
+	if enrand=1:
+		$text='<<$nameE>> trying to roll over on his back'
+	end
+
+	if enrand=2:
+		$text='<<$nameE>> tries to counter roll'
+	end
+
+	<<$nameE>> is on all fours in front of you.'
+
+	act 'produce cast':
+		cls
+		endur -= 2
+		'You are trying to make a throw. <<$text>>'
+
+		if enrand = 0:
+			pointE += 1
+			'<center><img src="pic/fight/cron.jpg" ></center>'
+			'Opponent managed pressed to the floor and you can not perform a roll.'
+
+			act '...':
+				gt'fightfw'
+			end
+		end
+
+		if enrand = 1:
+			point += 2
+			endurE -= 1
+			'<center><img src="pic/fight/crob.jpg" ></center>'
+			'You have intercepted an attempt to rival roll over and roll performed.' 
+
+			act '...':
+				gt'fight1'
+			end
+		end
+	end
+
+	act 'Make an attempt to hold':
+		cls
+		endur -= 1
+		'You are attempting to hold. <<$text>>'
+
+		if enrand = 0:
+			point += 1
+			'<center><img src="pic/fight/crou.jpg" ></center>'
+			'Opponent is pressed to the floor and you will easily manage to fix it.'
+
+			act '...':
+				gt'fight2'
+			end
+		end
+
+		if enrand = 1:
+			pointE += 1
+			endurE -= 1
+			'<center><img src="pic/fight/cronu.jpg" ></center>'
+			'Opponent flipped onto his back did not hold you to spend dvavaya.' 
+
+			act '...':
+				gt'fight3'
+			end
+		end
+
+		if enrand = 2:
+			''
+		end
+	end
+else
+     enrand = rand(0, 1)
+
+	if enrand = 0:
+		$text='<<$nameE>> tries to throw'
+	end
+
+	if enrand = 1:
+		$text='<<$nameE>> trying to make an attempt to hold'
+	end
+
+	'You are standing on all fours in front of rival.'
+
+	act 'Pressed to the floor':
+		cls
+		'You pressed to the floor. <<$text>>'
+
+		if enrand = 0:
+			point += 1
+			endurE -= 2
+			'<center><img src="pic/fight/cron.jpg" ></center>'
+			'Opponent has no time to attempt a shot.'
+
+			act '...':
+				gt'fightE'
+			end
+		end
+
+		if enrand = 1:
+			pointE += 1
+			endurE -= 1
+			'<center><img src="pic/fight/crou.jpg" ></center>'
+			'Opponent successfully a hold.' 
+
+			act '...':
+				gt'fightE1'
+			end
+		end
+	end
+
+	act 'Upside down on your back':
+		cls
+		endur -= 1
+		'You are trying to roll over on his back. <<$text>>'
+
+		if enrand = 0:
+			pointE += 2
+			endurE -= 2
+			'<center><img src="pic/fight/crob.jpg" ></center>'
+			'Opponent easily captures and holds you throw.'
+
+			act '...':
+				gt'fightE2'
+			end
+		end
+
+		if enrand = 1:
+			point += 1
+			endurE -= 1
+			'<center><img src="pic/fight/cronu.jpg" ></center>'
+			'You pull out of the seizure of the opponent and turn on the back.' 
+
+			act '...':
+				gt'fightE3'
+			end
+		end
+	end
+end

locations/488_fightfw

@@ -0,0 +1,118 @@
+$resultUderDin = {
+	if Aktiv > Passiv:
+		point += 1
+		Ku += 1
+		'<center><img src="pic/fight/fu.jpg" ></center>'
+		'You have successfully commit rival'
+
+		act '...':
+			stoper = 0 & gt 'fight2'
+		end
+	end
+
+	if Aktiv < Passiv:
+		pointE += 1
+		KzE += 1
+		'<center><img src="pic/fight/fu1.jpg" ></center>'
+		'You can not do anything about my opponent flips.'
+
+		act '...':
+			stoper = 0 & gt 'fight3'
+		end
+	end 
+
+	if Aktiv = Passiv:
+		'<center><img src="pic/fight/f.jpg" ></center>'
+		'You have two little turns and you are struggling without success.'
+
+		act '...':
+			gt $curloc
+		end
+	end 
+}
+
+$resultBrosDin = {
+	if Aktiv > Passiv:
+		point += 2
+		lustw += 1
+		Kb += 1
+		'<center><img src="pic/fight/fb.jpg" ></center>'
+		'You have successfully throw the opponent'
+
+		act '...':
+			stoper = 0 & gt 'fight1'
+		end
+	end 
+
+	if Aktiv < Passiv:
+		pointE += 1
+		KzE += 1
+		'<center><img src="pic/fight/fu1.jpg" ></center>'
+		'You can not do anything about my opponent turned over on his back.'
+
+		act '...':
+			stoper = 0 & gt 'fight3'
+		end
+	end 
+
+	if Aktiv = Passiv:
+		'<center><img src="pic/fight/f.jpg" ></center>'
+		'You have two little turns and you are struggling without success.'
+
+		act '...':
+			gt $curloc
+		end
+	end 
+}
+
+!you top
+!opponent lying on his stomach -10%
+koef = 100
+koefE = 90
+
+rMin -= 1
+stoper += 1
+
+gs 'fightStat'
+
+'<center><img src="pic/fight/f.jpg" ></center>'
+'<<$nameE>> lying on his stomach, while you sit on top of it. <<$nameE>> trying to wriggle out.'
+
+if endur <= 0 or lustw <= 0:
+	gt'SubLoss'
+end
+
+if endurE <= 0 or lustwE <= 0:
+	gt 'SubWin'
+end
+
+if stoper < 3:
+	if rMin > 0:
+		act 'Make an attempt to hold':
+			cls
+			dynamic $uderdin
+			dynamic $resultUderDin
+		end
+
+		act 'Make an attempt to throw':
+			cls
+			dynamic $brosdin
+			dynamic $resultBrosDin
+		end
+	else
+		'Refferi blows a whistle and throws you. End of round.'
+
+		act 'up':
+			gt'RoundEnd'
+		end
+	end
+end
+
+if stoper >= 3:
+	pointE += 1
+	'Refferi blows a whistle and throws you. Your time to attack happened. <<$nameE>> receives one point.'
+
+	act 'up':
+		gt 'RoundStop'
+	end
+end

locations/489_fight2

@@ -0,0 +1,74 @@
+$resultUderDin = {
+	endurE -= 2
+
+	if Aktiv >= Passiv:
+		point += 1
+		lustwE -= 1
+		Ku += 1
+		'<center><img src="pic/fight/f2u.jpg" ></center>'
+		'You have successfully hold rival'
+
+		act '...':
+			gt 'fight2'
+		end
+	end
+
+	if Aktiv < Passiv:
+		pointE += 1
+		KzE += 1
+		'<center><img src="pic/fight/f2u2.jpg" ></center>'
+		'You can not do anything about my opponent flips.'
+
+		act '...':
+			stoper = 0 & gt 'fight3'
+		end
+	end 
+}
+
+!you have committed opponent
+!you sit on top
+!opponent lying on his stomach under you -20%
+
+koef = 100
+koefE = 80
+lustwE -= 1
+rMin -= 1
+stoper += 1
+
+gs 'fightStat'
+
+'<center><img src="pic/fight/f2.jpg" ></center>'
+'<<$nameE>> lies beneath you . <<$nameE>> desperately trying to slip out of the bend of your capture.'
+
+if endur <= 0 or lustw <= 0:
+	gt'SubLoss'
+end
+
+if endurE <= 0 or lustwE <= 0:
+	gt'SubWin'
+end
+
+if stoper < 3:
+	if rMin > 0:
+		act 'hold_On':
+			cls
+			dynamic $uderdin
+			dynamic $resultUderDin
+		end
+	else
+		'Refferi blows a whistle and throws you. End of round.'
+
+		act 'up':
+			gt'RoundEnd'
+		end
+	end
+end
+
+if stoper >= 3:
+	point += 3
+	'Refferi blows a whistle and throws you. Your time to attack happened. For the successful holding you get immediately 3 points.'
+
+	act 'up':
+		gt'RoundStop'
+	end
+end

locations/490_fight3

@@ -0,0 +1,101 @@
+$resultUderDin = {
+	if Aktiv > Passiv:
+		point += 1
+		Ku += 1
+		'<center><img src="pic/fight/f3u.jpg" ></center>'
+		'You have successfully commit rival'
+
+		act '...':
+			stoper = 0 & gt 'fight2'
+		end
+	end
+
+	if Aktiv <= Passiv:
+		pointE += 1
+		KzE += 1
+		'<center><img src="pic/fight/f3u2.jpg" ></center>'
+		'You can not do anything about my opponent breaks lock.'
+
+		act '...':
+			gt 'RoundStop'
+		end
+	end
+}
+
+$resultBrosDin = {
+	if Aktiv > Passiv:
+		point += 2
+		lustw += 1
+		Kb += 1
+		'<center><img src="pic/fight/f3b.jpg" ></center>'
+		'You have successfully throw the opponent'
+
+		act '...':
+			stoper = 0 & gt 'fight1'
+		end
+	end
+
+	if Aktiv <= Passiv:
+		pointE + =1
+		KzE += 1
+		'<center><img src="pic/fight/f3u2.jpg" ></center>'
+		'You can not do anything about my opponent breaks lock.'
+
+		act '...':
+			gt 'RoundStop'
+		end
+	end
+}
+
+!you top
+!opponent bottom facing you
+
+koef = 100
+koefE = 100
+
+rMin -= 1
+stoper += 1
+
+gs 'fightStat'
+
+'<center><img src="pic/fight/f3.jpg" ></center>'
+'<<$nameE>> supine, while you sit on top of it. <<$nameE>> trying to throw you off the.'
+
+if endur <= 0 or lustw <= 0:
+	gt'SubLoss'
+end
+
+if endurE <= 0 or lustwE <= 0:
+	gt 'SubWin'
+end
+
+if stoper<3:
+	if rMin > 0:
+		act 'Make an attempt to hold':
+			cls
+			dynamic $uderdin
+			dynamic $resultUderDin
+		end
+
+		act 'Make an attempt to throw':
+			cls
+			dynamic $brosdin
+			dynamic $resultBrosDin
+		end
+	else
+		'Refferi blows a whistle and throws you. End of round.'
+
+		act 'up':
+			gt 'RoundEnd'
+		end
+	end
+end
+
+if stoper >= 3:
+	pointE += 1
+	'Refferi blows a whistle and throws you. Your time to attack happened. <<$nameE>> receives one point.'
+
+	act 'up':
+		gt'RoundStop'
+	end
+end

locations/491_roundstop

@@ -0,0 +1,27 @@
+gs 'fightStat'
+
+stoper = 0
+
+if crouch = 1 and croonce = 0:
+	crouch = 0 & croonce = 1
+end
+
+if crouch = 0 and croonce = 0:
+	crouch = 1 & croonce = 1
+end
+
+croonce = 0
+
+if crouch = 1:
+	$text='Stand your opponent on all fours, and you catch him from behind.'
+end
+
+if crouch = 0:
+	$text='You get up on all fours, and your opponent to catch him from behind.'
+end
+
+'The referee raises you with an opponent and commands. <<$text>>'
+
+act 'Follow the instructions referees':
+	gt 'FightCrouch'
+end

locations/492_fightstat

@@ -0,0 +1,78 @@
+if endur > endurMax * 75 / 100:
+	$endur = 'You are active and vigorous'
+end
+
+if endur > endurMax * 50 / 100 and endur <= endurMax * 75 / 100:
+	$endur = 'You are strongly sweating'
+end
+
+if endur > endurMax * 25 / 100 and endur <= endurMax * 50 / 100:
+	$endur = 'Are you tired and short of breath'
+end
+
+if endur <= endurMax * 25 / 100:
+	$endur = 'You just clueless on where you are very tired'
+end
+
+
+if endure > endurMaxe * 75 / 100:
+	$endure = '<<$nameE>> active and cheerful'
+end
+
+if endure > endurMaxe * 50 / 100 and endure <= endurMaxe * 75 / 100:
+	$endure = '<<$nameE>> much sweating'
+end
+
+if endure > endurMaxe * 25 / 100 and endure <= endurMaxe * 50 / 100:
+	$endure = '<<$nameE>> tired and pants'
+end
+
+if endure <= endurMaxe * 25 / 100:
+	$endure = '<<$nameE>> hardly worth from severe fatigue'
+end
+
+
+if lustw > lustMax * 75 / 100:
+	$lust = 'You are determined to show it to your opponent what`s what'
+end
+
+if lustw > lustMax * 50 / 100 and lustw <= lustMax * 75 / 100:
+	$lust = 'You`re a little puzzled by the tenacity rivals'
+end
+
+if lustw > lustMax * 25 / 100 and lustw <= lustMax * 50 / 100:
+	$lust = 'Are you afraid of her rival'
+end
+
+if lustw <= lustMax * 25 / 100:
+	$lust = 'You are in a very real terror and on the verge of panic'
+end
+
+
+if lustwe > lustMaxe * 75 / 100:
+	$luste = '<<$nameE>> bravely drills you with his unyielding gaze'
+end
+
+if lustwe > lustMaxe * 50 / 100 and lustwe <= lustMaxe * 75 / 100:
+	$luste = '<<$nameE>> looks a little surprised'
+end
+
+if lustwe > lustMaxe * 25 / 100 and lustwe <= lustMaxe * 50 / 100:
+	$luste = '<<$nameE>> looks frightened'
+end
+
+if lustwe <= lustMaxe * 25 / 100:
+	$luste = '<<$nameE>> looks bruised and finished here now screwy panic'
+end
+
+
+'<center><b>round <<round>> </b></center>'
+'<center><b>Left before the end of the round <<rMin>> minutes </b></center>'
+''
+'your record <<win[1]>> - <<loss[1]>> - <<draw[1]>> <<SubWin[1]>> / <<SubLoss[1]>> '
+'<<$nameE>> record <<win[i]>> - <<loss[i]>> - <<draw[i]>> <<SubWin[i]>> / <<SubLoss[i]>> '
+''
+'<<$endur>> . <<$lust>> .'
+'<<$endurE>> . <<$lustE>> .'
+'you scored <<point>> points'
+'<<$nameE>> scored <<pointE>> points'

locations/493_beforefw

@@ -0,0 +1,154 @@
+$endurdin={
+Ken=(musle/100)*Kus/100
+if ken<=0:ken=1
+Kene=(musle[i]/100)*Kuse/100
+if kene<=0:kene=1
+
+KoefUder=RAND(Uder*20/100,Uder)
+KoefUderE=RAND(Udere*20/100,Udere)
+KoefBros=RAND(Brosok*20/100,Brosok)
+KoefBrosE=RAND(Brosoke*20/100,Brosoke)
+KoefProt=RAND(Zash*20/100,Zash)
+KoefProtE=RAND(Zashe*20/100,Zashe)
+}
+
+$uderdin={
+Kus=5
+Kuse=10
+dynamic $endurdin
+endur-=ken
+endurE-=kene
+Aktiv=(strenw/2)+agilw+RAND(0,lustw)+KoefUder
+Aktiv=Aktiv*endur/endurMax
+Passiv=(((strenwE+(agilwE/2))*koefE)/100)+RAND(0,lustwE)+KoefProtE
+Passiv=Passiv*endurE/endurMaxE
+}
+$uderdinE={
+Kus=10
+Kuse=5
+dynamic $endurdin
+endur-=ken
+endurE-=kene
+Aktiv=(strenwE/2)+agilwE+RAND(0,lustwE)+KoefUdere
+Aktiv=Aktiv*endurE/endurMaxE
+Passiv=(((strenw+(agilw/2))*koef)/100)+RAND(0,lustw)+KoefProt
+Passiv=Passiv*endur/endurMaxE
+}
+$brosdin={
+Kus=10
+Kuse=10
+dynamic $endurdin
+endur-=ken
+endurE-=kene
+Aktiv=strenw+(agilw/2)+RAND(0,lustw)+KoefBros
+Aktiv=Aktiv*endur/endurMax
+Passiv=(((strenwE/2)+agilwE)*koefE/100)+RAND(0,lustwE)+KoefProtE
+Passiv=Passiv*endurE/endurMaxE
+}
+$brosdinE={
+Kus=10
+Kuse=10
+dynamic $endurdin
+endur-=ken
+endurE-=kene
+Aktiv=strenwE+(agilwE/2)+RAND(0,lustwE)+KoefBrosE
+Aktiv=Aktiv*endurE/endurMaxE
+Passiv=(((strenw/2)+agilw)*koef/100)+RAND(0,lustw)+KoefProt
+Passiv=Passiv*endur/endurMax
+}
+
+
+!power, throws
+!flexibility, protection, 
+!speed, initiative
+!equipment, 
+!endurance
+a=1
+point=0
+pointE=0
+$nameE=$nikname[i]
+$nameA=$nikname[a]
+strenw=musle[1]/10
+strenwE=musle[i]/10
+agilw=flex[1]/10
+agilwE=flex[i]/10
+lustMax=wipo[1]
+lustMaxE=wipo[i]
+lustw=lustMax
+lustwe=lustMaxe
+Brosok=Bteh[1]/10
+BrosokE=Bteh[i]/10
+Uder=Uteh[1]/10
+Udere=Uteh[i]/10
+Zash=Zteh[1]/10
+Zashe=Zteh[i]/10
+
+resultFight=0
+endurMax=stamina[1]/10
+endurMaxE=stamina[i]/10
+endur=endurMax
+endurE=endurMaxE
+croonce=0
+round=1
+rMin=8
+stoper = 0
+Ku = 0
+Kb = 0
+Kz = 0
+KuE = 0
+KbE = 0
+KzE = 0
+!minus the endurance of fat
+!force depends on the endurance
+!speed depends on the endurance
+
+if Formula = 0:
+	Formula = 3
+end
+
+'<center><b>before round</b></center>'
+'<center><img src="images/pic/fight/bef.jpg" ></center>'
+'you and <<$nameE>> greeted each other.'
+'Referee required to start a fight on his hands.'
+!picture
+
+act 'Fight on his hands':
+	cls
+	!picture
+	'<center><img src="images/pic/fight/arm.jpg" ></center>'
+
+	if strenw > strenwE:
+		point + =1
+		lustw + =1
+		$text = 'Stand your opponent on all fours, and you catch him from behind.'
+		'You won the fight on his hands.'
+		crouch = 1
+	end
+
+	if strenw < strenwE:
+		pointE += 1
+		lustwE += 1
+		$text = 'You get up on all fours, and your opponent to catch him from behind.'
+		'You lost the battle on his hands.'
+		crouch = 0
+	end
+
+	if strenw = strenwE:
+		'Quest on hand ended in a draw. The referee tossed the coin, that would determine the winner.'
+		varrand = rand(0, 1)
+	end
+
+	if varrand = 0:
+		crouch = 1 & $text = 'Stand your opponent on all fours, and you catch him from behind.'
+	end
+
+	if varrand = 1:
+		crouch = 0 & $text = 'You get up on all fours, and your opponent to catch him from behind.'
+	end
+
+	'Refferi stopped you and commanded <<$text>>'
+
+	act 'Follow the instructions referees':
+		gt 'FightCrouch'
+	end
+end

locations/494_fight1

@@ -0,0 +1,78 @@
+$resultUderDin = {
+	if Aktiv > Passiv:
+		point += 1
+		Ku += 1
+		'<center><img src="images/pic/fight/f1u.jpg" ></center>'
+		'You have successfully commit rival'
+
+		act '...':
+			stoper = 0 & gt 'fight2'
+		end
+	end
+
+	if Aktiv < Passiv:
+		pointE += 1
+		KzE += 1
+		'<center><img src="images/pic/fight/f1u1.jpg" ></center>'
+		'You can not do anything about my opponent flips.'
+
+		act '...':
+			stoper = 0 & gt 'fight3'
+		end
+	end
+
+	if Aktiv = Passiv:
+		'<center><img src="images/pic/fight/f1u2.jpg" ></center>'
+		'You have two little turns and you are struggling without success.'
+
+		act '...':
+			gt $curloc
+		end
+	end
+}
+
+!you top
+!opponent lies on his back after throwing -15%
+
+koef = 100
+koefE = 85
+rMin -= 1
+stoper += 1
+
+gs'fightStat'
+
+'<center><img src="images/pic/fight/f1.jpg" ></center>'
+'<<$nameE>> lying on his back after throwing a little confused, while you sit on top of it. <<$nameE>> trying to wriggle out.'
+
+if endur <= 0 or lustw <= 0:
+	gt'SubLoss'
+end
+
+if endurE <= 0 or lustwE <= 0:
+	gt'SubWin'
+end
+
+if stoper < 3:
+	if rMin > 0:
+		act 'Make an attempt to hold':
+			cls
+			dynamic $uderdin
+			dynamic $resultUderDin
+		end
+	else
+		'Refferi blows a whistle and throws you. End of round.'
+
+		act 'up':
+			gt'RoundEnd'
+		end
+	end
+end
+
+if stoper >= 3:
+	pointE += 1
+	'Refferi blows a whistle and throws you. Your time to attack happened. <<$nameE>> receives one point.'
+
+	act 'up':
+		gt 'RoundStop'
+	end
+end