魔兽世界常用宏/Retail/正式服/暗影国度/Classic/怀旧服
2022年04月06日 22:18
一只猫小鼬
常用宏，不定时更新，部分宏可能无法在正式服/怀旧服通用，请自行甄别。不定时
一、防暂离宏
食用方法：按一次聊天窗口显示ON为开启，再按一次显示OFF为关闭
/script T,F=T or 0,F or CreateFrame("frame")if X then X=nil print("OFF.")else print("ON.") X=function()local t=GetTime()if t-T>1 then StaticPopup1Button2:Click()T=t end end end F:SetScript("OnUpdate",X)
二、邮寄
食用方法：自己修改收件人、邮件主题、邮件内容、需要邮寄的物品；邮寄物品需要填写物品名，不限制个数，自行添加；宏长度可能超过最大限制，自己拆成两个宏用，打开邮箱界面后再按宏。注：似乎失效了，待研究。由于是根据物品名邮寄的，所以使用起来可能会有一些小问题，例如邮寄丝绸，会将名字包含丝绸的物品都放上去，例如丝绸卷，懒得改了。
/run SendMailNameEditBox:SetText('收件人')
/run SendMailSubjectEditBox:SetText('邮件主题')
/run SendMailBodyEditBox:SetText('邮件内容')
/run local a,i,j,l={"物品名1","物品名2"}for i=1,#a do for j=1,150 do l=GetContainerItemLink(j/32,j%32)if l and l:find(a[i])then UseContainerItem(j/32,j%32) end end end
/click SendMailMailButton
三、密语自动组队
食用方法：其中标红的8是密语关键字，运行宏后，有人密语当前角色8，自动组队。
/run if (not IPM_F) then CreateFrame("Frame","IPM_F",UIParent);IPM_F:RegisterEvent("CHAT_MSG_WHISPER");end IPM_F:SetScript("OnEvent",function(_,_,a,b) if (a=="8" and b~=UnitName("player")) then C_PartyInfo.InviteUnit(b) end end)
四、购买NPC物品宏
食用方法：第一个数字是物品位置，从1开始，从左到右，从上到下，翻页了继续加；第二个数字是数量。
/run BuyMerchantItem(9,200)
五、退信宏
食用方法：退信，退收件箱里的第一封信，需要打开收件箱界面。
/run ReturnInboxItem(1)
如果中间有不能退信的邮件卡住了，试试这个，会退回所有邮件，未测试
/run local n,z=InboxFrame.pageNum*INBOXITEMS_TO_DISPLAY for z=1,n do ReturnInboxItem(z) end
六、拆分物品宏
食用方法：将堆叠物品拆成一个一个，请保证背包至少有一个空格。红色和蓝色部分分别是物品ID和数量，自行修改。
/脚本 for i=0,4 do for j=1,GetContainerNumSlots(i) do h={GetContainerItemInfo(i,j)} if #h==0 then w=i x=j else if h[10]==124441 and h[2]>1 then SplitContainerItem(i,j,1) end end end end if CursorHasItem() then PickupContainerItem(w,x) end
七、交易时放金币宏
食用方法：角色之间的交易界面，设置交易金额，123为金额，单位为铜币，自行修改。
/run MoneyInputFrame_SetCopper(TradePlayerInputMoneyFrame, 123)
2022年04月06日 22:18
一只猫小鼬
常用宏，不定时更新，部分宏可能无法在正式服/怀旧服通用，请自行甄别。不定时
一、防暂离宏
食用方法：按一次聊天窗口显示ON为开启，再按一次显示OFF为关闭
/script T,F=T or 0,F or CreateFrame("frame")if X then X=nil print("OFF.")else print("ON.") X=function()local t=GetTime()if t-T>1 then StaticPopup1Button2:Click()T=t end end end F:SetScript("OnUpdate",X)
二、邮寄
食用方法：自己修改收件人、邮件主题、邮件内容、需要邮寄的物品；邮寄物品需要填写物品名，不限制个数，自行添加；宏长度可能超过最大限制，自己拆成两个宏用，打开邮箱界面后再按宏。注：似乎失效了，待研究。由于是根据物品名邮寄的，所以使用起来可能会有一些小问题，例如邮寄丝绸，会将名字包含丝绸的物品都放上去，例如丝绸卷，懒得改了。
/run SendMailNameEditBox:SetText('收件人')
/run SendMailSubjectEditBox:SetText('邮件主题')
/run SendMailBodyEditBox:SetText('邮件内容')
/run local a,i,j,l={"物品名1","物品名2"}for i=1,#a do for j=1,150 do l=GetContainerItemLink(j/32,j%32)if l and l:find(a[i])then UseContainerItem(j/32,j%32) end end end
/click SendMailMailButton
三、密语自动组队
食用方法：其中标红的8是密语关键字，运行宏后，有人密语当前角色8，自动组队。
/run if (not IPM_F) then CreateFrame("Frame","IPM_F",UIParent);IPM_F:RegisterEvent("CHAT_MSG_WHISPER");end IPM_F:SetScript("OnEvent",function(_,_,a,b) if (a=="8" and b~=UnitName("player")) then C_PartyInfo.InviteUnit(b) end end)
四、购买NPC物品宏
食用方法：第一个数字是物品位置，从1开始，从左到右，从上到下，翻页了继续加；第二个数字是数量。
/run BuyMerchantItem(9,200)
五、退信宏
食用方法：退信，退收件箱里的第一封信，需要打开收件箱界面。
/run ReturnInboxItem(1)
如果中间有不能退信的邮件卡住了，试试这个，会退回所有邮件，未测试
/run local n,z=InboxFrame.pageNum*INBOXITEMS_TO_DISPLAY for z=1,n do ReturnInboxItem(z) end
六、拆分物品宏
食用方法：将堆叠物品拆成一个一个，请保证背包至少有一个空格。红色和蓝色部分分别是物品ID和数量，自行修改。
/脚本 for i=0,4 do for j=1,GetContainerNumSlots(i) do h={GetContainerItemInfo(i,j)} if #h==0 then w=i x=j else if h[10]==124441 and h[2]>1 then SplitContainerItem(i,j,1) end end end end if CursorHasItem() then PickupContainerItem(w,x) end
七、交易时放金币宏
食用方法：角色之间的交易界面，设置交易金额，123为金额，单位为铜币，自行修改。
/run MoneyInputFrame_SetCopper(TradePlayerInputMoneyFrame, 123)
