Receiving data from server via TCP

[NMS]

Hello,

I've been trying to use this API https://vndb.org/d11 however due it using the TCP connection I'm having issues getting any response back as I've never dealt with TCP.

#include <MsgBoxConstants.au3>

Local $Port = 19534
Local $Server = '51.15.19.21'

TCPStartup()
OnAutoItExitRegister("OnAutoItExit")
Global $Socket = TCPConnect($Server, $Port)
If $Socket = -1 Then Exit MsgBox(16, 'Error', 'Connection error.')
TCPSend($Socket, 'login {"protocol":1,"client":"test","clientver":"0.1"}0x04')
;TCPSend($Socket, 'dbstats0x04')

While 1
    $Data = TCPRecv($Socket, 512)
    If $Data <> '' Then
        MsgBox(0, 'Received:', $Data)
        TCPCloseSocket($Socket)
    EndIf
Sleep(50)
WEnd

Func OnAutoItExit()
    TCPShutdown()
EndFunc

I'm fairly certain there's nothing wrong with the code, I've looked up multiple examples on the forums from other users and no matter how I try and send the data I simply am not getting any response.

Perhaps I'm missing something from the documentation of the API itself but I can't quite figure out what.

[Nine]

Made it worked with this line :

Local $iRet = TCPSend($Socket, 'login {"protocol":1,"client":"test","clientver":"0.1"}' & chr(4))

[NMS]

Now I feel dumb for not trying the EOT character...

Thank you!