在网上找了很久。总结出来的
MACRO "跳射"
/script U=UseAction Jump() if not UnitIsDead("target") then if UnitIsEnemy("player","target")
then if BU("Sniper") then U(61) else PetAttack() PetDefensiveMode() BA() end end end
MACRO "BU"
/script function BU(s) P,B,i="target",true,1 while UnitDebuff(P,i) do if
string.find(UnitDebuff(P,i),s) then B=false end i=i+1 end return B end
MACRO "BA"
/script function BA() U,A,I=UseAction,GetActionCooldown,IsActionInRange if I(5)==1 then if A(5)<=0 then U(5) else U(4) end end if I(62)==1 then if BU("Rogue") then U(62) else U(63) U(64) end end end
MACRO "假死+冰冻陷阱"
/script PetPassiveMode() PetFollow() if(UnitAffectingCombat("player")==1) then CastSpellByName("假死") else CastSpellByName("冰冻陷阱(等级 3)") end
还有关于放风筝的问题，因为目前的宏并不支持自动转身。所以最简单，最有效的放风筝方法是：
开启鼠标移动模式(1)用鼠标左键点自己身后进行转身，(2)转身后再快速点一次鼠标左键向远处跑，(3)拉开距离后迅速鼠标左键点自己身后同时按一下R<4.射击 PK模式>同时进行一次普通射击和奥术射击
完成之后。继续重复以上步骤。
World of Warcraft/WTFAccount
2.印记目标/雄鹰
说明：（自动射击+宠物攻击+雄鹰守护/猎人印记）同时进行
如果身上有灵猴守护则施放雄鹰守护 如果有雄鹰守护则施放猎人印记
快捷键Q
/施放 自动射击
/script PetAttack()
/script for i=1,16,1 do if (UnitBuff("player",i)~=nil) then if (string.find(UnitBuff ("player",i),"Mon")~=nil) then CastSpellByName("雄鹰守护(等级 4)");break;end end if(i==16) then CastSpellByName("猎人印记(等级 3)");end end
6.切换灵猴守护
说明：如果身上没有灵猴守护则施放灵猴守护，有则使用猛禽一击
快捷键6：将此宏放在快捷栏6
/script for i=1,16,1 do if (UnitBuff("player",i)~=nil) then if (string.find(UnitBuff("player",i),"Mon")~=nil) then CastSpellByName("猛禽一击(等级 6)");break;end end if(i==16) then CastSpellByName("灵猴守护");end end
我有一些宏你也许用的到
自动选最近目标
说明：（寻找最近目标+宠物防御模式+宠物攻击+猎人印记+自动攻击）（以上动作同时进行）
快捷键Tab
/script TargetNearestEnemy()
/script PetDefensiveMode()
/script PetAttack()
/施放 猎人印记(等级 3)
/施放 攻击
2.印记目标/雄鹰
说明：（自动射击+宠物攻击+雄鹰守护/猎人印记）同时进行
如果身上有灵猴守护则施放雄鹰守护 如果有雄鹰守护则施放猎人印记
快捷键Q
/施放 自动射击
/script PetAttack()
/script for i=1,16,1 do if (UnitBuff("player",i)~=nil) then if (string.find(UnitBuff ("player",i),"Mon")~=nil) then CastSpellByName("雄鹰守护(等级 4)");break;end end if(i==16) then CastSpellByName("猎人印记(等级 3)");end end
3.射击 SOLO模式（保留长冷切时间的技能）
说明：（如果无自动射击则开启自动射击+宠物防御模式+宠物攻击+智能钉刺）+奥术射击+多重射击
快捷键E
/script if(not IsAutoRepeatAction(40)) then CastSpellByName("自动射击"); end
/script PetDefensiveMode()
/script PetAttack()
/script UseAction(8)---------------------将此介绍的宏(8.智能钉刺)放在物品栏8
/施放 奥术射击(等级 6)
/施放 多重射击(等级 3)
4.射击 PK模式 (使用长冷切时间的技能)
说明：(如果无自动射击则开启自动射击+宠物防御模式+宠物攻击+急速射击）+震荡射击+智能钉刺+狂野怒火+多重射击+奥术射击+胁迫
快捷键R
/script if(not IsAutoRepeatAction(40)) then CastSpellByName("自动射击"); end
/script PetDefensiveMode()
/script PetAttack()
/施放 急速射击
/施放 震荡射击
/script UseAction(8)---------------------将此介绍的宏(8.智能钉刺)放在物品栏8
/施放 狂野怒火
/施放 多重射击(等级 3)
/施放 奥术射击(等级 6)
/施放 胁迫
5.近身攻击
说明：做到用一个按键切换灵猴守护+使用近战技能
/script UseAction(6)----------------------将此介绍的宏(6.切换灵猴守护)放在物品栏6
/script UseAction(7)----------------------将此介绍的宏(7.近身技能)放在物品栏7
/施放 胁迫
/施放 狂野怒火
6.切换灵猴守护
说明：如果身上没有灵猴守护则施放灵猴守护，有则使用猛禽一击
快捷键6：将此宏放在快捷栏6
/script for i=1,16,1 do if (UnitBuff("player",i)~=nil) then if (string.find(UnitBuff("player",i),"Mon")~=nil) then CastSpellByName("猛禽一击(等级 6)");break;end end if(i==16) then CastSpellByName("灵猴守护");end end
7.近身技能
说明：（如果目标没有被摔拌则施放摔拌，有则猛禽一击+宠物攻击）+猫鼬撕咬
快捷键7：将此宏放在快捷栏7
/施放 猫鼬撕咬(等级 3)
/script local T; for i=0,15,1 do T=UnitDebuff("target", i); if (T and string.find (T,"Trip")) then break; end; end; if (T and string.find (T,"Trip")) then CastSpellByName("猛禽一击(等级 6)"); else CastSpellByName("摔绊(等级 2)"); PetAttack() end
8.智能钉刺
说明：首先判断目标是否牧师/圣骑士，如果是则使用宏(9.吸魔钉刺),否则使用宏(10.毒蛇钉刺）
快捷键8：将此宏放在快捷栏8
/script class = UnitClass("target"); if ( ( class == "牧师" ) or ( class == "圣骑士" ) ) then UseAction(9); else UseAction(10); end
9.吸魔钉刺
说明：自动判断目标是否已有吸魔钉刺，如果有则宠物攻击，如果没有则加上
快捷键9：将此宏放在快捷栏9
/script local T; for i=1,16,1 do T=UnitDebuff("target", i); if (T and string.find (T,"AimedShot")) then break; end; end; if (T and string.find (T,"AimedShot")) then PetAttack(); else CastSpellByName("蝰蛇钉刺(等级 2)"); end;
10.毒蛇钉刺
说明：自动判断目标是否已有毒蛇钉刺，如果有则宠物攻击，如果没有则加上
快捷键10：将此宏放在快捷栏10
/script local T; for i=1,16,1 do T=UnitDebuff("target", i); if (T and string.find (T,"Quickshot")) then break; end; end; if (T and string.find (T,"Quickshot")) then PetAttack(); else CastSpellByName("毒蛇钉刺(等级 6)"); end;
11.跳放冰冻陷阱/爆炸陷阱
说明：跳放陷阱不容易被察觉
快捷键C
/script U=UseAction Jump()
/施放 冰冻陷阱(等级 2)
12.找JY宠物
说明：方便抓JY宠物，如果目标野兽在40码内就有显示目标头像
/target 巨型火鸟
/script if UnitExists("target") then Jump();end
13.假死陷阱
说明：按一下是假死+宠物停止攻击收宠+清除目标，按第2下是冰冻陷阱。可以在15秒的毒蛇钉刺过后使用
/script TargetLastEnemy()
/script PetPassiveMode()
/script PetFollow()
/script ClearTarget()
/施放 假死
/施放 冰冻陷阱(等级 2)
/script TargetLastEnemy()
14.使用绷带
说明：使用绷带后，不丢失目标。
/script TargetUnit("Player");
/use 厚魔纹绷带
/script TargetLastEnemy();
/script PetDefensiveMode()
绷带
请把宠物食放在从左向右数第二个包，第一行自左向右数第一格
/script UseContainerItem(3,1)
/script TargetUnit("player")
http://wow.replays.net/guild/ftghdkp/
http://guild.cc.16t.cn/code_member/
1 选目标放标记
说明：SOLO可用，组队少用
代码：
/script if (not UnitExists("target")) then TargetNearestEnemy();end
/施放 猎人印记(等级 1)
2 假死：
说明：假死后当前目标不会消失，但假死刹那间则已经清除当前目标而提高成功率。因为使用中发现，假死后，当前目标消失的话，起来后还得重新选定目标，不太方便，故故作此改进
代码：
/script PetFollow()
/script ClearTarget()
/施放 假死
/script TargetLastEnemy()
答疑：
第一行收回BB，一般情况下，BB也已经在挨打，或者在打怪，收回到身边有什么用吗？
答：这个假死，是为了手动放陷阱。BB攻击敌人，则不能放陷阱。这是游戏规定的，放陷阱必须在非战斗状态。如果不收，BB设成被动模式，则挨打，顶怪，没办法。如果收回，则怪追BB打，BB跑得快，挨打就少了，当BB跑回身边，再过小会，8S差不多也过去了，放冰陷，然后治疗BB，或绷带。
3 驱散射击:
收宠驱散后，取消自动攻击状态，但当前目标冰变。因为使用中，经常一驱散后，宠也收了，可是自己立马又给我敌人一次攻击，把敌人打醒了，很不方便，故作此改进
/script PetFollow()
/施放 驱散射击
/s 困惑4S!挨打解除
/script ClearTarget()
/script TargetLastEnemy() 12 摔绊宏：
经使用效果的比较，发现下面的写法有效性高，而且动作帅得多
/施放 摔绊(等级 3)
/script Jump()
/script ToggleAutoRun()
