zero
	flush
	ifblind	blindwake

wakemodem:
	count
	ifgtr	cantwake	4
	send			ATQ0\r
	timeout	wakemodem	2000
	expect	dialnumber	OK

cantwake:
	logerr	Can't wake modem
	failed

blindwake:
	count
	ifgtr	dialnumber	4
	send			AT\r
	goto	blindwake

dialnumber:
	send			ATDT
	dial
	flush
	send			\r
	timeout	timeout		0
	ifcarr	connected
	expect	connected	CONNECT
	expect	nocarrier	NO CARRIER
	expect	busy		BUSY

connected:
	log	Hayes dialed ok
	success

timeout:
	logerr	Timeout awtg response or carr after dial string
	failed

nocarrier:
	logerr	Modem reported NO CARRIER
	failed

busy:
	logerr	Modem reported BUSY
	failed