猎人部分

zl0001

猎人

自动反击，猫鼬，猛禽宏
可以代替猛禽一击，能放的话会自动放反击，猫鼬

出了反击天赋的
在下边依次填上反击，猫鼬撕咬，猛禽一击 在动作条上的编号，查编号看上边基础知识
/script local b,s,j={反击编号,猫鼬编号,猛禽编号},{"反击","猫鼬撕咬","猛禽一击"};for j=1,3 do if IsUsableAction(b[j]) and GetActionCooldown(b[j])==0 then CastSpellByName(s[j]);break;end;end;

没出反击的
在下边依次填上猫鼬撕咬，猛禽一击 在动作条上的编号，查编号看上边基础知识
/script local b,s,j={猫鼬编号,猛禽编号},{"猫鼬撕咬","猛禽一击"};for j=1,2 do if IsUsableAction(b[j]) and GetActionCooldown(b[j])==0 then CastSpellByName(s[j]);break;end;end;

智能钉刺宏
牧师不会解毒，应该用蝰蛇，反倒是对德鲁伊要用蝰蛇1骗驱毒，到头来毒蛇无用？其实应该对所有怪都用毒蛇

功能介绍：按照下列规则放钉刺

战、贼：毒蝎
猎、法、术，萨，牧：蝰蛇
骑，德：蝰蛇1
NPC：毒蛇

/script local c,s,t=UnitClass("target"),"毒蛇钉刺",UnitPowerType("target");if UnitIsPlayer("target") then if t==0 then s="蝰蛇钉刺";if c=="圣骑士" or c=="德鲁伊" then s=s.."(等级 1)";end;else s="毒蝎钉刺";end;end;CastSpellByName(s);

打贼专用：标记 / 照明弹
有目标就标记，没有就放闪光弹
/script if UnitExists("target") then CastSpellByName("猎人印记");else CastSpellByName("照明弹");end;

雄鹰守护 + 猎人印记 + 宠物攻击
/script local c,i,b,f=CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"RavenF") then f=1;break;end;end;if f then c("猎人印记")etAttack();else c("雄鹰守护");end;

灵猴 猎豹切换
/script local c,i,b,f=CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"Monk") then f=1;break;end;end;if f then c("猎豹守护");else c("灵猴守护");end;

灵猴 雄鹰切换
/script local c,i,b,f=CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"Monk") then f=1;break;end;end;if f then c("雄鹰守护");else c("灵猴守护");end;

猎豹 雄鹰切换
/script local c,i,b,f=CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"eTiger") then f=1;break;end;end;if f then c("雄鹰守护");else c("猎豹守护");end;

灵猴守护 + 威慑
威慑的编号看上边基础知识自己填
/script local c,i,b,f,s,d=CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"Monk") then f=1;break;end;end;if not f then c("灵猴守护");SpellStopCasting();end;s,d=GetActionCooldown(你威慑编号);if d<2 then c("威慑");end;

法术书版
/script local c,i,b,f,s,d=CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"Monk") then f=1;break;end;end;if not f then c("灵猴守护");SpellStopCasting();end;s,d=GetSpellCooldown(你威慑编号,"spell");if d<2 then c("威慑");end;

多重 + 瞄准
多重和瞄准哪个CD好了用哪个，raid的时候非常安逸，目标是NPC就使用1级多重，省蓝，是玩家就用顶级的。
按住Alt则强制使用瞄准射击，因为raid中10秒循环一般都是瞄准起手，紧跟多重，为了充分利用5秒回蓝
每个怪最开始按一下Alt就行了，因为这个宏会优先放多重，所以PK的时候用来放风筝也可以
多重编号看上边基础知识自己填
/script local c,x,s,d=CastSpellByName,"瞄准射击",GetActionCooldown(你多重编号);if d<2 and not IsAltKeyDown() then x="多重射击";if not UnitIsPlayer("target") then x=x.."(等级 1)";end;end;c(x);

法术书版
/script local c,x,s,d=CastSpellByName,"瞄准射击",GetSpellCooldown(你多重编号,"spell");if d<2 and not IsAltKeyDown() then x="多重射击";if not UnitIsPlayer("target") then x=x.."(等级 1)";end;end;c(x);

宁神射击 只有成功施放后才喊话
注意，不是命中之后自动喊话，那需要插件，而是宁神打出去之后按这个宏才会喊话，之前会一直尝试宁神，没有废话
动作条版：
/script local s,d=GetActionCooldown(你宁神编号);if d>2 then SendChatMessage("我已施放宁神","yell");else CastSpellByName("宁神射击");end;

法术书版：
/script local s,d=GetSpellCooldown(你宁神在法术书中的编号,"spell");if d>2 then SendChatMessage("我已施放宁神","yell");else CastSpellByName("宁神射击");end;

一键脱光
注意，你身上的包至少要都是16格的，另外，假死不能加进去，假死瞬间衣服脱不下来的
/script local e,b,s=0;for b=0,4 do for s=1,16 do if not GetContainerItemLink(b,s) then while e<18 do e=e+1;if e==11 then e=16;end;if GetInventoryItemLink("player",e) then PickupInventoryItem(e)ickupContainerItem(b,s);break;end;end;end;end;end

收宠 假死 陷阱
非战斗状态就放陷阱，否则假死，再按陷阱，注意，战斗中假死瞬间陷阱放不出来的，会提示你正在战斗中
所以战斗中需要狂按这个宏
这个宏WOW 2.0就用不着了
/script PetFollow();if UnitAffectingCombat("player") then CastSpellByName("假死"); else CastSpellByName("冰冻陷阱");end;

野兽护符 - 双多重宏
护符放饰品1上，把你多重射击换个地方，并查出编号，替换红色字，查编号看上边基础知识
/script local s,d;s,d=GetActionCooldown(你多重射击的编号);if d>2 then UseInventoryItem(13);SpellStopCasting();end;CastSpellByName("多重射击");

法术书版
/script local s,d;s,d=GetSpellCooldown(你多重射击的编号,"spell");if d>2 then UseInventoryItem(13);SpellStopCasting();end;CastSpellByName("多重射击");

这个宏可以目前替代多重了，但是马上WOW 2.0要来了，这个宏届时将失效，目前没有解决方案

宝宝打图腾
/script local t,n,i,_={"根基","战栗","地缚","灼热","清毒"};for _,i in t do n=i.."图腾";TargetByName(n,1);endetAttack();

宠物宏 - 智能召唤/复活/治疗
如果宠物存在，死的就复活，没死就++，宠物消失了的话就召唤，如果是尸体消失，请同时按住Alt键，
会强制使用复活，因为WOW消失了仍然认为是活的……
/script local p,s="pet","召唤";if UnitIsDead(p) then s="复活";elseif UnitExists(p) then s="治疗" elseif IsAltKeyDown() then s="复活";end;CastSpellByName(s.."宠物");

寻找稀有精英宠物
公共部分已经有了，不过鉴于猎人特殊性在专门写一个
/script local s="断牙";TargetByName(s,1);if UnitName("target")==s then ChatFrame1:AddMessage("找到");end;
上边名字自己修改

针对不同目标调整宠物技能自动施放情况
这个宏可以针对不同类型的目标调整宠物技能的自动施放，比如带蝙蝠面对近战应该打开尖啸，而面对法系就应该关掉
带会爪击的宠物打怪时应该关掉爪击开低吼，而遇到玩家需要关低吼开爪击，这个宏可以自动为你做到

/施放 猎人印记
/script local x,p,j,e,_={1,1,1},UnitPowerType("target");if UnitIsPlayer("target") then if p==0 then x={1,nil,nil,1};else x={1,nil,1};end;end;for j=4,7 do _,_,_,_,_,_,e=GetPetActionInfo(j);if x[j-3]~=e then TogglePetAction(j);end;end;

说明一下，红色的{1,1,1}对应NPC，蓝色的{1,nil,nil,1}对应有蓝职业，绿色的{1,nil,1}对应战，贼
四个1/nil对应宠物技能条4 5 6 7按钮，1代表开，nil代表关，最后一个是nil的话可以不写，
大家可以自己调整技能和对应职业的开关顺序，毕竟不同bb技能不用

比如我带的断牙，
-------4 突进-----5 撕咬-----6 爪击-----7 低吼
怪-----1----------1----------nil--------1
贼战---1----------1----------1----------nil
其他---1----------1----------1----------nil

猫头鹰/蝙蝠
-------4 俯冲-----5 尖啸-----6 爪击-----7 低吼
怪-----1----------1----------nil----------1
贼战--1-----------1----------1----------nil
其他--1-----------nil---------1----------nil

pocudy

好多猎人的宏啊！不过断牙的话就3个点。。好找！想抓拉克西里

淅沥淅沥

为了伸手费···········楼主辛苦了~~

michaelyl

韩剧的撒娇看来大家撒开了多久开始啦的借口啦；

tq07pwd614

不错，谢谢了，太牛了

淡如风

试了下，1.123中有的会报错

qinyujiang

感谢您对游戏的支持和帮助

烧鱼片

这个很不错,要不要超级宏的支持呀?