ORGANIZATION_BLOCK OB 1
TITLE = "Main Program Sweep (Cycle)"
//In network 1 the user see the easy handling with the control word 1 (CTW1) and
//the main frequency setpoint (NSETP_A)) over PROFIBUS communication from the
//VAT_1
//
VERSION : 0.1


VAR_TEMP
OB1_EV_CLASS : BYTE ; //Bits 0-3 = 1 (Coming event), Bits 4-7 = 1 (Event class 1)
OB1_SCAN_1 : BYTE ; //1 (Cold restart scan 1 of OB 1), 3 (Scan 2-n of OB 1)
OB1_PRIORITY : BYTE ; //Priority of OB Execution
OB1_OB_NUMBR : BYTE ; //1 (Organization block 1, OB1)
OB1_RESERVED_1 : BYTE ; //Reserved for system
OB1_RESERVED_2 : BYTE ; //Reserved for system
OB1_PREV_CYCLE : INT ; //Cycle time of previous OB1 scan (milliseconds)
OB1_MIN_CYCLE : INT ; //Minimum cycle time of OB1 (milliseconds)
OB1_MAX_CYCLE : INT ; //Maximum cycle time of OB1 (milliseconds)
OB1_DATE_TIME : DATE_AND_TIME ; //Date and time OB1 started
checksum : DWORD ;
END_VAR
BEGIN
NETWORK
TITLE =
//生成随机数
L MW 20;
INC 1;
L 81;
*I ;
L 23;
*I ;
ITD ;
DTR ;
L 3.141593e+000;
*R ;
RND ;
AW W#16#7FFF;
T MW 20;

NETWORK
TITLE =

A M 0.0;
FP M 11.0;
S M 10.0;

L MB 0;
L 0;
<>I ;
A M 10.0;
JCN _000;
L MB 0;
SLW 1;
L W#16#FF;
AW ;
T MB 0;
L 0;
==I ;
R M 10.0;
_000: NOP 0;
NETWORK
TITLE =

A M 0.1;
FP M 11.1;
= M 10.1;
JCN _001;
L MW 20;
L #OB1_PREV_CYCLE;
*I ;
L 30;
MOD ;
INC 1;
T MB 1;
_001: NOP 0;
A M 0.2;
FP M 11.2;
= M 10.2;
JCN _002;
L MW 20;
L #OB1_PREV_CYCLE;
*I ;
L 30;
MOD ;
INC 1;
T MB 2;
_002: NOP 0;
A M 0.3;
FP M 11.3;
= M 10.3;
JCN _003;
L MW 20;
L #OB1_PREV_CYCLE;
*I ;
L 30;
MOD ;
INC 1;
T MB 3;
_003: NOP 0;
A M 0.4;
FP M 11.4;
= M 10.4;
JCN _004;
L MW 20;
L #OB1_PREV_CYCLE;
*I ;
L 30;
MOD ;
INC 1;
T MB 4;
_004: NOP 0;

A M 0.5;
FP M 11.5;
= M 10.5;
JCN _005;
L MW 20;
L #OB1_PREV_CYCLE;
*I ;
L 30;
MOD ;
INC 1;
T MB 5;
_005: NOP 0;

A M 0.6;
FP M 11.6;
= M 10.6;
JCN _006;
L MW 20;
L #OB1_PREV_CYCLE;
*I ;
L 30;
MOD ;
INC 1;
T MB 6;
_006: NOP 0;

A M 0.7;
FP M 11.7;
= M 10.7;
JCN _007;
L MW 20;
L #OB1_PREV_CYCLE;
*I ;
L 30;
MOD ;
INC 1;
T MB 7;
_007: NOP 0;

NETWORK
TITLE =
//重号处理,不正确
L MB 1;
L MB 2;
*I ;
L MB 3;
*I ;
L MB 4;
*I ;
L MB 5;
*I ;
L MB 6;
*I ;
L MB 7;
*I ;
T #checksum;
L MB 1;
/I ;
L MB 1;
MOD ;
L 0;
<>I ;
JC _011;
A M 10.1;
JCN _011;
L #checksum;
L MB 1;
/I ;
L MB 1;
INC 1;
T MB 1;
*I ;
T #checksum;
_011: NOP 0;

L #checksum;
L MB 2;
/I ;
L MB 2;
MOD ;
L 0;
<>I ;
JC _012;
A M 10.2;
JCN _012;
L #checksum;
L MB 2;
/I ;
L MB 2;
INC 1;
T MB 2;
*I ;
T #checksum;
_012: NOP 0;


L #checksum;
L MB 3;
/I ;
L MB 3;
MOD ;
L 0;
<>I ;
JC _013;
A M 10.3;
JCN _013;
L #checksum;
L MB 3;
/I ;
L MB 3;
INC 1;
T MB 3;
*I ;
T #checksum;
_013: NOP 0;

L #checksum;
L MB 4;
/I ;
L MB 4;
MOD ;
L 0;
<>I ;
JC _014;
A M 10.4;
JCN _014;
L #checksum;
L MB 4;
/I ;
L MB 4;
INC 1;
T MB 4;
*I ;
T #checksum;
_014: NOP 0;

L #checksum;
L MB 5;
/I ;
L MB 5;
MOD ;
L 0;
<>I ;
JC _015;
A M 10.5;
JCN _015;
L #checksum;
L MB 5;
/I ;
L MB 5;
INC 1;
T MB 5;
*I ;
T #checksum;
_015: NOP 0;


L #checksum;
L MB 6;
/I ;
L MB 6;
MOD ;
L 0;
<>I ;
JC _016;
A M 10.6;
JCN _016;
L #checksum;
L MB 6;
/I ;
L MB 6;
INC 1;
T MB 6;
*I ;
T #checksum;
_016: NOP 0;

L #checksum;
L MB 1;
/I ;
L MB 1;
MOD ;
L 0;
<>I ;
JC _017;
A M 10.7;
JCN _017;
L #checksum;
L MB 7;
/I ;
L MB 7;
INC 1;
T MB 7;
*I ;
T #checksum;
_017: NOP 0;

END_ORGANIZATION_BLOCK