proc main

delay 2

waitfor "Username:"
transmit $USERID
transmit "^M"

waitfor "Password:"
transmit $PASSWORD
transmit "^M"

waitfor"Selection:"
transmit "1"
transmit "^M"

delay 2

endproc