function VoteRegister takes trigger T, string V returns nothing
    local integer L = 11
    loop
        if L!= 3 or L!=6 then
            call TriggerRegisterPlayerChatEvent(T,Player(L),V,false)
        endif
        set L = L-1
        exitwhen L <0
    endloop
endfunction
В аргументы включена строка и триггер который будет хостом всех событий
как пример включено лишение голоса игроков 4 и 7, вы можете изменить или убрать это.

Как пример
    call VoteRegister(gg_trg_Players_Kick,"-VoteKick")

function Trig_Kick_Player_Actions takes nothing returns nothing
    local integer I = StringLength(GetEventPlayerChatStringMatched())+1
    local integer T = StringLength(GetEventPlayerChatString())
    local string  S = SubString(GetEventPlayerChatString(),I,T)
    local player  P = IsPlayerNumber(S)
    if P != null then
        call Echo(I2S(GetPlayerId(P) + 1))
    endif
endfunction
Крайне тупая конструкция, в основном из за того что она универсальна
I = Возращает строку, накоторую реагировал триггер
T = Возращает общую длину введённой строки
S = Возращает то, что мы непосредственно ввели по мимо ключевого слова
Далее идут основные функции...

function Echo takes string S returns nothing
    call DisplayTextToPlayer(GetLocalPlayer(),0.1,0.1,S)
endfunction
Вывод текста, так как кикать нам некого, а тестирование необходимо

function IsPlayerNumber takes string S returns player
    local integer I = S2I(S)
    local integer L = StringLength(S)
    if L > 2 then
        call Echo("Invalid type")
        return null
    endif
    if not IsNumber(S) then
        call Echo("Invalid type")
        return null
    endif
    if I <1 or I >12 then
        call Echo("Invalid type")
        return null
    endif
    return Player(I-1)
endfunction
Ядро проверки на введение номера игрока
-Длина не больше 2х символов
-Оба символа цифры
-Цифры могут быть игроками

function IsNumber takes string S returns boolean
    return S == I2S(S2I(S))
endfunction
Определяет, является ли строка цифрой

function ColorTable takes string S returns player
    if S == "red" then
        return Player(0)
    elseif S == "blue" then
        return Player(1)
    elseif S == "teal" then
        return Player(2)
    elseif S == "purple" then
        return Player(3)
    elseif S == "yellow" then
        return Player(4)
    elseif S == "orange" then
        return Player(5)
    elseif S == "green" then
        return Player(6)
    elseif S == "pink" then
        return Player(7)
    elseif S == "grey" then
        return Player(8)
    elseif S == "cyan" then
        return Player(9)
    elseif S == "aqua" then
        return Player(10)
    elseif S == "brown" then
        return Player(11)
    endif
    return null
endfunction

function IsPlayerNumber takes string S returns player
    local integer I = S2I(S)
    local integer L = StringLength(S)
    local player P = ColorTable(StringCase(S,false))
    if P != null then
        return P
    endif
    if L > 2 then
        call Echo("Invalid type")
        return null
    endif
    if not IsNumber(S) then
        call Echo("Invalid type")
        return null
    endif
    if I <1 or I >12 then
        call Echo("Invalid type")
        return null
    endif
    return Player(I-1)
endfunction

function PlayerNameColored takes player PL returns string
    local string array colors
    set colors[0] = "|cffff0000"
    set colors[1] = "|cff0000ff"
    set colors[2] = "|cff40e0D0"
    set colors[3] = "|cff800080"
    set colors[4] = "|cffffff00"
    set colors[5] = "|cffffa500"
    set colors[6] = "|cff00ff00"
    set colors[7] = "|cffffc0cb"
    set colors[8] = "|cff808080"
    set colors[9] = "|cff87cefa"
    set colors[10] = "|cff006400"
    set colors[11] = "|cff8b4513"

    return colors[GetPlayerId(PL)] + GetPlayerName(PL) + "|r"
endfunction

function ColorOfPlayer takes player PL returns string
    local string array colors
    set colors[0] = "|cffff0000"
    set colors[1] = "|cff0000ff"
    set colors[2] = "|cff40e0D0"
    set colors[3] = "|cff800080"
    set colors[4] = "|cffffff00"
    set colors[5] = "|cffffa500"
    set colors[6] = "|cff00ff00"
    set colors[7] = "|cffffc0cb"
    set colors[8] = "|cff808080"
    set colors[9] = "|cff87cefa"
    set colors[10] = "|cff006400"
    set colors[11] = "|cff8b4513"

    return colors[GetPlayerId(PL)]
endfunction

//------------------------------------------------------------------

constant function KickVotes_AlliesOnly takes nothing returns boolean
    return true
endfunction

constant function KickVotes_Timeout takes nothing returns real
    return 10.
endfunction

function Trig_KickVotes_WaitForClick_Actions takes nothing returns nothing
    set bj_lastCreatedButton = GetClickedButton()
endfunction

function Trig_KickVotes_Actions takes nothing returns nothing
    local integer KickingPlayer = GetPlayerId(GetTriggerPlayer())
    local trigger VoteTrigger
    local dialog VoteDialog = null
    local button array Buttons
    local integer KickIndex
    local integer i
    local timer TimeoutTimer
    local timerdialog TimeoutTimerDialog
    local trigger VoteYesTrig
    local trigger VoteNoTrig
    local integer TotalVotes

    // creating dialog to choose player to kick
    set i = 0
    loop
        if Player(i) != Player(KickingPlayer) then
            if (GetPlayerController(Player(i)) == MAP_CONTROL_USER)and(GetPlayerSlotState(Player(i)) == PLAYER_SLOT_STATE_PLAYING) then
                if (KickVotes_AlliesOnly() and IsPlayerAlly(Player(i), Player(KickingPlayer))) or (not KickVotes_AlliesOnly()) then
                    if VoteDialog == null then
                        set VoteDialog = DialogCreate()
                        call DialogClear(VoteDialog)
                    endif
                    // PlayerNameColored needed!
                    set Buttons[i] = DialogAddButton(VoteDialog, PlayerNameColored(Player(i)), 0)
                endif
            endif
        endif
        set i = i + 1
        exitwhen i > 12
    endloop

    // if there is no one player to kick then return
    if VoteDialog == null then
        call DisplayTextToPlayer(GetTriggerPlayer(), 0.0, 0.0, "|cffffaa00There must be at least 3 players in your team to kick!|r")
        return
    endif

    // adding Cancel button and showing dialog
    call DialogSetMessage(VoteDialog, "Choose player to kick")
    set Buttons[12] = DialogAddButton(VoteDialog, "|cffffffffC|r|cffffaa00ancel|r", 67)
    call DialogDisplay(Player(KickingPlayer), VoteDialog, true)
    
    // waiting for some button pressed
    set VoteTrigger = CreateTrigger()
    call TriggerRegisterDialogEvent(VoteTrigger, VoteDialog)
    set Buttons[13] = bj_lastCreatedButton
    set bj_lastCreatedButton = null
    call TriggerAddAction(VoteTrigger, function Trig_KickVotes_WaitForClick_Actions)
    loop
        if GetTriggerExecCount(VoteTrigger) > 0 then
            exitwhen true
        endif
        call TriggerSleepAction(1)
    endloop

    // get what button was pressed and destroying dialog
    set KickIndex = 0
    loop
        if bj_lastCreatedButton == null then
            set KickIndex = 12
        endif
        if bj_lastCreatedButton == Buttons[KickIndex] then
            exitwhen true
        endif
        set KickIndex = KickIndex + 1
        exitwhen KickIndex > 11
    endloop
    
    // clearning up...
    call DestroyTrigger(VoteTrigger)
    set VoteTrigger = null
    call DialogDisplay(Player(KickingPlayer), VoteDialog, false)
    call DialogClear(VoteDialog)
    call DialogDestroy(VoteDialog)
    set VoteDialog = null
    set bj_lastCreatedButton = Buttons[13]
    set i = 0
    loop
        set Buttons[i] = null
        set i = i + 1
        exitwhen i > 13
    endloop

    // if Cancel was pressed then return
    if KickIndex > 11 then
        return
    endif

    call DisplayTextToForce(GetPlayersAll(), "Starting voting to kick " + PlayerNameColored(Player(KickIndex)) + "...")
    
    // setting timeout timer
    set TimeoutTimer = CreateTimer()
    call TimerStart(TimeoutTimer, KickVotes_Timeout(), false, null)
    call ResumeTimer(TimeoutTimer)
    set TimeoutTimerDialog = CreateTimerDialog(TimeoutTimer)
        // ColorOfPlayer needed!
    call TimerDialogSetTitle(TimeoutTimerDialog, ColorOfPlayer(Player(KickIndex))+"Kick|r Y:0 N:0")

    // creating vote dialog
    set VoteDialog = DialogCreate()
    call DialogClear(VoteDialog)
    call DialogSetMessage(VoteDialog, "Kick " + PlayerNameColored(Player(KickIndex)) + "?")
    
    // registering needed triggers
    set VoteYesTrig = CreateTrigger()
    set VoteNoTrig = CreateTrigger()
    call TriggerRegisterDialogButtonEvent(VoteYesTrig, DialogAddButton(VoteDialog, "|cffffffffY|r|cffffaa00es|r", 89))
    call TriggerRegisterDialogButtonEvent(VoteNoTrig, DialogAddButton(VoteDialog, "|cffffffffN|r|cffffaa00o|r", 78))

    // showing vote dialog
    set i = 0
    set TotalVotes = 0
    loop
        if i != KickIndex then
            if (GetPlayerController(Player(i)) == MAP_CONTROL_USER)and(GetPlayerSlotState(Player(i)) == PLAYER_SLOT_STATE_PLAYING) then
                if (KickVotes_AlliesOnly() and IsPlayerAlly(Player(i), Player(KickingPlayer))) or (not KickVotes_AlliesOnly()) then
                    set TotalVotes = TotalVotes + 1
                    call DialogDisplay(Player(i), VoteDialog, true)
                    if Player(i) == GetLocalPlayer() then
                        call TimerDialogDisplay(TimeoutTimerDialog, true)
                    endif
                endif
            endif
        endif
        set i = i + 1
        exitwhen i > 12
    endloop

    // voting...
    loop
        call TriggerSleepAction(1)
        call TimerDialogSetTitle(TimeoutTimerDialog, ColorOfPlayer(Player(KickIndex))+"Kick|r Y:"+I2S(GetTriggerExecCount(VoteYesTrig))+" N:"+I2S(GetTriggerExecCount(VoteNoTrig)))
        exitwhen GetTriggerExecCount(VoteYesTrig) + GetTriggerExecCount(VoteNoTrig) >= TotalVotes
        exitwhen GetTriggerExecCount(VoteYesTrig) >= R2I((TotalVotes+1.0) / 2.0 + 0.5)
        exitwhen TimerGetRemaining(TimeoutTimer) <= 0
    endloop

    // kicking
    if GetTriggerExecCount(VoteYesTrig) > GetTriggerExecCount(VoteNoTrig) + 1 then
        call DisplayTextToForce(GetPlayersAll(), PlayerNameColored(Player(KickIndex)) + " was kicked!")

        // ###################################################################
        // # here must be a code to be executed before player will be kicked #
        // ###################################################################
        
        call CustomDefeatBJ(Player(KickIndex), "Kicked!")
    else
        call DisplayTextToForce(GetPlayersAll(), PlayerNameColored(Player(KickIndex)) + " was NOT kicked!")
    endif
    
    // clearning up...
        // timer window
    call TimerDialogDisplay(TimeoutTimerDialog, false)
    call DestroyTimerDialog(TimeoutTimerDialog)
    set TimeoutTimerDialog = null
        // timer
    call DestroyTimer(TimeoutTimer)
    set TimeoutTimer = null
        // voting dialog
    set i = 0
    loop
        call DialogDisplay(Player(i), VoteDialog, false)
        set Buttons[i] = null
        set i = i + 1
        exitwhen i > 11
    endloop
    call DialogClear(VoteDialog)
    call DialogDestroy(VoteDialog)
    set VoteDialog = null
        // voting triggers
    call DestroyTrigger(VoteYesTrig)
    set VoteYesTrig = null
    call DestroyTrigger(VoteNoTrig)
    set VoteNoTrig = null
endfunction

// this function initialize kick system. call it at map initialization or when you need it:)
function InitKickVotes takes nothing returns nothing
    local trigger KickTrigger = CreateTrigger()
    local integer i = 0
    loop
        call TriggerRegisterPlayerChatEvent(KickTrigger, Player(i), "-kick", true)
        set i = i + 1
        exitwhen i > 11
    endloop
    call TriggerAddAction(KickTrigger, function Trig_KickVotes_Actions)
endfunction