#Include UDF.ahk

:?:/name::
    SendInput,/name{space}
    input, dwId, V, {enter}
    again:
    Name := getPlayerNameById(dwId)
    if (Name != getPlayerNameById(dwId))
    {
  goto again
    }
    else
   addChatMessage("Я ввел " dwID " ID игрока " Name)
return

; Работает нормально с руссификатором: http://galaxy-rpg.ru/files/190_sl-2-00-install.exe
; Перевода русских GameText, TextDraw символов в поддерживаемый GTA-русификаторами формат.
; Символы "ц", "ф" переводятся в верхний регистр, за неимением кодов в большинстве русификаторов.
; На основе https://autohotkey.com/board/topic/28714-transliteration-russian-to-english/
; Ключи символов взяты http://cheat-master.ru/forum/117-273903-1
RUStoGTA(string)
{
strTokenRU = а,А,б,Б,в,В,г,Г,д,Д,е,Е,ё,Ё,ж,Ж,з,З,и,И,й,Й,к,К,л,Л,м,М,н,Н,о,О,п,П,р,Р,с,С,т,Т,у,У,ф,Ф,х,Х,ц,Ц,ч,Ч,ш,Ш,щ,Щ,ь,Ь,ъ,Ъ,ы,Ы,э,Э,ю,Ю,я,Я
strTokenGT = a,A,—,Ђ,ў,‹,™,‚,љ,ѓ,e,E,e,E,›,„,џ,€,њ,…,ќ,…,k,K,ћ,‡,Ї,M,®,H,o,O,Ј,Њ,p,P,c,C,¦,Џ,y,Y,Ѓ,Ѓ,x,X,‰,‰,¤,Ќ,Ґ,Ћ,Ў,Љ,©,’,ђ,§,Ё,‘,Є,“,«,”,¬,•
StringSplit tokenRU, strTokenRU, `,
StringSplit tokenGT, strTokenGT, `,
Loop Parse, string
{
    token := A_LoopField
    isReplaced := false
    Loop %tokenRU0%
    {
        if ( token == tokenRU%A_Index% )
        {
            isReplaced := true
            tokenReplace := tokenGT%A_Index%
            break
        }
    }
    if ( isReplaced )
        strRes := strRes . tokenReplace
    else
        strRes := strRes . token
}
    return strRes
}

playAnimation(id){
    sendChat("/anim")
    Sleep, 500
    loop id{
  Send, {NumpadDown}
    }
Send, {Enter}
}

isTrailerAttached()
{
    return !checkHandles() ? "" : readMem(hGTA, getModuleBaseAddress("gta_sa.exe", hGTA) + 0x76FC70)
}

; addClientCommand("cmd") ; добавить пустую клиентскую команду /cmd, которая ничего не делает
; addClientCommand("cmd", 0x111111) ; добавить клиентскую команду и назначить на неё функцию
; renameClientCommand("q", "exit") ; переименовать клиентскую команду (на примере, /q в /exit)
; isClientCommand("fontsize") ; проверить клиентскую команду на существование
; setClientCommand("dl", 0x111111) ; назначить на клиентскую команду функцию (если команда существует)
; setClientCommand("fpslimit", dwClientQuit) ; заставить команду /fpslimit закрывать игру (как /q /quit)
; removeClientCommand("fpslimit") ; удалить клиентскую команду

addClientCommand(name, func := -1)
{
    if !checkHandles() or !strlen(name) or strlen(name) > 32
        return false
    if isClientCommand(name)
    {
        addChatMessageEx(0xdd0000, "the " name " command already exists")
        return false
    }
    if(func == -1)
        func := readDWORD(hGTA, dwSAMP + 0x65679)
    dwChatInfo := readDWORD(hGTA, dwSAMP + 0x21A0E8)
    dwNames := dwChatInfo + 0x24C
    dwPointers := dwChatInfo + 0xC
    dwCount := dwChatInfo + 0x14DC
    count := readMem(hGTA, dwCount, 1, "byte")
    loop 144
    {
        cmd := readString(hGTA, dwNames + (0x21 * (A_Index - 1)), 32)
        if strlen(cmd)
            continue
        count++
        writeString(hGTA, dwNames + (0x21 * (A_Index - 1)), name)
        writeMemory(hGTA, dwPointers + (4 * (A_Index - 1)), func, 4, "UInt")
        writeMemory(hGTA, dwCount, count, 1, "byte")
        return name
    }
    addChatMessageEx(0xdd0000, "CMDPROC is overloaded (too many commands)")
    return false
}

isClientCommand(name)
{
    if !checkHandles() or !strlen(name) or strlen(name) > 32
        return false
    dwAddress := readDWORD(hGTA, dwSAMP + 0x21A0E8) + 0x24C
    loop 144
    {
        cmd := readString(hGTA, dwAddress + (0x21 * (A_Index - 1)), 0x21)
        if format("{:L}", name) == format("{:L}", cmd)
            return true
    }
    return false
}

renameClientCommand(name, set)
{
    if !checkHandles() or !strlen(name) or strlen(name) > 32 or !strlen(set) or strlen(set) > 32
        return false
    dwAddress := readDWORD(hGTA, dwSAMP + 0x21A0E8) + 0x24C
    loop 144
    {
        dwAddr := dwAddress + (0x21 * (A_Index - 1))
        cmd := readString(hGTA, dwAddr, 0x21)
        if format("{:L}", name) == format("{:L}", cmd)
        {
            writeString(hGTA, dwAddr, set)
            state := true
        }
    }
    return state
}

setClientCommand(name, func := -1)
{
    if !checkHandles() or !strlen(name) or strlen(name) > 32
        return false
    dwChatInfo := readDWORD(hGTA, dwSAMP + 0x21A0E8)
    dwNames := dwChatInfo + 0x24C
    dwPointers := dwChatInfo + 0xC
    count := readMem(hGTA, dwCount, 1, "byte")
    loop 144
    {
        cmd := readString(hGTA, dwNames + (0x21 * (A_Index - 1)), 0x21)
        if format("{:L}", name) == format("{:L}", cmd)
        {
            writeMemory(hGTA, dwPointers + (4 * (A_Index - 1)), 0, 4, "UInt")
            state := true
        }
    }
    return state
}

removeClientCommand(name)
{
    if !checkHandles() or !strlen(name) or strlen(name) > 32
        return false
    dwChatInfo := readDWORD(hGTA, dwSAMP + 0x21A0E8)
    dwNames := dwChatInfo + 0x24C
    dwPointers := dwChatInfo + 0xC
    dwCount := dwChatInfo + 0x14DC
    count := readMem(hGTA, dwCount, 1, "byte")
    struct := {"names": [], "pointers": []}
    loop 144
    {
        struct["names"].insert( readString(hGTA, dwNames + (0x21 * (A_Index - 1)), 0x21) )
        struct["pointers"].insert( readDWORD(hGTA, dwPointers + (4 * (A_Index - 1))) )
    }
    for k, v in struct["names"]
    {
        if format("{:L}", name) == format("{:L}", v)
        {
            count--
            struct["names"].remove(k)
            struct["pointers"].remove(k)
            writeMemory(hGTA, dwCount, count, 1, "byte") ; пробовал --count, но ахк говно
            state := true
        }
    }
    for k, v in struct["names"]
    {
        if strlen(v)
        {
            writeString(hGTA, dwNames + (0x21 * (k - 1)), struct["names"][k])
            writeMemory(hGTA, dwPointers + (4 * (k - 1)), struct["pointers"][k], 4, "UInt")
        } else
        {
            writeMemory(hGTA, dwNames + (0x21 * (k - 1)), 0, 0x21, "byte")
            writeMemory(hGTA, dwPointers + (4 * (k - 1)), 0, 4, "byte")
        }
    }
    return state
}