烈焰私服里增加召唤宠物宝宝脚本

function ontalk3003(npc,event,player)
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
欢迎来到烈焰私服战神，【 ]]..player:GetName()..[[】
我这里可以提供更强大的召唤兽.但你得花费些元宝.
召唤出来的宠物只可以攻击怪物，不可以攻击玩家。
下线则消失，请谨慎使用。
#&talk_line#&
       <u><a href='event:M2402,2'>召唤玄冰狐狸</a></u>(10888元宝)
#&talk_line#&
       <u><a href='event:M2402,3'>召唤神火龙</a></u>(13888元宝)
#&talk_line#&
      更多新召唤兽敬请期待
      推广50群送VIP15 100群送VIP20
      网站地址: www.yeyo6.com
]]);
end

function onTalk3003_1(npc,event,player)
  if player:get_vcoin() >= 888 then
  player:sub_vcoin(888)
     player:gen_slave(5314,5304,"安仔（"..player:GetName().."）",1);
 player:alert(10,0,0,"花费888元宝 成功安仔");
     else
     player:alert(10,0,0,"元宝不够888,召唤失败");
   end
 end

function onTalk3003_2(npc,event,player)
  if player:get_vcoin() >= 10888 then
  player:sub_vcoin(10888)
     player:gen_slave(10010,10010,"玄冰狐狸（"..player:GetName().."）",1);
 player:alert(10,0,0,"花费10888元宝 成功召唤玄冰狐狸");
     else
     player:alert(10,0,0,"元宝不够10888,召唤失败");
   end
 end

function onTalk3003_3(npc,event,player)
  if player:get_vcoin() >= 13888 then
  player:sub_vcoin(13888)
     player:gen_slave(10011,10011,"神火龙（"..player:GetName().."）",1);
 player:alert(10,0,0,"花费13888元宝 成功召唤神火龙");
     else
     player:alert(10,0,0,"元宝不够13888,召唤失败");
   end
 end

function onTalk3003_4(npc,event,player)
  if player:get_vcoin() >= 1688 then
  player:sub_vcoin(1688)
     player:gen_slave(5321,5507,"神火龙（"..player:GetName().."）",1);
 player:alert(10,0,0,"花费1688元宝 成功召唤神火龙");
     else
     player:alert(10,0,0,"元宝不够1688,召唤失败");
   end
 end

Npc3003Funid =
{
[1] = onTalk3003_1;
[2] = onTalk3003_2;
[3] = onTalk3003_3;
[4] = onTalk3003_4;
}

function CreatureNpcFun(npc,event,player,funid)
 if Npc3003Funid[funid] ~= nil then
  Npc3003Funid[funid](npc,event,player);
 end
end

RegisterUnitEvent(3003,20,"ontalk3003")
RegisterUnitEvent(3003,29,"CreatureNpcFun")