战神引擎NPC装备合成脚本

战神引擎NPC装备合成脚本，脚本里面默认是战士装备，可以任意修改，增加和减少，跟修改合成的条件，你们根据自己的版本情况而定。

PROGRAM Mir2;
{$I common.pas}
Procedure _doexit;
begin
This_Npc.CloseDialog(This_Player);
end;
procedure domain;
begin
This_Npc.NpcDialog(This_Player,
'|我这里有一种秘术!\'+
'|可以将宝物三合为一,来激发更强大的力量\'+
'|前提需要你支付一定的费用给我\'+
'|<提示:合成衣服武器是首饰价格的5倍> \'+
'|{cmd}<虎威合成 huwei=""> <主宰合成 zhuzai="">\'+
'|{cmd}<传奇合成 chuanqi=""> <玉兔合成 yutu="">\'+
'|{cmd}<刺影合成 ciyin=""> <神龙夺命 long="">\'+
'|{cmd}<神龙追魂 hun=""> <神龙化圣 hua="">\'+
'|{cmd}<恶魔神装备 hunhhhh=""> <风云神装备 huajjjj="">\'+
'|{cmd} <终极藐视合成 huagggg="">\'
);
end;
procedure _ji3;
begin
This_Npc.NpcDialog(This_Player,
'|<玛法大陆流传着一个古老的传说..... c="251">\'+
'|<筹齐化圣剑甲套可激活一种神秘的力量 c="70">\'+
'|<据传来自九天之上的神火可以解除封印 c="58">\'+
'|<解封后的化圣斩缠绕紫芒刀气直冲霄汉 c="253">\'+
'|<提示:解封后装备等级为130属性暴涨 c="250"> \'+
'|<解封条件:九天焱焱10个元宝50w>\'+
'|{cmd}<☆★★终极神龙剑甲解封★★☆ ji=""> \'+
'|{cmd}<☆★★终极神龙剑袍解封★★☆ ji1=""> \'
);
end;
procedure _ji;
begin
if (This_Player.GetBagItemCount ('神龙化圣甲') >= 1) and (This_Player.YBNum >= 10000) then
begin
This_Player.Take('九天焱焱',10);
This_Player.Take('神龙化圣甲',1);
This_Player.Take('神龙化圣斩',1);
This_Player.ScriptRequestSubYBNum(10000);
This_Player.Give('神龙化神斩',1);
This_Player.Give('神龙化神甲',1);
end
else
This_NPC.NpcDialog(This_Player,
'勇士无法为你解封,需要九天焱焱*10元宝50W,请将化圣剑甲放在包内.！');
end;