三职业技能合成Npc脚本(自定义对话框)

用于战神引擎的三职业技能合成NPC脚本，脚本支持逐日剑法、流星火雨、无极真气、嗜血术这四个技能书的合成，NPC使用了自定义对话框，需要或者裤衩插件才能支持，脚本和配套的素材都提取出来了，但你们在添加的时候，牵扯到的素材需要单独整理出来，不能直接全部覆盖。

部分脚本

procedure _shixue;
 begin
   if (This_Player.GetBagItemCount ('书页') >= 30) and (This_Player.GetBagItemCount ('真魂戒指') >= 1) and (This_Player.YBnum >= 3000) then
   begin
        This_Player.Take('书页',30);
        This_Player.Take('真魂戒指',1);
        This_Player.Give('噬血术',1);
		This_Player.ScriptRequestSubYBNum(3000);
    end
	else
        This_NPC.NpcDialog(This_Player,'你材料好像不够!需要书页30,元宝3000,真魂戒指一个,凑齐再来吧！'); 
  end;
  procedure _zhuri;
 begin
   if (This_Player.GetBagItemCount ('书页') >= 30) and (This_Player.GetBagItemCount ('战神戒指') >= 1) and (This_Player.YBnum >= 3000) then
   begin
        This_Player.Take('书页',30);
		This_Player.Take('战神戒指',1);
        This_Player.Give('逐日剑法',1);
		This_Player.ScriptRequestSubYBNum(3000);
    end
	else
        This_NPC.NpcDialog(This_Player,'你材料好像不够!需要书页30,元宝3000,战神戒指一个,凑齐再来吧！'); 
  end;
 procedure _liuxing;
 begin
   if (This_Player.GetBagItemCount ('书页') >= 30) and (This_Player.GetBagItemCount ('圣魔戒指') >= 1) and (This_Player.YBnum >= 3000) then
   begin
        This_Player.Take('书页',30);
		This_Player.Take('圣魔戒指',1);
        This_Player.Give('流星火雨',1);
		This_Player.ScriptRequestSubYBNum(3000);
    end
	else
        This_NPC.NpcDialog(This_Player,'你材料好像不够!需要书页30,元宝3000,圣魔戒指一个,凑齐再来吧！'); 
  end;
   procedure _wuji;
 begin
   if (This_Player.GetBagItemCount ('书页') >= 30) and (This_Player.GetBagItemCount ('真魂戒指') >= 1) and (This_Player.YBnum >= 3000) then
   begin
        This_Player.Take('书页',30);
		This_Player.Take('真魂戒指',1);
        This_Player.Give('无极真气',1);
		This_Player.ScriptRequestSubYBNum(3000);
    end
	else
        This_NPC.NpcDialog(This_Player,'你材料好像不够!需要书页30,元宝3000,真魂戒指一个,凑齐再来吧！'); 
  end;
procedure _zhuhao;
begin
This_Npc.NpcDialog(This_Player,
   '|<噬血术　:/FCOLOR=251>书页10+元宝2000+真魂戒指<合成/@shixue>\|'+
   '|<无极真气:/FCOLOR=251>书页10+元宝2000+真魂戒指<合成/@wuji>\|'+
   '|<逐日剑法:/FCOLOR=251>书页10+元宝2000+战神戒指<合成/@zhuri>\|'+  
   '|<流星火雨:/FCOLOR=251>书页10+元宝2000+圣魔戒指<合成/@liuxing>\|'
    ); 
end;
procedure _gaoji;
begin
This_Npc.NpcDialog(This_Player,
   '|{cmd}<【高级技能合成】/@zhuhao>\'
    ); 
end;

分享到：

赞(0)