On 03-12-96 Chris Clark wrote to John McLachlan... 
 
 CC> I have used this method successfully to get into the BBS, but is it
 CC> possible to continue the script for when you have got into Blue Wave 
 CC> mail door? Several times you are asked to "press ENTER to continue..." 
 CC> How do you enter ENTER? And then you have to select D for down-load 
 CC> (and of course you may wish to select U for up-grade)? Any ideas? 
 
G'day Chris, 
  I have a script that logs on, uploads if I have any to go, downloads 
my selected packets and logs off, it runs every day at 6-25am. 
I am not logging on to a B'Wave but the theory is the same. 
 
Set AutoStop,On 
When "Press ENTER to continue","^M~~~~" ; if this string recd - always enter 
Set MultiLine,1 
#include "toolbox1.scr" 
True = 1                                ; set Boolean logic values 
False = 0 
EchoToLocal = true 
EchoToRemote = false 
Put "^[~",                              ; escape to quit alarm music (if on) 
Put "^[~",                              ; escape to enter BBS (& no CR) and 
half 
Waitfor "What is your name:",35         ; wait up to 35 seconds for string to 
be 
Put "John McLachlan~"                   ; and half sec pause 
Waitfor "John McLachlan [Y,n]?",5       ; wait up to 5 seconds for string to 
be 
Put "Y~~~"                              ; and 1 & half sec pause 
Waitfor "Password:",2                   ; wait up to 2 seconds for string to 
be 
Put "^&~~~"                             ; the password field in the phone 
direct 
; BBS greeting screen
Delay 25                                ; 2 & half second wait 
;auto ENTER                             ; See 2nd line at start 
; User statistics 
Delay 35                                ; wait 3 & half seconds 
;auto ENTER                             ; that 2nd line again 
; first bulletin screen 
Delay 25 
Waitfor "More [Y,n,=]?",10              ; wait up to 10 seconds for string to 
be 
  If found 
   Put "N~~~",                          ; No (to more bulletins) and 1 & half 
se 
  EndIf 
Waitfor "Scan for new files? [Y,n]",15  ; wait up to 15 seconds for string to 
be 
  If found 
   Put "N~~~",                          ; No (to new files) and 1&half sec 
pause 
  EndIf 
;scanning for personal mail 
;auto ENTER                             ; there's that 2nd line 
;personal message found 
Waitfor "More [Y,n,=]?",15              ; if message longer than one screen 
  If found 
   Put "N~~~", 
  EndIf 
EchoColor yellow 
EchoHilite 
Echo "  determining all options ...  please wait " 
Print 
EchoNormal 
Waitfor "Next Msg [Y)es, N)o, A)gain, R)eply, *)NextArea]:",10  ; wait up to 
10 
  If found 
   Delay 95                             ; 9 & half second wait to read screen 
   Put "N~~~~~",                        ; No and 2 & half sec pause & no CR 
  EndIf 
;no personal messages 
EchoColor green 
EchoBlink 
Echo "   still determining all options ... please wait" 
Print 
EchoNormal 
Delay 35                                ; wait for 3 & half seconds 
Put "O~~~",                             ; Offline mail reader selected and 1 
& 
 FileExist "c:\telemate\upload\madhouse.rep", Found 
  If Found = True                       ; if an upload file exists then 
upload i 
   Put "U~~~", 
   Send "z","c:\telemate\upload\madhouse.rep" 
    If Success = True                   ; if it transferred successfully then 
de 
     DOS "call madstore.bat"            ; batch file zips my uploads 
     Delete "c:\telemate\upload\madhouse.rep" ; delete the original upload 
    EndIf 
   Waitfor "Select:",300 
  EndIf 
 If Found = False 
  EchoColor cyan 
   EchoHilite 
    echo "  nothing to upload this time" 
   Print 
  EchoNormal 
 EndIf 
Delay 25                                ; wait for 2 & half seconds 
Put "D~~~",                             ; Download and 12 sec pause & no CR 
Waitfor "Download these in QWK format [Y,n]?",55   ; wait up to 55 seconds 
for s 
  If found 
   Put "Y~~~",                          ; Yes download and 1 & half sec pause 
& 
  EndIf 
Delay 25                                ; wait 2 & half seconds 
Waitfor "Select:",300                   ; wait up to 5 minutes for string to 
be 
Put "Q~~~",                             ; Quit and 1 & half sec pause & no CR 
Put "G~~~",                             ; Goodbye  and 1 & half  sec pause & 
no 
Waitfor "Disconnect [Y,n,?=help]?",5    ; wait 5 seconds for string to be 
receiv 
  If found 
   Put "Y~~",                           ; Yes  and 1 sec pause & no CR 
  EndIf 
Waitfor "Leave a message to SysOp [y,N,?=help]?",5     ; wait up to 5 seconds 
Put "N~",                               ; No  and half sec pause & no CR 
Delay 15                                ; wait 1 & half seconds 
ExitTelemate 
 
I have found that the responses and timings need to be adjusted for every 
different BBS. Apologies for the length of this post.  TTYL
 
          |\_/| 
          | c |  John McLachlan 
        +-+   +--    Brisbane, Qld, Australia 
 
___ 
 * OFFLINE 1.58 * ... I am meticulous about being exact and precise   (more 
or less) 
--- Maximus/2 3.01
---------------