home *** CD-ROM | disk | FTP | other *** search
- ; ----- PLINK: Dial People/Link (PLINK) and connect (logon)
- ; ----------------------------------------------------------------
- ; Note: This script expects dialing directory entry #1 to be
- ; a direct-dial number. Telenet or other carrier access
- ; requires different scripting.
- ; ----------------------------------------------------------------
- ; Note: This script uses a LOGON file prepared by MKLOGON,
- ; if one is available.
- ; ----------------------------------------------------------------
- ;
- ; Dial PLINK
- ;
- LEGEND " Dialing PLINK direct"
- DEFTIME 60 ; Wait 60 seconds for an incoming string
- IF NOT LINKED ; If script not invoked from Alt-D
- RESET ; Reset defaults only if not linked
- DIAL "1" ; Call dial dir entry number 1 (PLINK)
- IF FAILED ; IF esc out
- EXIT ; terminate script
- ENDIF ; End if failed
- ENDIF ; End if not linked
-
- PAUSE "5" ; Wait for the modem to settle down
- TRANSMIT "!" ; Transmit Carriage return <CR>
- PAUSE "1" ; Wait 1 sec
- TRANSMIT "!" ; Transmit Carriage return <CR>
- WAITFOR "USER ID:" ; Wait for the 'USER ID' prompt
-
- SET BSUPPRESS OFF ; Turn off blank line suppression
- SET MASK ON ; Turn on high bit mask
- SET CDISPLAY ON ; Display ctl chars
- SET SLOW ON ; For Uploads, direct dial, this is best
- ;
- ; If we have a AHNLOGON file, use it
- ;
- SET TTHRU OFF ; Let psw be typed
- IF ISSCFILE "AHNLOGON"
- FCALL "AHNLOGON"
- ELSE
- Alarm ; Sound alarm
- ENDIF