Advertisement
SmooKy

Untitled

Apr 11th, 2020
37
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.16 KB | None | 0 0
  1. local function MassMail()
  2. if not mailFrame then
  3. mailFrame = AceGUI:Create("Window");
  4. mailFrame:SetTitle("Ravencrest Union Mailing");
  5. mailFrame:SetStatusText("")
  6. mailFrame:SetWidth(600);
  7. mailFrame:SetLayout("Flow")
  8. core:setEscapeHandler(mailFrame,function()
  9. mailFrame:Hide();
  10. mailFrame = false
  11.  
  12. end)
  13. mailEditBox = AceGUI:Create("MultiLineEditBox");
  14. mailEditBox:SetFullWidth(true)
  15. mailEditBox:SetNumLines(28);
  16. mailEditBox:SetLabel("Syntax: Name:Amount | Each line represents a mail!")
  17. mailEditBox:DisableButton(true)
  18.  
  19. local send_mail_button = CreateFrame('Button', 'PostmasterGeneralButton', mailEditBox, 'UIPanelButtonTemplate')
  20. send_mail_button:SetPoint('BOTTOMRIGHT', -46, 70)
  21. send_mail_button:SetText("Send Mails")
  22. send_mail_button:SetWidth(send_mail_button:GetFontString():GetWidth() + 20)
  23. send_mail_button:SetHeight(19)
  24.  
  25. send_mail_button:SetScript('OnClick', function(self) -- begin scanning
  26. print("Click")
  27. normalize_text(text)
  28. local tosend = {};
  29. for name, amount in text:gmatch("([^%s]+):%s*(%d+)[\r\n]?") do
  30. table.insert(mails,name..":"..amount)
  31. tosend.Subject = subject;
  32. tosend.Gold = amount;
  33. tosend.InOut = "Sent";
  34. tosend.Location = GetRealZoneText();
  35. tosend.From = GetUnitName ("player").."-"..GetRealmName();
  36. tosend.Recipient = name.."-"..GetRealmName();
  37. tosend.Timestamp = ActiveTrade.Timestamp;
  38. --table.insert(mails,tosend)
  39. print(dump(mails));
  40. end
  41. local test = tostring(mails[1])
  42. for name, amount in test:gmatch("([^%s]+):%s*(%d+)[\r\n]?") do
  43. core:send_mail(name,amount,"RCU Test");
  44. end
  45. table.remove(mails,1);
  46.  
  47. end)
  48. mailFrame:AddChild(mailEditBox);
  49. mailFrame:Show();
  50. else
  51. mailFrame:Hide();
  52. mailFrame = false
  53. end;
  54. end;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement