用于战神引擎通过物品触发召唤宠物脚本+DB数据，之前更新的宠物召唤都是通过NPC脚本来实现的，但是今天帮主在测试七彩单职业版本看到了这个通过物品触发召唤的，把脚本和DB数据库都提取出来了，里面还有一个宠物升级的NPC脚本，也一起提取出来了，你们不会添加可以看下帮主制作添加卷轴的教程。

教程地址：https://www.1eke.net/9723.html

部分脚本

program Mir2;
 function Gaoji0LB(price, num: Integer):boolean;
begin                                               
  result := true;
end;
procedure _doexit;
begin
  This_Npc.CloseDialog(This_Player);
end;
procedure _chuji;
 begin
 if  This_Player.YBNum >= 10000 then
   begin
	    This_Player.Take('新手宠物召唤令',1);
	    This_Player.ScriptRequestSubYBNum(10000);
        This_Player.Give('初级宠物召唤令',1);
        ServerSay('玩家<' + This_Player.Name + '>将小宠物升级为初级！', 3);		
    end else
        This_NPC.NpcDialog(This_Player,'升级初级召唤令需要新手召唤令加10000元宝！您的元宝不足！'); 
  end;
procedure _ciji;
 begin
 if  This_Player.YBNum >= 30000 then
   begin
	    This_Player.Take('初级宠物召唤令',1);
	    This_Player.ScriptRequestSubYBNum(30000);
        This_Player.Give('次级宠物召唤令',1);
        ServerSay('玩家<' + This_Player.Name + '>将小宠物升级为次级！', 3);		
    end else
        This_NPC.NpcDialog(This_Player,'升级次级召唤令需要初级召唤令加30000元宝！您的元宝不足！'); 
  end;
procedure _zhongji;