6、回春术：
根据目标等级判断使用哪个等级的回春术。
/script r=10;l={4，10，16，22，28，34，40，46，52，58};t=UnitLevel("target");for j=r，1，-1 do if (t>=l[j]-10) then CastSpellByName("回春术(等级 "..j..")");break;end;end
7、愈合：
根据目标等级判断使用哪个等级的愈合。
/script r=7;l={12，18，24，30，36，42，48，54，60};t=UnitLevel("target");for j=r，1，-1 do if (t>=l[j]-10) then CastSpellByName("愈合(等级 "..j..")");break;end;end
8、驱毒：
在任何形态下变回人形，并给目标上驱毒。
/script local i，a，_;for i=1，GetNumShapeshiftForms() do _，_，a=GetShapeshiftFormInfo(i);if a then CastShapeshiftForm(i);break;end;end;
/cast 驱毒术
9、解除自身DEBUFF：
(妖术师金度制作)可解除自己身上的诅咒和中毒效果。
/script dbk={'Poison'，'Curse'}; spl={''驱毒术''，''解除诅咒''}; for m=0，31，1 do for n=1，2，1 do if GetPlayerBuffDispelType(GetPlayerBuff(m，'HARMFUL'))==dbk[n] then TargetUnit('player');CastSpellByName(spl[n]);TargetLastTarget();break;end;end;end;
平衡篇：
1、月火打图腾：
搜索附近敌对图腾，使用 1 级月火，之后自动返回上一目标。
/Target 图腾
/cast 月火术(等级 1)
/Script TargetLastEnemy()
2、树皮+飓风：
判断是否有树皮，没有则放树皮，有则放飓风。简而言之，点一下是树皮， 2 下是树皮+飓风。
/script x=1;found=0;while(UnitBuff("player"，x)) do if(string.find(UnitBuff("player"，x)，"StoneClaw"))then found=1;end;x=x+1;end;
/script if(found==1)then CastSpellByName("飓风");else CastSpellByName("树皮术")end
3、月火机关枪?：
( 6 楼light_arm 补充)
/script x=1;found=0;while(UnitDebuff("target"，x)) do if(string.find(UnitDebuff("target"，x)，"Spell_Nature_StarFall"))then found=1;end;x=x+1;end;
/script if(found==1)then CastSpellByName("月火术(等级 9)");else CastSpellByName("月火术(等级 10)")end
状态篇：
1、野性印记：
(1)根据目标等级判断使用哪个等级的爪子。
/script r=7;l={1，10，20，30，40，50，60};t=UnitLevel("target");for j=r，1，-1 do if (t>=l[j]-10) then CastSpellByName("野性印记(等级 "..j..")");break;end;end
(2)自动搜索团队内没有野性印记的团队成员，为其补上，掉线的，死亡的，不在视野内的都会忽略掉。(OBLIND制作)
/script local i，j，b，f，p;for i=1，40 do f=nil;p="raid"..i;if UnitIsVisible(p) then for j=1，16 do b=UnitBuff(p，j);if b and strfind(b，"Regen") then f=1;break;end;end;if not f then TargetUnit(p);CastSpellByName("野性印记");break;end;end;end;
2、荆棘术：
根据目标等级判断使用哪个等级的荆棘。
/script 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
特殊篇：
1、技能CD时间公告：
可以显示任意技能的剩下的冷却时间(自己调整)：注：红字： 8 是技能栏编号，使用这个宏前要先把想要显示CD的技能放在一个技能栏位上。
/script a，d，e=GetActionCooldown(8);s=d-(GetTime()-a);q=string.format("%.f"，s);
/script m=q/60;n=string.format("%d"，m)
/script o=q-n60
/Script if a~=0 then SendChatMessage("技能名 CD时间："..n.."分"..o.."秒"，"yell"); end
（举报）
