遠程宏程序設計

用耐久裝備檢查宏:/script local t，x，a，d，m={0，1}，{ "total "，" minimum" }，0為i=1，18 do。

d，m = getinventoryitemburrity(I)if m then if d/m & lt；t[2]那麽t[2]=d/m

X[2]= "最低"...getInventoryitemlink ("player "，I)end t[1]= m+t[1]a = a+d end end。

t[1]= a/t[1]for I = 1，2 do chat frame 1:AddMessage(x[I]..結束

垃圾丟棄宏:/script local a，I，j，l={ "待丟棄物品名稱1 "，"待丟棄物品名稱2"} for i = 1，# a do for j = 1，114。

do l=GetContainerItemLink(j/23，j%23)如果l和l:find(a[i])那麽

pickeupcontaineritem(j/23，j % 23)DeleteCursorItem()end end end

看看妳的紙娃娃有幾個動作:先打開試衣間壹次，然後執行下面的代碼:

/script dressup frame:Show()；局部s = 2000本地a =

0;DressUpModel:set script(" on update "，function(self，e)s = s + (e *

1000);self:SetSequenceTime(a，s)；如果s & gt2000那麽s =

0;a = a+1；DEFAULT _ CHAT _ FRAME:add message(" action no . "..."開始...")end end)

停止執行:/scriptdressupmodel:set script(" on update "，nil)

壹鍵開/關設備宏:

拆除設備:

自動搜索背包剩余位置，脫下裝備

/跑？l，Z={16，17，18，1，3，5，6，7，8，9，10}，Z？還是？{ }本地？n=Z[1]？然後呢。#Z+1？還是？1;為了什麽？i=0，4？做什麽？為了什麽？j=1，GetContainerNumSlots(i)做什麽？如果？不是嗎？GetContainerItemLink(i，j)和？然後呢？Z[n]={i，j } PickupInventoryItem(L[n])pickeupcontaineritem(I，j)n = n+1；結束；結束；結束

穿戴設備:

對應脫裝備的宏，穿上裝備(背包裏裝備的位置不能動)

/跑？為了什麽？i=1，#Z？做什麽？如果？GetContainerItemLink(Z[I][1]，Z[i][2])然後呢？pickeupcontaineritem(Z[I][1]，Z[I][2])PickupInventoryItem(L[I])end；結束；Z={}

倒計時呼叫宏:

單擊開始，然後單擊停止。

/script t，f = t或0，f或create frame ("frame ")，如果x和I > 0，則

x =零否則I = 5；x = function()local T = GetTime()if T-T & gt；1那麽如果i==0那麽

F:SetScript("OnUpdate "，nil)else SendChatMessage(i，" YELL ")I = I-1；T=t末端末端末端

end F:SetScript("OnUpdate "，X)

向左點擊開始，再次點擊計數，向右點擊停止。

/script I = 5；T，F=T或0，F或

create frame(" frame ")X = function()local T = GetTime()if T-T & gt；1那麽如果i==0或者

X==nil然後F:SetScript("OnUpdate "，nil)else SendChatMessage(i，" YELL ")I = I-1；T=t

end end end F:SetScript("OnUpdate "，X)；

/stopmacro [btn:1]

/腳本

x =零；

中斷提示宏:

暗示打斷自己:

/script F=F或

create frame(" frame ")F:RegisterEvent(" COMBAT _ LOG _ EVENT _ UNFILTERED ")；F:SetScript("OnEvent "，function()if

arg4==UnitName("player ")和arg2:sub(-2，-2)=="P "那麽

SendChatMessage("我打斷了"..arg13，" yell")end end)

打斷周圍人的提示

/script F=F或

create frame(" frame ")F:RegisterEvent(" COMBAT _ LOG _ EVENT _ UNFILTERED ")；F:SetScript("OnEvent "，function()if

arg2:sub(-2，-2)=="P "且arg3:sub(5，5)=='0 '則

SendChatMessage(arg7.."中斷"...arg13，"大喊")end)

取消提示:

/script F:SetScript("OnEvent "，nil)

智能選擇宏:

/script hook secure func(loot frame，" show "，function () local。

p，q，t；對於i=1，IsAltKeyDown()和0或GetNumLootItems()做

_，_，p=GetLootSlotInfo(i)如果p~=0那麽

_，_，q，_，_，t = GetItemInfo(GetLootSlotLink(I))end if p = = 0 or(q and(q & gt；0

或者“武器”= = t))然後松槽(I) end end end)

自動選取項目版本:

/script hook secure func(loot frame，" show "，function () local。

t，p，n={ "羊毛"，"魔布" } for I = 1，isaltkeydown()和0或getnumlooitems () do。

_，n，p = GetLootSlotInfo(I)for j = 1，#n do如果p==0或n = = t[j]那麽LootSlot(i)end end

結束結束)

BOSS刪除通知宏:版本歷史:

/script localn，c，s，t，m = {}，0，sendchatmessage為

i=1，GetNumLootItems()do _，_，m，t = GetLootSlotInfo(I)if t & gt；3然後

t=GetLootSlotLink(i)n[t]=n[t]且n[t]+m或m；c = c+1；結束；結束；如果c & gt0然後for

I，j成對(n)做

斯(我.." X "..j，“raid”)結束；S("=總計"...c..." pieces dropped = "，" raid ")結束

修復兩個設備同名時的數量統計。

/script local n，t，m，c={}for

i=1，GetNumLootItems()do _，_，m，t = GetLootSlotInfo(I)if t & gt；3然後

t=GetLootSlotLink(i)_，_，c=t:find("。-m:(%d+)")n[c]=n[c]且n[c]+m或

m；結束；結束；對I，j成對(n)做

_，I = GetItemInfo(I)SendChatMessage(I.." X "..j，“raid”)結束

賣垃圾+修裝備宏:

點擊商家界面出售灰色物品，自動修復裝備(公會銀行優先)

/script本地q；如果MerchantFrame:IsVisible()那麽for i=1，114 do

q=GetContainerItemLink(i/23，i%23)如果q和q:sub(5，10)=="9d9d9d "那麽

UseContainerItem(i/23，i%23)end。結束；如果CanMerchantRepair()則

repair allitems(CanGuildBankRepair())end；結束

如果妳不想使用公會銀行，那麽

/script本地q；如果MerchantFrame:IsVisible()那麽for i=1，114 do

q=GetContainerItemLink(i/23，i%23)如果q和q:sub(5，10)=="9d9d9d "那麽

UseContainerItem(i/23，i%23)end。結束；如果CanMerchantRepair()則

RepairAllItems()end；結束

清理背包宏:點擊商家界面中的宏，壹次性賣掉背包中的所有灰色物品。其他情況下，點擊宏銷毀背包中的壹個灰色物品，按alt銷毀背包中的所有灰色物品。

/script本地q；對於i=1，120做

q=GetContainerItemLink(i/23，i%23)如果q和q:sub(5，10)=="9d9d9d "那麽如果

然後使用ContainerItem(i/23，i%23)else

pickeupcontaineritem(I/23，i%23)DeleteCursorItem()如果不是IsAltKeyDown()，則

打破；結束；結束；結束；結束

獲取鼠標保持或懸停形式的信息宏:

/run local a，b，c，x，d，e，f=GetCursorInfo()if a then

x=a..":"..b.." "如果a=="item "那麽_，_，_，_，d，e，_，f=GetItemInfo(x)x=x.." "..c.."

"..d ..”"..e ..”"..f elseif c那麽x=x..c結束else

x=GetMouseFocus():GetName()end

DEFAULT_CHAT_FRAME:添加消息(x)

在這個權貴黨橫行的時代，我想分享兩個有用的宏:

告訴妳的目標，告訴他妳的近戰AP，暴擊和命中。。

/運行

p = " playerbap，map = UnitAttackPower(p)；rcr = getcritchonce(p)；

rhi = GetCombatRating(7)；SendChatMessage("我的DD值:近戰AP "...BAP+地圖...“——轟！

罷工”...RCR……”-生活

"...rhi，" whisper "，getDefaultLanguage ("target ")，unitname ("target "))。

這是遠程暴擊，AP和命中的宏。。

/運行

p = " playerbap，map = UnitRangedAttackPower(p)；rcr = GetRangedCritChance(p)；

rhi = GetCombatRating(7)；發送聊天消息(" AP "...BAP+地圖...《致命壹擊》...rcr...“生活。

"...rhi，" whisper "，getDefaultLanguage ("target ")，unitname ("target "))。

這是坦克~ ~

/運行

p = " playerDOD = GetDodgeChance(p)；pa = GetParryChance(p)；bl = GetBlockChance(p)；ba，ar=UnitArmor(“玩家”)；hm = UnitHealthMax(p)；SendChatMessage ("dodge "..國防部..“帕裏”..爸爸.."阻止"..提貨單..“鎧甲”..阿肯色州..“惠普”..hm，“耳語者”，getDefaultlanguage(“目標”)，unitname(“目標”))

法律體系

/運行

p = " playerFD = GetSpellBonusDamage(3)；FCR = GetSpellCritChance(3)；Shi = GetCombatRating(8)；SendChatMessage("火災傷害"...軟驅...“法國爆炸”...fcr...“擊中”...石，"耳語"，GetDefaultLanguage("目標")，Unitname("目標"))

註意，傷人的GetSpellBonusDamage()方法會爆炸GetSpellCritChance()

那是fd fcr的兩行

()中的數字。

這是壹次分裂

1為物理

2代表神聖

3表示火災

四

為了自然

5代表霜凍

6代表陰影

7代表奧術