回答:这些宏都是网上收集来的，如果侵犯了你的权利，请见谅！！这些我自己用过，适当做了修改，在我机上没见什么问题，如果有什么问题请指正。如果有好的也拿出来共享下吧/sc ript if (UnitName("Target") ~=nil and UnitIsFriend("player","Target")) then CastSpellByName("复生");SendChatMessage("帅哥,快起来吧，前面还有很多好装备在等着我们呢.... ","Whisper","兽人语",UnitName"Target"); end复活队友，并密语告诉对方/sc ript if UnitSex("target")~=1 then g="帅哥" else g="靓女" end;s="复活吧 "..g.." >>>%T0 then c="raid" elseif GetNumPartyMembers()>0 then c="party" end;SendChatMessage(s,c) /sc ript CastSpellByName("复生");同上，不过加了个性别判断/sc ript if (UnitName("Target") ~=nil and UnitIsFriend("player","Target")) then CastSpellByName("激活");SendChatMessage("已对你使用了[激活]，20秒内法力恢复速度400%，请赶紧坐下回蓝。 ","Whisper","兽人语",UnitName"Target"); end/y 已经对 %t 使用> 大家接替下~~~给队友使用激活，并密语通知对方/sc ript r=7;l={1,10,20,30,40,50,60};if not UnitIsFriend("player","target")then TargetUnit("player");end;t=UnitLevel("target");for j=r,1,-1 do if (t>=l[j]-10) then CastSpellByName("野性印记(等级 "..j..")");break;end;end根据对方的等级使用相应的野性印记/sc ript r=6;l={6,14,24,34,44,54};if not UnitIsFriend("player","target")then TargetUnit("player");end;t=UnitLevel("target");for j=r,1,-1 do if (t>=l[j]-10) then CastSpellByName("荆棘术(等级 "..j..")");break;end;end根据对方的等级使用相应的荆棘术/sc ript SpellStopCasting();/cast 自然迅捷/sc ript SpellStopCasting();/cast 治疗之触瞬加大血技能/sc ript SpellStopCasting();CastSpellByName("自然迅捷");SpellStopCasting();CastSpellByName("治疗之触")/ SpellTargetUnit("player")同上/cast 治疗之触/sc ript if UnitIsFriend("Player","target") then if UnitAffectingCombat("target") then if ((UnitHealthMax("target"))-(UnitHealth("target"))=S[j]) then CastSpellByName("治疗之触(等级 "..j..")"); break;end;end;同上/sc ript TargetNearestEnemy()/sc ript PetAttack()/sc ript PetDefensiveMode()/sc ript CastPetAction(6)/施放 猎人印记/sc ript SpellStopCasting();/施放 自动射击LR自动标记，宠物攻击，自动射击/sc ript for i=1,16,1 do if (UnitBuff("player",i)~=nil) then if (string.find(UnitBuff("player",i),"Mon")~=nil) then CastSpellByName("猛禽一击");break;end end if(i==16) then CastSpellByName("灵猴守护");end endLR近战时换灵猴守护状态，使用猛禽一击/sc rip t p,a,S,U="player","targettarget",SendChatMessage,UnitName;t=U(a);if(t~=nil and U(p)~=t)then S("正在嘲讽'%t', ["..t.."]已OT!请暂停攻击.","Yell");S("你已OT,请暂停攻击!","WHISPER","兽人语",t);CastSpellByName("嘲讽");end战士宏，通知OT者停止攻击，使用嘲讽拉住怪
|
