home *** CD-ROM | disk | FTP | other *** search
- ;
- ; 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
- ;
- ; 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