home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
8bitfiles.net/archives
/
archives.tar
/
archives
/
genie-commodore-file-library
/
TelcomTools
/
NT.SCR.NEW-FILES
< prev
next >
Wrap
Text File
|
2019-04-13
|
1KB
|
36 lines
.OPT ANSI ; CALLING WITH ┴╬╙╔ MODE ON
PARAM "7E1"
CHECK 1 "├╧╬╬┼├╘" ; WAIT FOR THE "CONNECT" MESSAGE
WAIT
OUTPUT "╚╚╚" ; SEND IN THE "╚╚╚"
CHECK 2 "╒" ; AND WAIT FOR THE "╒#=" PROMPT
WAIT
OUTPUT "ABC12345,PASSWORD" ; SEND IN YOUR PASSWORD INFO.
OUTPUT "^M"
UNCHECK 1
UNCHECK 2
PAUSE 3
CHECK 3 "┼NTER "
WAIT
UNCHECK 3
OUTPUT "M625;3" ; GOES TO ├OMMODORE ╥╘'S ╠IBRARY
OUTPUT "^M" ; MENU
CHECK 4 "─IRECTORY OF ╬EW ╞ILES"
WAIT
PARAM "7E1"
BUFFER OPEN "NEW FILES"
OUTPUT "11" ; CAPTURE NEW LIST OF FILES
OUTPUT "^M" ; BUFFER
CHECK 5 "┼ND OF ─IRECTORY"
WAIT
PAUSE 1
BUFFER CLOSE ; CLOSES BUFFER
PAUSE 1
OUTPUT "BYE" ; LOGS OF ╟┼NIE
OUTPUT "^M"
PAUSE 1
CHECK 6 "╬╧ ├┴╥╥╔┼╥"
WAIT
BUFFER SAVE "NEW FILES" ; SAVES BUFFER TO DISK WHEN GET
END ; "NO CARRIER" MESSAGE