果子 发表于 2020-1-19 16:28:36

战神引擎套装触发脚本

战神引擎套装触发脚本

[*]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;


页: [1]
查看完整版本: 战神引擎套装触发脚本