proc main ; delay 1 transmit "^M" waitfor "Login:" transmit "dial@uupops.net^M" waitfor "Password:" transmit "dial@uupops.net^M" delay 1 transmit "+^M" waitfor "Host Name:" transmit "cis^M" waitfor "User ID:" transmit $USERID, raw transmit "/noint/go:pppconnect^M" waitfor "Password: " transmit $PASSWORD, raw transmit "^M" waitfor "One moment please..." endproc