Аддон Killshot

[Sproody]

Васю бесит килшот, принял. Вот килшот который отправляет в чат каждое убийство сразу 5 сообщений

do
    local tableremove = table.remove
    local bitband = bit.band
    local SendChatMessage = SendChatMessage

    local frame = CreateFrame("frame")
    frame:Hide()
    frame.queue = {}

    local messages = {
        "мазал губы мойнезом %s! Шолунишка #%d",
        "авладел жёпай %s! Жёпа #%d",
        "кончил на усы %s! Петрович #%d",
        "накормил ху_м %s! Наелись %d",
    }

    local function onShow(self)
        self.sleep = 0
    end

    local function onUpdate(self,elapsed)
        self.sleep = self.sleep - elapsed
        if self.sleep < 0 then
            self.sleep = 1

            local msg = tableremove(self.queue)
            SendChatMessage(msg,"EMOTE")
            if #self.queue == 0 then
                self:Hide()
            end
        end
    end

    local function onEvent(self,event,...)
        if event == "COMBAT_LOG_EVENT_UNFILTERED" then
            local _,subEvent,_,_,srcFlags,_,dstName,dstFlags = ...
            if subEvent == "PARTY_KILL" then
                if bitband(dstFlags,COMBATLOG_OBJECT_TYPE_PLAYER) == COMBATLOG_OBJECT_TYPE_PLAYER and bitband(dstFlags,COMBATLOG_OBJECT_REACTION_HOSTILE) == COMBATLOG_OBJECT_REACTION_HOSTILE then
                    if bitband(srcFlags,COMBATLOG_FILTER_MY_PET) == COMBATLOG_FILTER_MY_PET or bitband(srcFlags,COMBATLOG_FILTER_ME) == COMBATLOG_FILTER_ME then
                        self.killstreak = self.killstreak + 1
                        local queue = self.queue
                        for i = 1,#messages do
                            queue[#queue+1] = messages[i]:format((dstName or "$dstName"),self.killstreak)
                        end
                        frame:Show()
                    end
                end
            end
        elseif event == "UNIT_DIED" then
            if unit == "player" then
                self.killstreak = 0
            end
        elseif event == "PLAYER_ENTERING_WORLD" then
            self.killstreak = 0
        end
    end

    frame:SetScript("OnShow",onShow)
    frame:SetScript("OnUpdate",onUpdate)
    frame:SetScript("OnEvent",onEvent)
    frame:RegisterEvent("COMBAT_LOG_EVENT_UNFILTERED")
    frame:RegisterEvent("UNIT_DIED")
    frame:RegisterEvent("PLAYER_ENTERING_WORLD")
end