home *** CD-ROM | disk | FTP | other *** search
- WHEN "roll" "^M"
- WAITFOR "U#=" 90
- PAUSE 1
- TRANSMIT "userid,password^M"
- WAITFOR "tinue?" 90
- PAUSE 1
- LOG OPEN
- TRANSMIT "*stock^M"
- WAITFOR "<H>elp?" 90
- PAUSE 1
- TRANSMIT "1^M"
- WAITFOR "vious?" 90
- PAUSE 1
- TRANSMIT "3^M"
- WAITFOR "end?" 90
- TRANSMIT "CS,EAT,CNK,LTD,OS^M"
- WAITFOR "end?" 90
- TRANSMIT "RBK,FRX,ACAD,BMCS,BMED^M"
- WAITFOR "end?" 90
- TRANSMIT "BMET,BORL,CNTX,CSCO,CGNX^M"
- WAITFOR "end?" 90
- TRANSMIT "DGII,ECILF,BLUD,INTC,JMED^M"
- WAITFOR "end?" 90
- TRANSMIT "LIFE,MXIM,MCHS,NVCR,PHPH^M"
- WAITFOR "end?" 90
- TRANSMIT "PMTC,STJM,SCIXF,STRY,SCAF^M"
- WAITFOR "end?" 90
- TRANSMIT "SCOR,USHC,UTMD^M"
- WAITFOR "end?" 90
- PAUSE 1
- LOG CLOSE
- TRANSMIT "^M"
- WAITFOR "vious?" 90
- PAUSE 1
- TRANSMIT "bye^M"
- PAUSE 5
- HANGUP
- QUIT