战神引擎装备附魔npc脚本，附魔过程需要金刚石等材料，脚本是明文版，可以任意修改里面的使用条件，附魔就是增加剑甲额外的特殊属性，比如暴击、绿毒等。脚本从迪奥合击里面提取出来的，里面需要的星王神石你们可以换成你们自己版本里面的某个材料。然后添加怪物爆出或者商铺购买等方式让玩家获得。
部分脚本
program Mir2;
procedure _doexit;
begin
This_Npc.CloseDialog(This_Player);
end;
procedure _1;
begin
if (This_Player.GetBagItemCount ('开天') >= 1) and (This_Player.GetBagItemCount ('金刚石') >= 100) and (This_Player.GetBagItemCount ('星王神石') >= 1) and (This_Player.YBNum >= 50000) then
begin
This_Player.Take('金刚石',100);
This_Player.Take('星王神石',1);
This_Player.Take('开天',1);
This_Player.ScriptRequestSubYBNum(50000);
This_Player.Give('开天[附魔]',1);
ServerSay('恭喜玩家【' + This_Player.Name + '】获得了开天[附魔]！', 3);
end else
This_NPC.NpcDialog(This_Player,'你的材料不够！');
end;
procedure _2;
begin
if (This_Player.GetBagItemCount ('镇天') >= 1) and(This_Player.GetBagItemCount ('金刚石') >= 100) and (This_Player.GetBagItemCount ('星王神石') >= 1) and (This_Player.YBNum >= 50000) then
begin
This_Player.Take('金刚石',100);
This_Player.Take('镇天',1);
This_Player.Take('星王神石',1);
This_Player.ScriptRequestSubYBNum(50000);
This_Player.Give('镇天[附魔]',1);
ServerSay('恭喜玩家【' + This_Player.Name + '】获得了镇天[附魔]！', 3);
end else
This_NPC.NpcDialog(This_Player,'你的材料不够！');
end;
procedure _3;
begin
if (This_Player.GetBagItemCount ('玄天') >= 1) and(This_Player.GetBagItemCount ('金刚石') >= 100) and (This_Player.GetBagItemCount ('星王神石') >= 1) and (This_Player.YBNum >= 50000) then
begin
This_Player.Take('金刚石',100);
This_Player.Take('玄天',1);
This_Player.Take('星王神石',1);
This_Player.ScriptRequestSubYBNum(50000);
This_Player.Give('玄天[附魔]',1);
ServerSay('恭喜玩家【' + This_Player.Name + '】获得了玄天[附魔]！', 3);
end else
This_NPC.NpcDialog(This_Player,'你的材料不够！');
end;
procedure _4;
begin
if (This_Player.GetBagItemCount ('凤天魔甲') >= 1) and (This_Player.GetBagItemCount ('金刚石') >= 100) and (This_Player.GetBagItemCount ('星王神石') >= 1) and (This_Player.YBNum >= 50000) then
begin
This_Player.Take('金刚石',100);
This_Player.Take('凤天魔甲',1);
This_Player.Take('星王神石',1);
This_Player.ScriptRequestSubYBNum(50000);
This_Player.Give('凤天魔甲[附魔]',1);
ServerSay('恭喜玩家【' + This_Player.Name + '】获得了凤天魔甲[附魔]！', 3);
end else
This_NPC.NpcDialog(This_Player,'你的材料不够！');
end;