proc main

waitfor "Username"
transmit $USERID
transmit "^M"
delay 1

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

waitfor ">"
transmit "ppp default"
transmit "^M"
delay 2
endproc