# 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
'You dealt <> damage'
else
KGHPnpow = rand(KGOLpower / 10, KGOLpower / 4)
KGHPntpow = KGHPnpow - KGOLbronaV
if KGHPntpow <= 0:KGHPntpow = 1
KGHPV -= KGHPnpow
'Contact with <>'
end
else
'<<$KGname>> dodged your attack'
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
'You dealt <> damage'
else
KGHPnpow = rand(KGOLpower/10, KGOLpower / 4)
KGHPntpow = KGHPnpow - KGOLbronaV
if KGHPntpow <= 0:KGHPntpow = 1
KGHPV -= KGHPnpow
'Contact with <>'
end
else
'<<$KGname>> dodged your attack'
end
}
$KGOLatkFB = {
KGHPV -= KGOLpower
'Fireball inflicts <> damage'
}
$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
'You receive <> damage'
else
KGHPnpow = rand(KGOLpowerV/10, KGOLpowerV / 4)
KGHPntpow = KGHPnpow - KGOLbrona
if KGHPntpow <= 0:KGHPntpow = 1
KGHP -= KGHPnpow
'Contact with <>'
end
else
'You dodged the attack'
end
}
$KGOLrise = {
cls
'
increasing the screen layer'
'Power <>, speed and evasion <>, endurance <>Intelligence <>'
'Improve skills points available <>'
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
'Screen skills'
'Available skill points increase <>'
''
if KGOLspellpoint >= 4:
if KGOLklass = 1:
!!warrior
'Powerful punch Skill =<>. Attach a skill point'
'Multiple blow Skill =<>. Attach a skill point'
'Increased armor Skill =<>. Attach a skill point'
elseif KGOLklass = 2:
!!thief
'Sneaky blow Skill =<>. Attach a skill point'
'Poison Blade, Skill =<>. Attach a skill point'
'Invisibility Skill =<>. Attach a skill point'
elseif KGOLklass = 3:
!!magican
'Faerbol, Skill =<>. Attach a skill point'
'Dropping, Skill =<>. Attach a skill point'
'Circle of fire, Skill =<>. Attach a skill point'
elseif KGOLklass = 4:
!!priest
'Hit, Skill =<>. Attach a skill point'
'Treatment Skill =<>. Attach a skill point'
'Obkast, Skill =<>. Attach a skill point'
elseif KGOLklass = 5:
!!archer
'Powerful shot, Skill =<>. Attach a skill point'
'Triple shot, Skill =<>. Attach a skill point'
'Regen mana Skill =<>. Attach a skill point'
else
!!barbarian
'Thunderbolt, Skill =<>. Attach a skill point'
'Stan Skill =<>. Attach a skill point'
'Recovery, Skill =<>. Attach a skill point'
end
end
act 'Exit the screen skills':gt 'KGOLgame'
}
$KGOLatkKGOLspell2 = {
:multiloop
KGLOloop -= 1
dynamic $KGOLatk
if KGLOloop > 0:jump 'multiloop'
}
--- KGOLexpa ---------------------------------