home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Pier Shareware 6
/
The_Pier_Shareware_Number_6_(The_Pier_Exchange)_(1995).iso
/
033
/
atcp40de.zip
/
STOPNET
< prev
next >
Wrap
AmigaDOS Script File
|
1994-05-27
|
230b
|
15 lines
.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