今天給大家?guī)砟ЙF60年代最全宏命令庫，包含了懷舊服職業(yè)宏、副本宏、各種宏大全，有興趣的一起來看看吧。

60年代職業(yè)宏、副本宏、各種宏大全：

用60年代的中文客戶端用 /cast 這些似乎可以用但技能用英文名就沒辦法了

如果技能打成中文有些字一般會變成"問號"???，那么這個該怎么辦呢?

例如60級的戰(zhàn)士宏中的 /cast 撕裂 這技能可以正常施放

但/cast 沖鋒 就沒有辦法施放 兩個字會變成問號...用英文技能名也是無效

那么最好的辦法就是用英文些技能名就好了?。?/cast Charge

1.12版本戰(zhàn)士劍盾宏和開始攻擊宏：

/equip 單手武器名

/equip 盾名

/startattack

一、60年代盜賊1.12版宏：

搬運工，魔獸世界1.12盜賊宏非常的少，大多數(shù)都是骨灰玩家，希望大家多多補充，歡迎大家反饋缺少什么，會盡量補充

/script local p,c,b,i,f=GetComboPoints(),CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"SliceDice") then f=1;break;end;end;if p>0 and not f then c("切割");elseif p==5 and f then c("割裂");else c("邪惡攻擊");end;

pve一鍵dps宏.....戰(zhàn)斗劍專精作用是有星就切割5星就割裂平時邪惡攻擊,戰(zhàn)斗匕首就把邪惡攻擊改成背刺即可....當年打pw就這宏= =#然后,你懂的.

【自動切割宏】

平時用邪惡搌星 若無切割狀態(tài) 只要有星 立即施放切割 若有 則繼續(xù) 邪惡搌星 若能搌到5星時切割狀態(tài)還在 則施放剔骨

/script local p,c,b,i,f=GetComboPoints(),CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"SliceDice") then f=1;break;end;end;if p>0 and not f then c("切割\");elseif p==5 and f then c("剔骨");else c("邪惡攻擊\");end;

【邪惡還擊宏 】

用 還擊 在動作條上的序號替換下邊紅色字，查編號看上邊基礎知識 /script local s,d=GetActionCooldown(還擊編號);if IsUsableAction(還擊編號) and d<2 then CastSpellByName("還擊\");else CastSpellByName("邪惡攻擊\");end;法術書版

/script local s,d=GetSpellCooldown(還擊編號,"spell");if IsUsableAction(還擊編號) and d<2 then CastSpellByName("還擊\");else CastSpellByName("邪惡攻擊\");end;

【致盲 + 繃帶 】

沒滿60級的或者在戰(zhàn)場中的繃帶名自己改

/施放 致盲

/script local b,s,l;for b=0,4 do for s=1,18 do l=GetContainerItemLink(b,s);if l and strfind(l,"厚符文布繃帶\") then UseContainerItem(b,s,1);break;end;end;end

1.12新潛行宏(不會因反復按而導致取消潛行)

/script local a,_;if not UnitAffectingCombat("player") then _,_,a=GetShapeshiftFormInfo(1);if not a then CastSpellByName("潛行");end;end;

/script GameTooltip:SetInventoryItem("player", GetInventorySlotInfo("MainHandSlot")); if(GameTooltipTextRight4:GetText()~="匕首") then CastSpellByName("邪惡攻擊(等級 8)") else PickupContainerItem(0,1); PickupInventoryItem(16); end

說明：如果主手不是匕首，則用邪惡攻擊。如果主手是匕首，則把主背包第1格的武器換到主手。/script GameTooltip:SetInventoryItem("player", GetInventorySlotInfo("MainHandSlot")); if(GameTooltipTextRight4:GetText()~="匕首") then PickupContainerItem(0,1); PickupInventoryItem(16);else CastSpellByName("背刺(等級 8)");end

說明：如果主手不是匕首，則把主背包第1格的武器換到主手。如果是匕首，就背刺。

注意，以上2個宏要求匕首有唯一屬性。如果匕首不是唯一，把GameTooltipTextRight4改成3。

/施放 冷血

/script SpellStopCasting();

/施放 剔骨(等級 8)

說明：這個宏應該大部分賊都知道。冷血+剔骨，一鍵發(fā)出

PvE一鍵DPS宏/script local p,c,b,i,f=GetComboPoints(),CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"SliceDice") then f=1;break;end;end;if p>0 and not f then c("切割");elseif p==5 and f then c("割裂");else c("邪惡攻擊");end;

抓賊宏/script TargetNearestEnemy({reverse})

/施放 悶棍

二、60年代術士1.12版宏：

【一鍵3DOT宏 】

點一下放一個，缺啥補啥，一直按吧

注意，這是solo宏，團隊中如果有其他術士的話就不好用了，因為無法判斷DOT是不是你放的，比如其他術士放了痛苦詛咒，

這個宏就不會再放痛苦詛咒，直到那個術士的痛苦詛咒消失

[通用版]

/script local n,s,k,j,d,f={"Abomi","Sarge","Immol"},{"腐蝕術\","痛苦詛咒\","獻祭"};for k=1,3 do f=nil;for j=1,16 do d=UnitDebuff("target",j);if d and strfind(d,n[k]) then f=1;break;end;end;if not f then CastSpellByName(s[k]);break;end;end;

[痛苦術士風箏版 ]

/script local n,s,k,j,d,f={"Abomi","Requi","Sarge"},{"腐蝕術\","生命虹吸\","痛苦詛咒\"};for k=1,3 do f=nil;for j=1,16 do d=UnitDebuff("target",j);if d and strfind(d,n[k]) then f=1;break;end;end;if not f then CastSpellByName(s[k]);break;end;end;

【獻祭 + 寵物攻擊 】

在使用前面一鍵3DOT宏之前我通常會使用這個宏作為起手，因為獻祭有施法時間，這就跟獵人瞄準起手一樣

/施放 獻祭

/script PetAttack();

如果是痛苦術士，帶小鬼而且作mana罐子的話用這個

/施放 獻祭

/script if UnitCreatureFamily("pet")~="小鬼\" then PetAttack();end;

【RAID DOT宏 】

循環(huán)上DOT，如果使用間隔超過18秒則重新從第一個DOT開始放，以防止DOT序列沒放完怪就死了

[普通版]

/script local x,t={"痛苦詛咒\","腐蝕術\","獻祭"},GetTime();DOTI=DOTI or 3;DOTT=DOTT or t;DOTI=DOTI+1;if DOTI>3 or t-DOTT>18 then DOTI=1;DOTT=t;end;CastSpellByName(x[DOTI]);

[痛苦術士版 ]

/script local x,t={"生命虹吸\","痛苦詛咒\","腐蝕術\","獻祭"},GetTime();DOTI=DOTI or 4;DOTT=DOTT or t;DOTI=DOTI+1;if DOTI>4 or t-DOTT>18 then DOTI=1;DOTT=t;end;CastSpellByName(x[DOTI]);

這是模擬2.0中/castsequence的方式寫的，但沒有進入/脫離戰(zhàn)斗重置序列和改變目標重置序列功能，

因為這需要做成插件了

到了2.0用這個就行了：

[普通版 ]

/castsequence reset=18/target/combat "生命虹吸\","痛苦詛咒","腐蝕術\","獻祭"

[痛苦術士版]

/castsequence reset=18/target/combat "痛苦詛咒\","腐蝕術\","獻祭"

【RAID詛咒宏 】

如果目標沒有元素詛咒就上元素，有元素沒有暗影詛咒就上暗影詛咒，都有就上痛苦詛咒

raid中的術士們，為了名額，詛咒吧!

/script local n,s,k,j,d={"lTouc","fAchi"},{"元素","暗影","痛苦\"},1;while k<3 do f=nil;for j=1,16 do d=UnitDebuff("target",j);if d and strfind(d,n[k]) then f=1;break;end;end;if f then k=k+1;else break;end;end;CastSpellByName(s[k].."詛咒\");

【智能契約分流宏 - 痛苦術士必備 】

=================為什么要分流=================

可能有人覺得只要契約就好，何必還要分流，我們有魔甲術，每5秒恢復15點hp，還有生命虹吸，吸血，

各位癮君子每3秒吸個五六十應該不在話下吧，生命長滿就不會再長了。所以只用契約的話會有大量的生命浪費，

實際上這些生命變成藍的話數(shù)量相當驚人的，所以在盡量保證自己血量的前提下使用分流可以達到最大的轉換效率

而不會出現(xiàn)安全問題，你會發(fā)現(xiàn)這才是真正的永動機

而且，最大的問題…… 分流恢復mana的速度比契約快多了>"<

==================================

原則：不讓小鬼滿藍，不讓自己滿血

小鬼滿mana當然先抽他的，當抽到70%時，如果你受傷小于200就分流一次，然后繼續(xù)抽小鬼，

直到抽空或者你血又差200沒滿，為了最大化的利用嘛，

如果把小鬼抽空了你還沒搞定，沒辦法，抽自己吧

各位如果在raid而且治療比較關照你的話可以把受傷200安全線往下降，比如1000，

這樣頂著恢復，回春，抽著小鬼，想OOM都難啊

我們唯一要做的就是……

練就一根堅韌而神經(jīng)質的手指……

/script local s,h,m="生命分流\";if UnitExists("pet") then h=UnitHealthMax("player")-UnitHealth("player");m=UnitMana("pet")/UnitManaMax("pet");if m>0.1 and h>200 or m>=0.7 then s="黑暗契約";end;end;CastSpellByName(s);

上邊200是開始分流的安全線，0.7是停止虐待小鬼開始分流的比例，當然是自己滿血情況下

計算了魔傷和強化生命分流天賦的分流宏

你魔傷和生命分流效率自己填

你分流效率：你強化生命分流的天賦，1點就換成1.1，2點換成1.2,沒有加這個天賦就是1

注意，這個宏不會分到死，自殺的話單拉出來一個最高級的吧

/script local b,r,p,j,h={30,75,140,220,310,424},{0.38,0.68,0.8,0.8,0.8,0.8},"player";for j=6,1,-1 do h=b[j]+r[j]*你魔傷;if UnitHealth(p)>=h and UnitManaMax(p)-UnitMana(p)>=h*你分流效率 then CastSpellByName("生命分流(等級 "..j..")");break;end;end

【死亡纏繞 + 恐懼】

死亡纏繞 + 恐懼是術士最具殺傷力的連招，是術士反盤的基礎，

能與之媲美的恐怕只有獻祭 + 點燃了，什么?還有生命分流 + ****?

功能：如果死亡纏繞不在CD就放纏繞，如果CD中則施放恐懼術，連續(xù)使用就是 纏繞 + 恐懼

死亡纏繞的編號看圖自己填

/script local s,d=GetActionCooldown(死亡纏繞編號);if d<2 then CastSpellByName("死亡纏繞");else CastSpellByName("恐懼術\");end;

法術書版

/script local s,d=GetSpellCooldown(死亡纏繞編號,"spell");if d<2 then CastSpellByName("死亡纏繞");else CastSpellByName("恐懼術\");end;

【如果目標是惡魔或元素就放逐，否則恐懼 】

raid和跟術士PK時能省點事……

/script local t=UnitCreatureType("target");if t=="惡魔" or t=="元素生物\" then CastSpellByName("放逐術\");else CastSpellByName("恐懼術\");end;

【雙法術石 】

法術石放飾品1，備用法術石放的位置自己填，看上邊基礎知識

/script local s,d,e=GetInventoryItemCooldown("player",17),if d0 then UseInventoryItem(13);UseContainerItem(備用法術石包號,你備用法術石格子號);end;

【狗智能吞噬魔法 】

優(yōu)先驅散自己身上的debuff，沒有就驅散對方身上的buff

/script local i,d,s,t,_;for i=1,16 do d,_,t=UnitDebuff("player",i);if d and t=="Magic" then s=1;break;end;end;CastSpellByName('吞噬魔法',s);

【瞬召虛空并犧牲宏 - 傳說中的雙胖子】

功能：如果帶的是虛空則犧牲，不是的話按第一下瞬召虛空，再按一下犧牲，之所以要按兩下因為所謂瞬召實際還是有0.5秒時間，

當然如果你是非惡魔術士或者惡魔支配CD中，那瞬召就變成慢召了……

/script local c=CastSpellByName;if UnitCreatureFamily("pet")=="虛空行者" then c("犧牲\");else c("惡魔支配\");SpellStopCasting();c("召喚虛空行者");end;

【寶寶打圖騰 】

/script local t,n,i,_={"根基\","戰(zhàn)栗\","地縛","灼熱","清毒",};for _,i in t do n=i.."圖騰";TargetByName(n,1);end;PetAttack();

【拉人宏 】

1 小隊/團隊自適應版

/施放 召喚儀式

/script local s="party";if UnitInRaid("player") then s="raid";end;SendChatMessage("開始召喚>%t<，機票1G，女生半價，來點門啊",s);

2 車夫自虐版

這個不是拉人的宏，而是一次尋問團隊中所有和你不在同一區(qū)域的人，自動問他需不需要拉，好像有點自討苦吃，自虐用的……

只要點一下，你會收到無數(shù)訂單的……

/script local i,n,z,_;for i=1,GetNumRaidMembers() do n,_,_,_,_,_,z=GetRaidRosterInfo(i) if z~=GetZoneText() then SendChatMessage("要拉的MM報職業(yè)","whisper",nil,n);end;end

(搬運者的話：有個大大的“點門”倆字的宏也有，但是因為沒法排版我就不復制了，感興趣的自己去找一下吧。。)

【智能靈魂石 】

沒有靈魂石就制造，有就給目標綁靈魂石，并在小隊或團隊中報告

把做好的靈魂石放在動作條上，查出編號，具體看上邊基礎知識

/script local s,i="party",靈魂石所在編號;if IsUsableAction(i) then if GetActionCooldown(i)==0 then UseAction(i);if UnitInRaid("player") then s="raid";end;SendChatMessage("%t 已被綁定",s);end;else CastSpellByName("制造特效靈魂石");end

三、60年代戰(zhàn)士1.12版宏：

1. 自動檢測自己的BUFF中是不是有 戰(zhàn)斗怒吼.沒有就施放.有則普通攻擊.

/script for i=1,20,1 do if (UnitBuff("player",i) ~= nil) then if (string.find(UnitBuff("player",i),"BattleShout") ~= nil) then CastSpellByName("攻擊");break; end end if (i==20) then CastSpellByName("戰(zhàn)斗怒吼(等級 6)"); end end

以上你可以把它使用在一個綜合宏中使用.或者單獨使用都可以.

比如

/施放 破甲

/......

2.自動切換到狂暴姿態(tài)=>狂暴之怒=>然后切換到防御姿態(tài)

/script GS=GetShapeshiftFormInfo;CS=CastSpellByName;_,_,isActive,_ = GS(3);if isActive~=nil then CS("狂暴之怒") else CS("狂暴姿態(tài)");end

/script _,_,isActive,_ = GS(2);if isActive~=nil then CS("攻擊") else CS("防御姿態(tài)");end

一，沖鋒，壓制，攔截，斷筋

/script C=CastSpellByName;

/script U=IsUsableAction;

/script R=IsActionInRange;

/script if(U(61)==1)then C("沖鋒");elseif(R(61)==1)then C("攔截");elseif(U(63)==nil)then C("斷筋");elseif(GetActionCooldown(63)==0)then C("壓制");else C("斷筋");end

前3行是定義語句，要不然寫不下，另外也使宏更加好看和簡練

首先判斷沖鋒是否可以用，如果能用則沖鋒;

如果不能用，判斷是否目標在攔截的范圍以內(nèi)，如果在范圍內(nèi)則攔截;

如果不在攔截的范圍內(nèi)，判斷壓制是否可以使用，如果不能使用則用斷筋;

如果壓制可以使用，判斷壓制的冷卻是否為0，如果為0則壓制，如果不為0則使用斷筋。

效果就是，如果離敵人遠就沖鋒或者攔截，如果接近了就斷筋，如果斷筋被躲閃則立刻壓制。

壓制完了繼續(xù)上斷筋。斷筋上好就該用下面的宏了。

二，致死，旋風，壓制，英勇打擊

/script C=CastSpellByName;

/script if(GetActionCooldown(63)==0) then C("壓制");end

/script if(UnitHealth("target")<20) then C("斬殺");end

/施放 致死打擊

/script if(IsActionInRange(63)==1)then C("旋風斬");end

/script if(UnitMana("Player")>39) then C("英勇打擊");end

第一行為定義語句

第二行判斷壓制的CD是否為0，如果CD為0則壓制，如果不能壓制此行無效

第三行判斷是否能處決，能則處決

第四行釋放致死打擊，(我為什么要用中文?用英文的話宏圖標會一直是亮的，用中文明暗時間同致死打擊)

第五行，判斷敵人的距離，如果在5碼內(nèi)的話用旋風(利大弊大?自己衡量吧)

第六行，怒氣大于39放英勇打擊(這個自己可以隨便定義)

效果，能壓制壓制，不能壓制能處決就處決，都不能就放致死，致死CD中，敵人在攻擊范圍內(nèi)就用旋風

怒非常多的時候就用英勇打擊代替普通攻擊。

三，破膽繃帶

/施放 破膽怒吼

/script SpellStopCasting();

/target 安達里克

/script if(GetActionCooldown(69)>0) then UseContainerItem(3,1);end

/script TargetLastEnemy()

第一行，釋放戰(zhàn)士的技能

第二行，停止當前動作

第三行，選擇繃帶目標，名字改成你自己

第四行，判斷破膽這個技能的CD是否大于0，用處就是看看你破膽是否釋放成功，

經(jīng)常我按技能的同時，對手跑出范圍了，結果我在那傻傻的繃帶，現(xiàn)在破膽不在CD中不會繃帶了。

第五行，選擇最后一個敵人

效果，目標被恐懼畏縮的同時你自己繃帶，1秒都不浪費，恐懼結束剛好繃帶完

四，群體攻擊

/script G=GetActionCooldown;C=CastSpellByName;

/script F=CastShapeshiftForm;if(G(71)<2)then F(1);else F(3);end

/script if(IsUsableAction(71)==1)then C("橫掃攻擊");end

/施放 旋風斬

/施放 順劈斬

/script if(UnitHealth("target")<5)then TargetNearestEnemy();end

自動判斷橫掃攻擊的CD，當CD好了的時候如果不在戰(zhàn)斗姿態(tài)則自動切換到戰(zhàn)斗姿態(tài)放橫掃攻擊

然后再自動切換回狂暴姿態(tài)，放旋風和順劈

最后一行判斷目標的血量，如果少于5%，則切換下一個目標

五，雙手武器和盾切換

/script P=PickupInventoryItem;

/script C=PickupContainerItem;

/script P(17);if(CursorHasItem())then C(4,2);C(4,1);P(16);else C(4,1);P(16);C(4,2);P(17);end

四、60年代獵人1.12版宏：

【自動反擊，貓鼬，猛禽宏】

可以代替猛禽一擊，能放的話會自動放反擊，貓鼬

出了反擊天賦的

在下邊依次填上反擊，貓鼬撕咬，猛禽一擊 在動作條上的編號，查編號看上邊基礎知識

/script local b,s,j={反擊編號,貓鼬編號,猛禽編號},{"反擊\","貓鼬撕咬","猛禽一擊\"};for j=1,3 do if IsUsableAction(b[j]) and GetActionCooldown(b[j])==0 then CastSpellByName(s[j]);break;end;end;

沒出反擊的

在下邊依次填上貓鼬撕咬，猛禽一擊 在動作條上的編號，查編號看上邊基礎知識

/script local b,s,j={貓鼬編號,猛禽編號},{"貓鼬撕咬","猛禽一擊\"};for j=1,2 do if IsUsableAction(b[j]) and GetActionCooldown(b[j])==0 then CastSpellByName(s[j]);break;end;end;

【智能釘刺宏 】

牧師不會解毒，應該用蝰蛇，反倒是對德魯伊要用蝰蛇1騙驅毒，到頭來毒蛇無用?其實應該對所有怪都用毒蛇

功能介紹：按照下列規(guī)則放釘刺

戰(zhàn)、賊：毒蝎

獵、法、術，薩，牧：蝰蛇

騎，德：蝰蛇1

NPC：毒蛇

/script local c,s,t=UnitClass("target"),"毒蛇釘刺",UnitPowerType("target");if UnitIsPlayer("target") then if t==0 then s="蝰蛇釘刺";if c=="圣騎士" or c=="德魯伊" then s=s.."(等級 1)";end;else s="毒蝎釘刺";end;end;CastSpellByName(s);

【打賊專用：標記 / 照明彈 】

有目標就標記，沒有就放閃光彈

/script if UnitExists("target") then CastSpellByName("獵人印記");else CastSpellByName("照明彈");end;

【雄鷹守護 + 獵人印記 + 寵物攻擊 】

/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("獵人印記");PetAttack();else c("雄鷹守護");end;

【靈猴 獵豹切換 】

/script local c,i,b,f=CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"Monk") then f=1;break;end;end;if f then c("獵豹守護");else c("靈猴守護");end;

【靈猴 雄鷹切換 】

/script local c,i,b,f=CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"Monk") then f=1;break;end;end;if f then c("雄鷹守護");else c("靈猴守護");end;

【獵豹 雄鷹切換】

/script local c,i,b,f=CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"eTiger") then f=1;break;end;end;if f then c("雄鷹守護");else c("獵豹守護");end;

【靈猴守護 + 威懾 】

威懾的編號看上邊基礎知識自己填

/script local c,i,b,f,s,d=CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"Monk") then f=1;break;end;end;if not f then c("靈猴守護");SpellStopCasting();end;s,d=GetActionCooldown(你威懾編號);if d<2 then c("威懾\");end;

【收寵 假死 陷阱】

非戰(zhàn)斗狀態(tài)就放陷阱，否則假死，再按陷阱，注意，戰(zhàn)斗中假死瞬間陷阱放不出來的，會提示你正在戰(zhàn)斗中

所以戰(zhàn)斗中需要狂按這個宏

這個宏WOW 2.0就用不著了

/script PetFollow();if UnitAffectingCombat("player") then CastSpellByName("假死"); else CastSpellByName("冰凍陷阱\");end;

【野獸護符 - 雙多重宏 】

護符放飾品1上，把你多重射擊換個地方，并查出編號，替換紅色字，查編號看上邊基礎知識

/script local s,d;s,d=GetActionCooldown(你多重射擊的編號);if d>2 then UseInventoryItem(13);SpellStopCasting();end;CastSpellByName("多重射擊\");

法術書版

/script local s,d;s,d=GetSpellCooldown(你多重射擊的編號,"spell");if d>2 then UseInventoryItem(13);SpellStopCasting();end;CastSpellByName("多重射擊\");

這個宏可以目前替代多重了，但是馬上WOW 2.0要來了，這個宏屆時將失效，目前沒有解決方案

【寶寶打圖騰 】

/script local t,n,i,_={"根基\","戰(zhàn)栗\","地縛","灼熱","清毒",};for _,i in t do n=i.."圖騰";TargetByName(n,1);end;PetAttack();

寵物宏 - 智能召喚/復活/治療

如果寵物存在，死的就復活，沒死就++，寵物消失了的話就召喚，如果是尸體消失，請同時按住Alt鍵，

會強制使用復活，因為WOW消失了仍然認為是活的……

/script local p,s="pet","召喚";if UnitIsDead(p) then s="復活\";elseif UnitExists(p) then s="治療" elseif IsAltKeyDown() then s="復活\";end;CastSpellByName(s.."寵物\");

【尋找稀有精英寵物 】

公共部分已經(jīng)有了，不過鑒于獵人特殊性在專門寫一個

/script local s="斷牙";TargetByName(s,1);if UnitName("target")==s then ChatFrame1:AddMessage("找到");end;

上邊名字自己修改

針對不同目標調(diào)整寵物技能自動施放情況

這個宏可以針對不同類型的目標調(diào)整寵物技能的自動施放，比如帶蝙蝠面對近戰(zhàn)應該打開尖嘯，而面對法系就應該關掉

帶會爪擊的寵物打怪時應該關掉爪擊開低吼，而遇到玩家需要關低吼開爪擊，這個宏可以自動為你做到

/施放 獵人印記

/script local x,p,j,e,_={1,1,1},UnitPowerType("target");if UnitIsPlayer("target") then if p==0 then x={1,nil,nil,1};else x={1,nil,1};end;end;for j=4,7 do _,_,_,_,_,_,e=GetPetActionInfo(j);if x[j-3]~=e then TogglePetAction(j);end;end;

說明一下，紅色的{1,1,1}對應NPC，藍色的{1,nil,nil,1}對應有藍職業(yè)，綠色的{1,nil,1}對應戰(zhàn)，賊

四個1/nil對應寵物技能條4 5 6 7按鈕，1代表開，nil代表關，最后一個是nil的話可以不寫，

大家可以自己調(diào)整技能和對應職業(yè)的開關順序，畢竟不同bb技能不用

五、60年代法師1.12版宏：

【冰箱能用就冰箱，沒冷卻就急速冷卻+冰箱】

把 寒冰屏障 放到一個你不用的按鈕上，記下編號，編號看上邊基礎知識，

/script local c,i,b,f,d,_=CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strsub(b,5)=="Frost" then f=1;break;end;end;if not f then _,d=GetActionCooldown(你冰箱編號);if d>2 then c("急速冷卻");SpellStopCasting();end;c("寒冰屏障");end;

【奧術強化+護符+炎爆術 】

護符放哪里無所謂，會自動開已經(jīng)冷卻的護符

/script local c,x,u,s,p,d,e,_=CastSpellByName,GetInventoryItemCooldown,UseInventoryItem,SpellStopCasting,"player";c("奧術強化);s();_,d,e=x(p,13);if d<2 and e then u(13);else _,d,e=x(p,14);if d<2 and e then u(14);end;end;s();c("炎爆術\");

【氣定神閑+炎爆術/施放 氣定神閑 】

/script SellStopCasting();

/施放 "炎爆術\"

平時冰箭，出靈風8件效果就火球/script local c,i,b,f=CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"Telep") then f=1;break;end;end;if f then c("火球術\");else c("寒冰箭");end;

這類宏有個特點，平時用小技能，在特定buff出現(xiàn)后換大技能，比如這里冰箭就是小技能，火球就是大技能

既然分出了大小，那就知道可以怎么改了，火球術可以改成其他“大技能”，比如 炎爆術

冰箭可以換成其他“小技能”，比如 灼燒，都是中國字，別跟我說你不會

平時冰箭，出奧術專注效果就火球/script local c,i,b,f=CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"ManaB") then f=1;break;end;end;if f then SpellStopCasting();c("火球術\");else c("寒冰箭");end;

同上，火球術可以改成其他的，比如 炎爆術，奧術飛彈，冰箭可以改成 灼燒

【平時冰箭，出奧術專注 或 出靈風8件效果就火球 】

奧術專注是下個法術免費，所以一旦出了特效，要馬上取消當前法術，換大的，否則免費特效就被當前法術浪費了

而靈風8件是下個法術瞬發(fā)，當前正在引導的不受影響，所以不用取消當前的

由于256字節(jié)限制，要取消兩個都取消，否則都不取消，那就是說必須都取消，這樣靈風會損失當前引導的法術

這種損失就是半個冰箭或者半個灼燒，如果大家認為這種損失可以接受的話，就用這個合并版：

/script local c,i,j,b,f=CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and (strfind(b,"ManaB") or strfind(b,"Telep")) then f=1;break;end;end;if f then SpellStopCasting();c("火球術\");else c("灼燒");end;

【灼燒疊5層就火球，否則繼續(xù)灼燒 】

/script local c,i,d,n,f=CastSpellByName;for i=1,16 do d,n=UnitDebuff("target",i);if d and strfind(d,"SoulB") then f=1;break;end;end;if f and n==5 then c("火球術\");else c("灼燒");end;

【打賊奧爆宏】

有目標就放最高級奧暴，沒有目標就放1級奧暴

/script if UnitCanAttack("target","player") then CastSpellByName("魔爆術\");else CastSpellByName("魔爆術(等級 1)");end;

【自動補 冰甲術，奧術智慧，魔法抑制 】

缺啥補啥，閑著沒事按按能強身健體，定國安邦……

/script local n,s,k,j,b,f={"tArm","lSen","hMag"},{"冰甲術\","奧術智慧","魔法抑制"};for k=1,3 do f=nil;for j=1,16 do b=UnitBuff("player",j);if b and strfind(b,n[k]) then f=1;break;end;end;if not f then CastSpellByName(s[k]);break;end;end;

【自動把被控制的隊友變羊，小隊，團隊通用版 】

對于會控制玩家的BOSS很有用，比如哈卡，AQ神廟1

/script local n,p,i,t=4,"party";if UnitInRaid("player") then n=40;p="raid";end;for i=1,n do t=p..i;if UnitCanAttack("player",t) then TargetUnit(t);CastSpellByName("變形術\");SendChatMessage("%t 被控制，我把他變羊了~",p);break;end;end;

【隨機變羊，豬，烏龜宏】

/script local s,m,r={"","：龜\","：豬\"},{"%t變羊了","%t是烏龜\","%t是豬\"},random(3); CastSpellByName("變形術\"..s[r]);SendChatMessage(m[r],"yell");

可以根據(jù)變的種類喊話，想喊什么自己改

【火沖打圖騰】

/script local t,n,i,_={"根基\","戰(zhàn)栗\","地縛","灼熱","清毒",};for _,i in t do n=i.."圖騰";TargetByName(n,1);end;CastSpellByName("火焰沖擊(等級 1)");

【法師自動制造各種魔法寶石】

SuperMacro版，宏寫不下

左邊窗口：

/script ConjureManaStone();

右邊窗口：

Code:

function ConjureManaStone()

local x,j,b,s,l,f={"紅寶石","黃水晶","翡翠\","瑪瑙"},1;

while j<5 do

f=nil;

for b=0,4 do

for s=1,18 do

l=GetContainerItemLink(b,s);

if l and strfind(l,"法力"..x[j]) then

f=j;break;

end;

end;

if f then break;end;

end;

if f then j=j+1;

六、60年代小德1.12版宏：

【中二變身宏】

RP的變形宏，其他形態(tài)則變回人形，人形則喊話并變成相應形態(tài)，反復按不會再變回人形

人形態(tài)下變熊，并喊“熊的力量!” 其他任何形態(tài)則變回人形

/script local c,s,i,a,_=CastShapeshiftForm;for i=1,6 do _,_,a=GetShapeshiftFormInfo(i);if a then s=i;break;end;end;if not s then SendChatMessage("熊的力量!","yell");c(1);elseif s~=1 then c(s);end;

人形態(tài)下變貓，并喊“豹的速度!” 其他任何形態(tài)則變回人形

/script local c,s,i,a,_=CastShapeshiftForm;for i=1,6 do _,_,a=GetShapeshiftFormInfo(i);if a then s=i;break;end;end;if not s then SendChatMessage("豹的速度!","yell");c(3);elseif s~=3 then c(s);end;

人形態(tài)下變風暴烏鴉，并喊“鷹的眼睛!” 其他任何形態(tài)則變回人形(資料片適用)

/script local c,s,i,a,_=CastShapeshiftForm;for i=1,6 do _,_,a=GetShapeshiftFormInfo(i);if a then s=i;break;end;end;if not s then SendChatMessage("鷹的眼睛!","yell");c(6);elseif s~=6 then c(s);end;

人形態(tài)下變鵪鶉/奶樹，并喊“鵪鶉的可愛!” 其他任何形態(tài)則變回人形(鵪鶉/奶樹自己根據(jù)天賦調(diào)整……)

/script local c,s,i,a,_=CastShapeshiftForm;for i=1,6 do _,_,a=GetShapeshiftFormInfo(i);if a then s=i;break;end;end;if not s then SendChatMessage("鵪鶉的可愛!","yell");c(5);elseif s~=5 then c(s);end;

海豹 臺詞征集中

/script local c,s,i,a,_=CastShapeshiftForm;for i=1,6 do _,_,a=GetShapeshiftFormInfo(i);if a then s=i;break;end;end;if not s then SendChatMessage("海豹，海豹……","yell");c(2);elseif s~=2 then c(s);end;

旅行 臺詞征集中

/script local c,s,i,a,_=CastShapeshiftForm;for i=1,6 do _,_,a=GetShapeshiftFormInfo(i);if a then s=i;break;end;end;if not s then SendChatMessage("旅行……","yell");c(4);elseif s~=4 c(s);end;

各種形態(tài)變回人形，包括資料片飛行形態(tài)

/script local i,a,_; for i=1,6 do _,_,a=GetShapeshiftFormInfo(i); if a then CastShapeshiftForm(i); break; end; end;

【1.12獵豹形態(tài)新潛行宏(不會因反復按而導致取消潛行) 】

/script local i,b,f;if not UnitAffectingCombat("player") then for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"Ambu") then f=1;break;end;end;if not f then CastSpellByName("潛行");end;end;

【一鍵 精靈之火 + 月火 + 蟲群 】

有蟲群的：

/script local n,s,k,j,d,f={"rFall","tSwar","eFire"},{"月火術\","蟲群","精靈之火\"};for k=1,3 do f=nil;for j=1,16 do d=UnitDebuff("target",j);if d and strfind(d,n[k]) then f=1;break;end;end;if not f then CastSpellByName(s[k]);break;end;end;

沒有蟲群的：

/script local n,s,k,j,d,f={"rFall","eFire"},{"月火術\","精靈之火\"};for k=1,2 do f=nil;for j=1,16 do d=UnitDebuff("target",j);if d and strfind(d,n[k]) then f=1;break;end;end;if not f then CastSpellByName(s[k]);break;end;end;

【月火打圖騰 】

/script local t,n,i,_={"根基\","戰(zhàn)栗\","地縛","灼熱","清毒",};for _,i in t do n=i.."圖騰";TargetByName(n,1);end;CastSpellByName("月火術(等級 1)");

【變熊 + 沖鋒 】

/script local c,a,_=CastSpellByName;_,_,a=GetShapeshiftFormInfo(1);if a then c("野性沖鋒\");else c("巨熊形態(tài)");end;

【重擊 + 人形 + 加血 】

按第一下 重擊 敵人，按第二下 如果敵人昏迷則回到人形，按第三下開始放治療之觸，想放別的可以改

優(yōu)點是如果重擊未擊中，招架等敵人沒暈的話不會變回人形，避免出現(xiàn)危險

由于變形無公共CD，狂按的話可以實現(xiàn)瞬間重擊 + 人形效果 + 加血效果

/script local c,i,d,f,a,_=CastSpellByName;for i=1,16 do d=UnitDebuff("target",i);if d and strfind(d,"Bash") then f=1;break;end;end;if f then _,_,a=GetShapeshiftFormInfo(1);if a then c("巨熊形態(tài)");else c("治療之觸");end;else c("重擊\");end;

治療之觸可以改成其他法術

七、60年代牧師1.12版宏：

【進入/取消暗影形態(tài) 并切換動作條 】

1是非暗影形態(tài)下的治療魔法條，2是暗影形態(tài)下的攻擊魔法條

進入/取消暗影形態(tài)，并在1，2兩動作條間切換，數(shù)字可以自己改

/script local i,b,f,p;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"wform") then f=1;break;end;end;if f then p=1;else p=2;end;CastSpellByName("暗影形態(tài)");CURRENT_ACTIONBAR_PAGE=p;ChangeActionBarPage();

【心靈尖嘯 + 取消暗影形態(tài) 】

/施放 心靈尖嘯

/script local i,b,f;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"wform") then CastSpellByName("暗影形態(tài)");break;end;end;

【給自己能量灌注+心靈專注+護符+技能 】

具體最后跟什么技能自己考慮，因為心靈專注，所以這個技能是免費的，一般亡靈牧師都跟瘟疫了

護符放飾品1位置

/script local c,s,d,e,_=CastSpellByName,SpellStopCasting;c("能量灌注",1);s();c("心靈專注");s();_,d,e=GetInventoryItemCooldown("player",13);if d0 then UseInventoryItem(13);end;s();c("噬靈瘟疫");

【自動補 韌，心靈之火，防護暗影 】

缺啥補啥，閑著沒事按按能強身健體，定國安邦……

/script local n,s,k,j,b,f={"dFor","rFir","iSha"},{"真言術：韌","心靈之火\","防護暗影"};for k=1,3 do f=nil;for j=1,16 do b=UnitBuff("player",j);if b and strfind(b,n[k]) then f=1;break;end;end;if not f then CastSpellByName(s[k]);break;end;end;

【矮牧 反恐】

/script local i,b,f;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"Excor") then f=1;break;end;end;if not f then CastSpellByName("防護恐懼結界\");end;

【PK驅散宏 】

優(yōu)先驅散自己身上的Debuff，沒有就對目標驅散

/script local t; if UnitDebuff("player",1,1) then t=1;end; CastSpellByName("驅散魔法",t);

八、60年代圣騎士1.12版宏：

【自動換圣契 】

當然使用圣光閃現(xiàn)的時候 自動裝備[神性圣契],當我使用驅散的時候 自動裝備[優(yōu)雅圣契]

把兩個圣契一個裝在身上，另一個放在右邊第一個包的第一個格子里

第一個宏：放圣光閃，如果身上帶的不是神性圣契就先換，再按放圣光閃現(xiàn)

/script local l=GetInventoryItemLink("player",17);if l and strfind(l,"神性") then CastSpellByName("圣光閃現(xiàn)");else UseContainerItem(0,1);end;

第二個宏：放清潔術，如果身上帶的不是優(yōu)雅圣契就先換，再按放清潔術

/script local l=GetInventoryItemLink("player",17);if l and strfind(l,"優(yōu)雅") then CastSpellByName("清潔術\");else UseContainerItem(0,1);end;

如果圣契放在包的其他位置，自己修改上邊紅色數(shù)字，修改方法看上邊基礎知識

【打賊奉獻宏 】

有目標就放最高級奉獻，沒有目標就放1級奉獻

/script if UnitCanAttack("target","player") then CastSpellByName("奉獻");else CastSpellByName("奉獻(等級 1)");end;[attachment=2470] [attachment=2470]

九、60年代薩滿祭司1.12版宏：

【平時用低級閃電箭，如果出“元素集中”自動換成最高級閃電箭】

/script local c,i,b,f=CastSpellByName;for i=1,16 do b=UnitBuff("player",i);if b and strfind(b,"ManaB") then f=1;break;end;end;if f then SpellStopCasting();c("閃電箭");else c("閃電箭(等級 1)");end;