IBM H80 Series manual Appendix D. Modem Configurations203

waitcall: ignore "2\r" timeout 1 expect "2\r" timeout 1ð

timeout 6ð

done

retry: send "A/" # Repeat the previous command.

# Expect a connection response.

expect "16\r" or "15\r" or "14\r" or "12\r" or "1ð\r" or "5￿\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&F1QðT\r"	# Reset modem. Select profile 1
	ignore "ð\r" or "OK\r\n" timeout 2	# Ignore modem response.
	send "ATEðT\r"	# Initialize modem: Echo OFF,
	expect "ð\r" or "OK\r\n" timeout 2	#	Enable responses (Numeric),
	send "ATQðVðXðT\r"	#	Limit response codes.
	expect "ð\r" timeout 2	# Confirm commands successful.
	send "ATSð=2\r"	# Set AutoAnswer ON
	expect "ð\r" timeout 2	# Confirm command successful.
	send "AT&C1&D2&R1\r"	# Detect carrier and DTR,
		#	Ignore RTS.
	expect "ð\r" timeout 2	# Confirm command successful.
	done

# Ignore first ring.

# Pick up second ring

# or timeout.

# Expect a connection response.

expect "16\r" or "15\r" or "14\r" or "12\r" or "1ð\r" or "5￿\r" or "1\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.
		# %R = paging number
	expect "ð\r" timeout 6ð	# Confirm successful command.
	delay 2	# Wait before hanging up.
	send "ATHðT\r"		# Hang up.
	expect "ð\r" timeout 2	# Confirm successful command.
	done
ripo:	send "AT&F1QðT\r"	# Reset modem. Select profile 1
	ignore "ð\r" or "OK\r\n" timeout 2	# Ignore modem response.
	send "ATEðT\r"	# Initialize modem: Echo OFF,
	expect "ð\r" or "OK\r\n" timeout 2	#	Enable responses (Numeric),
	send "ATQðVðXðT\r"	#	Limit response codes.
	expect "ð\r" timeout 2	# Confirm commands successful.
	send "ATSð=ð\r"	# Set AutoAnswer OFF
	expect "ð\r" timeout 2	# Confirm command successful.
	send "AT&C1&D2&R1\r"	# Detect carrier and DTR,
		#	Ignore RTS.
	expect "ð\r" timeout 2	# Confirm command successful.
	done	# RI Power On enabled.

Appendix D. Modem Configurations203