求几个奶德宏

想要XD宏,以下的XD宏可以帮助你不少,直接粘贴过去就可以用了:

（一）熊形态

1、冲锋：

（1）判断是否在熊/巨熊形态，如果不是则变成熊再冲锋+低吼；如果是则直接冲锋+低吼。

/Scriptlocalc,s,i,f,n,a,_=CastSpellByName,巨熊形态;fori=1,GetNumShapeshiftForms()do_,n,a=GetShapeshiftFormInfo(i);ifn==sthenbreak;end;end;ifa==1thenifIsActionInRange(34)thenc(野性冲锋);elsec(低吼);end;elsec(s);end;

注:红字:34是技能栏编号,使用这个宏前要先把野性冲锋放在一个技能栏位上（放在一些少用的键位上）。

（2）基本相同，但是不低吼。

/scriptlocalc,s,i,f,n,a,_=CastSpellByName,巨熊形态;fori=1,GetNumShapeshiftForms()do_,n,a=GetShapeshiftFormInfo(i);ifn==sthenbreak;end;end;ifa==1thenc(野性冲锋);elsec(s);end;

（3）这个在被击飞或者紧急情况时用比较有效，野性冲锋的同时低吼，如果怒气还大于35就使用

挥击挥霍怒气拉住仇恨。

/cast低吼

/cast野性冲锋

/Scriptif(UnitMana(Player)>35)thenCastSpellByName(挥击);end

2、拉仇恨：

槌击+挥击大量倾泻怒气，如果目标的目标不是小D或者战士，则使用低吼。(OBLIND修改)

/scriptlocalclass,c=UnitClass(targettarget),CastSpellByName;ifclass~=德鲁伊andclass~=战士thenc(低吼);elsec(槌击);c(挥击);end;)thenCastSpellByName(低吼);end

3、攻击+槌击：

（发挥补充）当怒气小于10时使用普通攻击，否则使用槌击。

/scriptif(UnitMana(player)<10)thenCastSpellByName(攻击);elseCastSpellByName(槌击)end

4、熊形态+蛮兽神像：

人形态下按1下是变熊，2下是换上蛮兽神像；熊形态下是换上蛮兽神像。（漠铭骑喵制作）红字部分是UseContainerItem(背包编号,格子编号)。请把[蛮兽神像]放在最原始的16格包的左上角位置上。

PS：背包编号：从左到右：4，3，2，1，0。就是说你一开始就有的16格行囊是0号背包。

背包格子编号：第一行从左到右：1，2，3，4（注意从1开始的）；第二行从左到右：5，6，7，8依此类推……

/scriptlocalc,s,i,f,n,a,_=CastSpellByName,巨熊形态;fori=1,GetNumShapeshiftForms()do_,n,a=GetShapeshiftFormInfo(i);ifn==sthenbreak;end;end;ifa==1thenUseContainerItem(0,1);elsec(s);end;

（二）猫形态

1、猫形态常用攻击宏：

通常情况下使用爪击，当连击点数大等于3点时（即“3星”），使用凶猛撕咬。

/scriptif(GetComboPoints()>=3)thenCastSpellByName(凶猛撕咬);elseCastSpellByName

(爪击)end

2、猫形态起手宏（潜行）：

在潜行的条件下，毁灭起手，然后检测对方身上是否有精灵之火，没有就上个，有就爪击。

/cast毁灭

/cast爪击

/scriptx=1;found=0;while(UnitDebuff(target,x))doif(string.find(UnitDebuff

(target,x),Spell_Nature_FaerieFire))thenfound=1;end;x=x+1;end;

/scriptif(found==1)thenCastSpellByName(爪击);elseCastSpellByName(精灵之火（野性）)end

3、背面攻击宏：

先判断如果毁灭能用就用毁灭，不能用就撕碎。

/scriptx=1;found=0;while(UnitBuff(player,x))doif(string.find(UnitBuff

(player,x),Ambush))thenfound=1;end;x=x+1;end;

/scriptif(found==1)thenCastSpellByName(毁灭);elseCastSpellByName(撕碎)end

4、潜行+突袭：

先判断如果在潜行状态下就突袭，否则潜行。

/scriptx=1;found=0;while(UnitBuff(player,x))doif(string.find(UnitBuff(player,x),Ambush))thenfound=1;end;x=x+1;end;

/scriptif(found==1)thenCastSpellByName(突袭);elseCastSpellByName(潜行)end

5、爪击+撕碎：

当能量大等于60时使用撕碎，小于60时使用爪击。通常在BOSS战DPS时使用。

/Scriptif(UnitMana(Player)>=60)thenCastSpellByName(撕碎);elseCastSpellByName(爪击)end

6、攻击+爪击：

（发挥补充）能量如果小于37则普通攻击，大于37则爪击。

/scriptif(UnitMana(player)<37)thenCastSpellByName(攻击);elseCastSpellByName(爪击)end

7、突袭+扫击：

（发挥补充）如果潜行则使用突袭，否则使用扫击。

/scriptx=1;found=0;while(UnitBuff(player,x))doif(string.find(UnitBuff(player,x),Ambush))thenfound=1;end;x=x+1;end;

/scriptif(found==1)thenCastSpellByName(突袭);elseCastSpellByName(扫击)end

8、猫形态+凶猛神像：

人形态下按1下是变猫，2下是换上凶猛神像；猫形态下是换上凶猛神像。（漠铭骑喵制作）[红字部分是UseContainerItem(背包编号,格子编号)。请把[凶猛神像]放在最原始的16格包的第一行从左往右第2格的位置上。

PS：背包编号：从左到右：4，3，2，1，0。就是说你一开始就有的16格行囊是0号背包。

背包格子编号：第一行从左到右：1，2，3，4（注意从1开始的）；第二行从左到右：5，6，7，8依此类推……

/scriptlocalc,s,i,f,n,a,_=CastSpellByName,猎豹形态;fori=1,GetNumShapeshiftForms()do_,n,a,s=GetShapeshiftFormInfo(i);ifn==sthenbreak;end;end;ifa==1thenUseContainerItem(0,2);elsec(s);end;

（三）任何形态通用

1、人形宏：

判断如果不是人形态，则恢复人形态。可在任何形态下使用。

/scriptlocali,a,_;fori=1,GetNumShapeshiftForms()do_,_,a=GetShapeshiftFormInfo(i);ifathenCastShapeshiftForm(i);break;end;end;

恢复篇：

1、树皮+宁静：

判断是否有树皮，没有则放树皮，有则放宁静。简而言之点一下是树皮，2下是树皮+宁静。

/scriptx=1;found=0;while(UnitBuff(player,x))doif(string.find(UnitBuff(player,x),StoneClaw))thenfound=1;end;x=x+1;end;

/scriptif(found==1)thenCastSpellByName(宁静(等级3));elseCastSpellByName(树皮术)end

2、激活：

先判断如果目标敌对/是NPC/没有目标/是没蓝职业都给自己使用激活；如果目标是有蓝职业则

给对放激活。使用完激活自动返回上一目标。

/scriptx=UnitClass(target);if(notUnitIsFriend(player,target)or(UnitManaMax

(target)<200andx~=Druid))thenTargetUnit(player);end;CastSpellByName(激

活);TargetLastTarget();

3、自然迅捷+治疗之触：

只需要按一下，但是偶尔也需要2下（比如延迟高）。（light_arm修改）

/scriptSpellStopCasting()

/施放自然迅捷

/scriptSpellStopCasting()

/施放治疗之触(等级11)

4、回春术+迅捷治愈：

有回春效果则放迅捷治愈,没有则放回春.

/Scriptx=1;found=0;while(UnitBuff(target,x))doif(string.find(UnitBuff(target,x),Rejuvenation))thenfound=1;end;x=x+1;end;

/Scriptif(found==1)thenCastSpellByName(迅捷治愈);elseCastSpellByName(回春术(等级11)))end

5、治疗之触：

（1）根据目标血量判断是使用最大等级的治疗之触，还是刷4级触(去血少于1200)。

/cast治疗之触

/scriptifUnitIsFriend(Player,target)thenifUnitAffectingCombat(target)thenif

((UnitHealthMax(target))-(UnitHealth(target))<1200)thenCastSpellByName(治疗之触(等级4));end;end;elseifSpellIsTargeting()thenTargetUnit(Player);end

（2）根据目标血量判断使用哪个等级的治疗之触。

/scriptH=UnitHealthMax(target)-UnitHealth(target);S={41,98,213,394,617,799,1004,1285,1621,2010,2496};

/scriptforj=11,1,-1doif(H>=S[j])thenCastSpellByName(治疗之触(等级..j..));break;end;end;

6、回春术：

根据目标等级判断使用哪个等级的回春术。

/scriptr=11;l={4,10,16,22,28,34,40,46,52,58,60};t=UnitLevel(target);forj=r,1,-1doif(t>=l[j]-10)thenCastSpellByName(回春术(等级..j..));break;end;end

7、愈合：

根据目标等级判断使用哪个等级的愈合。

/scriptr=9;l={12,18,24,30,36,42,48,54,60};t=UnitLevel(target);forj=r,1,-1doif(t>=l[j]-10)thenCastSpellByName(愈合(等级..j..));break;end;end

8、驱毒：

在任何形态下变回人形，并给目标上驱毒。

/scriptlocali,a,_;fori=1,GetNumShapeshiftForms()do_,_,a=GetShapeshiftFormInfo(i);ifathenCastShapeshiftForm(i);break;end;end;

/cast驱毒术

9、解除自身DEBUFF：

（妖术师金度制作）可解除自己身上的诅咒和中毒效果。

/scriptdbk={'Poison','Curse'};spl={''驱毒术'',''解除诅咒''};form=0,31,1doforn=1,2,1doifGetPlayerBuffDispelType(GetPlayerBuff(m,'HARMFUL'))==dbk[n]thenTargetUnit('player');CastSpellByName(spl[n]);TargetLastTarget();break;end;end;end;

平衡篇：

1、月火打图腾：

搜索附近敌对图腾，使用1级月火，之后自动返回上一目标。

/Target图腾

/cast月火术(等级1)

/ScriptTargetLastEnemy()

2、树皮+飓风：

判断是否有树皮，没有则放树皮，有则放飓风。简而言之点一下是树皮，2下是树皮+飓风。

/scriptx=1;found=0;while(UnitBuff(player,x))doif(string.find(UnitBuff(player,x),StoneClaw))thenfound=1;end;x=x+1;end;

/scriptif(found==1)thenCastSpellByName(飓风);elseCastSpellByName(树皮术)end

3、月火机关枪？：

（6楼light_arm补充）

/scriptx=1;found=0;while(UnitDebuff(target,x))doif(string.find(UnitDebuff(target,x),Spell_Nature_StarFall))thenfound=1;end;x=x+1;end;

/scriptif(found==1)thenCastSpellByName(月火术(等级9));elseCastSpellByName(月火术(等级10))end

状态篇：

1、野性印记：

（1）根据目标等级判断使用哪个等级的爪子。

/scriptr=7;l={1,10,20,30,40,50,60};t=UnitLevel(target);forj=r,1,-1doif(t>=l[j]-10)thenCastSpellByName(野性印记(等级..j..));break;end;end

（2）自动搜索团队内没有野性印记的团队成员,为其补上，掉线的，死亡的，不在视野内的都会忽略掉。(OBLIND制作)

/scriptlocali,j,b,f,p;fori=1,40dof=nil;p=raid..i;ifUnitIsVisible(p)thenforj=1,16dob=UnitBuff(p,j);ifbandstrfind(b,Regen)thenf=1;break;end;end;ifnotfthenTargetUnit(p);CastSpellByName(野性印记);break;end;end;end;

2、荆棘术：

根据目标等级判断使用哪个等级的荆棘。

/scriptr=6;l={6,14,24,34,44,54};ifnotUnitIsFriend(player,target)thenTargetUnit

(player);end;t=UnitLevel(target);forj=r,1,-1doif(t>=l[j]-10)thenCastSpellByName(荆棘术(等级..j..));break;end;end