!CONNECT SCRIPT FOR RIXON MODEM
!
!RIXON OPTION SETUP:
!1 DISC		Y
!2 AUTOQ	Y
!3 ECHO		Y
!4 DSR ON	N
!5 CTS ON	Y
!6 LNGTH	10
!7 BLIND	Y
!8 DIAL		TONE
!9 ON-LINE MSG	Y
!
TYPE	"Enabling Rixon modem...^"
SET	PAUSE 1
WAIT	5
SEND	"^^"
INPUT	2 5 "$"
IFNOT	TIMEOUT GOTO DIAL
WAIT	10
SEND	"^^"
INPUT	4 5 "$"
IFNOT	TIMEOUT GOTO DIAL
ABORT	"^^Unable to contact modem - Contact Computer Services^^"
!
LABEL DIAL
TYPE	"Dialling...^"
SEND	"<K" # "^>"
INPUT	2 18 "7" "1"
IF	1 GOTO ANSWERED
IF	2 GOTO ERROR
ABORT	"^^Line busy^^"
!
LABEL ERROR
ABORT	"^^Dialling error^^"
!
LABEL ANSWERED
TYPE	"Answered...^"
SET	PAUSE 0
!finished dialling