[Removed] Old fight files that are no longer in use

glife.qproj

@@ -203,23 +203,12 @@
 	</Folder>
 	<Folder name="Combat">
 		<Location name="fight"/>
-		<Location name="strelba"/>
 		<Location name="before"/>
 		<Location name="init"/>
-		<Location name="boxing"/>
 		<Location name="magik"/>
-		<Location name="enemy"/>
-		<Location name="atak"/>
-		<Location name="atakA"/>
-		<Location name="atakA1"/>
-		<Location name="atakB"/>
-		<Location name="atakB1"/>
-		<Location name="atakM"/>
 		<Location name="ender"/>
 		<Location name="nill"/>
 		<Location name="test"/>
-		<Location name="priziv"/>
-		<Location name="defence"/>
 		<Location name="kikbox"/>
 		<Location name="initKik"/>
 		<Location name="Kikatak"/>

locations/atak.qsrc

@@ -1,482 +0,0 @@
-# atak
-
-menu_off = 1
-
-if $ARGS[0] = 'player':
-	cla
-	tip = 0
-	strenA = pcs_stren
-	speedA = speed
-	agilA = pcs_agil
-	vitalA = pcs_vital
-	!Skills
-	boxingA = boxing
-	!Parameters
-	healthA = pcs_health
-	BonusA = BonusAtak
-	strenD = strenV
-	speedD = speedV
-	agilD = agilV
-	vitalD = vitalV
-	!Skills
-	boxingD = boxingV
-	!Parameters
-	healthD = healthV
-	initBonusA = initBonus
-	initBonus = 0
-	initBonusV = 0
-	BonusD = BonusDefV
-
-	if stunV <= 0:
-		xgt'atak','popad'
-	elseif stunV > 0:
-		'<b><font color = green><<$boydesc>> Can not move a critical hit</font></b>'
-
-		xgt'atak','uronKrit'
-	end
-end
-
-if $ARGS[0] = 'enemy':
-	cla
-	tip = 1
-	strenA = strenV
-	speedA = speedV
-	agilA = agilV
-	vitalA = vitalV
-	!Skills
-	boxingA = boxingV
-	!Parameters
-	healthA = healthV
-	BonusA = BonusAtakV
-	strenD = pcs_stren
-	speedD = speed
-	agilD = pcs_agil
-	vitalD = pcs_vital
-	!Skills
-	boxingD = boxing
-	!Parameters
-	healthD = pcs_health
-	BonusD = BonusDef
-	initBonusA = initBonusV
-	initBonus = 0
-	initBonusV = 0
-
-	if stun <= 0:
-		xgt'atak','popad'
-	elseif stun > 0:
-		'<b><font color = red>YOU can not move a critical hit</font></b>'
-
-		xgt'atak','uronKritV'
-	end
-end
-
-if $ARGS[0] = 'popad':
-	cla
-	!payment hit dodge
-	poSp = speedA*20/100
-	uvAg = agilD*20/100
-	poBox = boxingA*20/100
-	uvBox = boxingD*20/100
-	popad = RAND(boxingA-poBox,boxingA+poBox) + RAND(speedA-poSp,speedA+poSp) + BonusA + initBonusA
-	uvorot = RAND(boxingD-uvBox,boxingD+uvBox) + RAND(agilD-uvAg,agilD+uvAg) + BonusD
-	uvorKoef = uvorot*50/100
-	popKoef = popad*50/100
-
-	if popad > uvorot:
-		if popad >= uvorot+uvorKoef:
-			!Crete, very direct hit
-			if tip = 0:
-				!attack players
-				'<b><font color = green>Critical hits</font></b>'
-
-				xgt'atak','uronKrit'
-			elseif tip = 1:
-				!He attacks the enemy
-				'<b><font color = red>Critical hits</font></b>'
-
-				xgt'atak','uronKritV'
-			end
-		elseif popad < uvorot+uvorKoef:
-			!Normal hit
-			if tip = 0:
-				!attack players
-				'<b><font color = green>EYE</font></b>'
-
-				xgt'atak','uron'
-			elseif tip = 1:
-				!He attacks the enemy
-				'<b><font color = red>EYE</font></b>'
-
-				xgt'atak','uronV'
-			end
-		end
-	elseif popad <= uvorot:
-		if popad+popKoef <= uvorot:
-			!critical blunder
-			if tip = 0:
-				!attack players
-				'<b><font color = red>CRITICAL SLIP</font></b>'
-
-				xgt'atak','uronKritV'
-			elseif tip = 1:
-				!He attacks the enemy
-				'<b><font color = green>CRITICAL SLIP</font></b>'
-
-				xgt'atak','uronKrit'
-			end
-		elseif popad+popKoef > uvorot:
-			!bloomer
-			if tip = 0:
-				!attack players
-				'<b><font color = red>LOST</font></b>'
-
-				xgt'fight','sta'
-			elseif tip = 1:
-				!He attacks the enemy
-				'<b><font color = green>LOST</font></b>'
-
-				xgt'fight','sta'
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'uronKrit':
-	cla
-	damage = RAND(pcs_stren,pcs_stren*2) + weapbonus + magweapbonus
-
-	if knife > 0:
-		knibon = knife+1
-		knife = 0
-		damage = damage*knibon
-		knibon = 0
-
-		'<b><font color = green>The enemy flies your throwing knife</font></b>'
-	end
-
-	if defenceV <= 0 and klonV <= 0 and unmaterialV <= 0 and barierV <= 0:
-		if dospehV > 0:damage = damage - dospehDefV & dospehEnV = dospehEnV - 1
-		if damage < 0:damage = 0
-		healthV = healthV - damage
-		if weaponTipe = 1:bloodV = bloodV + RAND(weapon/4,weapon/2)
-		if weaponTipe = 2:stun = stun + RAND(1,2)
-		if weaponTipe = 3:bloodV = bloodV + RAND(weapon/4,weapon/2)
-
-		if stunner > 0:
-			stunner = 0
-			stunV = RAND(3,6)
-
-			'<b><font color = green>You paralyzed the enemy on <<stunV>> moves.</font></b>'
-		end
-
-		'<b><font color = green>Accept damage <<damage>> units</font></b>'
-
-		if zerkaloV > 0:
-			zerkaloV = zerkaloV - 1
-			pcs_health = pcs_health - damage
-
-			'<b><font color = red><<$boydesc>> reflected the damage and you get <<damage>> points of damage</font></b>'
-		end
-
-		xgt'fight','sta'
-	elseif defenceV > 0 and klonV <= 0 and unmaterialV <= 0:
-		defenceV = defenceV - damage
-
-		'<b><font color = green>Protection of the enemy suffered damage <<damage>> units</font></b>'
-
-		xgt'fight','sta'
-	elseif klonV > 0 and unmaterialV <= 0:
-		klonV = klonV - 1
-
-		'<b><font color = green>Destroyed enemy clone, he still had <<KlonV>> Clones</font></b>'
-
-		xgt'fight','sta'
-	elseif unmaterialV > 0:
-		unmaterialV = unmaterialV - 1
-
-		'<b><font color = red>Your kick flew right through the opponent''s body. <<$boydesc>> Not material</font></b>'
-
-		xgt'fight','sta'
-	elseif barierV > 0:
-		!imeniteta barrier for damage
-		if barierV >= damage:
-			'<b><font color = red><<$boydesc>> easily weathered blow your</font></b>'
-
-			xgt'fight','sta'
-		elseif barierV < damage:
-			healthV = healthV - damage
-			if weaponTipe = 1:bloodV = bloodV + RAND(weapon/4,weapon/2)
-			if weaponTipe = 2:stun = stun + RAND(1,2)
-			if weaponTipe = 3:bloodV = bloodV + RAND(weapon/4,weapon/2)
-
-			if stunner > 0:
-				stunV = RAND(3,6)
-
-				'<b><font color = green>You paralyzed the enemy on <<stunV>> moves.</font></b>'
-			end
-
-			'<b><font color = green>Accept damage <<damage>> units</font></b>'
-
-			if zerkaloV > 0:
-				zerkaloV = zerkaloV - 1
-				pcs_health = pcs_health - damage
-
-				'<b><font color = red><<$boydesc>> reflected the damage and you get <<damage>> points of damage</font></b>'
-			end
-		end
-		xgt'fight','sta'
-	end
-end
-
-if $ARGS[0] = 'uron':
-	cla
-	stKo = pcs_stren*20/100
-	damage = RAND(pcs_stren-stKo,pcs_stren+stKo) + weapbonus + magweapbonus
-
-	if knife > 0:
-		knibon = knife+1
-		knife = 0
-		damage = damage*knibon
-		knibon = 0
-
-		'<b><font color = green>The enemy flies your throwing knife</font></b>'
-	end
-
-	if defenceV <= 0 and klonV <= 0 and unmaterialV <= 0 and barierV <= 0:
-		if dospehV > 0:damage = damage - dospehDefV & dospehEnV = dospehEnV - 1
-		if damage < 0:damage = 0
-		healthV = healthV - damage
-
-		if stunner > 0:
-			stunner = 0
-			stunV = RAND(1,3)
-
-			'<b><font color = green>You paralyzed the enemy on <<stunV>> moves.</font></b>'
-		end
-
-		'<b><font color = green>Accept damage <<damage>> units</font></b>'
-
-		if zerkaloV > 0:
-			zerkaloV = zerkaloV - 1
-			pcs_health = pcs_health - damage
-
-			'<b><font color = red><<$boydesc>> reflected the damage and you get <<damage>> points of damage</font></b>'
-		end
-
-		xgt'fight','sta'
-	elseif defenceV > 0 and klonV <= 0 and unmaterialV <= 0:
-		defenceV = defenceV - damage
-
-		'<b><font color = green>Protection of the enemy suffered damage <<damage>> units</font></b>'
-
-		xgt'fight','sta'
-	elseif klonV > 0 and unmaterialV <= 0:
-		klonV = klonV - 1
-
-		'<b><font color = green>Destroyed enemy clone, he still had <<KlonV>> Clones</font></b>'
-
-		xgt'fight','sta'
-	elseif unmaterialV > 0:
-		unmaterialV = unmaterialV - 1
-
-		'<b><font color = red>Your kick flew right through the opponent''s body. <<$boydesc>> Not material</font></b>'
-
-		xgt'fight','sta'
-	elseif barierV > 0:
-		!imeniteta barrier for damage
-		if barierV >= damage:
-			'<b><font color = red><<$boydesc>> easily weathered blow your</font></b>'
-
-			xgt'fight','sta'
-		elseif barierV < damage:
-			healthV = healthV - damage
-
-			if stunner > 0:
-				stunV = RAND(1,3)
-
-				'<b><font color = green>You paralyzed the enemy on <<stunV>> moves.</font></b>'
-			end
-
-			'<b><font color = green>Accept damage <<damage>> units</font></b>'
-
-			if zerkaloV > 0:
-				zerkaloV = zerkaloV - 1
-				pcs_health = pcs_health - damage
-
-				'<b><font color = red><<$boydesc>> reflected the damage and you get <<damage>> points of damage</font></b>'
-			end
-		end
-		xgt'fight','sta'
-	end
-end
-
-if $ARGS[0] = 'uronKritV':
-	cla
-	damage = RAND(strenV,strenV*2) + weapbonusV + magweapbonusV
-
-	if knifeV > 0:
-		knibonV = knifeV+1
-		knifeV = 0
-		damage = damage*knibonV
-		knibonV = 0
-
-		'<b><font color = red>As you fly throwing knife</font></b>'
-	end
-
-	if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
-		if dospeh > 0:damage = damage - dospehDef & dospehEn = dospehEn - 1
-		if damage < 0:damage = 0
-		pcs_health = pcs_health - damage
-		if weaponTipeV = 1:blood = blood + RAND(weaponV/4,weaponV/2)
-		if weaponTipeV = 2:stunV = stunV + RAND(1,2)
-		if weaponTipeV = 3:blood = blood + RAND(weaponV/4,weaponV/2)
-
-		if stunnerV > 0:
-			stunnerV = 0
-			stun = RAND(3,6)
-
-			'<b><font color = red><<$boydesc>> You paralyzed on <<stun>> moves.</font></b>'
-		end
-
-		'<b><font color = red>You harmed <<damage>> units</font></b>'
-
-		if zerkalo > 0:
-			zerkalo = zerkalo - 1
-			healthV = healthV - damage
-
-			'<b><font color = green>You are repelled and the damage <<$boydesc>> We received <<damage>> points of damage</font></b>'
-		end
-		xgt'fight','sta'
-	elseif defence > 0 and klon <= 0 and unmaterial <= 0:
-		defence = defence - damage
-
-		'<b><font color = red>Your protection harmed <<damage>> units</font></b>'
-
-		xgt'fight','sta'
-	elseif klon > 0 and unmaterial <= 0:
-		klon = klon - 1
-
-		'<b><font color = red>It destroys your clone, Do you have more <<Klon>> Clones</font></b>'
-
-		xgt'fight','sta'
-	elseif unmaterial > 0:
-		unmaterial = unmaterial - 1
-
-		'<b><font color = green>Beat the enemy flew right through your body. YOU are not material</font></b>'
-
-		xgt'fight','sta'
-	elseif barier > 0:
-		!imeniteta barrier for damage
-		if barier >= damage:
-			'<b><font color = green>You can easily withstand the impact of the enemy</font></b>'
-
-			xgt'fight','sta'
-		elseif barier < damage:
-			pcs_health = pcs_health - damage
-			if weaponTipeV = 1:blood = blood + RAND(weaponV/4,weaponV/2)
-			if weaponTipeV = 2:stunV = stunV + RAND(1,2)
-			if weaponTipeV = 3:blood = blood + RAND(weaponV/4,weaponV/2)
-
-			if stunnerV > 0:
-				stun = RAND(3,6)
-
-				'<b><font color = red><<$boydesc>> You paralyzed on <<stun>> moves.</font></b>'
-			end
-
-			'<b><font color = red>You harmed <<damage>> units</font></b>'
-
-			if zerkalo > 0:
-				zerkalo = zerkalo - 1
-				healthV = healthV - damage
-
-				'<b><font color = green>You are repelled and the damage <<$boydesc>> We received <<damage>> points of damage</font></b>'
-			end
-		end
-		xgt'fight','sta'
-	end
-end
-
-if $ARGS[0] = 'uronV':
-	cla
-	stKo = strenV*20/100
-	damage = RAND(strenV-stKo,strenV+stKo) + weapbonusV + magweapbonusV
-
-	if knifeV > 0:
-		knibonV = knifeV+1
-		knifeV = 0
-		damage = damage*knibonV
-		knibonV = 0
-
-		'<b><font color = red>As you fly throwing knife</font></b>'
-	end
-
-	if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
-		if dospeh > 0:damage = damage - dospehDef & dospehEn = dospehEn - 1
-		if damage < 0:damage = 0
-		pcs_health = pcs_health - damage
-
-		if stunnerV > 0:
-			stunnerV = 0
-			stun = RAND(3,6)
-
-			'<b><font color = red><<$boydesc>> You paralyzed on <<stun>> moves.</font></b>'
-		end
-
-		'<b><font color = red>You harmed <<damage>> units</font></b>'
-
-		if zerkalo > 0:
-			zerkalo = zerkalo - 1
-			healthV = healthV - damage
-
-			'<b><font color = green>You are repelled and the damage <<$boydesc>> We received <<damage>> points of damage</font></b>'
-		end
-
-		xgt'fight','sta'
-	elseif defence > 0 and klon <= 0 and unmaterial <= 0:
-		defence = defence - damage
-
-		'<b><font color = red>Your protection harmed <<damage>> units</font></b>'
-
-		xgt'fight','sta'
-	elseif klon > 0 and unmaterial <= 0:
-		klon = klon - 1
-
-		'<b><font color = red>It destroys your clone, Do you have more <<Klon>> Clones</font></b>'
-
-		xgt'fight','sta'
-	elseif unmaterial > 0:
-		unmaterial = unmaterial - 1
-
-		'<b><font color = green>Beat the enemy flew right through your body. YOU are not material</font></b>'
-
-		xgt'fight','sta'
-	elseif barier > 0:
-		!imeniteta barrier for damage
-		if barier >= damage:
-			'<b><font color = green>You can easily withstand the impact of the enemy</font></b>'
-
-			xgt'fight','sta'
-		elseif barier < damage:
-			pcs_health = pcs_health - damage
-
-			if stunnerV > 0:
-				stun = RAND(3,6)
-
-				'<b><font color = red><<$boydesc>> You paralyzed on <<stun>> moves.</font></b>'
-			end
-
-			'<b><font color = red>You harmed <<damage>> units</font></b>'
-
-			if zerkalo > 0:
-				zerkalo = zerkalo - 1
-				healthV = healthV - damage
-
-				'<b><font color = green>You are repelled and the damage <<$boydesc>> We received <<damage>> points of damage</font></b>'
-			end
-		end
-		xgt'fight','sta'
-	end
-end
-
---- atak ---------------------------------
-

locations/atakA.qsrc

@@ -1,284 +0,0 @@
-# atakA
-
-menu_off = 1
-
-if $ARGS[0] = 'atak':
-	cla
-	!payment hit dodge
-	poSp = speed * 20 / 100
-	uvAg = agilV * 20 / 100
-	poBox = pcs_react * 20 / 100
-	uvBox = reactV * 20 / 100
-	popad = RAND(pcs_react - poBox,pcs_react + poBox) + RAND(speed - poSp,speed + poSp) + bonusSh
-	uvorot = RAND(reactV - uvBox,reactV + uvBox) + RAND(agilV - uvAg,agilV + uvAg)
-	uvorKoef = uvorot * 50 / 100
-	popKoef = popad * 50 / 100
-
-	if popad > uvorot:
-		if popad >= uvorot + uvorKoef:
-			!Crete, very direct hit
-			'<b><font color = green>Critical hits</font></b>'
-
-			xgt'atakA','uronKrit'
-		elseif popad < uvorot+uvorKoef:
-			!Normal hit
-			!He attacks the enemy
-			'<b><font color = green>EYE</font></b>'
-
-			xgt'atakA','uron'
-		end
-	elseif popad <= uvorot:
-		'<b><font color = red>LOST</font></b>'
-
-		xgt'fight','sta'
-	end
-end
-
-if $ARGS[0] = 'uronKrit':
-	cla
-	damKoef = damTip*20/100
-	damage = RAND(damTip+damKoef,damTip+damKoef*2)
-
-	if damTipM > 0:
-		damKoefM = damTipM*20/100
-		damageM = RAND(damTipM+damKoefM,damTipM+damKoefM*2)
-	end
-
-	xgt'atakA','damage'
-end
-
-if $ARGS[0] = 'uron':
-	cla
-	damKoef = damTip*20/100
-	damage = RAND(damTip-damKoef,damTip+damKoef)
-
-	if damTipM > 0:
-		damKoefM = damTipM*20/100
-		damageM = RAND(damTipM-damKoefM,damTipM+damKoefM)
-	end
-
-	xgt'atakA','damage'
-end
-
-if $ARGS[0] = 'damage':
-	cla
-	if defenceV <= 0 and klonV <= 0 and unmaterialV <= 0 and barierV <= 0:
-		if dospehV > 0:damageV = damageV - dospehDefV & dospehEn = dospehEn - 1
-		if damage < 0:damage = 0
-		healthV = healthV - damage
-
-		if damTipM > 0:
-			manaV = manaV - damageM
-			pcs_mana = pcs_mana + damageM
-
-			'<b><font color = green>You swallowed <<damageM>> mana enemy units.</font></b>'
-		end
-
-		!pcs_mana = pcs_mana - damageM
-
-		if eleSh > 0:
-			stunV = RAND(eleSh,eleSh*3)
-
-			'<b><font color = green><<$boydesc>> paralyzed <<stunV>> Rounds</font></b>'
-		end
-
-		'<b><font color = green>You have caused damage <<damage>> units</font></b>'
-		!'<b><font color = red>Your mana harmed <<damageM>> units</font></b>'
-
-		if zerkaloV > 0:
-			zerkaloV = zerkaloV - 1
-			pcs_health = pcs_health - damage
-
-			'<b><font color = red><<$boydesc>> reflected the damage and you get <<damage>> points of damage</font></b>'
-		end
-
-		xgt'fight','sta'
-	end
-
-	if defenceV > 0 and klonV <= 0 and unmaterialV <= 0:
-		!damSum = damage + damageM
-		!defence = defence - damSum
-		defenceV = defenceV - damage
-
-		'<b><font color = green>You have caused damage <<damage>> Protection of enemy units</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if klonV > 0 and unmaterialV <= 0:
-		klonV = klonV - 1
-
-		'<b><font color = green>Destroyed enemy clone</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if unmaterialV > 0:
-		unmaterialV = unmaterialV - 1
-
-		'<b><font color = red>Your blow has passed through the body of the enemy. Opponents do not materials</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if barierV > 0:
-		!imeniteta barrier for damage
-		if barierV >= damage:
-			'<b><font color = red><<$boydesc>> easily weathered blow your</font></b>'
-
-			xgt'fight','sta'
-		elseif barierV < damage:
-			!pcs_mana = pcs_mana - damageM
-			!pcs_health = pcs_health - damage
-			damage = damage - barierV
-			healthV = healthV - damage
-
-			if damTipM > 0:
-				manaV = manaV - damageM
-				pcs_mana = pcs_mana + damageM
-				'<b><font color = green>You swallowed <<damageM>> mana enemy units.</font></b>'
-			end
-
-			if eleSh > 0:
-				stunV = RAND(eleSh,eleSh*3)
-				'<b><font color = green><<$boydesc>> paralyzed <<stunV>> Rounds</font></b>'
-			end
-
-			'<b><font color = green>You have caused damage <<damage>> units</font></b>'
-			!'<b><font color = red>Your mana harmed <<damageM>> units</font></b>'
-
-			if zerkaloV > 0:
-				zerkaloV = zerkaloV - 1
-				pcs_health = pcs_health - damage
-				'<b><font color = red>Opponent reflected damage and you get <<damage>> points of damage</font></b>'
-			end
-		end
-
-		xgt'fight','sta'
-	end
-end
-
-if $ARGS[0] = 'atakW':
-	cla
-	!payment hit dodge
-	poSp = speed * 20 / 100
-	uvAg = agilV * 20 / 100
-	poBox = pcs_react * 20 / 100
-	uvBox = reactV * 20 / 100
-	popad = RAND(pcs_react - poBox,pcs_react + poBox) + RAND(speed - poSp,speed + poSp)
-	uvorot = RAND(reactV - uvBox,reactV + uvBox) + RAND(agilV - uvAg,agilV + uvAg)
-	uvorKoef = uvorot * 50 / 100
-	popKoef = popad * 50 / 100
-
-	if popad > uvorot:
-		if popad >= uvorot+uvorKoef:
-			!Crete, very direct hit
-			'<b><font color = red>Critical hits</font></b>'
-
-			xgt'atakA','uronKritW'
-		elseif popad < uvorot+uvorKoef:
-			!Normal hit
-			'<b><font color = red>EYE</font></b>'
-
-			xgt'atakA','uronW'
-		end
-	elseif popad <= uvorot:
-		'<b><font color = green>LOST</font></b>'
-
-		xgt'fight','sta'
-	end
-end
-
-if $ARGS[0] = 'uronKritW':
-	cla
-	damKoef = damTip*20/100
-	damage = RAND(damTip+damKoef,damTip+damKoef*2)
-	damKoefM = damTipM*20/100
-	damageM = RAND(damTipM+damKoefM,damTipM+damKoefM*2)
-	xgt'atakA','damageW'
-end
-
-if $ARGS[0] = 'uronW':
-	cla
-	damKoef = damTip*20/100
-	damage = RAND(damTip-damKoef,damTip+damKoef)
-	damKoefM = damTipM*20/100
-	damageM = RAND(damTipM-damKoefM,damTipM+damKoefM)
-	xgt'atakA','damageW'
-end
-
-if $ARGS[0] = 'damageW':
-	cla
-	if defenceV <= 0 and klonV <= 0 and unmaterialV <= 0 and barierV <= 0:
-		if dospehV > 0:damageV = damageV - dospehDefV & dospehEn = dospehEn - 1
-		if damage < 0:damage = 0
-		healthV = healthV - damage
-		manaV = manaV - damageM
-
-		'<b><font color = green>You harmed <<damage>> units</font></b>'
-		'<b><font color = green>You have caused damage to the enemy mana <<damageM>> units</font></b>'
-
-		if zerkaloV > 0:
-			zerkaloV = zerkaloV - 1
-			pcs_health = pcs_health - damage
-
-			'<b><font color = red><<$boydesc>> reflected the damage and you get <<damage>> points of damage</font></b>'
-		end
-
-		xgt'fight','sta'
-	end
-
-	if defenceV > 0 and klonV <= 0 and unmaterialV <= 0:
-		damSum = damage + damageM
-		defenceV = defenceV - damSum
-		!defenceV = defenceV - damage
-
-		'<b><font color = green>You have caused damage <<damSum>> Protection of enemy units</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if klonV > 0 and unmaterialV <= 0:
-		klonV = klonV - 1
-
-		'<b><font color = green>Destroyed enemy clone</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if unmaterialV > 0:
-		unmaterialV = unmaterialV - 1
-
-		'<b><font color = red>Your blow has passed through the body of the enemy. Opponents do not materials</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if barierV > 0:
-		!imeniteta barrier for damage
-		if barierV >= damage:
-			'<b><font color = red><<$boydesc>> easily weathered blow your</font></b>'
-
-			xgt'fight','sta'
-		elseif barierV < damage:
-			manaV = manaV - damageM
-			healthV = healthV - damage
-			!healthV = healthV - damage
-
-			'<b><font color = green>You have caused damage <<damage>> units</font></b>'
-			'<b><font color = green>You have caused damage to the enemy mana <<damageM>> units</font></b>'
-
-			if zerkaloV > 0:
-				zerkaloV = zerkaloV - 1
-				pcs_health = pcs_health - damage
-
-				'<b><font color = red>Opponent reflected damage and you get <<damage>> points of damage</font></b>'
-			end
-		end
-
-		xgt'fight','sta'
-	end
-end
-
---- atakA ---------------------------------
-

locations/atakA1.qsrc

@@ -1,305 +0,0 @@
-# atakA1
-
-menu_off = 1
-
-if $ARGS[0] = 'atak':
-	cla
-	!payment hit dodge
-	poSp = speedV*20/100
-	uvAg = pcs_agil*20/100
-	poBox = reactV*20/100
-	uvBox = pcs_react*20/100
-	popad = RAND(reactV-poBox,reactV+poBox) + RAND(speedV-poSp,speedV+poSp) + bonusShV
-	uvorot = RAND(pcs_react-uvBox,pcs_react+uvBox) + RAND(pcs_agil-uvAg,pcs_agil+uvAg)
-	uvorKoef = uvorot*50/100
-	popKoef = popad*50/100
-
-	if popad > uvorot:
-		if popad >= uvorot+uvorKoef:
-			!Crete, very direct hit
-			'<b><font color = red>Critical hits</font></b>'
-
-			xgt'atakA1','uronKrit'
-		elseif popad < uvorot+uvorKoef:
-			!Normal hit
-			!He attacks the enemy
-			'<b><font color = red>EYE</font></b>'
-
-			xgt'atakA1','uron'
-		end
-	elseif popad <= uvorot:
-		'<b><font color = green>LOST</font></b>'
-
-		xgt'fight','sta'
-	end
-end
-
-if $ARGS[0] = 'uronKrit':
-	cla
-	damKoef = damTipV*20/100
-	damage = RAND(damTipV+damKoef,damTipV+damKoef*2)
-
-	if damTipMV > 0:
-		damKoefM = damTipMV*20/100
-		damageM = RAND(damTipMV+damKoefM,damTipMV+damKoefM*2)
-	end
-
-	xgt'atakA1','damage'
-end
-
-if $ARGS[0] = 'uron':
-	cla
-	damKoef = damTipV*20/100
-	damage = RAND(damTipV-damKoef,damTipV+damKoef)
-
-	if damTipMV > 0:
-		damKoefM = damTipMV*20/100
-		damageM = RAND(damTipMV-damKoefM,damTipMV+damKoefM)
-	end
-
-	xgt'atakA1','damage'
-end
-
-if $ARGS[0] = 'damage':
-	cla
-	if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
-		if dospeh > 0:damage = damage - dospehDef & dospehEn = dospehEn - 1
-		if damage < 0:damage = 0
-		pcs_health = pcs_health - damage
-
-		if hidanAtk = 1:
-			hidanAtk = 0
-			zerkaloV = zerkaloV + 50
-			bloodV = bloodV + 50
-
-			'<b><font color = red><<$boydesc>> drink your blood.</font></b>'
-		end
-
-		if damTipMV > 0:
-			pcs_mana = pcs_mana - damageM
-			pcs_mana = pcs_mana + damageM
-
-			'<b><font color = red><<$boydesc>> swallowed <<damageM>> Units mana you.</font></b>'
-		end
-
-		if poisonAV = 1:
-			poisonV = 50
-
-			'<b><font color = red><<$boydesc>> hit the needle poisoned you.</font></b>'
-		end
-
-		!pcs_mana = pcs_mana - damageM
-
-		if eleShV > 0:
-			stun = RAND(eleShV,eleShV*3)
-
-			'<b><font color = red>You paralyzed on <<stunV>> Rounds</font></b>'
-		end
-
-		'<b><font color = red><<$boydesc>> Damage caused to you <<damage>> units</font></b>'
-		!'<b><font color = red>Your mana harmed <<damageM>> units</font></b>'
-
-		if zerkalo > 0:
-			zerkalo = zerkalo - 1
-			healthV = healthV - damage
-
-			'<b><font color = green>You are repelled and the damage <<$boydesc>> got a <<damage>> points of damage</font></b>'
-		end
-
-		xgt'fight','sta'
-	end
-
-	if defence > 0 and klon <= 0 and unmaterial <= 0:
-		!damSum = damage + damageM
-		!defence = defence - damSum
-		defence = defence - damage
-
-		'<b><font color = red>Your protection harmed <<damage>> units</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if klon > 0 and unmaterial <= 0:
-		klon = klon - 1
-
-		'<b><font color = red>It destroys your clone</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if unmaterial > 0:
-		unmaterial = unmaterial - 1
-
-		'<b><font color = green>Beat the enemy passed through you. YOU are not material</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if barier > 0:
-		!imeniteta barrier for damage
-		if barier >= damage:
-			'<b><font color = green>You can easily withstand the impact of the enemy</font></b>'
-
-			xgt'fight','sta'
-		elseif barier < damage:
-			!pcs_mana = pcs_mana - damageM
-			!pcs_health = pcs_health - damage
-			pcs_health = pcs_health - damage
-
-			if damTipM > 0:
-				pcs_mana = pcs_mana - damageM
-				manaV = manaV + damageM
-
-				'<b><font color = green>You swallowed <<damageM>> mana enemy units.</font></b>'
-			end
-
-			if eleShV > 0:
-				stun = RAND(eleShV,eleShV*3)
-
-				'<b><font color = green><<$boydesc>> paralyzed <<stunV>> Rounds</font></b>'
-			end
-
-			if poisonAV = 1:
-				poisonV = 50
-
-				'<b><font color = red><<$boydesc>> hit the needle poisoned you.</font></b>'
-			end
-
-			'<b><font color = red>You have caused damage <<damage>> units</font></b>'
-			!'<b><font color = red>Your mana harmed <<damageM>> units</font></b>'
-
-			if zerkalo > 0:
-				zerkalo = zerkalo - 1
-				healthV = healthV - damage
-
-				'<b><font color = green>You have reflected the damage and the opponent was <<damage>> points of damage</font></b>'
-			end
-		end
-
-		xgt'fight','sta'
-	end
-end
-
-if $ARGS[0] = 'atakW':
-	cla
-	!payment hit dodge
-	poSp = speedV*20/100
-	uvAg = pcs_agil*20/100
-	poBox = reactV*20/100
-	uvBox = pcs_react*20/100
-	popad = RAND(reactV-poBox,reactV+poBox) + RAND(speedV-poSp,speedV+poSp)
-	uvorot = RAND(pcs_react-uvBox,pcs_react+uvBox) + RAND(pcs_agil-uvAg,pcs_agil+uvAg)
-	uvorKoef = uvorot*50/100
-	popKoef = popad*50/100
-
-	if popad > uvorot:
-		if popad >= uvorot+uvorKoef:
-			!Crete, very direct hit
-			'<b><font color = red>Critical hits</font></b>'
-
-			xgt'atakA1','uronKritW'
-		elseif popad < uvorot+uvorKoef:
-			!Normal hit
-			'<b><font color = red>EYE</font></b>'
-
-			xgt'atakA1','uronW'
-		end
-	elseif popad <= uvorot:
-		'<b><font color = green>LOST</font></b>'
-
-		xgt'fight','sta'
-	end
-end
-
-if $ARGS[0] = 'uronKritW':
-	cla
-	damKoef = damTipV*20/100
-	damage = RAND(damTipV+damKoef,damTipV+damKoef*2)
-	damKoefM = damTipMV*20/100
-	damageM = RAND(damTipMV+damKoefM,damTipMV+damKoefM*2)
-	xgt'atakA1','damageW'
-end
-
-if $ARGS[0] = 'uronW':
-	cla
-	damKoef = damTipV*20/100
-	damage = RAND(damTipV-damKoef,damTipV+damKoef)
-	damKoefM = damTipMV*20/100
-	damageM = RAND(damTipMV-damKoefM,damTipMV+damKoefM)
-	xgt'atakA1','damageW'
-end
-
-if $ARGS[0] = 'damageW':
-	cla
-	if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
-		if dospeh > 0:damage = damage - dospehDef & dospehEn = dospehEn - 1
-		if damage < 0:damage = 0
-		pcs_health = pcs_health - damage
-		pcs_mana = pcs_mana - damageM
-
-		'<b><font color = green>You harmed <<damage>> units</font></b>'
-		'<b><font color = green>You have caused damage to the enemy mana <<damageM>> units</font></b>'
-
-		if zerkalo > 0:
-			zerkalo = zerkalo - 1
-			pcs_health = pcs_health - damage
-
-			'<b><font color = red><<$boydesc>> reflected the damage and you get <<damage>> points of damage</font></b>'
-		end
-		xgt'fight','sta'
-	end
-
-	if defence > 0 and klon <= 0 and unmaterial <= 0:
-		damSum = damage + damageM
-		defence = defence - damSum
-		!defenceV = defenceV - damage
-
-		'<b><font color = green>You have caused damage <<damSum>> Protection of enemy units</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if klon > 0 and unmaterial <= 0:
-		klon = klon - 1
-
-		'<b><font color = green>Destroyed enemy clone</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if unmaterial > 0:
-		unmaterial = unmaterial - 1
-
-		'<b><font color = red>Your blow has passed through the body of the enemy. Opponents do not materials</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if barier > 0:
-		!imeniteta barrier for damage
-		if barier >= damage:
-			'<b><font color = red><<$boydesc>> easily weathered blow your</font></b>'
-
-			xgt'fight','sta'
-		elseif barier < damage:
-			pcs_mana = pcs_mana - damageM
-			pcs_health = pcs_health - damage
-			!healthV = healthV - damage
-
-			'<b><font color = green>You have caused damage <<damage>> units</font></b>'
-			'<b><font color = green>You have caused damage to the enemy mana <<damageM>> units</font></b>'
-
-			if zerkalo > 0:
-				zerkalo = zerkalo - 1
-				healthV = healthV - damage
-
-				'<b><font color = red>Opponent reflected damage and you get <<damage>> points of damage</font></b>'
-			end
-		end
-
-		xgt'fight','sta'
-	end
-end
-
---- atakA1 ---------------------------------
-

locations/atakB.qsrc

@@ -1,137 +0,0 @@
-# atakB
-
-menu_off = 1
-
-if $ARGS[0] = 'atak':
-	cla
-	!payment hit dodge
-	poSp = speed*20/100
-	uvAg = agilV*20/100
-	poBox = pcs_react*20/100
-	uvBox = reactV*20/100
-	popad = RAND(pcs_react-poBox,pcs_react+poBox) + RAND(speed-poSp,speed+poSp) + bonusSh
-	uvorot = RAND(reactV-uvBox,reactV+uvBox) + RAND(agilV-uvAg,agilV+uvAg)
-	uvorKoef = uvorot*50/100
-	popKoef = popad*50/100
-
-	if popad > uvorot:
-		if popad >= uvorot+uvorKoef:
-			!Crete, very direct hit
-			'<b><font color = green>Critical hits</font></b>'
-
-			gs'atakB','uronKrit'
-		elseif popad < uvorot+uvorKoef:
-			!Normal hit
-			!He attacks the enemy
-			'<b><font color = green>EYE</font></b>'
-
-			gs'atakB','uron'
-		end
-	elseif popad <= uvorot:
-		'<b><font color = red>LOST</font></b>'
-	end
-end
-
-if $ARGS[0] = 'uronKrit':
-	cla
-	damDef = defence/100
-	damKoef = damDef*20/100
-	damage = RAND(damDef+damKoef,damDef+damKoef*2)
-	gs'atakB','damage'
-end
-
-if $ARGS[0] = 'uron':
-	cla
-	damDef = defence/100
-	damKoef = damDef*20/100
-	damage = RAND(damDef-damKoef,damDef+damKoef)
-	gs'atakB','damage'
-end
-
-if $ARGS[0] = 'damage':
-	cla
-	if defenceV <= 0 and klonV <= 0 and unmaterialV <= 0 and barierV <= 0:
-		if dospehV > 0:damageV = damageV - dospehDefV & dospehEn = dospehEn - 1
-		if damage < 0:damage = 0
-		healthV = healthV - damage
-		!pcs_mana = pcs_mana - damageM
-
-		if eleSh > 0:
-			stunV = RAND(eleSh,eleSh*3)
-
-			'<b><font color = green><<$boydesc>> paralyzed <<stunV>> Rounds</font></b>'
-		end
-
-		'<b><font color = green>You have caused damage <<damage>> units</font></b>'
-		!'<b><font color = red>Your mana harmed <<damageM>> units</font></b>'
-
-		if zerkaloV > 0:
-			zerkaloV = zerkaloV - 1
-			defence = defence - damage
-
-			'<b><font color = red><<$boydesc>> It reflected the damage and your defense received <<damage>> points of damage</font></b>'
-		end
-
-		!xgt'fight','sta'
-	end
-
-	if defenceV > 0 and klonV <= 0 and unmaterialV <= 0:
-		!damSum = damage + damageM
-		!defence = defence - damSum
-		defenceV = defenceV - damage
-
-		'<b><font color = green>Your defense caused damage <<damage>> Protection of enemy units</font></b>'
-
-		!xgt'fight','sta'
-	end
-
-	if klonV > 0 and unmaterialV <= 0:
-		klonV = klonV - 1
-
-		'<b><font color = green>Destroyed enemy clone</font></b>'
-
-		!xgt'fight','sta'
-	end
-
-	if unmaterialV > 0:
-		unmaterialV = unmaterialV - 1
-
-		'<b><font color = red>Blow your protection passed through the body of the enemy. Opponents do not materials</font></b>'
-
-		!xgt'fight','sta'
-	end
-
-	if barierV > 0:
-		!imeniteta barrier for damage
-		if barierV >= damage:
-			'<b><font color = red><<$boydesc>> easily weathered blow your protection</font></b>'
-
-			!xgt'fight','sta'
-		elseif barierV < damage:
-			!pcs_mana = pcs_mana - damageM
-			!pcs_health = pcs_health - damage
-			healthV = healthV - damage
-
-			if eleSh > 0:
-				stunV = RAND(eleSh,eleSh*3)
-
-				'<b><font color = green><<$boydesc>> paralyzed <<stunV>> Rounds</font></b>'
-			end
-
-			'<b><font color = green>Your defense caused damage <<damage>> units</font></b>'
-			!'<b><font color = red>Your mana harmed <<damageM>> units</font></b>'
-
-			if zerkaloV > 0:
-				zerkaloV = zerkaloV - 1
-				defence = defence - damage
-
-				'<b><font color = red>Opponent reflected damage and your defense received <<damage>> points of damage</font></b>'
-			end
-		end
-
-		!xgt'fight','sta'
-	end
-end
-
---- atakB ---------------------------------
-

locations/atakB1.qsrc

@@ -1,136 +0,0 @@
-# atakB1
-
-menu_off = 1
-
-if $ARGS[0] = 'atak':
-	cla
-	!payment hit dodge
-	poSp = speedV*20/100
-	uvAg = pcs_agil*20/100
-	poBox = reactV*20/100
-	uvBox = pcs_react*20/100
-	popad = RAND(reactV-poBox,reactV+poBox) + RAND(speedV-poSp,speedV+poSp) + bonusShV
-	uvorot = RAND(pcs_react-uvBox,pcs_react+uvBox) + RAND(pcs_agil-uvAg,pcs_agil+uvAg)
-	uvorKoef = uvorot*50/100
-	popKoef = popad*50/100
-
-	if popad > uvorot:
-		if popad >= uvorot+uvorKoef:
-			!Crete, very direct hit
-			'<b><font color = green>Critical hits</font></b>'
-
-			gs'atakB1','uronKrit'
-		elseif popad < uvorot+uvorKoef:
-			!Normal hit
-			!He attacks the enemy
-			'<b><font color = green>EYE</font></b>'
-
-			gs'atakB1','uron'
-		end
-	elseif popad <= uvorot:
-		'<b><font color = red>LOST</font></b>'
-	end
-end
-
-if $ARGS[0] = 'uronKrit':
-	cla
-	damDef = defenceV/100
-	damKoef = damDef*20/100
-	damage = RAND(damDef+damKoef,damDef+damKoef*2)
-	gs'atakB1','damage'
-end
-
-if $ARGS[0] = 'uron':
-	cla
-	damDef = defenceV/100
-	damKoef = damDef*20/100
-	damage = RAND(damDef-damKoef,damDef+damKoef)
-	gs'atakB1','damage'
-end
-
-if $ARGS[0] = 'damage':
-	cla
-	if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
-		if dospeh > 0:damage = damage - dospehDefV & dospehEn = dospehEn - 1
-		if damage < 0:damage = 0
-		pcs_health = pcs_health - damage
-		!pcs_mana = pcs_mana - damageM
-
-		if eleShV > 0:
-			stun = RAND(eleShV,eleShV*3)
-
-			'<b><font color = red>Defense paralyzed you to <<stun>> Rounds</font></b>'
-		end
-
-		'<b><font color = red>Defense caused you damage <<damage>> units</font></b>'
-		!'<b><font color = red>Your mana harmed <<damageM>> units</font></b>'
-
-		if zerkalo > 0:
-			zerkalo = zerkalo - 1
-			defenceV = defenceV - damage
-
-			'<b><font color = green>You have reflected the damage of the defense and the defense received <<damage>> points of damage</font></b>'
-		end
-
-		!xgt'fight','sta'
-	end
-
-	if defence > 0 and klon <= 0 and unmaterial <= 0:
-		!damSum = damage + damageM
-		!defence = defence - damSum
-		defence = defence - damage
-
-		'<b><font color = red>Your protection harmed <<damage>> units of the defense</font></b>'
-
-		!xgt'fight','sta'
-	end
-
-	if klon > 0 and unmaterial <= 0:
-		klon = klon - 1
-
-		'<b><font color = red>It destroys your clone</font></b>'
-
-		!xgt'fight','sta'
-	end
-
-	if unmaterial > 0:
-		unmaterial = unmaterial - 1
-
-		'<b><font color = green>Beat the defense went through you. YOU are not material</font></b>'
-
-		!xgt'fight','sta'
-	end
-
-	if barier > 0:
-		!imeniteta barrier for damage
-		if barier >= damage:
-			'<b><font color = green>You can easily withstand the impact of the defense</font></b>'
-
-			!xgt'fight','sta'
-		elseif barier < damage:
-			!pcs_mana = pcs_mana - damageM
-			!pcs_health = pcs_health - damage
-			pcs_health = pcs_health - damage
-
-			if eleShV > 0:
-				stun = RAND(eleShV,eleShV*3)
-
-				'<b><font color = red>Defense paralyzed you to <<stun>> Rounds</font></b>'
-			end
-
-			'<b><font color = red>You harmed <<damage>> units of the defense</font></b>'
-			!'<b><font color = red>Your mana harmed <<damageM>> units</font></b>'
-
-			if zerkalo > 0:
-				zerkalo = zerkalo - 1
-				defenceV = defenceV - damage
-
-				'<b><font color = green>You have reflected damage and defense received <<damage>> points of damage</font></b>'
-			end
-		end
-		!xgt'fight','sta'
-	end
-end
-
---- atakB1 ---------------------------------
-

locations/atakM.qsrc

@@ -1,186 +0,0 @@
-# atakM
-
-menu_off = 1
-
-if $ARGS[0] = 'atakVmana':
-	cla
-	!payment hit dodge
-	poSp = speedV*20/100
-	uvAg = pcs_agil*20/100
-	poBox = reactV*20/100
-	uvBox = pcs_react*20/100
-	popad = RAND(reactV-poBox,reactV+poBox) + RAND(speedV-poSp,speedV+poSp)
-	uvorot = RAND(pcs_react-uvBox,pcs_react+uvBox) + RAND(pcs_agil-uvAg,pcs_agil+uvAg)
-	uvorKoef = uvorot*50/100
-	popKoef = popad*50/100
-
-	if popad > uvorot:
-		if popad >= uvorot+uvorKoef:
-			!Crete, very direct hit
-			'<b><font color = red>Critical hits</font></b>'
-
-			xgt'atakM','uronKritV'
-		elseif popad < uvorot+uvorKoef:
-			!Normal hit
-			!He attacks the enemy
-			'<b><font color = red>EYE</font></b>'
-
-			xgt'atakM','uronV'
-		end
-	elseif popad <= uvorot:
-		'<b><font color = green>LOST</font></b>'
-
-		xgt'fight','sta'
-	end
-end
-
-if $ARGS[0] = 'uronKritV':
-	cla
-	damage = RAND(1000,2000)
-	damageM = RAND(1000,2000)
-
-	if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
-		if dospeh > 0:damage = damage - dospehDef & dospehEn = dospehEn - 1
-		if damage < 0:damage = 0
-		pcs_health = pcs_health - damage
-		pcs_mana = pcs_mana - damageM
-
-		'<b><font color = red>Your health harmed <<damage>> units</font></b>'
-		'<b><font color = red>Your mana harmed <<damageM>> units</font></b>'
-
-		if zerkalo > 0:
-			zerkalo = zerkalo - 1
-			healthV = healthV - damage
-
-			'<b><font color = green>You are repelled and the damage <<$boydesc>> We received <<damage>> points of damage</font></b>'
-		end
-
-		xgt'fight','sta'
-	end
-
-	if defence > 0 and klon <= 0 and unmaterial <= 0:
-		damSum = damage + damageM
-		defence = defence - damSum
-
-		'<b><font color = red>Your protection harmed <<damSum>> units</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if klon > 0 and unmaterial <= 0:
-		klon = klon - 1
-
-		'<b><font color = red>It destroys your clone, Do you have more <<Klon>> Clones</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if unmaterial > 0:
-		unmaterial = unmaterial - 1
-
-		'<b><font color = green>Beat the enemy flew right through your body. YOU are not material</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if barier > 0:
-		!imeniteta barrier for damage
-		if barier >= damage:
-			'<b><font color = green>You can easily withstand the impact of the enemy</font></b>'
-
-			xgt'fight','sta'
-		elseif barier < damage:
-			pcs_mana = pcs_mana - damageM
-			pcs_health = pcs_health - damage
-
-			'<b><font color = red>You harmed <<damage>> units</font></b>'
-			'<b><font color = red>Your mana harmed <<damageM>> units</font></b>'
-
-			if zerkalo > 0:
-				zerkalo = zerkalo - 1
-				healthV = healthV - damage
-
-				'<b><font color = green>You are repelled and the damage <<$boydesc>> We received <<damage>> points of damage</font></b>'
-			end
-		end
-
-		xgt'fight','sta'
-	end
-end
-
-if $ARGS[0] = 'uronV':
-	cla
-	damage = RAND(500,1000)
-	damageM = RAND(500,1000)
-
-	if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
-		if dospeh > 0:damage = damage - dospehDef & dospehEn = dospehEn - 1
-		if damage < 0:damage = 0
-		pcs_health = pcs_health - damage
-		pcs_mana = pcs_mana - damageM
-
-		'<b><font color = red>Your health harmed <<damage>> units</font></b>'
-		'<b><font color = red>Your mana harmed <<damageM>> units</font></b>'
-
-		if zerkalo > 0:
-			zerkalo = zerkalo - 1
-			healthV = healthV - damage
-
-			'<b><font color = green>You are repelled and the damage <<$boydesc>> We received <<damage>> points of damage</font></b>'
-		end
-
-		xgt'fight','sta'
-	end
-
-	if defence > 0 and klon <= 0 and unmaterial <= 0:
-		damSum = damage + damageM
-		defence = defence - damSum
-
-		'<b><font color = red>Your protection harmed <<damSum>> units</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if klon > 0 and unmaterial <= 0:
-		klon = klon - 1
-
-		'<b><font color = red>It destroys your clone, Do you have more <<Klon>> Clones</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if unmaterial > 0:
-		unmaterial = unmaterial - 1
-
-		'<b><font color = green>Beat the enemy flew right through your body. YOU are not material</font></b>'
-
-		xgt'fight','sta'
-	end
-
-	if barier > 0:
-		!imeniteta barrier for damage
-		if barier >= damage:
-			'<b><font color = green>You can easily withstand the impact of the enemy</font></b>'
-
-			xgt'fight','sta'
-		elseif barier < damage:
-			pcs_mana = pcs_mana - damageM
-			pcs_health = pcs_health - damage
-
-			'<b><font color = red>You harmed <<damage>> units</font></b>'
-			'<b><font color = red>Your mana harmed <<damageM>> units</font></b>'
-
-			if zerkalo > 0:
-				zerkalo = zerkalo - 1
-				healthV = healthV - damage
-
-				'<b><font color = green>You are repelled and the damage <<$boydesc>> We received <<damage>> points of damage</font></b>'
-			end
-		end
-
-		xgt'fight','sta'
-	end
-end
-
---- atakM ---------------------------------
-

locations/boxing.qsrc

@@ -1,52 +0,0 @@
-# boxing
-!Choosing a physical attack
-
-menu_off = 1
-
-if weapon = 0 and autocombat_cheat = 0:
-	act 'Fist':
-		cla
-		!gs'atak'
-		xgt'atak','player'
-	end
-elseif weapon = 0 and autocombat_cheat = 1:
-	cla
-	!gs'atak'
-	xgt'atak','player'
-end
-
-if weapon > 0:
-	if weaponTipe = 1:$weap = 'sword'
-	if weaponTipe = 2:$weap = 'mace'
-	if weaponTipe = 3:$weap = 'ax'
-
-	act 'Hit <<$weap>>':
-		cla
-		!gs'atak'
-		xgt'atak','player'
-	end
-end
-
-if kunai > 0:
-	'You have <<kunai>> throwing knives.'
-
-	act 'Throw the knife':
-		cla
-		knife = input ("How to throw a knife?")
-		if knife > kunai:
-			knife = kunai
-			kunai = 0
-		elseif knife <= kunai:
-			kunai = kunai - knife
-		end
-
-		'<font color = green>You hurled <<knife>> knives.</font>'
-
-		xgt'atak','player'
-	end
-end
-
-if pcs_magik > 0: act 'Magic Attack':gt'magik'
-
---- boxing ---------------------------------
-

locations/defence.qsrc

@@ -1,107 +0,0 @@
-# defence
-
-
-
-!! Old code commented out but there for reference
-!!{
-if defence <= 0:
-	defence = 0
-	defenceM = 0
-	defenceW = 0
-	defenceActPar = 0
-	defenceActParM = 0
-	defenceAct = 0
-	defenceActM = 0
-	defAtk = 0
-	defAtkM = 0
-end
-
-if defenceV <= 0:
-	defenceV = 0
-	defenceMV = 0
-	defenceWV = 0
-	defenceActParV = 0
-	defenceActParMV = 0
-	defenceActV = 0
-	defenceActMV = 0
-	defAtkV = 0
-	defAtkMV = 0
-end
-
-if defenceAct > 0:
-	defence += defenceActPar
-	defenceAct -= 1
-	defActParK = defenceActPar/100
-	pcs_mana -= defActParK
-	'<b><font color="green">Regeneration consumes <<defActParK>> units of mana.</font></b>'
-end
-
-if defenceActM > 0:
-	defenceM += defenceActParM
-	defenceActM -= 1
-	defActParKM = defenceActParM/100
-	pcs_mana -= defActParKM
-	'<b><font color="green">Regeneration consumes <<defActParKM>> units of mana.</font></b>'
-end
-
-if defenceActV > 0:
-	defenceV += defenceActParV
-	defenceActV -= 1
-	manaV -= (defenceActParV / 100)
-end
-
-if defenceActMV > 0:
-	defenceMV += defenceActParMV
-	defenceActMV -= 1
-	manaV -= (defenceActParMV / 100)
-end
-
-if defAtk > 0:
-	defAtk -= 1
-	'<b><font color="green">You protection shield counter-attack the enemy.</font></b>'
-	gs 'atakB', 'atak'
-end
-
-if defAtkV > 0:
-	defAtkV -= 1
-	'<b><font color="red">The enemy''s protection shield counter-attacks you.</font></b>'
-	gs 'atakB1', 'atak'
-end
-
-if defAtkM > 0:
-	defAtkM -= 1
-
-	if defenceMV <= 0 and unmaterialV = 0:
-		defDamM = rand(defenceActParM/2, defenceActParM)
-		manaV -= defDamM
-		defence += defDamM
-		'<b><font color="green">Your protection shield absorbed <<defDamM>> mana from an enemy, this mana converts into strengthening your defenses.</font></b>'
-	end
-
-	if defenceMV > 0:
-		defenceMV += defenceActParM
-		'<b><font color="green">Your protection shield caused <<defenceActParM>> points of damage to your enemy''s mana.</font></b>'
-	end
-	if unmaterialV > 0:'<b><font color="green">Your protection shield is trying to absorb the enemy''s attack but it does not work, the enemy is too strong.</font></b>'
-end
-
-if defAtkMV > 0:
-	defAtkMV -= 1
-
-	if defenceM <= 0 and unmaterial = 0:
-		defDamMV = rand(defenceActParMV/2, defenceActParMV)
-		pcs_mana -= defDamMV
-		defenceV += defDamMV
-		'<b><font color="red">You enemy takes <<defDamMV>> mana from you strengthening their defense.</font></b>'
-	end
-
-	if defenceM > 0:
-		defenceM += defenceActParMV
-		'<b><font color="red">The protection shield inflicts <<defenceActParMV>> points of damage.</font></b>'
-	end
-
-	if unmaterial > 0:'<b><font color="red">The enemy''s protection shield is trying to absorb your mana but it does not work.</font></b>'
-end
-}
---- defence ---------------------------------
-

locations/priziv.qsrc

@@ -1,104 +0,0 @@
-# priziv
-if $ARGS[0] = 'tobi':
-	gs 'boyStat', 'A167'
-	!!stats
-	strenV = 300
-	speedV = 100
-	agilV = 100
-	reactV = 100
-	vitalV = 100
-	intelV = 100
-	willV = 200
-	!!skills
-	magikV = 12
-	boxingV = 100
-	shootV = 100
-	!!parameters
-	healthV = vitalV * 10 + strenV * 5
-	manaV = intelV * magikV + magikV * 100 + vitalV * 10
-	willpowerV = willV * 10
-	BonusAtakV = 0
-	BonusDefV = 0
-	!!Programme of Action
-	program = 6
-	unmaterialV = 40
-	stunV = 0
-
-end
-
-if $ARGS[0] = 'sasori':
-	gs 'boyStat', 'A180'
-	!!stats
-	strenV = 100
-
-	if SasoriBody = 5:
-		speedV = 100
-		agilV = 100
-		reactV = 100
-	end
-
-	if SasoriBody = 4:
-		speedV = 110
-		agilV = 100
-		reactV = 100
-	end
-
-	if SasoriBody = 3:
-		speedV = 120
-		agilV = 105
-		reactV = 105
-	end
-
-	if SasoriBody = 2:
-		speedV = 130
-		agilV = 110
-		reactV = 110
-	end
-
-	vitalV = 100
-	intelV = 100
-	willV = 100
-	!!skills
-	magikV = 10
-	boxingV = 100
-	shootV = 100
-	!!parameters
-	healthV = vitalV * 10 + strenV * 5
-	manaV = intelV * magikV + magikV * 100 + vitalV * 10
-	willpowerV = willV * 10
-	BonusAtakV = 0
-	BonusDefV = 0
-	!!Programme of Action
-	program = 9
-	klonV = 3
-	stunV = 0
-end
-
-if $ARGS[0] = 'sasori1':
-	gs 'boyStat', 'A180'
-	!!stats
-	strenV = 500
-	speedV = 140
-	agilV = 120
-	reactV = 110
-	vitalV = 500
-	intelV = 100
-	willV = 100
-	!!skills
-	magikV = 10
-	boxingV = 105
-	shootV = 100
-	!!parameters
-	healthV = vitalV * 10 + strenV * 5
-	manaV = intelV * magikV + magikV * 100 + vitalV * 10
-	willpowerV = willV * 10
-	BonusAtakV = 0
-	BonusDefV = 0
-	!!Programme of Action
-	program = 9
-	klonV = 3
-	stunV = 0
-end
-
---- priziv ---------------------------------
-

locations/spell.qsrc

@@ -459,7 +459,6 @@ if $ARGS[0] = 'weapon':
 	else
 		'<b>The spell fizzles.  Nothing seems to happen.</b>'
 	end
-	!xgt'atak','player'}
 	"weapon"
 end
 

locations/strelba.qsrc

@@ -1,444 +0,0 @@
-# strelba
-!gunpricel = 0 no sighting
-!gunpricel = 1 sighting
-!gunpricel = 2 very accurate
-
-!gunpower Weapon damage
-!buu the number of shots
-!shoot shooting skills
-:markstrelba
-!Reita hit
-
-buurand = RAND(0,100)
-if buu = 0:xgt'fight','sta'
-
-if pcs_shoot = 0:
-	if gunpricel = 0:
-		if buurand = 100:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 100:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 1:
-		if buurand >= 95:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 95:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 2:
-		if buurand >= 90:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 90:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	end
-elseif pcs_shoot < 20:
-	if gunpricel = 0:
-		if buurand >= 95:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 95:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 1:
-		if buurand >= 90:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 90:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 2:
-		if buurand >= 85:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 85:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	end
-end
-if pcs_shoot < 40:
-	if gunpricel = 0:
-		if buurand >= 90:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 90:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 1:
-		if buurand >= 85:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 85:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 2:
-		if buurand >= 80:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 80:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	end
-elseif pcs_shoot < 60:
-	if gunpricel = 0:
-		if buurand >= 85:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 85:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 1:
-		if buurand >= 80:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 80:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 2:
-		if buurand >= 75:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 75:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	end
-elseif pcs_shoot < 80:
-	if gunpricel = 0:
-		if buurand >= 80:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 80:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 1:
-		if buurand >= 75:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 75:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 2:
-		if buurand >= 70:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 70:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	end
-elseif pcs_shoot < 100:
-	if gunpricel = 0:
-		if buurand >= 75:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 75:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 1:
-		if buurand >= 70:
-			damage = gunpower
-			jump'markstelokpopal'
-		end
-		if buurand < 70:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 2:
-		if buurand >= 65:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 65:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	end
-elseif pcs_shoot < 150:
-	if gunpricel = 0:
-		if buurand >= 70:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 70:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 1:
-		if buurand >= 65:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 65:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 2:
-		if buurand >= 60:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 60:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	end
-elseif pcs_shoot < 200:
-	if gunpricel = 0:
-		if buurand >= 65:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 65:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 1:
-		if buurand >= 60:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 60:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 2:
-		if buurand >= 55:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 55:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	end
-elseif pcs_shoot < 300:
-	if gunpricel = 0:
-		if buurand >= 60:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 60:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 1:
-		if buurand >= 55:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 55:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 2:
-		if buurand >= 45:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 45:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	end
-elseif pcs_shoot < 400:
-	if gunpricel = 0:
-		if buurand >= 55:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 55:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 1:
-		if buurand >= 50:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 50:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 2:
-		if buurand >= 45:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 45:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	end
-elseif pcs_shoot < 500:
-	if gunpricel = 0:
-		if buurand >= 50:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 50:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 1:
-		if buurand >= 45:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 45:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 2:
-		if buurand >= 40:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 40:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	end
-else
-	if gunpricel = 0:
-		if buurand >= 45:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 45:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 1:
-		if buurand >= 40:
-			damage = gunpower
-			jump'markstelokpopal'
-		elseif buurand < 40:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	elseif gunpricel = 2:
-		if buurand >= 35:
-			damage = gunpower
-			jump'markstelokpopal'
-		end
-		if buurand < 35:
-			buu -= 1
-			'Bloomer'
-			jump'markstrelba'
-		end
-	end
-end
-
-:markstelokpopal
-!if hit
-!calculation of damage
-
-if defenceV <= 0 and klonV <= 0 and unmaterialV <= 0 and barierV <= 0:
-	if dospehV > 0:damage = damage - dospehDefV & dospehEnV = dospehEnV - 1
-	if damage < 0:damage = 0
-	healthV = healthV - damage
-	Gcrimein += 1
-
-	'<b><font color = green>Accept damage <<damage>> units</font></b>'
-
-	if zerkaloV > 0:
-		zerkaloV = zerkaloV - 1
-		pcs_health = pcs_health - damage
-
-		'<b><font color = red><<$boydesc>> reflected the damage and you get <<damage>> points of damage</font></b>'
-	end
-
-	if buu = 0:xgt'fight','sta'
-	if buu > 0:buu -= 1 & jump'markstrelba'
-end
-
-if defenceV > 0 and klonV <= 0 and unmaterialV <= 0:
-	defenceV = defenceV - damage
-
-	'<b><font color = green>Protection of the enemy suffered damage <<damage>> units</font></b>'
-
-	if buu = 0:xgt'fight','sta'
-	if buu > 0:buu -= 1 & jump'markstrelba'
-end
-
-if klonV > 0 and unmaterialV <= 0:
-	klonV = klonV - 1
-
-	'<b><font color = green>Destroyed enemy clone, he still had <<KlonV>> Clones</font></b>'
-
-	if buu = 0:xgt'fight','sta'
-	if buu > 0:buu -= 1 & jump'markstrelba'
-end
-
-if unmaterialV > 0:
-	unmaterialV = unmaterialV - 1
-
-	'<b><font color = red>Your bullet flew straight through the opponent''s body. <<$boydesc>> Not material</font></b>'
-
-	if buu = 0:xgt'fight','sta'
-	if buu > 0:buu -= 1 & jump'markstrelba'
-end
-
-if barierV > 0:
-	!imeniteta barrier for damage
-	if barierV >= damage:
-		'<b><font color = red><<$boydesc>> easily withstood hit</font></b>'
-
-		if buu = 0:xgt'fight','sta'
-		if buu > 0:buu -= 1 & jump'markstrelba'
-	elseif barierV < damage:
-		healthV = healthV - damage
-		Gcrimein += 1
-
-		'<b><font color = green>Accept damage <<damage>> units</font></b>'
-
-		if zerkaloV > 0:
-			zerkaloV = zerkaloV - 1
-			pcs_health = pcs_health - damage
-
-			'<b><font color = red><<$boydesc>> reflected the damage and you get <<damage>> points of damage</font></b>'
-		end
-	end
-
-	if buu = 0:xgt'fight','sta'
-	if buu > 0:buu -= 1 & jump'markstrelba'
-end
-
---- strelba ---------------------------------
-