PHP Code:
quest pets begin
state start begin
function givebonus(x)
local y,boni = {53,54,1},pets.bonusliste()
table.foreach(boni[x],function(i,l) cmdchat("HaustierBonus"..i.." "..l.."") affect.add_collect(y[i],l,60*60*24*365*60) end )
cmdchat("HaustierLevel "..pc.getqf('petlevel').."")
cmdchat("HaustierName "..pc.get_name().."")
pc.setqf("104",1)
end
function bonusliste()
return {
[1] = {200,100,500},
[2] = {250,150,1000},
[3] = {300,200,1500},
[4] = {350,250,2000},
[5] = {400,300,3000},
}
end
function removebonus(x)
local y,boni = {53,54,1},pets.bonusliste()
table.foreach(boni[x],function(i,l) affect.remove_collect(y,l,60*60*24*365*60) end )
horse.unsummon()
pc.setqf("104",0)
horse.set_level("21")
cmdchat("HidePetGui")
cmdchat("HideIcePhoenixGui")
cleartimer("bugcheck")
end
when 30112.use with pc.getqf("101") == 0 begin
if pc.getqf('petlevel') == 0 then
pc.setqf('petlevel',1)
end
local petlvl = 22
pc.setqf("101", 1)
horse.set_level(petlvl)
horse.set_name(pc.get_name().." Fénix")
pet.summon()
horse.set_level(old_level)
horse.set_name(old_name)
pets.givebonus(pc.getqf('petlevel'))
local expprocent1 = {20, 80, 160, 350, 400}
cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent1[pc.getqf("petlevel")]).."")
cmdchat("ShowPetGui")
loop_timer("bugcheck", 0.2)
end
when 30112.use with pc.getqf("101") == 1 begin
pc.setqf("101", 0)
pets.removebonus(pc.getqf('petlevel'))
pet.unsummon()
end
when 30117.use with pc.getqf("102") == 0 begin
if pc.getqf('petlevel') == 0 then
pc.setqf('petlevel',1)
end
local petlvl = 23
pc.setqf("102", 1)
horse.set_level(petlvl)
horse.set_name(pc.get_name().." Ledový Fénix")
pet.summon()
horse.set_level(old_level)
horse.set_name(old_name)
pets.givebonus(pc.getqf('petlevel'))
local expprocent1 = {20, 80, 160, 350, 400}
cmdchat("IcePhoenixProcentExp "..(pc.getqf("exp")/expprocent1[pc.getqf("petlevel")]).."")
cmdchat("ShowIcePhoenixGui")
loop_timer("bugcheck", 0.2)
end
when 30118.use with pc.getqf("102") == 1 begin
pc.setqf("102", 0)
pets.removebonus(pc.getqf('petlevel'))
pet.unsummon()
end
when kill with pc.getqf("104") == 1 begin
if pc.getqf("petlevel") == 5 then
return
end
if not npc.is_pc() then
pc.setqf("exp",pc.getqf("exp")+1)
local exp2up = {500, 8000, 16000, 35000, 40000}
local expprocent = {20, 80, 160, 350, 400}
cmdchat("PetProcentExp "..(pc.getqf("exp")/expprocent[pc.getqf("petlevel")]).."")
cmdchat("IcePhoenixProcentExp "..(pc.getqf("exp")/expprocent[pc.getqf("petlevel")]).."")
if pc.getqf("exp") == exp2up[pc.getqf("petlevel")] then
if pc.getqf("petlevel") == 4 then
say_title("Herzlichen Glückwunsch")
say("Dein Haustier erreicht Level "..(pc.getqf("petlevel")+1).."")
say_reward("Dies war das letzte Level!")
end
say_title("Herzlichen Glückwunsch")
say("Dein Haustier erreicht Level "..(pc.getqf("petlevel")+1).."")
say("Rufe dein Pet bitte erneut!")
pc.setqf("petlevel",pc.getqf("petlevel")+1)
pc.setqf("exp",0)
pets.removebonus(pc.getqf('petlevel'))
end
end
end
-- Bugschutz
when bugcheck.timer begin
if pc.is_mount() then
horse.unride()
end
if pc.count_item(30112) == 0 then
say_title("Buguser")
say("Bugusing festgestellt!")
pets.removebonus(pc.getqf('petlevel'))
end
end
when login or logout or disconnect with pc.getqf("104") == 1 begin
pets.removebonus(pc.getqf('petlevel'))
chat("Dein Haustier ist nicht mitgekommen...")
chat("Rufe es erneut!")
end
end
end
