Quest

[1stAntonio]

I have problen with pet system!!
With this quest system work 100%!!!

 Spoiler

quest official_pets begin
state start begin
when 53001.use with pc.getqf("firephoenix1") == 0 and pc.getqf("firephoenix2") == 0
and pc.getqf("firephoenix3") == 0 and pc.getqf("firephoenix4") == 0
and pc.getqf("firephoenix5") == 0 and pc.getqf("firephoenix6") == 0
and pc.getqf("firephoenix7") == 0 begin

cmdchat("b10")

if pc.getqf("firephoenix") == 0 then
horse.set_level("22")
horse.set_name(""..pc.get_name().." - Phoenix de Foc")
pc.setqf("phoenix_fly", 1)
pc.setqf("firephoenix", 1)
affect.add_collect(apply.MAX_HP, 4000, 60*60*8)
affect.add_collect(apply.ATTBONUS_HUMAN, 10, 60*60*8)
affect.add_collect(apply.CRITICAL_PCT, 15, 60*60*8)
affect.add_collect(apply.PENETRATE_PCT, 15, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck", 0.2)

elseif pc.getqf("firephoenix") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal")
affect.remove_collect(apply.MAX_HP, 4000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_HUMAN, 10, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 15, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 15, 60*60*8)
pc.setqf("phoenix_fly", 0)
pc.setqf("firephoenix", 0)
cleartimer("bugcheck")

end
end


-- Bugschutz

when bugcheck.timer begin

if pc.count_item(53001) == 0 then

pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

affect.remove_collect(apply.MAX_HP, 4000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_HUMAN, 10, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 15, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 15, 60*60*8)
pc.setqf("phoenix_fly", 0)
pc.setqf("firephoenix", 0)
syschat(" <Pet> Sigiliul nu a putut fi gasit! ")
cleartimer("bugcheck")
end
end

when login or logout or disconnect with pc.getqf("firephoenix") == 1 begin
horse.set_level("22")
horse.set_name(""..pc.get_name().." - Phoenix de Foc ")
pc.setqf("phoenix_fly", 1)
pc.setqf("firephoenix", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck", 0.2)

end

end
end


quest official_pets begin
state start begin
when 53003.use with pc.getqf("firephoenix") == 0 and pc.getqf("firephoenix2") == 0
and pc.getqf("firephoenix3") == 0 and pc.getqf("firephoenix4") == 0
and pc.getqf("firephoenix5") == 0 and pc.getqf("firephoenix6") == 0
and pc.getqf("firephoenix7") == 0 begin

if pc.getqf("firephoenix1") == 0 then
horse.set_level("23")
horse.set_name(""..pc.get_name().." - Phoenix de Gheata")
pc.setqf("phoenix_fly1", 1)
pc.setqf("firephoenix1", 1)
affect.add_collect(apply.MAX_HP, 4000, 60*60*8)
affect.add_collect(apply.ATTBONUS_HUMAN, 10, 60*60*8)
affect.add_collect(apply.CRITICAL_PCT, 15, 60*60*8)
affect.add_collect(apply.PENETRATE_PCT, 15, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck1", 0.2)

elseif pc.getqf("firephoenix1") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")
affect.remove_collect(apply.MAX_HP, 4000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_HUMAN, 10, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 15, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 15, 60*60*8)
pc.setqf("phoenix_fly1", 0)
pc.setqf("firephoenix1", 0)
cleartimer("bugcheck1")

end
end



-- Bugschutz

when bugcheck1.timer begin

if pc.count_item(53003) == 0 then

pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")
syschat(" <Pet> Sigiliul nu a putut fi gasit! ")
affect.remove_collect(apply.MAX_HP, 4000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_HUMAN, 10, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 15, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 15, 60*60*8)
pc.setqf("phoenix_fly1", 0)
pc.setqf("firephoenix1", 0)

cleartimer("bugcheck1")
end
end

when login or logout or disconnect with pc.getqf("firephoenix1") == 1 begin
horse.set_level("23")
horse.set_name(""..pc.get_name().." - Phoenix de Gheata")
pc.setqf("phoenix_fly1", 1)
pc.setqf("firephoenix1", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck1", 0.2)

end

end
end

quest official_pets begin
state start begin
when 53002.use with pc.getqf("firephoenix") == 0 and pc.getqf("firephoenix1") == 0
and pc.getqf("firephoenix3") == 0 and pc.getqf("firephoenix4") == 0
and pc.getqf("firephoenix5") == 0 and pc.getqf("firephoenix6") == 0
and pc.getqf("firephoenix7") == 0 begin

if pc.getqf("firephoenix2") == 0 then
horse.set_level("24")
horse.set_name(""..pc.get_name().." - Panda")
pc.setqf("phoenix_fly2", 1)
pc.setqf("firephoenix2", 1)
affect.add_collect(apply.MAX_HP, 5000, 60*60*8)
affect.add_collect(apply.ATTBONUS_HUMAN, 10, 60*60*8)
affect.add_collect(apply.CRITICAL_PCT, 15, 60*60*8)
affect.add_collect(apply.PENETRATE_PCT, 15, 60*60*8)
affect.add_collect(apply.CAST_SPEED, 20, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck2", 0.2)

elseif pc.getqf("firephoenix2") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")
affect.remove_collect(apply.MAX_HP, 4000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_HUMAN, 10, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 15, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 15, 60*60*8)
pc.setqf("phoenix_fly2", 0)
pc.setqf("firephoenix2", 0)
cleartimer("bugcheck2")

end
end



-- Bugschutz

when bugcheck2.timer begin

if pc.count_item(53002) == 0 then

pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")
syschat(" <Pet> Sigiliul nu a putut fi gasit! ")
affect.remove_collect(apply.MAX_HP, 4000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_HUMAN, 10, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 15, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 15, 60*60*8)
pc.setqf("phoenix_fly2", 0)
pc.setqf("firephoenix2", 0)

cleartimer("bugcheck2")
end
end

when login or logout or disconnect with pc.getqf("firephoenix2") == 1 begin
horse.set_level("24")
horse.set_name(""..pc.get_name().." - Panda")
pc.setqf("phoenix_fly2", 1)
pc.setqf("firephoenix2", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck2", 0.2)

end

end
end

quest official_pets begin
state start begin
when 53005.use with pc.getqf("firephoenix") == 0 and pc.getqf("firephoenix1") == 0
and pc.getqf("firephoenix2") == 0 and pc.getqf("firephoenix4") == 0
and pc.getqf("firephoenix5") == 0 and pc.getqf("firephoenix6") == 0
and pc.getqf("firephoenix7") == 0 begin

if pc.getqf("firephoenix3") == 0 then
horse.set_level("25")
horse.set_name(""..pc.get_name().." - Baby Azrael")
pc.setqf("phoenix_fly3", 1)
pc.setqf("firephoenix3", 1)
affect.add_collect(apply.MAX_HP, 4000, 60*60*8)
affect.add_collect(apply.ATTBONUS_HUMAN, 10, 60*60*8)
affect.add_collect(apply.CRITICAL_PCT, 15, 60*60*8)
affect.add_collect(apply.PENETRATE_PCT, 15, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck3", 0.2)

elseif pc.getqf("firephoenix3") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")
affect.remove_collect(apply.MAX_HP, 4000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_HUMAN, 10, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 15, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 15, 60*60*8)
pc.setqf("phoenix_fly3", 0)
pc.setqf("firephoenix3", 0)
cleartimer("bugcheck3")

end
end



-- Bugschutz

when bugcheck3.timer begin

if pc.count_item(53005) == 0 then

pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")
syschat(" <Pet> Sigiliul nu a putut fi gasit! ")
affect.remove_collect(apply.MAX_HP, 4000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_HUMAN, 10, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 15, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 15, 60*60*8)
pc.setqf("phoenix_fly3", 0)
pc.setqf("firephoenix3", 0)

cleartimer("bugcheck3")
end
end

when login or logout or disconnect with pc.getqf("firephoenix3") == 1 begin
horse.set_level("25")
horse.set_name(""..pc.get_name().." - Baby Azrael")
pc.setqf("phoenix_fly3", 1)
pc.setqf("firephoenix3", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck3", 0.2)

end

end
end

quest official_pets begin
state start begin
when 53006.use with pc.getqf("firephoenix") == 0 and pc.getqf("firephoenix1") == 0
and pc.getqf("firephoenix2") == 0 and pc.getqf("firephoenix3") == 0
and pc.getqf("firephoenix5") == 0 and pc.getqf("firephoenix6") == 0
and pc.getqf("firephoenix7") == 0 begin

if pc.getqf("firephoenix4") == 0 then
horse.set_level("26")
horse.set_name(""..pc.get_name().." - Caine")
pc.setqf("phoenix_fly4", 1)
pc.setqf("firephoenix4", 1)
affect.add_collect(apply.MAX_HP, 3000, 60*60*8)
affect.add_collect(apply.ATTBONUS_UNDEAD, 15, 60*60*8)
affect.add_collect(apply.ATTBONUS_DEVIL, 15, 60*60*8)
affect.add_collect(apply.ATTBONUS_ANIMAL, 15, 60*60*8)
affect.add_collect(apply.CRITICAL_PCT, 10, 60*60*8)
affect.add_collect(apply.PENETRATE_PCT, 10, 60*60*8)
affect.add_collect(apply.CON, 20, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck4", 0.2)

elseif pc.getqf("firephoenix4") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")
affect.remove_collect(apply.MAX_HP, 3000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_UNDEAD, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_DEVIL, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_ANIMAL, 15, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 10, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 10, 60*60*8)
affect.remove_collect(apply.CON, 20, 60*60*8)
pc.setqf("phoenix_fly4", 0)
pc.setqf("firephoenix4", 0)
cleartimer("bugcheck4")

end
end



-- Bugschutz

when bugcheck4.timer begin

if pc.count_item(53006) == 0 then

pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")
syschat(" <Pet> Sigiliul nu a putut fi gasit! ")
affect.remove_collect(apply.MAX_HP, 3000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_UNDEAD, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_DEVIL, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_ANIMAL, 15, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 10, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 10, 60*60*8)
affect.remove_collect(apply.CON, 20, 60*60*8)
pc.setqf("phoenix_fly4", 0)
pc.setqf("firephoenix4", 0)

cleartimer("bugcheck4")
end
end

when login or logout or disconnect with pc.getqf("firephoenix4") == 1 begin
horse.set_level("26")
horse.set_name(""..pc.get_name().." - Caine")
pc.setqf("phoenix_fly4", 1)
pc.setqf("firephoenix4", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck4", 0.2)

end

end
end

quest official_pets begin
state start begin
when 53007.use with pc.getqf("firephoenix") == 0 and pc.getqf("firephoenix1") == 0
and pc.getqf("firephoenix2") == 0 and pc.getqf("firephoenix3") == 0
and pc.getqf("firephoenix4") == 0 and pc.getqf("firephoenix6") == 0
and pc.getqf("firephoenix7") == 0 begin

if pc.getqf("firephoenix5") == 0 then
horse.set_level("27")
horse.set_name(""..pc.get_name().." - Leu")
pc.setqf("phoenix_fly5", 1)
pc.setqf("firephoenix5", 1)
affect.add_collect(apply.MAX_HP, 3000, 60*60*8)
affect.add_collect(apply.ATTBONUS_UNDEAD, 15, 60*60*8)
affect.add_collect(apply.ATTBONUS_DEVIL, 15, 60*60*8)
affect.add_collect(apply.ATTBONUS_ANIMAL, 15, 60*60*8)
affect.add_collect(apply.CRITICAL_PCT, 10, 60*60*8)
affect.add_collect(apply.PENETRATE_PCT, 10, 60*60*8)
affect.add_collect(apply.DEX, 10, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck5", 0.2)

elseif pc.getqf("firephoenix5") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")
affect.remove_collect(apply.MAX_HP, 3000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_UNDEAD, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_DEVIL, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_ANIMAL, 15, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 10, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 10, 60*60*8)
affect.remove_collect(apply.DEX, 10, 60*60*8)
pc.setqf("phoenix_fly5", 0)
pc.setqf("firephoenix5", 0)
cleartimer("bugcheck5")

end
end



-- Bugschutz

when bugcheck5.timer begin

if pc.count_item(53007) == 0 then

pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")
syschat(" <Pet> Sigiliul nu a putut fi gasit! ")
affect.remove_collect(apply.MAX_HP, 3000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_UNDEAD, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_DEVIL, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_ANIMAL, 15, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 10, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 10, 60*60*8)
affect.remove_collect(apply.DEX, 10, 60*60*8)
pc.setqf("phoenix_fly5", 0)
pc.setqf("firephoenix5", 0)

cleartimer("bugcheck5")
end
end

when login or logout or disconnect with pc.getqf("firephoenix5") == 1 begin
horse.set_level("27")
horse.set_name(""..pc.get_name().." - Leu")
pc.setqf("phoenix_fly5", 1)
pc.setqf("firephoenix5", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck5", 0.2)

end

end
end

quest official_pets begin
state start begin
when 53008.use with pc.getqf("firephoenix") == 0 and pc.getqf("firephoenix1") == 0
and pc.getqf("firephoenix2") == 0 and pc.getqf("firephoenix3") == 0
and pc.getqf("firephoenix4") == 0 and pc.getqf("firephoenix5") == 0
and pc.getqf("firephoenix7") == 0 begin

cmdchat("buff15")

if pc.getqf("firephoenix6") == 0 then
horse.set_level("28")
horse.set_name(""..pc.get_name().." - Porc")
pc.setqf("phoenix_fly6", 1)
pc.setqf("firephoenix6", 1)
affect.add_collect(apply.MAX_HP, 3000, 60*60*8)
affect.add_collect(apply.ATTBONUS_UNDEAD, 15, 60*60*8)
affect.add_collect(apply.ATTBONUS_DEVIL, 15, 60*60*8)
affect.add_collect(apply.ATTBONUS_ANIMAL, 15, 60*60*8)
affect.add_collect(apply.CRITICAL_PCT, 10, 60*60*8)
affect.add_collect(apply.PENETRATE_PCT, 10, 60*60*8)
affect.add_collect(apply.INT, 10, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck6", 0.2)

elseif pc.getqf("firephoenix6") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")
affect.remove_collect(apply.MAX_HP, 3000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_UNDEAD, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_DEVIL, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_ANIMAL, 15, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 10, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 10, 60*60*8)
affect.remove_collect(apply.INT, 10, 60*60*8)
pc.setqf("phoenix_fly6", 0)
pc.setqf("firephoenix6", 0)
cleartimer("bugcheck6")

end
end



-- Bugschutz

when bugcheck6.timer begin

if pc.count_item(53008) == 0 then

pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")
syschat(" <Pet> Sigiliul nu a putut fi gasit! ")
affect.remove_collect(apply.MAX_HP, 3000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_UNDEAD, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_DEVIL, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_ANIMAL, 15, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 10, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 10, 60*60*8)
affect.remove_collect(apply.INT, 10, 60*60*8)
pc.setqf("phoenix_fly6", 0)
pc.setqf("firephoenix6", 0)

cleartimer("bugcheck6")
end
end

when login or logout or disconnect with pc.getqf("firephoenix6") == 1 begin
horse.set_level("28")
horse.set_name(""..pc.get_name().." - Porc")
pc.setqf("phoenix_fly6", 1)
pc.setqf("firephoenix6", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck6", 0.2)

end

end
end

quest official_pets begin
state start begin
when 53009.use with pc.getqf("firephoenix") == 0 and pc.getqf("firephoenix1") == 0
and pc.getqf("firephoenix2") == 0 and pc.getqf("firephoenix3") == 0
and pc.getqf("firephoenix4") == 0 and pc.getqf("firephoenix5") == 0
and pc.getqf("firephoenix6") == 0 begin

cmdchat("buff8")

if pc.getqf("firephoenix7") == 0 then
horse.set_level("29")
horse.set_name(""..pc.get_name().." - Tigru")
pc.setqf("phoenix_fly7", 1)
pc.setqf("firephoenix7", 1)
affect.add_collect(apply.MAX_HP, 3000, 60*60*8)
affect.add_collect(apply.ATTBONUS_UNDEAD, 15, 60*60*8)
affect.add_collect(apply.ATTBONUS_DEVIL, 15, 60*60*8)
affect.add_collect(apply.ATTBONUS_ANIMAL, 15, 60*60*8)
affect.add_collect(apply.CRITICAL_PCT, 10, 60*60*8)
affect.add_collect(apply.PENETRATE_PCT, 10, 60*60*8)
affect.add_collect(apply.STR, 10, 60*60*8)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck7", 0.2)

elseif pc.getqf("firephoenix7") == 1 then
pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")
affect.remove_collect(apply.MAX_HP, 3000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_UNDEAD, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_DEVIL, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_ANIMAL, 15, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 10, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 10, 60*60*8)
affect.remove_collect(apply.STR, 10, 60*60*8)
pc.setqf("phoenix_fly7", 0)
pc.setqf("firephoenix7", 0)
cleartimer("bugcheck7")

end
end



-- Bugschutz

when bugcheck7.timer begin

if pc.count_item(53009) == 0 then

pet.unsummon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")
syschat(" <Pet> Sigiliul nu a putut fi gasit! ")
affect.remove_collect(apply.MAX_HP, 3000, 60*60*8)
affect.remove_collect(apply.ATTBONUS_UNDEAD, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_DEVIL, 15, 60*60*8)
affect.remove_collect(apply.ATTBONUS_ANIMAL, 15, 60*60*8)
affect.remove_collect(apply.CRITICAL_PCT, 10, 60*60*8)
affect.remove_collect(apply.PENETRATE_PCT, 10, 60*60*8)
affect.remove_collect(apply.STR, 10, 60*60*8)
pc.setqf("phoenix_fly7", 0)
pc.setqf("firephoenix7", 0)

cleartimer("bugcheck7")
end
end

when login or logout or disconnect with pc.getqf("firephoenix7") == 1 begin
horse.set_level("29")
horse.set_name(""..pc.get_name().." - Tigru")
pc.setqf("phoenix_fly7", 1)
pc.setqf("firephoenix7", 1)
pet.unsummon() pet.summon()
horse.set_level("21")
horse.set_name(""..pc.get_name().." - Cal ")

loop_timer("bugcheck7", 0.2)

end

end
end

But with this quest it is doesnt work<help plz

 Spoiler

quest pet_system begin
state start begin
function get_pet_info(itemVnum)
pet_info_map = {
-- [ITEM VNUM] MOB_VNUM, DEFAULT NAME, buff_idx, spawn_effect_idx
[53001] = { 34001, "'s Anka Kuюu ", 0},
[53002] = { 34002, "'s Ren Geyiрi Yavrusu ", 0},
[53003] = { 34003, "'s Buz Ankasэ ", 0},
[53004] = { 34001, "'s Feuerphцnix ", 0},
[53005] = { 34004, "'s Yavru Azrail ", 0},
[53006] = { 34009, "'s Yavru Azrail ", 0},
[53007] = { 34010, "'s Bambi ", 0},
[53008] = { 34011, "'s Knuud ", 0},
[53009] = { 34012, "'s Bao Bao ", 0},
[53010] = { 34008, "'s Leonidas ", 0},
[53011] = { 34007, "'s Khan ", 0},
[53012] = { 34005, "'s Porki ", 0},
[53013] = { 34006, "'s Rufus ", 0},
}

itemVnum = tonumber(itemVnum)

return pet_info_map[itemVnum]
end
function get_spawn_effect_file(idx)
effect_table = {
[0] = nil,
[1] = "d:\\\\ymir work\\\\effect\\\\etc\\\\appear_die\\\\npc2_appear .mse",
}
return effect_table [idx]
end
when 53001.use or 53002.use or 53003.use or 53004.use or 53005.use or 53006.use or 53007.use or 53008.use or 53009.use or 53010.use or 53011.use or 53012.use or 53013.use begin
local pet_info = pet_system.get_pet_info(item.vnum)

if null != pet_info then

local mobVnum = pet_info[1]
local petName = pet_info[2]
local spawn_effect_file_name = pet_system.get_spawn_effect_file(pet_info[3])

if true == pet.is_summon(mobVnum) then
if spawn_effect_file_name != nil then
pet.spawn_effect (mobVnum, spawn_effect_file_name)
end
pet.unsummon(mobVnum)
else
if pet.count_summoned() < 1 then
pet.summon(mobVnum, petName, false)
else
syschat(" Zaten bir evcil hayvan зaрэrdэn. ")
end
if spawn_effect_file_name != nil then
pet.spawn_effect(mobVnum, spawn_effect_file_name)
end
end -- if pet.is_summon
end -- if null != pet_info
end -- when
end -- state
end -- quest

[.Xilent]

Is there an error that appears? By the way you should have posted it in this collective thread.

#closerequest

[1stAntonio]

i click on the item in 1 quest<and pet summoned,but in 2 quest i click on the item<pet doesnt summoned!!!!!!

[Nectix]