showDialog(style, caption, text, button1, button2 = "", id = 1) {
    style += 0
    style := Floor(style)
    id += 0
    id := Floor(id)
    caption := "" caption
    text := "" text
    button1 := "" button1
    button2 := "" button2

    if (id < 0 || id > 32767 || style < 0 || style > 5 || StrLen(caption) > 64 || StrLen(text) > 4096 || StrLen(button1) > 10 || StrLen(button2) > 10)
  return false

    if (!checkHandles())
  return false

    dwFunc := dwSAMP + FUNC_SAMP_SHOWDIALOG

    dwAddress := readDWORD(hGTA, dwSAMP + SAMP_DIALOG_STRUCT_PTR)
    if (ErrorLevel || !dwAddress) {
  ErrorLevel := ERROR_READ_MEMORY
  return false
    }

    writeString(hGTA, pParam5, caption)
    if (ErrorLevel)
  return false
    writeString(hGTA, pParam1, text)
    if (ErrorLevel)
  return false
    writeString(hGTA, pParam5 + 512, button1)
    if (ErrorLevel)
  return false
    writeString(hGTA, pParam5+StrLen(caption)+1, button2)
    if (ErrorLevel)
  return false

    ;mov + 7 * push + call + retn
    dwLen := 5 + 7 * 5 + 5 + 1
    VarSetCapacity(injectData, dwLen, 0)

    NumPut(0xB9, injectData, 0, "UChar")       ;0 + 1    ;mov ecx
    NumPut(dwAddress, injectData, 1, "UInt")      ;1 + 4
    NumPut(0x68, injectData, 5, "UChar")       ;5 + 1    ;push send
    NumPut(0, injectData, 6, "UInt")        ;6 + 4
    NumPut(0x68, injectData, 10, "UChar")       ;10 + 1    ;push button2
    NumPut(pParam5+StrLen(caption)+1, injectData, 11, "UInt")    ;11 + 4
    NumPut(0x68, injectData, 15, "UChar")       ;15 + 1    ;push button1
    NumPut(pParam5 + 512, injectData, 16, "UInt")     ;16 + 4
    NumPut(0x68, injectData, 20, "UChar")       ;20 + 1    ;push text
    NumPut(pParam1, injectData, 21, "UInt")       ;21 + 4
    NumPut(0x68, injectData, 25, "UChar")       ;25 + 1    ;push caption
    NumPut(pParam5, injectData, 26, "UInt")       ;26 + 4
    NumPut(0x68, injectData, 30, "UChar")       ;30 + 1    ;push style
    NumPut(style, injectData, 31, "UInt")       ;31 + 4
    NumPut(0x68, injectData, 35, "UChar")       ;35 + 1    ;push id
    NumPut(id, injectData, 36, "UInt")        ;36 + 4

    NumPut(0xE8, injectData, 40, "UChar")       ;40 + 1 ;call
    offset := dwFunc - (pInjectFunc + 45)
    NumPut(offset, injectData, 41, "Int")       ;41 + 4
    NumPut(0xC3, injectData, 45, "UChar")       ;45 + 1    ;retn

    writeRaw(hGTA, pInjectFunc, &injectData, dwLen)
    if (ErrorLevel)
  return false

    hThread := createRemoteThread(hGTA, 0, 0, pInjectFunc, 0, 0, 0)
    if (ErrorLevel)
  return false
    waitForSingleObject(hThread, 0xFFFFFFFF)
    closeProcess(hThread)
    

    return true
}