; This is a script file modified by len bowes 9/95.
; This gives access to the University of Utah u.cc.utah.edu
; machine for windows 95 clients over a SLIP connection.
;
; A script file must have a 'main' procedure.
; All script execution starts with this 'main'
; procedure.
;
; Main entry point to script
;
proc main
; Wait for the login prompt before entering
; the user ID
waitfor "sername:"
transmit $USERID
transmit "^M"
; Enter the password
waitfor "assword:"
transmit $PASSWORD
transmit "^M"
waitfor "Enter.Destination>"
transmit "slip default"
transmit "^M"
waitfor "Your IP address is "
set ipaddr getip
endproc