proc main
waitfor "sername:"
transmit "username"
transmit "^M"
waitfor "assword:"
transmit "password"
transmit "^M"
waitfor "sterm3:"
transmit "ppp^M"
endproc