home *** CD-ROM | disk | FTP | other *** search
/ BBS 1 / BBS#1.iso / communic / rbcom400.ha / CIS.MAC < prev    next >
Text File  |  1993-01-03  |  1KB  |  64 lines
  1. AutoDL    MULTI
  2.     WHEN 0 "Please initiate YMODEM receive"
  3.         {
  4.         PAUSE 5
  5.         RECEIVE 'Y'
  6.         PAUSE 4
  7.         TEXT "\r"
  8.         }
  9. ;     WHEN 0 "Please initiate XMODEM receive"
  10. ;         {
  11. ;         PAUSE 5
  12. ;         RECEIVE 'X'
  13. ;         PAUSE 4
  14. ;         TEXT "\r"
  15. ;         }
  16. ; uncomment the following to start a CIS B+ transfer without using Alt-R
  17. ;     WHEN 0 "^E"
  18. ;         DVEXEC 0 "C:/DV/OZ-PIF.DVP"
  19.       END
  20.  
  21. @R    {
  22.     TEXT "down/proto:qb"
  23.     WAITFOR 5 "qb"
  24.     TEXT "\r"
  25.     WAITFOR 10 "Bytes"
  26.     CUT 10 AFTER "File "
  27.         WAITFOR 5 "for your computer:"
  28.     RTRIM CUTBUFFER ", 0123456789"
  29.     PAUSE 2
  30.     PASTE
  31.     PAUSE 5
  32.     TEXT "\r"
  33.     DVEXEC 0 "C:/DV/OZ-PIF.DVP"
  34.     RFLUSH
  35.     PAUSE 5
  36.     TEXT "\r"
  37.     }
  38.  
  39. OnLoad    {
  40.     LOG "%VDSZLOG%" "-- connected to %N at %t on %d\r\n"
  41.     AVATAR OFF
  42.     RBCOMM_CMDS OFF
  43.     }
  44.  
  45. Auto    {
  46.     PUSHKEY 13 0       ; enter
  47.     PUSHKEY 80 0       ; P
  48.     PARAM_MENU       ; strip parity bit
  49.     PAUSE 3
  50.     TEXT "\r"
  51.     WAITFOR 5 "Host Name:"
  52.     TEXT "CIS\r"
  53.     }
  54.  
  55. CleanUp {
  56.     LOG "%VDSZLOG%" "-- hung up %N at %t on %d\r\n"
  57.     SELECT_SCREEN 0
  58.     PUSHKEY 13 0        ; Enter
  59.     PUSHKEY 80 0        ; P
  60.     PARAM_MENU        ; don't strip parity bit
  61.     }
  62.  
  63. #include "rbcomm.mac"
  64.