|
|
牧师
进入/取消暗影形态 并切换动作条
1是非暗影形态下的治疗魔法条，2是暗影形态下的攻击魔法条
进入/取消暗影形态，并在1，2两动作条间切换，数字可以自己改
/script local i,b,f,p;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"wform") then f=1;break;end;end;if f then p=1;else p=2;end;CastSpellByName("暗影形态");CURRENT_ACTIONBAR_PAGE=p;ChangeActionBarPage();
心灵尖啸 + 取消暗影形态
/施放 心灵尖啸
/script local i,b,f;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"wform") then CastSpellByName("暗影形态");break;end;end;
给自己能量灌注+心灵专注+护符+技能
具体最后跟什么技能自己考虑，因为心灵专注，所以这个技能是免费的，一般亡灵牧师都跟瘟疫了
护符放饰品1位置
/script local c,s,d,e,_=CastSpellByName,SpellStopCasting;c("能量灌注",1);s();c("心灵专注");s();_,d,e=GetInventoryItemCooldown("player",13);if d<2 and e>0 then UseInventoryItem(13);end;s();c("噬灵瘟疫");
自动补 韧，心灵之火，防护暗影
缺啥补啥，闲着没事按按能强身健体，定国安邦……
/script local n,s,k,j,b,f={"dFor","rFir","iSha"},{"真言术：韧","心灵之火","防护暗影"};for k=1,3 do f=nil;for j=1,16 do b=UnitBuff("player",j);if b and strfind(b,n[k]) then f=1;break;end;end;if not f then CastSpellByName(s[k]);break;end;end;
矮牧 反恐
/script local i,b,f;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"Excor") then f=1;break;end;end;if not f then CastSpellByName("防护恐惧结界");end;
PK驱散宏
优先驱散自己身上的Debuff，没有就对目标驱散
/script local t; if UnitDebuff("player",1,1) then t=1;end; CastSpellByName("驱散魔法",t);
MC专用，给炸弹人套盾 & 给奥暴男的目标套盾
向着夕阳奔跑的分割线
MC老5专用，炸弹人会感激你，而你的队友会惊叹你神一般的操作，向着夕阳奔跑吧！
/script local p,i,j,d,f;for i=1,40 do p="raid"..i;if UnitIsVisible(p) then for j=1,16 do d=UnitDebuff(p,i);if d and strfind(d,"Inci") then f=1;break;end;end;if f then TargetUnit(p);CastSpellByName("真言术：盾");break;end;end;end;
如果用SuperMacro的话用这个，加了距离判断，喊话功能：
给炸弹套盾，SuperMacro版：
左边窗口：
/script PriestShieldForBomb();
右边窗口：
Code c:
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
function PriestShieldForBomb()
  local c,p,i,j,d,f="raid";
  for i=1,40 do
    p=c..i;
    if UnitIsVisible(p) and CheckInteractDistance(p,4) then
      for j=1,16 do
        d=UnitDebuff(p,i);
        if d and strfind(d,"Incin") then f=1;break;end;
      end;
      if f then
        TargetUnit(p);CastSpellByName("真言术：盾");
        SendChatMessage("%t 恭喜你中奖了 现送上赠品 无敌神盾 愿上帝保佑你",c);
        TargetLastTarget(); break;
      end;
    end;
  end;
end;
奥爆男的分割线
奥爆男换目标不一定因为OT，他经常乱来的
为奥爆男目标加盾：
/script local c,i,p="raid";for i=1,40 do p=c..i;if UnitIsVisible(p) and UnitName(p.."target")=="沙斯拉尔" and UnitIsUnit(p,p.."targettarget") then TargetUnit(p);CastSpellByName("真言术：盾");TargetLastTarget();break;end;end;
同样，喊话放不下，提供SuperMacro版
给炸弹套盾，SuperMacro版：
左边窗口：
/script PriestShieldForMC6Target();
右边窗口：
Code c:
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
function PriestShieldForMC6Target()
  local c,i,p="raid";
  for i=1,40 do
    p=c..i;
    if UnitIsVisible(p) and CheckInteractDistance(p,4) and
      UnitName(p.."target")=="沙斯拉尔" and UnitIsUnit(p,p.."targettarget") then
      TargetUnit(p);CastSpellByName("真言术：盾");
      SendChatMessage("BS 你OT了 请立即跑向MT 就算要死 也要死在MT怀抱里","whisper",UnitName(p));
      TargetLastTarget();break;
    end;
  end;
end;
这个宏没人OT不要乱用，因为会对MT也起作用
|
|
发表于 2017-10-19 13:04:10
变色卡