战神引擎套装触发脚本
编号:T-3375 2025-09-06 有效期:9999天 22人次
- procedure JHTZ_XH_ZS();
var yaodai, xuezi, baoshi , xunzhang : string;
leiji : integer;
begin
//0衣服 1武器 2勋章 3项链 4头盔 5左手镯 6右手镯 7左戒指 8右戒指 9毒符 10腰带 11靴子 29宝石
yaodai := This_Player.GetItemNameOnBody(10);
xuezi := This_Player.GetItemNameOnBody(11);
baoshi := This_Player.GetItemNameOnBody(1); //我没设置宝石，拿武器试，请自行替换
xunzhang := This_Player.GetItemNameOnBody(4);
leiji := This_Player.GetV(27,27);
//////////验证成功获得技能并且循环验证
if (yaodai = '天龙腰带(战)') or (yaodai = '神*冰雪战带') then //这里可以填2种腰带，
begin
if (xuezi = '天龙战靴') or (xuezi = '神*冰雪战靴') then //类似上面
begin
if (baoshi = '天龙圣剑') or (baoshi = '神*冰雪神剑') then
begin
if (xunzhang = '天龙战盔') or (xunzhang = '神*冰雪战盔') then
begin
if leiji < 4 then
begin
This_Player.AddPlayerAbil(0,380,3600); // 0代表攻击 5代表攻击增加5， 3600代表3600秒
This_Player.AddPlayerAbil(1,50,3600); // 1代表魔法
This_Player.AddPlayerAbil(2,50,3600); // 2代表道术
This_Player.SetV(27,27,4);
This_Player.PlayerNotice('套装属游戏下载激活,攻击+100魔法+50道术+50',2);
end;
end
else
begin
if leiji = 4 then
begin
This_Player.AddPlayerAbil(0,6,0); // 0代表攻击 5代表攻击增加5， 0代表0秒
This_Player.AddPlayerAbil(1,6,0);
This_Player.AddPlayerAbil(2,6,0);
This_Player.SetV(27,27,0);
This_Player.PlayerNotice('缺少战盔,套装效果消失--!系统检测提示:天龙套装-冰雪套装点击盟重NPC即可开启套装隐藏属游戏下载！',57);
end;
end;
end else
begin
if leiji = 4 then
begin
This_Player.AddPlayerAbil(0,6,0); // 0代表攻击 5代表攻击增加5， 0代表0秒
This_Player.AddPlayerAbil(1,6,0);
This_Player.AddPlayerAbil(2,6,0);
This_Player.SetV(27,27,0);
This_Player.PlayerNotice('缺少武器,套装效果消失--!系统检测提示:天龙套装-冰雪套装点击盟重NPC即可开启套装隐藏属游戏下载！',57);
end;
end;
end
else
begin
if leiji = 4 then
begin
This_Player.AddPlayerAbil(0,6,0); // 0代表攻击 5代表攻击增加5， 0代表0秒
This_Player.AddPlayerAbil(1,6,0);
This_Player.AddPlayerAbil(2,6,0);
This_Player.SetV(27,27,0);
This_Player.PlayerNotice('缺少靴子,套装效果消失--!系统检测提示:天龙套装-冰雪套装点击盟重NPC即可开启套装隐藏属游戏下载！',57);
end;
end;
end
else
begin
if leiji = 4 then
begin
This_Player.AddPlayerAbil(0,6,0); // 0代表攻击 5代表攻击增加5， 0代表0秒
This_Player.AddPlayerAbil(1,6,0);
This_Player.AddPlayerAbil(2,6,0);
This_Player.SetV(27,27,0);
This_Player.PlayerNotice('缺少腰带,套装效果消失--!系统检测提示:天龙套装-冰雪套装点击盟重NPC即可开启套装隐藏属游戏下载！',57);
end;
end;
This_Player.CallOut(This_Npc, 5, 'JHTZ_XH_ZS');
end;
procedure JHTZ_XH_FS();
var yaodai, xuezi, baoshi , xunzhang : string;
leiji : integer;
begin
//0衣服 1武器 2勋章 3项链 4头盔 5左手镯 6右手镯 7左戒指 8右戒指 9毒符 10腰带 11靴子 29宝石
yaodai := This_Player.GetItemNameOnBody(10);
xuezi := This_Player.GetItemNameOnBody(11);
baoshi := This_Player.GetItemNameOnBody(1); //我没设置宝石，拿武器试，请自行替换
xunzhang := This_Player.GetItemNameOnBody(4);
leiji := This_Player.GetV(27,27);
//////////验证成功获得技能并且循环验证
if (yaodai = '天龙腰带(法)') or (yaodai = '神*冰雪法带') then //这里可以填2种腰带，
begin
if (xuezi = '天龙魔靴') or (xuezi = '神*冰雪法靴') then //类似上面
begin
if (baoshi = '天龙魔剑') or (baoshi = '神*冰雪神剑') then
begin
if (xunzhang = '天龙法冠') or (xunzhang = '神*冰雪法盔') then
begin
if leiji < 4 then
begin
This_Player.AddPlayerAbil(0,50,3600); // 0代表攻击 5代表攻击增加5， 3600代表3600秒
This_Player.AddPlayerAbil(1,50,3600); // 1代表魔法
This_Player.AddPlayerAbil(2,50,3600); // 2代表道术
This_Player.SetV(27,27,4);
This_Player.PlayerNotice('套装属游戏下载激活,攻击+50魔法+50道术+50',2);
end;
end
else
begin
if leiji = 4 then
begin
This_Player.AddPlayerAbil(0,6,0); // 0代表攻击 5代表攻击增加5， 0代表0秒
This_Player.AddPlayerAbil(1,6,0);
This_Player.AddPlayerAbil(2,6,0);
This_Player.SetV(27,27,0);
This_Player.PlayerNotice('缺少衣服,套装效果消失--!系统检测提示:天龙套装-冰雪套装点击盟重NPC即可开启套装隐藏属游戏下载！',57);
end;
end;
end else
begin
if leiji = 4 then
begin
This_Player.AddPlayerAbil(0,6,0); // 0代表攻击 5代表攻击增加5， 0代表0秒
This_Player.AddPlayerAbil(1,6,0);
This_Player.AddPlayerAbil(2,6,0);
This_Player.SetV(27,27,0);
This_Player.PlayerNotice('缺少武器,套装效果消失--!系统检测提示:天龙套装-冰雪套装点击盟重NPC即可开启套装隐藏属游戏下载！',57);
end;
end;
end
else
begin
if leiji = 4 then
begin
This_Player.AddPlayerAbil(0,6,0); // 0代表攻击 5代表攻击增加5， 0代表0秒
This_Player.AddPlayerAbil(1,6,0);
This_Player.AddPlayerAbil(2,6,0);
This_Player.SetV(27,27,0);
This_Player.PlayerNotice('缺少靴子,套装效果消失--!系统检测提示:天龙套装-冰雪套装点击盟重NPC即可开启套装隐藏属游戏下载！',57);
end;
end;
end
else
begin
if leiji = 4 then
begin
This_Player.AddPlayerAbil(0,6,0); // 0代表攻击 5代表攻击增加5， 0代表0秒
This_Player.AddPlayerAbil(1,6,0);
This_Player.AddPlayerAbil(2,6,0);
This_Player.SetV(27,27,0);
This_Player.PlayerNotice('缺少腰带,套装效果消失--!系统检测提示:天龙套装-冰雪套装点击盟重NPC即可开启套装隐藏属游戏下载！',57);
end;
end;
This_Player.CallOut(This_Npc, 5, 'JHTZ_XH_FS');
end;
procedure JHTZ_XH_DS();
var yaodai, xuezi, baoshi , xunzhang : string;
leiji : integer;
begin
//0衣服 1武器 2勋章 3项链 4头盔 5左手镯 6右手镯 7左戒指 8右戒指 9毒符 10腰带 11靴子 29宝石
yaodai := This_Player.GetItemNameOnBody(10);
xuezi := This_Player.GetItemNameOnBody(11);
baoshi := This_Player.GetItemNameOnBody(1); //我没设置宝石，拿武器试，请自行替换
xunzhang := This_Player.GetItemNameOnBody(4);
leiji := This_Player.GetV(27,27);
//////////验证成功获得技能并且循环验证
if (yaodai = '天龙腰带(道)') or (yaodai = '神*冰雪道带') then //这里可以填2种腰带，
begin
if (xuezi = '天龙道靴') or (xuezi = '神*冰雪道靴') then //类似上面
begin
if (baoshi = '天龙道剑') or (baoshi = '神*冰雪神剑') then
begin
if (xunzhang = '天龙道盔') or (xunzhang = '神*冰雪道盔') then
begin
if leiji < 4 then
begin
This_Player.AddPlayerAbil(0,50,3600); // 0代表攻击 5代表攻击增加5， 3600代表3600秒
This_Player.AddPlayerAbil(1,50,3600); // 1代表魔法
This_Player.AddPlayerAbil(2,50,3600); // 2代表道术
This_Player.SetV(27,27,4);
This_Player.PlayerNotice('套装属游戏下载激活,攻击+50魔法+50道术+50',2);
end;
end
else
begin
if leiji = 4 then
begin
This_Player.AddPlayerAbil(0,6,0); // 0代表攻击 5代表攻击增加5， 0代表0秒
This_Player.AddPlayerAbil(1,6,0);
This_Player.AddPlayerAbil(2,6,0);
This_Player.SetV(27,27,0);
This_Player.PlayerNotice('缺少衣服,套装效果消失--!系统检测提示:天龙套装-冰雪套装点击盟重NPC即可开启套装隐藏属游戏下载！',57);
end;
end;
end else
begin
if leiji = 4 then
begin
This_Player.AddPlayerAbil(0,6,0); // 0代表攻击 5代表攻击增加5， 0代表0秒
This_Player.AddPlayerAbil(1,6,0);
This_Player.AddPlayerAbil(2,6,0);
This_Player.SetV(27,27,0);
This_Player.PlayerNotice('缺少武器,套装效果消失--!系统检测提示:天龙套装-冰雪套装点击盟重NPC即可开启套装隐藏属游戏下载！',57);
end;
end;
end
else
begin
if leiji = 4 then
begin
This_Player.AddPlayerAbil(0,6,0); // 0代表攻击 5代表攻击增加5， 0代表0秒
This_Player.AddPlayerAbil(1,6,0);
This_Player.AddPlayerAbil(2,6,0);
This_Player.SetV(27,27,0);
This_Player.PlayerNotice('缺少靴子,套装效果消失--!系统检测提示:天龙套装-冰雪套装点击盟重NPC即可开启套装隐藏属游戏下载！',57);
end;
end;
end
else
begin
if leiji = 4 then
begin
This_Player.AddPlayerAbil(0,6,0); // 0代表攻击 5代表攻击增加5， 0代表0秒
This_Player.AddPlayerAbil(1,6,0);
This_Player.AddPlayerAbil(2,6,0);
This_Player.SetV(27,27,0);
This_Player.PlayerNotice('缺少腰带,套装效果消失--!系统检测提示:天龙套装-冰雪套装点击盟重NPC即可开启套装隐藏属游戏下载！',57);
end;
end;
This_Player.CallOut(This_Npc, 5, 'JHTZ_XH_DS'); //循环语句，5代表5秒循环一次
end;
procedure JHTZ_KS(); //3职业调用入口，请勿修改
begin
//This_Player.PlayerNotice('成功调用2',2);
case This_Player.Job of
0:
JHTZ_XH_ZS();
1:
JHTZ_XH_FS();
2:
JHTZ_XH_DS();
end;
end;
function TZJH_NPC:string;
begin
//This_Player.PlayerNotice('成功调用1',2);
JHTZ_KS();
end;
使用信息须知（必读）
①本主题所有言论和图片纯属会员个人意见，与本站立场无关
②本站所有主题由该帖子作者发表，该帖子作者与本站享有帖子相关版权
③樱桃游戏开服网仅提供信息交流平台，不介入任何交易过程，不承担安全风险和法律责任
④本帖部分内容转载自其它媒体，但并不代表本站赞同其观点和对其真实性负责
⑤该页面资源下载仅保存于网盘，本站不涉及储存，用户下载仅供学习参考，不得用户商业用途
⑥如有侵权内容困扰请联系youxi@111.com，我们将针对版权信息及时予以删除
