Автоинвайт

[Tom1k]

Скиньте пожалуйста аи рабочий:)

[Foximys]

local autoinv_enable = "Автоприглашение ВКЛ: invite"
local autoinv_enable_c = "Автоприглашение ВКЛ: "
local autoinv_disable = "Автоприглашение ВЫКЛ"
local ainvenabled = false
local ainvkeyword = "invite"

local autoinvite = CreateFrame("frame")
autoinvite:RegisterEvent("CHAT_MSG_WHISPER")
autoinvite:SetScript("OnEvent", function(self,event,arg1,arg2)
    if ((not UnitExists("party1") or IsPartyLeader("player")) and arg1:lower():match(ainvkeyword)) and ainvenabled == true then
        InviteUnit(arg2)
    end
end)

function SlashCmdList.AUTOINVITE(msg, editbox)
    if (msg == 'off') then
        ainvenabled = false
        print(autoinv_disable)
    elseif (msg == '') then
        ainvenabled = true
        print(autoinv_enable)
        ainvkeyword = "invite"
    else
        ainvenabled = true
        print(autoinv_enable_c .. msg)
        ainvkeyword = msg
    end
end
SLASH_AUTOINVITE1 = '/ainv' 

ЧЯВО
Из тука, сохранять в UTF-8.
У нас он не очень актуален, из за кд приема в группу ;0