home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
norge.freeshell.org (192.94.73.8)
/
192.94.73.8.tar
/
192.94.73.8
/
pub
/
computers
/
pcjr
/
comm
/
FIDOTERM.LZH
/
F3.SCR
< prev
next >
Wrap
Text File
|
1988-01-29
|
531b
|
31 lines
message "Disconnecting ..."
;
;Disconnect a Hayes type modem; the first one
;uses DTR, which my modem is set up to use. If
;yours is not, delete the next 2 lines.
;
dtr
jmp done
;
;If you delete the two lines above, the following
;routine uses +++ and ATH0 to disconnect.
;
delay 1000
copy "+++"
trap timeout
&t= 5
:discon
sample
if "NO" done
if "OK" ath
jmp discon
:timeout
message "Modem is asleep!"
return 0
:ath
output "ATH0\r"
match "OK\r"
:done
message "Disconnected"
return 1