# KGOLexpa
KGOLneedExpNextLvl=(KGOLlvl * 10)*KGOLlvl
KGOLneedExp = KGOLneedExpNextLvl - KGOLexp
if KGOLneedExp <= 0 and KGOLlvl > KGOLlvlr: KGOLlvlr = KGOLlvl & KGOLpoint += 10 & KGOLspellpoint += 1 & KGOLlvl += 1 & KGOLexp = 0

$KGOLatk = {
KGOLzasV = RAND(KGOLspeedV/4, KGOLspeedV)
KGOLataka = RAND(KGOLspeed/2, KGOLspeed * 2)
if KGOLataka >= KGOLzasV:
	if KGOLataka >= KGOLzasV * 2:
	KGHPnpow = RAND(KGOLpower/2, KGOLpower)
	KGHPV -= KGHPnpow
	'<font color = green>CRETE <<KGHPnpow>></font>'
	else
	KGHPnpow = RAND(KGOLpower/10, KGOLpower/4)
	KGHPntpow = KGHPnpow - KGOLbronaV
	if KGHPntpow <= 0: KGHPntpow = 1
	KGHPV -= KGHPnpow
	'<font color = blue>Contact with <<KGHPnpow>></font>'
	end
else
'<font color = red><<$KGname>> dodged your attack</font>'
end
}
$KGOLatkPoison = {
KGOLzasV = RAND(KGOLspeedV/4, KGOLspeedV)
KGOLataka = RAND(KGOLspeed/2, KGOLspeed * 2)
if KGOLataka >= KGOLzasV:
poison += KGOLspell4 + 1
	if KGOLataka >= KGOLzasV * 2:
	KGHPnpow = RAND(KGOLpower/2, KGOLpower)
	KGHPV -= KGHPnpow
	'<font color = green>CRETE <<KGHPnpow>></font>'
	else
	KGHPnpow = RAND(KGOLpower/10, KGOLpower/4)
	KGHPntpow = KGHPnpow - KGOLbronaV
	if KGHPntpow <= 0: KGHPntpow = 1
	KGHPV -= KGHPnpow
	'<font color = blue>Contact with <<KGHPnpow>></font>'
	end
else
'<font color = red><<$KGname>> dodged your attack</font>'
end
}
$KGOLatkFB = {
KGHPV -= KGOLpower
'<font color = green>Faerbol inflicts damage <<KGOLpower>> U</font>'
}
$KGOLatkV = {
KGOLzas = RAND(KGOLspeed/4, KGOLspeed)
KGOLatakaV = RAND(KGOLspeedV/2, KGOLspeedV * 2)
if KGOLatakaV >= KGOLzas:
	if KGOLatakaV >= KGOLzas * 2:
	KGHPnpow = RAND(KGOLpowerV/2, KGOLpowerV)
	KGHP -= KGHPnpow
	'<font color = red>CRETE <<KGHPnpow>></font>'
	else
	KGHPnpow = RAND(KGOLpowerV/10, KGOLpowerV/4)
	KGHPntpow = KGHPnpow - KGOLbrona
	if KGHPntpow <= 0: KGHPntpow = 1
	KGHP -= KGHPnpow
	'<font color = brown>Contact with <<KGHPnpow>></font>'
	end
else
'<font color = green>You dodged the attack</font>'
end
}

$KGOLrise = {
cls
'<center><B>increasing the screen layer</B></center>'
'Power <<KGOLstren>>, speed and evasion <<KGOLspeed>>, endurance <<KGOLvital>>Intelligence <<KGOLintel>>'
'Improve skills points available <<KGOLpoint>>'
if KGOLpoint > 0:
	act 'Force':
	KGOLstren += 1
	KGOLpoint -= 1
	dynamic $KGOLrise
	end

	act 'Speed ​​/Dodge':
	KGOLspeed += 1
	KGOLpoint -= 1
	dynamic $KGOLrise
	end

	act 'Endurance':
	KGOLvital += 1
	KGOLpoint -= 1
	dynamic $KGOLrise
	end

	act 'Intelligence':
	KGOLintel += 1
	KGOLpoint -= 1
	dynamic $KGOLrise
	end
end

act 'Exit the screen improve': gt 'KGOLgame'
}
$KGOLrise2 = {
cls
'<center><B>Screen skills</B></center>'
'Available skill points increase <<KGOLspellpoint/4>>'
''
if KGOLspellpoint >= 4:
if KGOLklass = 1:
!воин
'Powerful punch Skill =<<KGOLspell>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
'Multiple blow Skill =<<KGOLspell2>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell2 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
'Increased armor Skill =<<KGOLspell3>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell3 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
elseif KGOLklass = 2:
!вор
'Sneaky blow Skill =<<KGOLspell4>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell4 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
'Poison Blade, Skill =<<KGOLspell5>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell5 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
'Invisibility Skill =<<KGOLspell6>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell6 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
elseif KGOLklass = 3:
!маг
'Faerbol, Skill =<<KGOLspell7>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell7 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
'Dropping, Skill =<<KGOLspell8>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell8 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
'Circle of fire, Skill =<<KGOLspell9>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell9 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
elseif KGOLklass = 4:
!жрец
'Hit, Skill =<<KGOLspell10>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell10 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
'Treatment Skill =<<KGOLspell11>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell11 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
'Obkast, Skill =<<KGOLspell12>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell12 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
elseif KGOLklass = 5:
!лучник
'Powerful shot, Skill =<<KGOLspell13>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell13 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
'Triple shot, Skill =<<KGOLspell14>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell14 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
'Regen mana Skill =<<KGOLspell15>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell15 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
else
!варвар
'Thunderbolt, Skill =<<KGOLspell16>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell16 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
'Stan Skill =<<KGOLspell17>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell17 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
'Recovery, Skill =<<KGOLspell18>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell18 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
end
end
act 'Exit the screen skills': gt 'KGOLgame'
}


$KGOLatkKGOLspell2 = {
:multiloop
KGLOloop -= 1
dynamic $KGOLatk
if KGLOloop > 0: jump 'multiloop'
}
--- KGOLexpa ---------------------------------

