|
从各处搜集的一些宏
1,众人都在刷DK马,打BOSS掉的蓝绿件还是能卖点G的,但是尸体里不一定都是蓝绿件,还有蜘蛛腿啊什么的不值钱的灰白件,一般都是开自由拾取的,捡到包里一点一点扔,还是?下面的宏是灰常有用滴。
/脚本 local a,i,j,l={\"要抛弃物品名字1\",\"要抛弃物品名字2\"}for i=1,#a do
forj=1,114 do l=GetContainerItemLink(j/23,j%23)if l and
l:find(a)thenPickupContainerItem(j/23,j%23)DeleteCursorItem()end end
end
当然还有更好的宏,推荐自动拾取宏,使用:关闭游戏自带的自动拾取,使用宏,之后的每次拾取都会自动判断物品等级,放弃灰色物品。(灰色武器还是会拾
取);按住alt为不自动拾取。 注意:这个宏使用了就无法取消,想要不自动拾取只能按住alt或者重新载入一次界面(退出游戏或/console
reloadui)
/ 脚本 hooksecurefunc(LootFrame,\"Show\",function()local p,q,t;for
i=1,IsAltKeyDown()and 0 or GetNumLootItems()do
_,_,p=GetLootSlotInfo(i)if p~=0 then
_,_,q,_,_,t=GetItemInfo(GetLootSlotLink(i))end if p==0 or(q and(q>0
or\"武器\"==t))then LootSlot(i)end end end)
还有自动拾取某物品版:(使用和注意同上)/ 脚本
hooksecurefunc(LootFrame,\"Show\",function()local t,p,n={\"毛料\",\"魔纹布\"}for
i=1,IsAltKeyDown()and 0 or GetNumLootItems()do
_,n,p=GetLootSlotInfo(i)for j=1,#n do if p==0 or n==t[j]then
LootSlot(i)end end end end)
2,问:刷完了副本怎么办?答:重置宏呗,一般都用这个
/invite 一个在线玩家的名字
/script LeaveParty()
/logout
下线再上 ,是好友还好说,陌生人的话说不定会M语过来,怎么办?有优化宏解决。
/run
SendWho(\"\")locala=GetNumWhoResults()a=GetWhoInfo(random(a))InviteUnit(a)SendChatMessage(\"
我在用随机重置FB宏,如果不在队伍里请点拒绝,抱歉打扰到你\",\"whisper\",nil,a)LeaveParty()
/logout
3,你知道你的人物能做多少个动作,想知道么,打开试衣间,使用下列宏:
/script DressUpFrame:Show();local s = 2000;local a =
0;DressUpModel:SetScript(\"OnUpdate\", function(self, e)s = s + (e *
1000);self:SetSequenceTime(a, s);if s > 2000 then s =
0;a=a+1;DEFAULT_CHAT_FRAME:AddMessage(\"第\"..a..\"号动作开始...\") end end)
有好多动作你不曾看见过,最多有多少个呢,耐心的看看吧!
要停止演示使用此宏:/script DressUpModel:SetScript(\"OnUpdate\",nil)
4,下团队本倒计时分装备,是一下一下打出5,4,3,2,1还是?
有宏帮你,更省事!
倒计时喊话(1)
点一下开始,再点一下停止。
/脚本 T,F=T or 0,F or CreateFrame(\"frame\")if X and i>0 then X=nil else
i=5;X=function()local t=GetTime()if t-T>1 then if i==0 then
F:SetScript(\"OnUpdate\",nil)else SendChatMessage(i,\"YELL\")i=i-1;T=t end
end end end F:SetScript(\"OnUpdate\",X)
(2)
左键点开始,再点重新计数,右键停止。
/脚本 i=5;T,F=T or 0,F or CreateFrame(\"frame\")X=function()local
t=GetTime()if t-T>1 then if i==0 or X==nil then
F:SetScript(\"OnUpdate\",nil)else SendChatMessage(i,\"YELL\")i=i-1;T=t end
end end F:SetScript(\"OnUpdate\",X);
/stopmacro [btn:1]
/脚本 X=nil;
5,下FB打断怪物施法或者打JJC打断施法的时候喊话,有宏帮你
打断提示宏自己打断的提示:
/脚本 F=F or
CreateFrame(\"frame\")F:RegisterEvent(\"COMBAT_LOG_EVENT_UNFILTERED\");F:SetScript(\"OnEvent\",function()if
arg4==UnitName(\"player\")and arg2:sub(-2,-2)==\"\"then
SendChatMessage(\"我打断了\"..arg7..\"的\"..arg13,\"yell\")end end)
周围所有人的打断提示 :
/脚本 F=F or
CreateFrame(\"frame\")F:RegisterEvent(\"COMBAT_LOG_EVENT_UNFILTERED\");F:SetScript(\"OnEvent\",function()if
arg2:sub(-2,-2)==\"\"and arg3:sub(5,5)=='0'then
SendChatMessage(arg4..\"打断了\"..arg7..\"的\"..arg13,\"yell\")end end)
取消提示:
/脚本 F:SetScript(\"OnEvent\",nil)
6,BOSS出装备了,团里的成员肯定都想第一时间知道出什么了,这个宏能让你轻松发出掉落信息
(在打开拾取窗口的情况下按宏向团队通报掉落列表,红字部分的t>3代表只通告史诗品质以上的物品,改成2可以通报精良以上物品,类推。)
/脚本 local n,t,m,c={}for i=1,GetNumLootItems()do
_,_,m,t=GetLootSlotInfo(i)if t>3 then
t=GetLootSlotLink(i)_,_,c=t:find(\".-m%d+)\")n[c]=n[c] and n[c]+m or
m;end;end;for i,j in pairs(n)do
_,i=GetItemInfo(i)SendChatMessage(i..\"X\"..j,\"raid\")end
7,最近流行强力党,都要求报数据,这个宏能帮你。
报数据宏M语你的目标,告诉他你的近战AP,暴击,还有命中。。
/run p=\"player\";bap,map=UnitAttackPower(p);rcr=GetCritChance(p);
rhi=GetCombatRating(7);SendChatMessage(\"本人DD数值:近战AP\"..bap+map..\"---暴
击\"..rcr..\"---命
中\"..rhi,\"whisper\",GetDefaultLanguage(\"target\"),UnitName(\"target\"))
这个是远程暴击,AP和命中的宏。。
/run
p=\"player\";bap,map=UnitRangedAttackPower(p);rcr=GetRangedCritChance(p);
rhi=GetCombatRating(7);SendChatMessage(\"AP\"..bap+map..\"暴击\"..rcr..\"命
中\"..rhi,\"whisper\",GetDefaultLanguage(\"target\"),UnitName(\"target\"))
这个是坦克的~~
/run
p=\"player\";dod=GetDodgeChance(p);pa=GetParryChance(p);
bl=GetBlockChance(p);ba,ar=UnitArmor(\"player\");hm=UnitHealthMax(p);
SendChatMessage(\"闪避\"..dod..\"招架\"..pa..\"格挡\"..bl..\"护
甲\"..ar..\"HP\"..hm,\"whisper\",GetDefaultLanguage(\"target\"),UnitName(\"target\"))
法系
/run
p=\"player\";fd=GetSpellBonusDamage(3);fcr=GetSpellCritChance(3);
shi=GetCombatRating(8);SendChatMessage(\"火伤\"..fd..\"法爆\"..fcr..\"命
中\"..shi,\"whisper\",GetDefaultLanguage(\"target\"),UnitName(\"target\"))
注意,法伤GetSpellBonusDamage() 法爆GetSpellCritChance()
就是fd fcr那两行 ()里面的数字
这是有分系的 ,不懂的百度翻译
1 for Physical
2 for Holy
3 for Fire
4 for Nature
5 for Frost
6 for Shadow
7 for Arcane |
|