IBM H80 Series manual Appendix D. Modem Configurations187

# Expect a connection response. expect "33\r" or "31\r" or "28\r" or "26\r" or "24\r" or "2￿1\r" or

"19\r" or "13\r" or "12\r" or "1\r" busy "7\r" timeout 6ð

done

retry:	send "A/"	# Repeat the previous command.
		# Expect a connection response.
	expect "33\r" or "31\r" or "28\r" or "26\r" or "24\r" or "2￿1\r" or
"19\r" or "13\r" or "12\r" or "1\r" busy "7\r"
	timeout 6ð
	done
disconnect:	delay 2	# Separate from previous data.
	send "+++"	# Assure command mode.
	delay 2	# Allow mode switching delay.
	send "ATHðT\r"	# Set modem switch-hook down
		# (i.e., hang up).
	ignore "ð\r" or "OK\r" timeout 2	# Ignore modem response.
	send "ATEðQ1\r"	# Initialize modem: Echo OFF,
	ignore "ð\r" timeout 1	# Disable responses.
	done
condin:	send "AT&F&E2EðT\r"	# Reset to factory defaults.
		# Reliable mode
		# Echo off
	ignore "ð\r" or "OK\r\n" timeout 2	# Ignore modem response.
	send "AT&E12&E14\r"	# Disable pacing
		# Disable data compression
	expect "ð\r" or "OK\r\n" timeout 2	# Confirm commands successful
	send "AT&SF1&SðS9=1\r"	# DSR independent of CD.
		# Force DSR on.
		# CD respond time=1ððms
	expect "ð\r" or "OK\r\n" timeout 2	# Confirm commands successful.
	send "ATVðSð=2\r"	# Numberic response code
		# Answer on 2nd ring
	expect "ð\r" timeout 2	# Confirm commands successful.
	done
waitcall:	ignore "2\r" timeout 1	# Ignore first ring.
	expect "2\r" timeout 1ð	# Pickup 2nd ring or timeout
		# Expect a connection response.
	expect "33\r" or "31\r" or "28\r" or "26\r" or "24\r" or "2￿1\r" or
"19\r" or "13\r" or "12\r" or "1\r" busy "7\r"
	timeout 6ð
	done
page:	send "ATDT%N,,,,%R;\r"	# %N = pager call center number
		# Add enough commas to wait for
		# time to enter paging number.

Appendix D. Modem Configurations187