# 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 ---------------------------------