Mitsubishi A1SD51S, Руководство по программированию

Страница: 479 / 688

11 - 309 11 - 309
MELSEC-Q
11 INSTRUCTIONS AND FUNCTIONS
Program Example
(1) Program example for a format 1 control table
100 ' A program example that writes data to buffer memory 0 of the special function module (A62DA)
110 ' (Starting address of A62DA: &H0A)
120 DIM TBL%(5),A%(0) : 'Defines arrays
130 TBL%(0)=255 : 'Specifies the station number to
communicate with to the local station
140 TBL%(1)=12 : 'Specifies to write data to buffer memory
150 TBL%(2)=&HA : 'Specifies the module number
160 D!=&HA0 : 'Specifies the buffer memory address
170 H!=INT(D!/65536!)
180 H$=RIGHT$("0000"+HEX$(H!),4) : 'Higher byte of the buffer memory address
190 L$=RIGHT$("0000+HEX$(L!),4) : 'Lower byte of the buffer memory address
200 TBL%(3)=VAL("&H"+L$) : 'Stores the lower byte in the control table
210 TBL%(4)=VAL("&H"+H$) : 'Stores the higher byte in the control table
220 TBL%(5)=2 : 'Specifies the number of bytes to be written
230 A%(0)=&H3E8 : 'Specifies the values to be written
240 PCWT TBL%( ),A%( ) : : 'Executes the write operation
250 END
(2) Program example for a format 2 control table
100 ' A program example that writes data to buffer memory 0 of the special function module (A62DA)
110 ' (Head address of A62DA: &H0A)
120 DIM TBL%(8),A%(0) : 'Defines arrays
130 TBL%(0)=256 : 'Specifies a format 2 control table
140 TBL%(1)=1 : 'Specifies network number 1
150 TBL%(2)=1 : 'Specifies station number 1
160 TBL%(4)=12 : 'Specifies to write data to buffer memory
170 TBL%(5)=&HA : 'Specifies the module number
180 D!=&HA0 : 'Specifies the buffer memory address
190 H!=INT(D!/65536!)
200 H$=RIGHT$("0000"+HEX$(H!),4) : 'Higher byte of the buffer memory address
210 L$=RIGHT$("0000+HEX$(L!),4): : 'Lower byte of the buffer memory address
220 TBL%(6)=VAL("&H"+L$) : 'Stores the lower byte in the control table
230 TBL%(7)=VAL("&H"+H$) : 'Stores the higher byte in the control table
240 TBL%(8)=2 : 'Specifies the number of bytes to be written
250 A%(0)=&H3E8 : 'Specifies the values to be written
260 PCWT TBL%( ),A%( ) : : 'Executes the write operation
270 END