Advertisement
Guest User

Untitled

a guest
Jul 26th, 2018
149
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.43 KB | None | 0 0
  1. ChokoTools = {}
  2.  
  3. --Standard Basic Button
  4. ChokoTools.RandHop = CreateFrame("Button",nil,UIParent,"UIGoldBorderButtonTemplate")
  5. ChokoTools.RandHop:SetSize(50,24)
  6. ChokoTools.RandHop:SetPoint("BOTTOMLEFT",0,0)
  7. ChokoTools.RandHop:SetText("HOP")
  8. ChokoTools.RandHop:SetScript("OnClick", function(self, event, ...)
  9.     ChokoTools:JoinRandomGroup()
  10. end)
  11.  
  12.  
  13. --Function: Search for groups with Auto Accept on. Join if we have data.
  14. function ChokoTools:JoinRandomGroup()
  15.     --Search already completed. (2nd Click)
  16.     if (ChokoTools.FilteredIDs) and (#ChokoTools.FilteredIDs >= 1) then
  17.         print("Joining...")
  18.         C_LFGList.ApplyToGroup(ChokoTools.FilteredIDs[1], "", false, false, true)
  19.         ChokoTools.FilteredIDs = {} --Reset table to empty
  20.     end
  21.    
  22.     print("Searching...")
  23.     ChokoTools.SearchResults = {}
  24.     ChokoTools.FilteredIDs = {}
  25.  
  26.     --Search Groups (Taken and modified from "ServerHop" Addon)
  27.     local lang = {}
  28.     for k,v in pairs(C_LFGList.GetAvailableLanguageSearchFilter()) do lang[v]=true end
  29.     C_LFGList.Search(6,LFGListSearchPanel_ParseSearchTerms(""),0,0,lang) --Search "Custom" groups
  30.    
  31.     --Get Search Results
  32.     c, ChokoTools.SearchResults = C_LFGList.GetSearchResults()
  33.    
  34.     --Iterate through search results
  35.     for i=1,#ChokoTools.SearchResults do
  36.         local id, _, _, _, _, _, _, _, _, _, _, _, _, _, autoinv = C_LFGList.GetSearchResultInfo(ChokoTools.SearchResults[i])
  37.         if autoinv == true then
  38.             table.insert(ChokoTools.FilteredIDs,id)
  39.         end
  40.     end
  41. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement