Guest User

Untitled

a guest
Dec 12th, 2018
87
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.19 KB | None | 0 0
  1. local msg = "Loot and pillage, bwahahaha!"
  2. local autoinvite = CreateFrame("frame")
  3. autoinvite:RegisterEvent("CHAT_MSG_MONSTER_YELL")
  4. autoinvite:SetScript("OnEvent", function(self,event,arg1,arg2)
  5. if arg1:match(msg) then
  6. SendChatMessage("GALLEON SPAWNED!!!!!!!!!! RED ALERT MOTHERFUCKERS", "GUILD", nil, nil)
  7. SendChatMessage("WHISPER ME -> inv <- PULLING IN 60 SEC", "GUILD", nil, nil)
  8. SendChatMessage("GALLEON SPAWNED! accept invite (or keyword >inv<)", "WHISPER", nil, "Sakurako")
  9. SendChatMessage("GALLEON SPAWNED! accept invite (or keyword >inv<)", "WHISPER", nil, "Ravengaar")
  10. InviteUnit("Ravengaar")
  11. InviteUnit("Sakurako")
  12. end
  13. end)
  14.  
  15. local f = CreateFrame("frame")
  16. f:RegisterEvent("CHAT_MSG_WHISPER")
  17. f:SetScript("OnEvent", function(self,event,arg1,arg2)
  18. if arg1:lower():match("inv") then
  19. InviteUnit(arg2)
  20. end
  21. end)
  22.  
  23. local q = CreateFrame("frame")
  24. q:RegisterEvent('GROUP_ROSTER_UPDATE')
  25. q:SetScript('OnEvent', function(self,event,arg1,arg2)
  26. for i = 1, GetNumGroupMembers() do
  27. rUnit = "raid"..i
  28. if UnitExists(rUnit) then
  29. name,rank,_,_,_,_,_,_,_,_,_ = GetRaidRosterInfo(i)
  30. if rank == 0 then
  31. PromoteToAssistant(name)
  32. end
  33. end
  34. end
  35. end)
Add Comment
Please, Sign In to add comment