Omron CJ1W-SCU22, Руководство по эксплуатации, Страница: 186 / 478

4 Using Protocol Macros
4-50
CJ-series Serial Communications Units Operation Manual for NJ-series CPU Unit(W494)
Program Example
//Trigger reception
IF ( State = INT#0 ) THEN
IF (( Trigger
= TRUE ) AND ( _Port_isAvailable = TRUE ) AND ( SCU_P1_PmrExecSta <> TRUE ) AND
( ExecPMCR_instance.Busy <> TRUE )) THEN
State := INT#1;
END_IF;
END_IF;
//Communication parameters settings and ExecPMCR instruction initialization
IF ( State = INT#1 ) THEN
InPort.UnitNo := _eUnitNo#_CBU_No02; //Serial Communications Unit, Unit number 2
InPort.PhysicPortNo := = USINT#1; //Port number 1
SendData[0] := WORD#16#0005;
SendData[1] := WORD#16#0003;
SendData[2] := WORD#16#C000;
SendData[3] := WORD#16#0000;
SendData[4] := WORD#16#0001;
RecvData[0] := WORD#16#0004;
ExecPMCR_instance( Execute := FALSE, //ExecPMCR instruction initialization
DstDat := RecvData[0] ); //Dummy
State := INT#2;
END_IF;
//ExecPMCR instruction execution
IF ( State = INT#2 ) THEN
ExecPMCR_instance(
Execute := TRUE,
Port := InPort,
SeqNo := UINT#610,
SrcDat := SendData[0],
DstDat := RecvData[0] );
F_TRIG_instance(SCU_P1_PmrExecSta , End_ExecPMCR );
IF( End_ExecPMCR = TRUE ) THEN
End_ExecPMCR := FALSE;
State := INT#3;
END_IF;