IBM F50 RS/6000 7025 - Manual (Page 340)

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,
# Disable responses.
ignore " \r" timeout 1
done
condin: send "AT&FQ T\r" # Reset to factory defaults.
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\r" # Detect carrier and DTR.
expect " \r" timeout 2 # Confirm command successful.
done
waitcall: ignore "2\r" timeout 1 # Ignore first ring.
expect "2\r" timeout 1 # 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
# Confirm successful command.
expect " \r" timeout 6
delay 2
# Wait before hanging up.
send "ATH T\r" # Hang up.
expect " \r" timeout 2 # Confirm successful command.
done
ripo: send "AT&FQ T\r" # Reset to factory defaults.
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\r" # Detect carrier and DTR.
expect " \r" timeout 2 # Confirm command successful.
done # RI Power On enabled.
error: # Handle unexpected modem
# responses.
D-14 IBM RS/6000 7025 F50 Series User's Guide