head     1.2;
branch   ;
access   ;
symbols  ;
locks    ; strict;
comment  @# @;


1.2
date     93.01.27.10.55.06;  author ks;  state Exp;
branches ;
next     1.1;

1.1
date     93.01.14.07.21.12;  author ks;  state Exp;
branches ;
next     ;


desc
@@


1.2
log
@New comments.
@
text
@##
##  Dial up a V.32bis or V.32 modem with a Telebit T3000 modem
##
xmit "\xATE1\r"
{
    alternate
	recv "OK" 5
    alternate
	xmit "\xATE1\r" 
	recv "OK" 5
    alternate 
	xmit "\xATE1\r" 
	recv "OK" 5
    alternate 
	xmit "\xATE1\r" 
	recv "OK" 5
    alternate 
	log "Failed to get attention of modem"
	abort
}
xmit "\rATDT$1\r"
mark
{
    alternate
	recv "CONNECT 14400" "CONNECT 12000" "CONNECT 9600" "CONNECT 7200" "CONNECT 4800" "BUSY" "NO CARRIER" "NO DIALTONE" "ERROR" 55
    alternate
	log "Modem Timeout"
	abort
}
{
    alternate
	replay
	recv "CONNECT 14400" 0
	go
    alternate
	replay
	recv "CONNECT 12000" 0
	log "Fallback to 12000 baud"
	go
    alternate
	replay
	recv "CONNECT 9600" 0
	log "Fallback to 9600 baud"
	go
    alternate
	replay
	recv "CONNECT 7200" 0
	log "Fallback to 7200 baud"
	go
    alternate
	replay
	recv "CONNECT 4800" 0
	log "Fallback to 4800 baud"
	go
    alternate
	replay
	recv "BUSY" 0
	log "Busy"
    alternate 
	replay
	recv "NO CARRIER" 0
	log "No carrier"
    alternate 
	replay
	recv "NO DIALTONE" 0
	abort
    alternate
	replay
	recv "ERROR" 0
	log "Error received from modem"
}
abort
@


1.1
log
@Initial revision
@
text
@d2 1
a2 1
##  Dial up a Telebit T3000 modem with a Telebit T3000 modem.
@
