home *** CD-ROM | disk | FTP | other *** search
- START:
- CLEAR
- EMULATE ANSI
- SET ENQ OFF
- DIAL "xx" 'place your directory number for wbank here
- IF NOT CONNECTED
- CLEAR
- GOTO END
- ENDIF
- TRANSMIT "!"
- TRANSMIT "!"
- TRANSMIT "!"
- WAITFOR "please:"
- TRANSMIT "LOGON x,xxxxx,xxxxx" 'place your logon instructions here
- WAITFOR "READY:" 'OR whatever your prompt selection is.
- LOG OPEN "c:\wxrdr\RADAR.DAT"
- TRANSMIT "RADAR/L!"
- WAITFOR "READY:" 'OR whatever your prompt selection is.
- LOG CLOSE
- LOG OPEN "c:\wxrdr\WEATHER.DTA"
- TRANSMIT "NWS LEX,2,74,80!"
- WAITFOR "READY:" 'OR ...
- TRANSMIT "NWS SDF,6,7,80,110,113,119,122!"
- WAITFOR "READY:"
- TRANSMIT "HOURLY/Y- LEX!"
- WAITFOR "READY:"
- TRANSMIT "WBI CKY!"
- WAITFOR "READY:"
- TRANSMIT "WBI PPN!"
- WAITFOR "READY:"
- TRANSMIT "WBI 6EC!"
- WAITFOR "READY:"
- LOG CLOSE
- TRANSMIT "OFF!"
- END:
- QUIT