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

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

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&FðQðT\r"

# Reset modem. Select profile ð

 

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&FðQðT\r"

# Reset modem. Select profile ð

 

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.

Appendix C. Modem Configurations-23

Page 267
Image 267
IBM RS/6000 manual Appendix C. Modem Configurations-23