proc main
delay 1
waitfor "ame:"
transmit $USERID
transmit "^M"
waitfor "assword:"
transmit $PASSWORD
transmit "^M"
waitfor "choice."
transmit "2"
delay 1
endproc