connect:

send "ATDT%N\r"

#

Tone dialing

command.

 

 

#

%N from Call

Home setup.

# Expect a connection response.

expect "16\r" or "15\r" or "14\r" or "12\r" or "10\r" or "5\r" or "1\r" busy "7\r" timeout 60

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 "10\r" or "5\r" or "1\r" busy "7\r" timeout 60

 

done

 

 

 

disconnect:

delay 2

# Separate from previous data.

 

 

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,

 

ignore "0\r" timeout 1

#

Disable responses.

 

 

 

 

done

 

 

 

condin:

send

"AT&F0Q0T\r"

# Reset modem. Select profile 0

 

ignore "0\r" or "OK\r\n" timeout 2

# Ignore modem response.

 

send

"ATE0T\r"

# Initialize modem: Echo OFF,

 

expect "0\r" or "OK\r\n" timeout 2

#

Enable responses (Numeric),

 

send

"ATQ0V0X0T\r"

#

Limit response codes.

 

expect "0\r" timeout 2

# Confirm commands successful.

 

send

"ATS0=2\r"

# Set AutoAnswer ON

 

expect "0\r" timeout 2

# Confirm command successful.

 

send

"AT&C1&D2&R1\r"

# Detect carrier and DTR,

 

 

 

#

Ignore RTS.

 

expect "0\r" timeout 2

# Confirm command successful.

 

done

 

 

 

waitcall: ignore

"2\r" timeout 1

# Ignore first ring.

expect

"2\r" timeout 10

# Pick up second ring

 

 

 

#

or timeout.

 

 

 

# Expect a connection response.

expect "16\r" or "15\r" or "14\r" or "12\r" or

"10\r" or "5\r" or "1\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

"ATH0T\r"

 

# Hang up.

 

expect "0\r" timeout 2

# Confirm successful command.

 

done

 

 

 

ripo:

send

"AT&F0Q0T\r"

# Reset modem. Select profile 0

 

ignore "0\r" or "OK\r\n" timeout 2

# Ignore modem response.

 

send

"ATE0T\r"

# Initialize modem: Echo OFF,

 

expect "0\r" or "OK\r\n" timeout 2

#

Enable responses (Numeric),

 

send

"ATQ0V0X0T\r"

#

Limit response codes.

 

expect "0\r" timeout 2

# Confirm commands successful.

202pSeries 630 Model 6C4 and Model 6E4 User's Guide

Page 220
Image 220
IBM 6.00E+04 manual PSeries 630 Model 6C4 and Model 6E4 Users Guide