glife/locations/063_defence

# defence
if defence <= 0:
	set defence = 0
	set defenceM = 0
	set defenceW = 0
	set defenceActPar = 0
	set defenceActParM = 0
	set defenceAct = 0
	set defenceActM = 0
	set defAtk = 0
	set defAtkM = 0
end

if defenceV <= 0:
	set defenceV = 0
	set defenceMV = 0
	set defenceWV = 0
	set defenceActParV = 0
	set defenceActParMV = 0
	set defenceActV = 0
	set defenceActMV = 0
	set defAtkV = 0
	set defAtkMV = 0
end




if defenceAct > 0:
	set defence += defenceActPar
	set defenceAct -= 1
	set defActParK = defenceActPar/100
	set manna -= defActParK
	'<B><font color = green>Regeneration consumes Protection <<defActParK>> units manna.</font></B>'
end

if defenceActM > 0:
	set defenceM += defenceActParM
	set defenceActM -= 1
	set defActParKM = defenceActParM/100
	set manna -= defActParKM
	'<B><font color = green>Regeneration consumes magical protection <<defActParKM>> units of manna.</font></B>'
end

if defenceActV > 0:
	set defenceV += defenceActParV
	set defenceActV -= 1
	set mannaV -= (defenceActParV/100)
end

if defenceActMV > 0:
	set defenceMV += defenceActParMV
	set defenceActMV -= 1
	set mannaV -= (defenceActParMV/100)
end

if defAtk > 0:
	set defAtk -= 1
	'<B><font color = green>Your defense is attacking the enemy.</font></B>'
	gs 'atakB','atak'
end

if defAtkV > 0:
	set defAtkV -= 1
	'<B><font color = red>Protection of the enemy attacks you.</font></B>'
	gs 'atakB1','atak'
end

if defAtkM > 0:
set defAtkM -= 1
	if defenceMV <= 0 and unmaterialV = 0:
		set defDamM = RAND(defenceActParM/2, defenceActParM)
		set mannaV -= defDamM
		set defence += defDamM
		'<B><font color = green>Your defense absorbed <<defDamM>> mana from an enemy, this manna went to strengthen your defenses.</font></B>'
	end
	if defenceMV > 0:
		set defenceMV += defenceActParM
		'<B><font color = green>Your defense caused <<defenceActParM>> points of damage protection from damage enemy mana.</font></B>'
	end
	if unmaterialV > 0:
		'<B><font color = green>Your defense is trying to absorb the manna but it does not work, the enemy is not material.</font></B>'
	end
end

if defAtkMV > 0:
	set defAtkMV -= 1
	if defenceM <= 0 and unmaterial = 0:
		set defDamMV = RAND(defenceActParMV/2, defenceActParMV)
		set manna -= defDamMV
		set defenceV += defDamMV
		'<B><font color = red>Protection of the enemy swallow <<defDamMV>> manna from you and this manna went to strengthen the defense.</font></B>'
	end
	if defenceM > 0:
		set defenceM += defenceActParMV
		'<B><font color = red>Protection against your magic damage inflicted damage <<defenceActParMV>> units.</font></B>'
	end
	if unmaterial > 0:
		'<B><font color = red>Protection of the enemy is trying to absorb your manna but it does not work.</font></B>'
	end
end
--- defence ---------------------------------