home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PROGRAMS / UTILS / COMMUNIC / CA24_1.ZIP / SCRIPTS.ZIP / PLINK.CMD < prev    next >
Encoding:
Text File  |  1988-11-21  |  984 b   |  32 lines

  1. ;
  2. ;    Dial PLINK
  3. ;
  4.     LEGEND " Dialing PLINK direct"
  5.     DEFTIME 60        ; Wait 60 seconds for an incoming string
  6.     IF NOT LINKED        ; If script not invoked from Alt-D
  7.        RESET        ; Reset defaults only if not linked
  8.        DIAL "1"             ; Call dial dir entry number 1 (PLINK)
  9.        IF FAILED        ; IF esc out
  10.           EXIT        ; terminate script
  11.           ENDIF        ; End if failed
  12.        ENDIF        ; End if not linked
  13.  
  14.     PAUSE "5"               ; Wait for the modem to settle down
  15.     TRANSMIT "!"            ; Transmit Carriage return <CR>
  16.     PAUSE "1"               ; Wait 1 sec
  17.     TRANSMIT "!"            ; Transmit Carriage return <CR>
  18.     WAITFOR "USER ID:"      ; Wait for the 'USER ID' prompt
  19.  
  20.     SET BSUPPRESS OFF    ; Turn off blank line suppression
  21.     SET MASK ON        ; Turn on high bit mask
  22.     SET CDISPLAY ON     ; Display ctl chars
  23. ;
  24. ;    If we have a AHNLOGON file, use it
  25. ;
  26.     SET TTHRU OFF        ; Let psw be typed
  27.     IF ISSCFILE "AHNLOGON"
  28.        FCALL "AHNLOGON"
  29.     ELSE
  30.        Alarm           ; Sound alarm
  31.        ENDIF
  32.