WOW-Vanilla年代LR宏
发表于 ： 2017-09-26 16:54:50
Hi,大家好，我是联盟矮人猎人-Bluememo。
酝酿了很久，还是忍不住想跟大家分享一下我的LR宏命令，这也是我玩LR的兴趣之一，希望喜欢使用宏的各位朋友能够各取所需。
说明一下：因为我使用的是英文端，所以技能名都没汉化，或者我也不知道完整的中文技能名，有需要的自己去修改吧。
#1：急速射击+瞄准射击捆绑宏，瞄准射击放在默认动作条第11号位置，你也可以放在其他位置，但要修改数字。需要提醒的是学习新的瞄准射击后，要把高等级的瞄准射击拖出来替换掉，不然你一直是1级瞄准射击，别问我怎么知道 :lol: :lol:
#2：追踪人型类生物集合宏（隐藏、潜行、亡灵、巨人、人型），只有技能学全了才会循环切
其他追踪宏：追踪龙类、恶魔、元素、野兽。为什么不跟上面的写在一起呢？超过255个字符了。。。。。。。
#3：猎豹、群豹守护切换-目标友善的话就切群豹，否则就是猎豹。这个后面要重新修改下：队伍中群豹、否则猎豹。没到40，先不这样改。
#4：驱散、收宝宝宏
#5：一键招宝宝、喂宝宝、治疗宝宝、复活宝宝：宝宝死了-复活；不高兴了，喂养；高兴状态，治疗；宝宝消失，召唤。喂养宝宝的肉放在出生自带包的第一排第二格（0、2 就是这个意思），其他位置需要修改数字。
#6：一键近战宏，先判断有摔绊没，没有就先上摔绊，否则就猛禽和猫鼬。
#7：不打断自动攻击宏，捆绑多重使用。LR应该有这样的烦恼，不停的按技能，自动攻击会被中断。
#8：战斗状态恐惧野兽，非战斗状态野兽知识
#9：智能钉刺宏：怪物上毒蛇、有蓝职业上抽蓝的，战士、盗贼上减敏捷的，能解毒的上1级的抽蓝钉刺。
#10：雄鹰、灵猴切换宏
#11：假死收宠陷阱宏
#12：陷阱集合宏。正常按：冰冻陷阱，+Alt:献祭陷阱，+Shift:爆炸陷阱。
#13：智能照明弹宏：有目标且目标可被攻击，放标记，目标空或者友善，放照明弹。
#14：智能嘲讽宏：打怪物-嘲讽自动开启，打玩家-自动关闭。下副本请调整。。。。。捆绑了突进技能。技能摆放请按嘲讽-撕咬-爪击-突进 这样摆。
#15：非战斗状态用包裹里的第4个，战斗状态就放奥术射击。目前绑定的是变熊道具，40级后绑定个坐骑。
#16：铁皮手雷宏：自动找包里的铁皮手雷，按一下释放，再按一下取消释放并重新准备释放。
好处就是：妈妈再也不用担心我手残了，LR再多的技能，我也能按完了。。。。。。
希望对大家有点用。
酝酿了很久，还是忍不住想跟大家分享一下我的LR宏命令，这也是我玩LR的兴趣之一，希望喜欢使用宏的各位朋友能够各取所需。
说明一下：因为我使用的是英文端，所以技能名都没汉化，或者我也不知道完整的中文技能名，有需要的自己去修改吧。
#1：急速射击+瞄准射击捆绑宏，瞄准射击放在默认动作条第11号位置，你也可以放在其他位置，但要修改数字。需要提醒的是学习新的瞄准射击后，要把高等级的瞄准射击拖出来替换掉，不然你一直是1级瞄准射击，别问我怎么知道 :lol: :lol:
代码： 全选
/cast Rapid Fire
/run if CheckInteractDistance("target", 3) and (not PlayerFrame.inCombat) then AttackTarget() elseif not IsAutoRepeatAction(11) then CastSpellByName("Aimed Shot") end代码： 全选
/run c=CastSpellByName t=GetTrackingTexture() if t and strfind(t,"Prayer") then c("Track Hidden") elseif t and strfind(t,"Stealth") then c("Track Undead") elseif t and strfind(t,"Dark") then c("Track Giants") else c("Track Humanoids") end代码： 全选
/run c=CastSpellByName t=GetTrackingTexture() if t and strfind(t,"_Tracking") then c("Track Dragonkin") elseif t and strfind(t,"Dragon") then c("Track Demons") elseif t and strfind(t,"Fel") then c("Track Elementals") else c("Track Beasts") end代码： 全选
/script if UnitIsFriend("player", "target") then CastSpellByName("Aspect of the Pack") else CastSpellByName("Aspect of the Cheetah") end代码： 全选
/script if GetUnitName("target")==nil then TargetNearestEnemy() end
/script if UnitExists("pettarget") and UnitIsUnit("target", "pettarget") then PetPassiveMode(); else end
/cast Scatter Shot代码： 全选
/run local c=CastSpellByName if UnitExists("pet") then if UnitHealth("pet")==0 then c("Revive Pet") elseif GetPetHappiness()~=nil and GetPetHappiness()~=3 then c("Feed Pet") PickupContainerItem(0, 2) else c("Mend Pet") end else c("Call Pet") end代码： 全选
/cast Mongoose Bite
/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("Raptor Strike"); else CastSpellByName("Wing Clip"); end代码： 全选
/cast Multi-Shot
/run if CheckInteractDistance("target", 3) and (not PlayerFrame.inCombat) then AttackTarget() elseif not IsAutoRepeatAction(12) then CastSpellByName("Auto Shot") end代码： 全选
/script if UnitAffectingCombat("player") then CastSpellByName("Scare Beast") else CastSpellByName("Beast Lore") end代码： 全选
/script local c,s,t=UnitClass("target"),"Serpent Sting",UnitPowerType("target");if UnitIsPlayer("target") then if t==0 then s="Viper Sting";if c=="Paladin" or c=="Druid" then s=s.."(Rank 1)";end;else s="Scorpid Sting";end;end;CastSpellByName(s);代码： 全选
/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("Aspect of the Monkey");else c("Aspect of the Hawk");end;代码： 全选
/cast Freezing Trap
/script if UnitAffectingCombat("player") then CastSpellByName("Feign Death") end
/script if UnitExists("pettarget") and UnitIsUnit("target", "pettarget") then PetPassiveMode(); else end;代码： 全选
/script if IsAltKeyDown() then CastSpellByName("Immolation Trap");elseif IsShiftKeyDown() then CastSpellByName("Explosive Trap"); else CastSpellByName("Frost Trap") end;代码： 全选
/Script if UnitCanAttack("player","target") then CastSpellByName("Hunter's Mark") else CastSpellByName("Flare") end;代码： 全选
/script PetAttack() local x,p,j,e,_={1,1,1},UnitPowerType("target");if UnitIsPlayer("target") then if p==0 then x={nil,1,1};else x={nil,1,1};end;end;for j=4,7 do _,_,_,_,_,_,e=GetPetActionInfo(j);if x[j-3]~=e then TogglePetAutocast(j);end;end;
/cast dash代码： 全选
/run if UnitAffectingCombat("player") then CastSpellByName("Arcane Shot") else UseContainerItem(0, 4) end;代码： 全选
/script local b,s,l;if PlayerFrame.inCombat then AttackTarget();end;SpellStopCasting();for b=0,4 do for s=1,18 do l=GetContainerItemLink(b,s);if l and strfind(l,"Iron Grenade") then UseContainerItem(b,s);break;end;end;end;好处就是：妈妈再也不用担心我手残了，LR再多的技能，我也能按完了。。。。。。
希望对大家有点用。