home *** CD-ROM | disk | FTP | other *** search
/ Best Objectech Shareware Selections / UNTITLED.iso / boss / comm / misc / 014 / cis.mac < prev    next >
Encoding:
Text File  |  1993-01-09  |  1.2 KB  |  75 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.     WHEN 0 "^E"
  17.         DVEXEC 0 "C:/DV/OZ-PIF.DVP"
  18.       END
  19.  
  20. @R    {
  21.     TEXT "down/proto:qb"
  22.     WAITFOR 2 "qb"
  23.     TEXT "\r"
  24.     WAITFOR 10 "Bytes"
  25.     CUT 10 AFTER "File "
  26.     RTRIM CUTBUFFER ", 0123456789"
  27.         WAITFOR 5 "File name for your computer:"
  28.     PAUSE 2
  29.     PASTE
  30.     PAUSE 6
  31.     TEXT "\r"
  32.     DVEXEC 0 "C:/DV/OZ-PIF.DVP"
  33.     PAUSE 6
  34.     TEXT "\r"
  35.     }
  36.  
  37. OnLoad    {
  38.     LOG "%VDSZLOG%" "-- connected to %N at %t on %d\r\n"
  39.     AVATAR OFF
  40.     RBCOMM_CMDS OFF
  41.     }
  42.  
  43. #defkey Login 199
  44.  
  45. Login    {
  46.     WAITFOR 5 "User ID:"
  47.     TEXT "71762,603\r"
  48.     WAITFOR 5 "Password:"
  49.     PASSWORD
  50.     TEXT "\r"
  51.     }
  52.  
  53. Auto    {
  54.     STRIP_PARITY ON            ; needed if connecting at 8N1
  55.     PAUSE 3
  56.     TEXT "\r"
  57.     WAITFOR 3 "Host Name:"
  58.     TEXT "CIS\r"
  59.     STRIP_PARITY OFF
  60.     CALL Login
  61.     }
  62.  
  63. CleanUp {
  64.     IF CONNECTED
  65.        {
  66.        TEXT "bye\r"
  67.        WAITFOR 3 "Host Name:"
  68.        TEXT "bye\r"
  69.        }
  70.     LOG "%VDSZLOG%" "-- hung up %N at %t on %d\r\n"
  71.     SELECT_SCREEN 0
  72.     }
  73.  
  74. #include "rbcomm.mac"
  75.