----------********** Beceri azaltma ***********----------

[Catrina]

HERAKLES Otomatik Avlı kalıcı sunucu. 19 Haziran'da açılıyor. Atius & Wizard güvencesiyle hemen kayıt ol, ön kayıt ödülleri aktif. HEMEN TIKLA!

elseif a == 2 then
say_title("Beceri Azalt")
local skill_value = {}
local menu_abi = {}
skill_value = PetSystem.LoadSkill(PetIndex)
for i = 1, table.getn(PetSystem[PetIndex].Skill) do
if liv >= PetSystem[PetIndex].Skill.min_level then
table.insert(menu_abi, PetSystem[PetIndex].Skill.name..": "..skill_value.." puan")
end
end
table.insert(menu_abi, "iptal")
if table.getn(menu_abi) == 1 then
say("Bu becerinin azalmasi mumkun degildir[ENTER]")
return
end
say("Azaltmak istedigin beceriyi sec")
say_size(350, PetSystem[PetIndex].WindowSize)
local s = select_table(menu_abi)
if s == table.getn(menu_abi) then
return
end
say_title(PetSystem[PetIndex].Skill.name)
say("Suanki yetenek puani: "..skill_value.."")
if skill_value == 0 then
say("Beceri zaten 0 oldugu icin azaltamazsin[ENTER]")
return
end
say("Ne yapmak istersiniz[ENTER]")
local b = select("1 puan sil","tum puanlari sil","iptal")
if b == 3 then
return
elseif b == 1 then
say_title(PetSystem[PetIndex].Skill.name)
say("Evcil hayvaninizin yeteneginden 1 puan")
say("silmek istediginden emin misiniz?[ENTER]")
local pet1 = tonumber(input())
local c = select("Evet","Hayir")
if c == 2 then
return
end
PetSystem.RemoveBonus(PetIndex)
PetSystem.ChangeSkillPoints(PetIndex, pet1)
skill_value = skill_value-pet1
PetSystem.SaveSkill(PetIndex, skill_value)
PetSystem.AddBonus(PetIndex)
PetSystem.pokaz_gui(2)
say_title(PetSystem[PetIndex].Skill.name)
say("Pet yeteneginden 1 puan cikarilmistir.[ENTER]")
elseif b == 2 then
say_title(PetSystem[PetIndex].Skill.name)
say("Bu yetenek puanlarini sifira indirmek istediginizden emin misiniz ?[ENTER]")
local c = select("Evet","Hayir")
if c == 2 then
return
end
PetSystem.RemoveBonus(PetIndex)
PetSystem.ChangeSkillPoints(PetIndex, skill_value)
skill_value = 0
PetSystem.SaveSkill(PetIndex, skill_value)
PetSystem.AddBonus(PetIndex)
PetSystem.pokaz_gui(2)
say_title(PetSystem[PetIndex].Skill.name)
say("Sectiginiz becerinin puani sifira indi.[ENTER]")
end
end

 

[thenemne0032]

Sistem hatalı olduğu için konuyu kilitliyorum. Sistemi çalışır hale getirir ve konuyu tekrar düzenlemek isterseniz özel mesaj yoluyla ulaşabilirsiniz.