11 - 174 11 - 174
MELSEC-Q
11 INSTRUCTIONS AND FUNCTIONS
Program Example
(1) Program example for format 1 control table
100 ' A program example that reads device memory data of the PLC CPU
110 DIM TBL%(10),A%(20)
:
'Defines arrays
120 TBL%(0)=255
:
'Specifies the station number to
communicate with to the local station
130 TBL%(1)=1
:
'Specifies to read device memory data
140 TBL%(2)=1
:
'Specifies bit units
150 TBL%(3)=3
:
'Specifies internal relays M
160 TBL%(4)=&H0
:
'Specifies the starting device number of the
device memory to be read
170 TBL%(5)=10
:
'Specifies the number of points to be read
180 PCRD TBL%( ),A%( )
:
'Executes the read operation
190 J=0
200 FOR I=0 TO 72 STEP8
210 A=RDSET(I,A%(0))
:
'Reads the status of M
220 IF A=1 THEN PRINT"M";J;"=ON"ELSE PRINT"M";J;"=OFF"
230 J=J+1
:
'Adds 1 to J
240 NEXT I
250 END
(2) Program example for format 2 control table
100 ' A program example that reads device memory data of the PLC CPU
110 DIM TBL%(10),A%(20)
:
'Defines arrays
120 TBL%(0)=256
:
'Specifies a format 2 control table
130 TBL%(1)=1
:
'Specifies network number 1
140 TBL%(2)=1
:
'Specifies station number 1
150 TBL%(4)=1
:
'Specifies to read device memory data
160 TBL%(5)=1
:
'Specifies bit units
170 TBL%(6)=3
:
'Specifies internal relays M
180 TBL%(7)=&H0
:
'Specifies the starting device number of the
device memory to be read
190 TBL%(8)=10
:
'Specifies the number of points to be read
200 PCRD TBL%( ),A%( )
:
'Executes the read operation
210 J=0
220 FOR I=0 TO 72 STEP8
230 A=RDSET(I,A%(0))
:
'Reads the status of M
240 IF A=1 THEN PRINT"M";J;"=ON"ELSE PRINT"M";J;"=OFF"
250 J=J+1
:
'Adds 1 to J
260 NEXT I
270 END
