.KEY FLUSH/S
.BRA {
.KET }

; $Id: stopnet,v 3.1 1994/05/27 07:08:39 jraja Exp $

rx "address AMITCP; KILL" ; Send "KILL" to AmiTCP

If {FLUSH}
	Wait 2 secs
	If `rx "Say Show(ports, AMITCP)"` EQ 0
		Avail >NIL: FLUSH
	EndIf
EndIf
