求助

82809085

#include <CoProc.au3>
UDPStartup();开启UDP
Local $id = 0
$client = UDPBind(@IPAddress1, 65532)
While 1
        $data = UDPRecv($client, 50)
        If $data <> "" Then
                MsgBox(64, '', $data, 1)
        EndIf
       
        If $data = '' Then
                If $id = 0 Then _CoProc("Timer1")
                $id = 1
        EndIf
WEnd

Func Timer1()
        While 1
                UDPStartup();服务端
                $server = UDPOpen("192.168.1.255", 65532)
                UDPSend($server, @IPAddress1)
                Sleep(100)
        WEnd
EndFunc   ;==>Timer1


Func OnAutoItExit()
        UDPCloseSocket($client)
        UDPShutdown()
EndFunc   ;==>OnAutoItExit

谁能修改下UDP服务不存在的情况下 启用UDP服务
存在的情况下 则提示        MsgBox(0, "UDP DATA", $data, 1)这段内容

现在情况是这样的 当其中一台程序退出了 但本机还会获取那台机器的信息
能帮我修改成 当其中一台UDP服务器不存在的时候 则立刻架设本机的UDP服务