;camus.TLK
;USING File to Access AMUS
; with COMM USING CAMUS
;  via hayes smart modem
;   or similar
;    It works, I used it to call in this time (with passwords changed of
;        course)
;
$DIALOG			;Dialog on
;*****************
;* CONFIGURE     *
;*****************
$BAUD 1200		;Baud rate to 1200
;Check if modem is connected and operational
;Be sure modem is set to respond with words
ATQ0V1
$WAITIME 3		;Give modem 3 seconds to respond
$WAIT OK
$GOTO 100		;No response from modem
;
$TREMOTE		;Remote translation/filtering on
$REMOTE 17,0		;Filter ^Q
$REMOTE 21,0		;Filter ^S
$TLOCAL			;Local translation/filtering on
$LOCAL 33,3		;Translate bang to control c
$LOCAL 127,8		;Translate del to a backspace
$LINEFEED OFF		;No linefeeds when sending files
;*****************
;* INITIATE LINK *
;*****************
ATDT13034495564
$WAITIME 60		;Wait upto 60 seconds for CONNECT
$WAIT CONNECT
$GOTO 120		;Did not connect
$PAUSE 20		;Let modem catch its breath
;*****************
;* LOGON REMOTE  *
;*****************
!
$WAITIME 10		;Wait 10 seconds for ID?
$WAIT Have
$GOTO 130		;No logon from EasyLink
$PAUSE 20
YNWYSE
$WAIT Ini
$GOTO 130
NAME		; your ID
$WAIT Pass
$GOTO 130
PASSWR		; your password
$WAIT Gal
$GOTO 130
AM		; the AMUS galaxy...
$TLOCAL OFF	; we don't need the translations any more
$TALKTO			;Goto conversational mode

;*****************
;* OTHER EXITS   *
;*****************
;100
$PRINT ?No response from modem...check if connected
$QUIT $$$$$$		;Quit without hangup
;120
$PRINT ?Did not connect to AMUS
$QUIT
;130
$PRINT ?Connected, but no response from AMUS
$QUIT

.