UDPStartup()

OnAutoItExitRegister("_END")

$socket = UDPBind("176.65.141.8", 27016)
If @error <> 0 Then
   MsgBox(32, "Error", @error)
   Exit
EndIf


UDPSend($socket, "M2MPi")

Local $data = UDPRecv($socket, 1024)
If $data <> "" Then
        MsgBox(0, "UDP DATA", $data, 1)
    EndIf

while 1
      sleep(100)
   WEnd
Func _END()
    UDPCloseSocket($socket)
    UDPShutdown()
EndFunc