通讯/手机编程

开发平台：
C/C++

HOSTDEMO.SCR：源码内容
							1 57600 8n1
; Configure modem and run host program
* 130
! |Control-X to exit.|
: 0
? 30
< |~at~&f&c1&d2s0=1e0|
; Change 159 below to 10 if you don't have a Class 2 faxmodem.
> 159 OK
p 5
r 110 5 255
! |Couldn't initialize modem; retrying...|
g 0
: 110
! |Error initializing modem|
q 129
: 159
0 255
< |~at~+faa=1|
> 157 OK
p 5
r 170 5 250
! |Couldn't set fax answer; retrying...|
g 159
: 170
! |Couldn't set fax answer.|
q 160
: 157
0 250
< |~at~+fcr=1|
> 151 OK
p 5
r 171 5 249
! |Couldn't enable fax receiving; retrying...|
g 157
: 171
! |Couldn't set fax receive enable.|
q 165
: 151
0 249
< |~at~+flid="Put ID Here"|
> 158 OK
p 5
r 172 5 248
! |Couldn't set fax ID; retrying...|
g 151
: 172
! |Couldn't set FLID.|
q 161
: 158
0 248
; Change below to 1,5,0,2,0,0,0,0 for 14400bps fax.
< |~at~+fdcc=1,3,0,2,0,0,0,0|
> 10 OK
p 5
r 173 5 247
g 158
: 173
! |Couldn't set fax capabilities.|
q 162
: 10
0 247
! |Awaiting connection.|
> 200 CONNECT 57600|
> 160 FAX|
p 0
: 160
; Use complete pathname for speed.
x 161 pccprcvfax 1 57600 19200 pccpfax
g 180
: 161
! |Error spawning fax receive process.|
g 180
: 200
! |Connected.|
g 201
: 201
d 11
g 10
: 11
> 150 P
> 150 p
> 204 S
> 204 s
> 205 M
> 205 m
> 202 H
> 202 h
> 206 U
> 206 u
> 125 Q
> 125 q
> 125 NO CARRIER|
< |`0ap --> Page Operator for chat|`0a
< s --> Send message|`0a
< m --> Check for message|`0a
< h --> Public area host session|`0a
< u --> Unlimited host session|`0a
< q --> Quit|`0a`0aChoose: --> 
p 0
: 125
0 0
< |`0aTERMINATING SESSION|`0a
-
: 126
d 126
+
g 10
: 150
< |`0aStandby...|`0a
: 156
k 152 a
k 152 A
! ||~Caller requesting interactive session. Type "a" to answer.~|
w 3
r 154 5 10
g 156
: 154
< No answer to page.|`0a
g 201
: 152
0 10
x 100 c:pccpmasterm 1 57600 8n1 +-
g 201
: 204
0 0
x 100 c:pccpmessin 1 57600 c:pccpmessin.txt 1000000 256
g 201
: 205
0 0
x 199 c:pccpmessout 1 57600 c:pccpmessdir
0 254
g 201
: 199
r 230 3 254
g 201
: 202
0 0
< |`0aPassword? -->
; ***** Enter <password>| on the following line *****
> 215 letmein|
> 125 NO CARRIER|
> 221 |
p 10
: 221
r 230 3 1
g 201
: 206
0 0
< |`0aPassword? -->
; ***** Enter <password>| on the following line *****
> 210 kowabunga|
> 125 NO CARRIER|
> 220 |
p 10
: 220
r 230 3 2
g 201
: 230
0 1
0 2
< |`0aSorry, Charlie, only the best tasting tuna get to be StarKist!|`0a
< 30-second security delay follows|`0a
> 125 NO CARRIER|
p 30
g 201
: 210
0 2
x 100 c:pccpsession 1 57600
g 200
: 215
0 1
x 100 c:pccpsession 1 57600 c:pccplibrary c:pccpcontrib
g 200
: 130
! |Restoring modem...
-
: 131
d 131
+
: 132
< |~at~z|
> 20 OK
p 5
r 120 5 3
! |Couldn't restore modem; retrying...|
g 132
: 120
! |Error restoring modem.|
q 130
: 20
q 0
: 100
< |`0aThe attempt to run that program returned an error.|`0a
! |Error return|
g 201
: 30
! |Port blocked.|
q 199
: 180
< |~at~|
> 159 OK
p 5
! |Modem not responding after fax, retrying...|
g 180

						