Siemens SIMATIC TIWAY 1 Especificaciones descargar pdf (Pagina 153)

Appendix C

Host Master Example

Peer Master

Example

C–10

Host Master Example

The following program will read X0–X7 from Slave Station #1.

10 REM Program to read X0–X7 from a 405 PLC

20 REM

30 REM Define all variables

40 REM

50 REM Change the slave address in HEX at line 60 if required.

60 SLAVEADDRESS=&H1

70 DATATYPE$=CHR$(&H32)

80 DATAADDR$=CHR$(&H30)+CHR$(&H31)+CHR$(&H30)+CHR$(&H31)

90 COMPLETEBLK$=CHR$(&H30)+CHR$(&H30)

100 PARTBLK$=CHR$(&H30)+CHR$(&H32)

110 MASTERADDR$=CHR$(&H30)+CHR$(&H30)

120 NORMAL$=CHR$(&H4E)

130 SLAVEADDR$=HEX$(SLAVEADDRESS)

140 IF LEN(SLAVEADDR$)<2 THEN SLAVEADDR$=”0”+SLAVEADDR$

150 OFFSETADDR$=CHR$(&H20+SLAVEADDRESS)

160 ENQ$=CHR$(&H5)

170 ACK$=CHR$(&H6)

180 SOH$=CHR$(&H1)

190 STX$=CHR$(&H2)

200 ETB$=CHR$(&H17)

210 NAK$=CHR$(&H15)

220 ETX$=CHR$(&H3)

230 EOT$=CHR$(&H4)

240 RED$=CHR$(&H30)

250 DATA$=””

260 REM

270 REM Build enquiry and header

280 REM

290 SLAVEENQ$=NORMAL$+OFFSETADDR$+ENQ$

300 HEADER$=SOH$+SLAVEADDR$+RED$+DATATYPE$+DATAADDR$

310 HEADER$=HEADER$+COMPLETEBLK$+PARTBLK$+MASTERADDR$+ETB$

320 REM

330 REM Begin active program

340 REM

350 CLS

360 OPEN ”COM1:9600,N,8,1,RS,DS” AS #1

370 LRC=0

380 GOSUB 770

390 RETRY=0

400 REM Do Enquiry

410 PRINT #1,SLAVEENQ$;

420 INPUT #1,ENQRES$:PRINT ”Enquire Response = ”;ENQRES$

430 IF MID$(ENQRES$,3,1)=ACK$ THEN GOTO 480

440 RETRY=RETRY+1

450 IF RETRY>2 THEN GOTO 760

460 GOTO 410

Example Program

to Read Data

1 2 ... 148 149 150 151 152 153 154 155 156 157 158 ... 206 207

Comentarios a estos manuales

Sin comentarios

Siemens SIMATIC TIWAY 1 Especificaciones Pagina 153

Comentarios a estos manuales

Relacionado con productos y manuales para Redes Siemens SIMATIC TIWAY 1