; Modified jlf: 08/01/97, 07/01/98
;
; SAMPLE Windows 95, 98 and NT 4 script file that establishs a 
; PPP connection with the CAC Access Server at ALL CAMPUS LOCATIONS. 
;
; NOTE: Many campus locations now support extensions to the PPP 
;       protocol such that this script is no longer needed.
;
;       Refer to the following DialUp Instructions:
;
;                http://ftp.cac.psu.edu/pub/access/win9xnt4/w9x-dial.htm 
;
; Main entry point to script
;
proc main

; Delay for 2 seconds to allow Server time to send initial characters.

   delay 2
   transmit "^M"  ; Let Server know we're here.

; Wait for the login prompt before entering the user ID

   delay 1
   waitfor "login:" 
   transmit $USERID
   transmit "^M"

; Enter the password

   delay 1 
   waitfor "Password:"
   transmit $PASSWORD
   transmit "^M"

   ;
   ; CAC Access has a menu list something like this:
   ;
   ;   ppp       : Establish ppp connection
   ;   pctcp     : Establish tcp connection
   ;   slip      : Establish slip connection
   ;   telnet    : Establish telnet access
   ;   ph        : Lookup or Maintain the electronic Phonebook
   ;   password  : Change your Access Server password
   ;   exit      : Disconnect from the PSU CAC Access Server
   
   delay 1                   ; Wait a sec for line to settle

   waitfor "choice:" 

   transmit "ppp^M"          ; Choose PPP connection
  
;                            ; That's all Folks!

endproc