messenger(получение)

#NoTrayIcon
UDPStartup()
$socket = UDPBind("0.0.0.0", 54321)
While True
    $udprecv = UDPRecv($socket, 2048)
    If $udprecv <> "" Then
        $udprecv = BinaryToString($udprecv)
        MsgBox(0, "ПОЛУЧЕНО СООБЩЕНИЕ", $udprecv)
    EndIf
    Sleep(100)
WEnd