用于战神引擎的三职业技能合成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;