.KEY FLUSH/S
.BRA {
.KET }

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

offline ppp.device 0

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