home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PROGRAMS / UTILS / COMMUNIC / RBCOMM32.ZIP / QDECK.MAC < prev    next >
Encoding:
Text File  |  1990-07-29  |  1.0 KB  |  39 lines
  1. ; RBcomm macro file to log onto Quarterdeck BBS
  2. ;     by Ralf Brown
  3. ;
  4. Auto   MULTI
  5.        PAUSE 2
  6.        TEXT "\r"
  7.        WAITFOR 10 "(Enter)=no?"
  8.        TEXT "\r"
  9.        WAITFOR 30 "first name?"
  10.        TEXT "First\r"
  11.        WAITFOR 5 "last name?"
  12.        TEXT "Last\r"
  13.        WAITFOR 5 "echo)?"
  14.        PASSWORD
  15.        TEXT "\r"
  16.        WAITFOR 45 "Scan Message"
  17.        TEXT "n\r"
  18.        WHEN 2 "Press (Enter)"
  19.       TEXT "\r"
  20.        WAITFOR 20 "Command?"
  21.        IF FAILED
  22.       ABORT
  23.        TEXT "j 1\r"                        ; (J)oin the tech support conference
  24.        WAITFOR 30 "Conference Command?"
  25.        TEXT "r\r"
  26.        WAITFOR 10 "Read Command?"          ; start reading the tech support
  27.        TEXT "+\r"                          ; conference
  28.        WHEN 1 "Message Command?"           ; in non-stop mode
  29.       TEXT "ns\r"                      ;   (all text logged to file)
  30.     END
  31.  
  32. ; log entire session to disk
  33. OnLoad OPEN_LOG "D:/TMP/QDECK.LOG"
  34.  
  35. Cleanup CLOSE_LOG
  36.  
  37. ; add standard bindings
  38. #include "rbcomm"
  39.