早期版本 WOW 中用过的宏…

gistfile1.txt

开始攻击A

/cast 腐化 (等级 X)
/script PetAttack();
/script SendChatMessage("以部落和九层地狱的名义，弱者必须死亡！", "SAY");


起手诅咒C

/script if (UnitMana("target")>0) then CastSpellByName("语言诅咒 (等级 X)") else CastSpellByName("痛苦诅咒 (等级 X)");end
/script SendChatMessage("呼唤道：暗之主，影之王，乌黯统治着夜空！无底深渊的君王，六指的格拉兹特，让痛苦与不幸降临于这个生物", "EMOTE")


PK诅咒PK-C

/script c = UnitClass("target")；if ((c == "法师") or (c == "牧师") or (c == "萨满")) then CastSpellByName("语言诅咒 (等级 X)") else CastSpellByName("痛苦诅咒 (等级 X)");end
/script SendChatMessage("呼唤道：暗之主，影之王，乌黯统治着夜空！无底深渊的君王，六指的格拉兹特，让痛苦与不幸降临于这个生物", "EMOTE")


吸灵魂D

/script if (UnitHealth("target") >= 100) then CastSpellByName("吸取生命 (等级 X)") else CastSpellByName("吸取灵魂 (等级 X)"); end
/script SendChatMessage("向黑暗祈祷：伟大的不死之王，血腥的山羊之角，强壮的奥库斯！这个生物的肉体和灵魂都是给您的祭献！", "EMOTE")


暗影箭SB

/script if ((UnitMana("player") >= 369) and (UnitHealth("target") >= 800)) then CastSpellByName("暗影箭 (等级 X)") else CastSpellByName("射击");end
/EMOTE 吟诵咒文：君临者，血肉之面具，万象，振翅高飞，冠上凡人之名的魔物，真理与节制，仅以爪立于不知罪的梦壁上，鬼道之三十三：暗影箭！


灼热之痛SP

/script if (not string.find(UnitDebuff("target", 1), "诅咒")) then CastSpellByName("元素诅咒 (等级 X)") else CastSpellByName("灼热之痛 (等级 X)");end
/EMOTE 呼唤道：墨菲斯托费利斯！火焰和硫磺的主人！我呼唤您的名字，让这个生物感受地狱的灼热！


防恐惧PFEAR
/script c=GetInventoryItemCooldown("player", 13); if (c==0) then UseInventoryItem(13);end
/script TargetLastEnemy()


解DEBUFF

/script if (UnitCreatureFamily("pet") == "地狱猎犬") then TargetUnit("player");CastPetAction(4);TargetLastEnemy();end


诱惑CHARM

/script if (UnitCreatureFamily("pet") == "魅魔") then CastPetAction(6);end
/script SendChatMessage("警告：".. UnitName("Target") .."已被魅惑，请不要对它攻击或施放DEBUFF，以免打断魅惑效果", "EMOTE")


AOE

/script CastSpellByName("地狱烈焰(等级 3)")
/script SendChatMessage("开始AOE，请牧师老爷注意治疗，最好给我加个盾……", "PARTY")

奴役

/script CastSpellByName("奴役恶魔(等级 3)")
/script SendChatMessage("做我的仆役，%T！我是伊鲁亚夏，部落中最强大的缚魔术士！我是黯影之主，九层地狱的使者，燃烧军团帮不了你！你将被束缚！你必须臣服！", "EMOTE")

放逐

/script CastSpellByName("放逐(等级 3)")
/script SendChatMessage("滚回你自己的位面，%T！我是伊鲁亚夏，部落中最强大的缚魔术士！我是黯影之主，九层地狱的使者，你将被放逐！你必须返回异界！", "EMOTE")


拉人

/script CastSpellByName("Ritual of Summoning")
SendChatMessage("请帮助，我需要两个人的协助才能完成这个召唤法阵，然后就可以为 %T 打开星界传送门。（PS：拜托，只点一下）","SAY")
SendChatMessage("开始召唤 %T","PARTY")
SendChatMessage("开始召唤 %T","RAID"); 

报告

/script c=UnitClass("target");n=UnitName("target");l=UnitLevel("target");SendChatMessage(format("发现联盟败狗!姓名:%s,等级:%s,职业%s",n,l,c),"yell");end


设定援助对象

/script if (UnitName("target") ~= nil) then EditMacro(1, "Assist "..UnitName("target"), nil, "/assist "..UnitName("target"), 1) end
/script SaveMacros()
先在宏窗口第一个空位建立一个宏，选择一个图标，内容为空。