home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Current Shareware 1994 January
/
SHAR194.ISO
/
modem
/
dailyrun.zip
/
BILLING.SCR
< prev
next >
Wrap
Text File
|
1993-07-31
|
952b
|
79 lines
ONERROR ErrorDrop
Timeout 90
Delay 54
SendLn %SLASH "GO CIS:BILL"
; Clear screen and begin processing
CLS
LWrite " "
LWrite "********************************************************"
LWrite " CompuServe Billing Information "
LWrite "********************************************************"
LWrite " "
Wait "!"
; select "current info"
SendLn "2"
Wait "!"
; select "current charges"
SendLn "2"
Capture ON CISMAIL.MSG
WMH
Wait "!"
Capture OFF
Send %CR
; select billing history
Wait "Choice !"
SendLn "3"
Capture ON CISMAIL.MSG
Wait "!"
Capture OFF
Send %CR
; select Activity
Wait "Choice !"
SendLn "4"
Capture ON CISMAIL.MSG
Wait "!"
Capture OFF
Send %CR
Wait "!"
Finish:
End
ErrorDrop:
Fail