; DEFAULT SLIP SCRIPT file for most Tech connections
;
; Sets up a *dynamic* IP address SLIP connection on the
; Virginia Tech campus.  Most people on the Tech campus
; have this kind of connection. You may also need the 
; file on my home page to set up a Win95 32 bit 
; connection.  Please see 
; http://www.vt.edu:10021/K/kewells/wells.html for the 
; file needed to "trick" Win95 into thinking you have a 
; modem if you are on campus.  Email me at 
; kewells@vt.edu with any suggestions or improvements
; (C) Kevin Wells 1995.  This script may be freely 
; distributed & modified as long as there is no charge
; for its use.  Replace the "slip" with "ppp" for a ppp
; connection.

proc main

transmit "<cr><lf><cr><lf><cr><lf>"
waitfor "DISP"
transmit "C VTTELNET<cr>"
waitfor "COMP"

; This is a tricky transition.  If you have any other
; ideas, let me know.
transmit "<cr>"
delay 1
transmit "<cr>"
delay 1
transmit "<cr>"
delay 1
transmit "<cr>"
delay 1
transmit "<cr>"


waitfor "name:"
delay 1
transmit $USERID
transmit "<cr>"
waitfor "word:"
transmit $PASSWORD
transmit "<cr>"

waitfor "TermServ>"
transmit "SLIP DEFAULT<cr>"
waitfor "address is "
set ipaddr getip

endproc