IBM 6C4 User Manual
Page 210
send "+++"
# Assure command mode.
delay 2
# Allow mode switching delay.
send "ATH0T\r"
# Set modem switch-hook down
# (i.e., hang up).
ignore "0\r" or "OK\r" timeout 2
# Ignore modem response.
send "ATE0Q1\r"
# Initialize modem: Echo OFF,
# Disable responses.
ignore "0\r" timeout 1
done
condin:
send "AT&F&E2E0T\r"
# Reset to factory defaults.
# Reliable mode
# Echo off
ignore "0\r" or "OK\r\n" timeout 2 # Ignore modem response.
send "AT&E12&E14\r"
# Disable pacing
# Disable data compression
expect "0\r" or "OK\r\n" timeout 2 # Confirm commands successful
send "AT&SF1&S0S9=1\r"
# DSR independent of CD.
# Force DSR on.
# CD respond time=100ms
expect "0\r" or "OK\r\n" timeout 2 # Confirm commands successful.
send "ATV0S0=2\r"
# Numberic response code
# Answer on 2nd ring
expect "0\r" timeout 2
# Confirm commands successful.
done
waitcall:
ignore "2\r" timeout 1
# Ignore first ring.
expect "2\r" timeout 10
# 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 "21\r" or
"19\r" or "13\r" or "12\r" or "1\r" busy "7\r"
timeout 60
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 "0\r" timeout 60
# Confirm successful command.
delay 2
# Wait before hanging up.
send "ATH0\r"
# Hang up.
expect "0\r" timeout 2
# Confirm successful command.
done
ripo:
send "AT&F&E2E0T\r"
# Reset to factory defaults.
# Reliable mode
# Echo off
ignore "0\r" or "OK\r\n" timeout 2 # Ignore modem response.
send "AT&E12&E14\r"
# Disable pacing
# Disable data compression
expect "0\r" or "OK\r\n" timeout 2 # Confirm successful command.
send "AT&SF1&S0S9=1\r"
# DSR independent of CD.
# Force DSR on.
# CD respond time=100ms
expect "0\r" or "OK\r\n" timeout 2 # Confirm commands successful.
send "ATV0S0=0\r"
# Numeric response code
# Auto Answer OFF
expect "0\r" timeout 2
# Confirm commands successful.
done
#
error:
# Handle unexpected modem
# responses.
expect "8\r" or "7\r" or "6\r" or "4\r" or "3\r"
delay 2
done
192
pSeries 630 Model 6C4 and Model 6E4 User’s Guide