Помощь со скриптом для SAMP

[Overseas]

Кое-где на форуме (Здесь), подсмотрел скрипт который проверяет цвет ника у игрока сидящего со мной в машине, и если он подходит под условие то выдает сообщение в чат с ником этого игрока. Я немного подправил условие, дабы подходящими были сразу несколько цветов. Вот только мне нужно что бы скрипт сокращал ники, например что бы по итогу в чат писалось не "Kir Goryachev" а "Kir G."... Сможет кто помочь?

F4::
SendMessage, 0x50,, 0x4190419,, A
SendChat("Докладываю: Патруль Los Santos. | Напарник(и): "NearCopPlayers()" | Состояние: Стабильно.")
NearCopPlayers()
{
    p := getStreamedInPlayersInfo()
    If (!p)
        return
    lpos := getCoordinates()
    If (!lpos)
        return
    For i, o in p
    {
        t := getDist(lpos,o.POS)
        If (t <= 5)
        {
            Colorpl := getplayercolor(i)
            If ((colorpl = 274771114) || (colorpl = 851712) || (colorpl = 2054579968))
            {
                incar := isTargetInAnyVehicleById(i)
                If incar = 1
                {
                    NameCop := RegExReplace(o.NAME, "_", " ")
                    If NearCops
                        NearCops := % NearCops ", " NameCop
                    else
                        NearCops := NameCop
                }
            }
           
        }
    }
    If not NearCops
        NearCops := "Нету"
    return NearCops
}
Return