用于战神引擎的一键回收元宝脚本，这个脚本非常的有代表性，因为战神引擎的版本大部分都是复古类型，回收也是每一个版本必备的npc功能，今天小鱼在测试迪奥合击看到了这个脚本，提取出来，分享给大家，支持一键，对玩家来说，非常的方便。而且回收的装备从祖玛到魔龙全部都有。脚本也是明文版的，可以任意修改里面的回收内容。
部分脚本
PROGRAM Mir2;
{$I TaoZhuang.pas}
{$I common.pas}
Procedure _doexit;
begin
This_Npc.CloseDialog(This_Player);
end;
procedure domain;
begin
This_Npc.NpcDialog(This_Player,
'|<祖玛回收:/c=red>每件2元宝^<一键收祖玛装备/@77_all>\'+
'|<赤月装备:/c=red>每件5元宝 ^<一键收赤月装备/@1_all>\'+
'|<雷霆装备:/c=red>每件10元宝 ^<一键收雷霆装备/@2_all>\'+
'|<强化装备:/c=red>每件50元宝^<一键收强化装备/@6_all>\'+
'|<战神装备:/c=red>每件200元宝 ^<一键收战神装备/@3_all>\'+
'|<星王装备:/c=red>每件800元宝^<一键收星王装备/@4_all>\'+
'|<怒斩天魔衣:/c=red>每件50元宝 ^<一键收怒斩天魔衣/@11_all>\'+
'|<雷霆屠龙:/c=red>每件200元宝 ^<一键收雷霆剑甲/@22_all>\'+
'|<开天系列:/c=red>每件2000元宝 ^<一键收开天系列/@33_all>\'+
'|<回收注意:/c=red>不想回收的装备请放置仓库\'+
'|{cmd}<退出/@doexit>');
end;
function getZBnameById(ZBid : integer) : string;
var ZBlv , ZBlvId : integer;
begin
ZBlv := ZBid div 100;
ZBlvId := ZBid mod 100;
result := '';
case ZBlv of
1 :
begin
case ZBlvId of
1 : result := '圣战头盔';
2 : result := '圣战项链';
3 : result := '圣战手镯';
4 : result := '圣战戒指';
5 : result := '法神头盔';
6 : result := '法神项链';
7 : result := '法神手镯';
8 : result := '法神戒指';
9 : result := '天尊头盔';
10 : result := '天尊项链';
11 : result := '天尊手镯';
12 : result := '天尊戒指';
13 : result := '钢铁腰带';
14 : result := '避魂靴';
15 : result := '斗笠43号';
16 : result := '斗笠44号';
17 : result := '斗笠45号';
18 : result := '荣誉勋章43号';
19 : result := '荣誉勋章44号';
20 : result := '荣誉勋章45号';
end;
end;
2 :
begin
case ZBlvId of
1 : result := '怒斩';
2 : result := '龙牙';
3 : result := '逍遥扇';
4 : result := '霓裳羽衣';
5 : result := '天师长袍';
6 : result := '圣战宝甲';
7 : result := '天魔神甲';
8 : result := '法神披风';
9 : result := '天尊道袍';
10 : result := '逍遥扇';
end;
end;
3 :
begin
case ZBlvId of
1 : result := '雷霆项链';
2 : result := '雷霆护腕';
3 : result := '雷霆战戒';
4 : result := '雷霆腰带';
5 : result := '雷霆战靴';
6 : result := '烈焰项链';
7 : result := '烈焰护腕';
8 : result := '烈焰魔戒';
9 : result := '烈焰腰带';
10 : result := '烈焰魔靴';
11 : result := '光芒项链';
12 : result := '光芒护腕';
13 : result := '光芒道戒';
14 : result := '光芒腰带';
15 : result := '光芒道靴';
16 : result := '烈焰魔盔';
17 : result := '圣龙盔';
18 : result := '魔龙盔';
19 : result := '天龙盔';
20 : result := '光芒道盔';
21 : result := '烈焰魔盔';
22 : result := '雷霆战盔';
end;
end;