Pet

Pet Name System
-- By Saud bin abdullah & MrLibya
-- [Only registered and activated users can see links. Click Here To Register...]
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, " عنقاء النار ", 0},
[53002] = { 34002, " صغير الرنة ", 0},
[53003] = { 34003, " عنقاء الثلج ", 0},
[53004] = { 34001, " عنقاء النار ", 0},
[53005] = { 34004, " صغير فرعائيل ", 1},
[53006] = { 34009, " صغير فرعائيل ", 0}, -- Baby Azrael (gold)
[53007] = { 34010, " بامبي ", 0},
[53008] = { 34011, " كنود ", 0}, -- Knuud
[53009] = { 34012, " باو باو ", 0}, -- Bao Bao
[53010] = { 34008, " ليوندس ", 0},
[53011] = { 34007, " خان ", 0},
[53012] = { 34005, " بوركي ", 0},
[53013] = { 34006, " ريوفوس ", 0},
[53016] = { 34015, " العظمي ", 0},
[53017] = { 34016, " عنقاء الغابة ", 0},
[71171] = { 34013, " Redthief young", 0},
[71172] = { 34014, " Redthief young", 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 or 53016.use or 53017.use or 71171.use or 71172.use begin
local pet_info = pet_system.get_pet_info(item.vnum)
local name = pc.get_name()

if null != pet_info then
if game.get_event_flag(""..name.."pet") == 1 then


local res1, Pname = mysql_direct_query("select * from player.pet_system where id = "..pc.get_player_id().." limit 1;")
local mobVnum = pet_info[1]
local petName = Pname[1].pet_name
local petNameO = 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, "'s - "..petName, false)
else
syschat("You already summoned a pet.")
end
if spawn_effect_file_name != nil then
pet.spawn_effect(mobVnum, spawn_effect_file_name)
end
end -- if pet.is_summon
else
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("You already summoned a pet.")
end
if spawn_effect_file_name != nil then
pet.spawn_effect(mobVnum, spawn_effect_file_name)
end
end
end -- if pet.is_summon
end -- if null != pet_info
end -- when
end -- state
end -- quest