用于战神引擎手游的一键领取沃玛开荒装备,支持三职业,无条件,不限次数,你们在添加的时候,特别要记得,免费领取的开荒装备不要在回收名单里面,否则玩家可以无限刷回收。脚本是明文版的,可以任意修改领取的装备名单。
部分脚本
procedure _jineng2;
begin
if This_Player.FreeBagNum >= 7 then
begin
This_Player.Give('骨玉权杖',1);
This_Player.Give('魔法长袍(男)',1);
This_Player.Give('魔法长袍(女)',1);
This_Player.Give('道士头盔',1);
This_Player.Give('放大镜',1);
This_Player.Give('黑檀手镯',2);
This_Player.Give('荣誉勋章44号',1);
This_Player.Give('魔血石(大)',1);
This_Player.Give('降妖除魔戒指',2);
This_Player.Give('避魂靴',1);
This_Player.Give('钢铁腰带',1);
end;
end;
procedure _jineng3;
begin
if This_Player.FreeBagNum >= 7 then
begin
This_Player.Give('道士头盔',1);
This_Player.Give('竹笛',1);
This_Player.Give('道士手镯',2);
This_Player.Give('降妖除魔戒指',2);
This_Player.Give('龙纹剑',1);
This_Player.Give('灵魂战衣(女)',1);
This_Player.Give('魔血石(大)',1);
This_Player.Give('灵魂战衣(男)',1);
This_Player.Give('荣誉勋章45号',1);
This_Player.Give('避魂靴',1);
This_Player.Give('钢铁腰带',1);
This_Player.Give('超级护身符',2);
This_Player.Give('超级灰色药粉',1);
This_Player.Give('超级黄色药粉',1);
end;
end;
procedure _jineng4;
begin
This_Player.Give('基础技能双击用',1);
end;
procedure _gohero;
var
nRetJ, nRetB : integer;
begin
nRetB := This_Player.MyHeroState(0); //检查白日门英雄返回值 ,0=无,1=有,2=寄放
if This_Player.GetV(12,1) = 3 then
begin
if nRetB = 0 then
begin
This_Npc.NpcDialog(This_Player,
'<恭喜您可以带领您的英雄去闯荡玛法大陆了,/FCOLOR=222>\'+
'<您想带领哪位英雄呢?/FCOLOR=222>\ \'+
'|{cmd}<英雄(男战士)/@BuHero1> ^<英雄(男法师)/@BuHero2> ^<英雄(男方士)/@BuHero3>\ \'+
'|{cmd}<英雄(女战士)/@BuHero4> ^<英雄(女法师)/@BuHero5> ^<英雄(女方士)/@BuHero6>\'+
'| \'
);
end
else
This_Npc.NpcDialog(This_Player,
'|<少侠你已经有英雄了!/FCOLOR=146>\'
);
end;
end;
procedure domain;
begin
This_Player.SetV(12,1,3);
begin
This_Npc.NpcDialog(This_Player,
// '恭喜您可以带领您的英雄去闯荡玛法大陆了,\'+
// '|<合击技能带好书页在庄园兑换/s=253>,\'+
'|<基础装备领取不限次数/s=253>,\'+
// '|{cmd}<带领一个英雄/@gohero>\'+
'|{cmd}<领战士基础装备/@jineng1>\'+
'|{cmd}<领法师基础装备/@jineng2>\'+
'|{cmd}<领道士基础装备/@jineng3>\'+
'|{cmd}<领三职业基础技能招呼英雄直接学满/@jineng4>\'
);
end;
end;
begin
domain;
end.








