酝酿了很久，还是忍不住想跟大家分享一下我的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再多的技能，我也能按完了。。。。。。
希望对大家有点用。
