You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

394 lines
7.1 KiB

4 months ago
FUNCTION_BLOCK IJ_MSyncControl
VAR_EXTERNAL
END_VAR
VAR_INPUT
REAL_IN1 :REAL;
REAL_IN2 :REAL;
BOOL_IN0 :BOOL;
BOOL_IN1 :BOOL;
BOOL_IN2 :BOOL;
INT_IN1 :INT;
INT_IN2 :INT;
CM :BOOL;
END_VAR
VAR_OUTPUT
REAL_OUT1 :REAL;
REAL_OUT2 :REAL;
BOOL_OUT0 :BOOL;
BOOL_OUT1 :BOOL;
BOOL_OUT2 :BOOL;
INT_OUT1 :INT;
INT_OUT2 :INT;
END_VAR
VAR
REAL_TEMP1 :REAL;
REAL_TEMP2 :REAL;
BOOL_TEMP0 :BOOL;
BOOL_TEMP1 :BOOL;
BOOL_TEMP2 :BOOL;
INT_TEMP1 :INT;
INT_TEMP2 :INT;
END_VAR
(*Automatically declared*)
VAR_EXTERNAL
END_VAR
(** {* **)
(** **)
(** ʱ �䣺20191009 **)
(** �� ����1.0 **)
(** �� �ߣ�Ҧ�� **)
(** �� �ƣ�����CPU����Ⱥ�ء�����Ⱥ�ء���ʱ���ƣ�BOOL��ר�ã�ͬ�����ܿ� **)
(** ˵ ���� **)
(** IN0 Ϊ��ʱ���� (��ΪBOOL���У���������ʱ����) **)
(** IN1Ϊ����Ⱥ�أ�IN2Ϊ����Ⱥ�� **)
(** CM Ϊ����ģʽ 0����ģʽ 1����ģʽ **)
(** **)
(** ֧��BOOL,REAL,INT�������ͱ��� **)
(** �� ע�� **)
(** �����飺�� **)
(** **)
(** *} **)
(** **)
(** {**********����ģʽʱ�����໥ͬ��������ģʽʱ������->���Ƶ���ͬ��*************} **)
(** if CM =0 then {*����ģʽ*} **)
(* if - Cond *)
LD CM
EQ 0
JMPCN ODK_SKIP_000000000000001_000000000000001
(* then - Stmts *)
(** {*��ʱ����--������Ⱥ��--������Ⱥ��*} **)
(** if BOOL_IN0<>BOOL_TEMP0 then {*��ʱ����--������Ⱥ������*} **)
(* if - Cond *)
LD BOOL_IN0
NE BOOL_TEMP0
JMPCN ODK_SKIP_000000000000002_000000000000001
(* then - Stmts *)
(** BOOL_OUT0:=BOOL_IN0; {*��ʱȺ��*} **)
(* assign - Stmt *)
LD BOOL_IN0
ST BOOL_OUT0
(** BOOL_OUT1:=BOOL_IN0; {*����Ⱥ��*} **)
(* assign - Stmt *)
LD BOOL_IN0
ST BOOL_OUT1
JMP ODK_END_IF_000000000000002
(** else **)
(* else *)
ODK_SKIP_000000000000002_000000000000001:
(* else - Stmts *)
(** BOOL_OUT1:=BOOL_IN1; **)
(* assign - Stmt *)
LD BOOL_IN1
ST BOOL_OUT1
(** BOOL_OUT2:=BOOL_IN1; **)
(* assign - Stmt *)
LD BOOL_IN1
ST BOOL_OUT2
(** end_if; **)
(* if - End *)
ODK_END_IF_000000000000002:
JMP ODK_END_IF_000000000000001
(** end_if; **)
(* if - End *)
ODK_SKIP_000000000000001_000000000000001:
ODK_END_IF_000000000000001:
(** **)
(** if CM =1 then {*����ģʽ*} **)
(* if - Cond *)
LD CM
EQ 1
JMPCN ODK_SKIP_000000000000003_000000000000001
(* then - Stmts *)
(** {*����Ⱥ�ء�--������Ⱥ��*} **)
(** if BOOL_IN1<>BOOL_TEMP1 then {*����Ⱥ�ء�-- ����Ⱥ��*} **)
(* if - Cond *)
LD BOOL_IN1
NE BOOL_TEMP1
JMPCN ODK_SKIP_000000000000004_000000000000001
(* then - Stmts *)
(** BOOL_OUT1:=BOOL_IN1; **)
(* assign - Stmt *)
LD BOOL_IN1
ST BOOL_OUT1
(** BOOL_OUT2:=BOOL_IN1; **)
(* assign - Stmt *)
LD BOOL_IN1
ST BOOL_OUT2
JMP ODK_END_IF_000000000000004
(** elsif BOOL_IN2<>BOOL_TEMP2 then {*����Ⱥ�� --������Ⱥ��*} **)
(* elseif - Cond *)
ODK_SKIP_000000000000004_000000000000001:
LD BOOL_IN2
NE BOOL_TEMP2
JMPCN ODK_SKIP_000000000000004_000000000000002
(* elsif - Stmts *)
(** BOOL_OUT1:=BOOL_IN2; **)
(* assign - Stmt *)
LD BOOL_IN2
ST BOOL_OUT1
(** BOOL_OUT2:=BOOL_IN2; **)
(* assign - Stmt *)
LD BOOL_IN2
ST BOOL_OUT2
JMP ODK_END_IF_000000000000004
(** end_if; **)
(* if - End *)
ODK_SKIP_000000000000004_000000000000002:
ODK_END_IF_000000000000004:
JMP ODK_END_IF_000000000000003
(** end_if; **)
(* if - End *)
ODK_SKIP_000000000000003_000000000000001:
ODK_END_IF_000000000000003:
(** **)
(** BOOL_TEMP0:=BOOL_IN0; **)
(* assign - Stmt *)
LD BOOL_IN0
ST BOOL_TEMP0
(** BOOL_TEMP1:=BOOL_IN1; **)
(* assign - Stmt *)
LD BOOL_IN1
ST BOOL_TEMP1
(** BOOL_TEMP2:=BOOL_IN2; **)
(* assign - Stmt *)
LD BOOL_IN2
ST BOOL_TEMP2
(** **)
(** if CM =0 then **)
(* if - Cond *)
LD CM
EQ 0
JMPCN ODK_SKIP_000000000000005_000000000000001
(* then - Stmts *)
(** REAL_OUT1:=REAL_IN1; **)
(* assign - Stmt *)
LD REAL_IN1
ST REAL_OUT1
(** REAL_OUT2:=REAL_IN1; **)
(* assign - Stmt *)
LD REAL_IN1
ST REAL_OUT2
JMP ODK_END_IF_000000000000005
(** end_if; **)
(* if - End *)
ODK_SKIP_000000000000005_000000000000001:
ODK_END_IF_000000000000005:
(** **)
(** **)
(** if CM =1 then **)
(* if - Cond *)
LD CM
EQ 1
JMPCN ODK_SKIP_000000000000006_000000000000001
(* then - Stmts *)
(** if REAL_IN1<>REAL_TEMP1 then **)
(* if - Cond *)
LD REAL_IN1
NE REAL_TEMP1
JMPCN ODK_SKIP_000000000000007_000000000000001
(* then - Stmts *)
(** REAL_OUT1:=REAL_IN1; **)
(* assign - Stmt *)
LD REAL_IN1
ST REAL_OUT1
(** REAL_OUT2:=REAL_IN1; **)
(* assign - Stmt *)
LD REAL_IN1
ST REAL_OUT2
JMP ODK_END_IF_000000000000007
(** elsif REAL_IN2<>REAL_TEMP2 then **)
(* elseif - Cond *)
ODK_SKIP_000000000000007_000000000000001:
LD REAL_IN2
NE REAL_TEMP2
JMPCN ODK_SKIP_000000000000007_000000000000002
(* elsif - Stmts *)
(** REAL_OUT1:=REAL_IN2; **)
(* assign - Stmt *)
LD REAL_IN2
ST REAL_OUT1
(** REAL_OUT2:=REAL_IN2; **)
(* assign - Stmt *)
LD REAL_IN2
ST REAL_OUT2
JMP ODK_END_IF_000000000000007
(** end_if; **)
(* if - End *)
ODK_SKIP_000000000000007_000000000000002:
ODK_END_IF_000000000000007:
JMP ODK_END_IF_000000000000006
(** end_if; **)
(* if - End *)
ODK_SKIP_000000000000006_000000000000001:
ODK_END_IF_000000000000006:
(** **)
(** REAL_TEMP1:=REAL_IN1; **)
(* assign - Stmt *)
LD REAL_IN1
ST REAL_TEMP1
(** REAL_TEMP2:=REAL_IN2; **)
(* assign - Stmt *)
LD REAL_IN2
ST REAL_TEMP2
(** **)
(** if CM =0 then **)
(* if - Cond *)
LD CM
EQ 0
JMPCN ODK_SKIP_000000000000008_000000000000001
(* then - Stmts *)
(** INT_OUT1:=INT_IN1; **)
(* assign - Stmt *)
LD INT_IN1
ST INT_OUT1
(** INT_OUT2:=INT_IN1; **)
(* assign - Stmt *)
LD INT_IN1
ST INT_OUT2
JMP ODK_END_IF_000000000000008
(** end_if; **)
(* if - End *)
ODK_SKIP_000000000000008_000000000000001:
ODK_END_IF_000000000000008:
(** **)
(** if CM =1 then **)
(* if - Cond *)
LD CM
EQ 1
JMPCN ODK_SKIP_000000000000009_000000000000001
(* then - Stmts *)
(** if INT_IN1<>INT_TEMP1 then **)
(* if - Cond *)
LD INT_IN1
NE INT_TEMP1
JMPCN ODK_SKIP_00000000000000A_000000000000001
(* then - Stmts *)
(** INT_OUT1:=INT_IN1; **)
(* assign - Stmt *)
LD INT_IN1
ST INT_OUT1
(** INT_OUT2:=INT_IN1; **)
(* assign - Stmt *)
LD INT_IN1
ST INT_OUT2
JMP ODK_END_IF_00000000000000A
(** elsif INT_IN2<>INT_TEMP2 then **)
(* elseif - Cond *)
ODK_SKIP_00000000000000A_000000000000001:
LD INT_IN2
NE INT_TEMP2
JMPCN ODK_SKIP_00000000000000A_000000000000002
(* elsif - Stmts *)
(** INT_OUT1:=INT_IN2; **)
(* assign - Stmt *)
LD INT_IN2
ST INT_OUT1
(** INT_OUT2:=INT_IN2; **)
(* assign - Stmt *)
LD INT_IN2
ST INT_OUT2
JMP ODK_END_IF_00000000000000A
(** end_if; **)
(* if - End *)
ODK_SKIP_00000000000000A_000000000000002:
ODK_END_IF_00000000000000A:
JMP ODK_END_IF_000000000000009
(** end_if; **)
(* if - End *)
ODK_SKIP_000000000000009_000000000000001:
ODK_END_IF_000000000000009:
(** **)
(** INT_TEMP1:=INT_IN1; **)
(* assign - Stmt *)
LD INT_IN1
ST INT_TEMP1
(** INT_TEMP2:=INT_IN2; **)
(* assign - Stmt *)
LD INT_IN2
ST INT_TEMP2
(** **)
END_FUNCTION_BLOCK