用于战神引擎的装备打造或装备合成自定义Npc脚本，脚本功能非常丰富，支持打造勋章、斗笠、盾牌、玉佩、剑甲、材料等，功能相当的丰富，适合各种类型的战神引擎服务端，脚本和自定义对话框素材帮主已经提取出来了，你们添加的时候，素材要单独整理添加到对应的文件夹。不能直接覆盖。

部分脚本

begin
 if (This_Player.GetBagItemCount ('炎龙碎片') >= 30) and (This_Player.GetBagItemCount ('冰龙道刃') >= 1) then
   begin
        This_Player.Take('炎龙碎片',30);
		This_Player.Take('冰龙道刃',1);
	    This_Player.Give('炎龙道刃',1);
    ServerSay('恭喜玩家【' + This_Player.Name + '】打造出了炎龙道刃！', 3);
    end
  else
        This_NPC.NpcDialog(This_Player,
    '你的材料不够,需要炎龙碎片30个+冰龙道刃！'); 
  end;
  procedure _f4;
 begin
 if (This_Player.GetBagItemCount ('炎龙碎片') >= 30) and (This_Player.GetBagItemCount ('冰龙神甲') >= 1) then
   begin
        This_Player.Take('炎龙碎片',30);
		This_Player.Take('冰龙神甲',1);
        This_Player.Give('炎龙神甲',1);
    ServerSay('恭喜玩家【' + This_Player.Name + '】打造出了炎龙神甲！', 3);
    end
  else
        This_NPC.NpcDialog(This_Player,
    '你的材料不够,需要炎龙碎片30个+冰龙神甲！'); 
  end;
  procedure _f5;
 begin
 if (This_Player.GetBagItemCount ('炎龙碎片') >= 30) and (This_Player.GetBagItemCount ('冰龙神衣') >= 1) then
   begin
        This_Player.Take('炎龙碎片',30);
		This_Player.Take('冰龙神衣',1);
        This_Player.Give('炎龙神衣',1);
    ServerSay('恭喜玩家【' + This_Player.Name + '】打造出了炎龙神衣！', 3);
    end
  else
        This_NPC.NpcDialog(This_Player,
    '你的材料不够,需要炎龙碎片30个+冰龙神衣！'); 
  end;
  procedure _f6;
 begin
 if (This_Player.GetBagItemCount ('炎龙碎片') >= 10) and (This_Player.GetBagItemCount ('冰龙战镯') >= 1) then
   begin
        This_Player.Take('炎龙碎片',10);
		This_Player.Take('冰龙战镯',1);
        This_Player.Give('炎龙战镯',1);
    ServerSay('恭喜玩家【' + This_Player.Name + '】打造出了炎龙战镯！', 3);
    end
  else
        This_NPC.NpcDialog(This_Player,
    '你的材料不够,需要炎龙碎片10个+冰龙战镯！'); 
  end;
  procedure _f7;
 begin
 if (This_Player.GetBagItemCount ('炎龙碎片') >= 10) and (This_Player.GetBagItemCount ('冰龙战戒') >= 1) then
   begin
        This_Player.Take('炎龙碎片',10);
		This_Player.Take('冰龙战戒',1);
        This_Player.Give('炎龙战戒',1);
    ServerSay('恭喜玩家【' + This_Player.Name + '】打造出了炎龙战戒！', 3);
    end
  else
        This_NPC.NpcDialog(This_Player,
    '你的材料不够,需要炎龙碎片10个+冰龙战戒！'); 
  end;
  procedure _f8;
 begin
 if (This_Player.GetBagItemCount ('炎龙碎片') >= 10) and (This_Player.GetBagItemCount ('冰龙战盔') >= 1) then
   begin
        This_Player.Take('炎龙碎片',10);
		This_Player.Take('冰龙战盔',1);
        This_Player.Give('炎龙战盔',1);
    ServerSay('恭喜玩家【' + This_Player.Name + '】打造出了炎龙战盔！', 3);
    end
  else
        This_NPC.NpcDialog(This_Player,
    '你的材料不够,需要炎龙碎片10个+冰龙战盔！'); 
  end;
  procedure _f9;
 begin
 if (This_Player.GetBagItemCount ('炎龙碎片') >= 10) and (This_Player.GetBagItemCount ('冰龙战链') >= 1) then
   begin
        This_Player.Take('炎龙碎片',10);
		This_Player.Take('冰龙战链',1);
        This_Player.Give('炎龙战链',1);
    ServerSay('恭喜玩家【' + This_Player.Name + '】打造出了炎龙战链！', 3);
    end
  else
        This_NPC.NpcDialog(This_Player,
    '你的材料不够,需要炎龙碎片10个+冰龙战链！'); 
  end;
  procedure _f10;
 begin
 if (This_Player.GetBagItemCount ('炎龙碎片') >= 10) and (This_Player.GetBagItemCount ('冰龙战带') >= 1) then
   begin
        This_Player.Take('炎龙碎片',10);
		This_Player.Take('冰龙战带',1);
        This_Player.Give('炎龙战带',1);
    ServerSay('恭喜玩家【' + This_Player.Name + '】打造出了炎龙战带！', 3);
    end
  else
        This_NPC.NpcDialog(This_Player,
    '你的材料不够,需要炎龙碎片10个+冰龙战带！'); 
  end;
  procedure _f11;
 begin
 if (This_Player.GetBagItemCount ('炎龙碎片') >= 10) and (This_Player.GetBagItemCount ('冰龙战靴') >= 1) then
   begin
        This_Player.Take('炎龙碎片',10);
		This_Player.Take('冰龙战靴',1);
        This_Player.Give('炎龙战靴',1);
    ServerSay('恭喜玩家【' + This_Player.Name + '】打造出了炎龙战靴！', 3);
    end
  else
        This_NPC.NpcDialog(This_Player,
    '你的材料不够,需要炎龙碎片10个+冰龙战靴！'); 
  end;
  procedure _f12;
 begin
 if (This_Player.GetBagItemCount ('炎龙碎片') >= 10) and (This_Player.GetBagItemCount ('冰龙魔镯') >= 1) then
   begin
        This_Player.Take('炎龙碎片',10);
		This_Player.Take('冰龙魔镯',1);
        This_Player.Give('炎龙魔镯',1);
    ServerSay('恭喜玩家【' + This_Player.Name + '】打造出了炎龙魔镯！', 3);
    end
  else
        This_NPC.NpcDialog(This_Player,
    '你的材料不够,需要炎龙碎片10个+冰龙魔镯！'); 
  end;
  procedure _f13;
 begin
 if (This_Player.GetBagItemCount ('炎龙碎片') >= 10) and (This_Player.GetBagItemCount ('冰龙魔戒') >= 1) then
   begin
        This_Player.Take('炎龙碎片',10);
		This_Player.Take('冰龙魔戒',1);
        This_Player.Give('炎龙魔戒',1);
    ServerSay('恭喜玩家【' + This_Player.Name + '】打造出了炎龙魔戒！', 3);
    end
  else
        This_NPC.NpcDialog(This_Player,
    '你的材料不够,需要炎龙碎片10个+冰龙魔戒！'); 
  end;
  procedure _f14;