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.
287 lines
13 KiB
287 lines
13 KiB
PROGRAM TEST
|
|
VAR_EXTERNAL
|
|
|
|
END_VAR
|
|
|
|
VAR_GLOBAL
|
|
|
|
END_VAR
|
|
|
|
VAR
|
|
|
|
toncycle :ton;
|
|
cycle :bool;
|
|
NetVarSend_Slave : NetVarSend;
|
|
en_word1 at%m6000.0 : udint;
|
|
b_en01 at%m6000.1 : bool;
|
|
b_en02 at%m6000.2 : bool;
|
|
b_en03 at%m6000.3 : bool;
|
|
b_en04 at%m6000.4 : bool;
|
|
b_en05 at%m6000.5 : bool;
|
|
b_en06 at%m6000.6 : bool;
|
|
b_en07 at%m6000.7 : bool;
|
|
b_en08 at%m6001.0 : bool;
|
|
b_en09 at%m6001.1 : bool;
|
|
b_en10 at%m6001.2 : bool;
|
|
b_en11 at%m6001.3 : bool;
|
|
b_en12 at%m6001.4 : bool;
|
|
b_en13 at%m6001.5 : bool;
|
|
b_en14 at%m6001.6 : bool;
|
|
b_en15 at%m6001.7 : bool;
|
|
b_en16 at%m6002.0 : bool;
|
|
b_en17 at%m6002.1 : bool;
|
|
b_en18 at%m6002.2 : bool;
|
|
b_en19 at%m6002.3 : bool;
|
|
b_en20 at%m6002.4 : bool;
|
|
b_en21 at%m6002.5 : bool;
|
|
b_en22 at%m6002.6 : bool;
|
|
|
|
END_VAR
|
|
(*
|
|
cycle:=not toncycle.q;
|
|
toncycle(IN:=cycle,PT:=t#10ms);
|
|
if en_word1=0 then en_word1:=1;end_if;
|
|
if toncycle.q=1 then en_word1:=en_word1*2;end_if;
|
|
if toncycle.q=1 then en_word1:=en_word1*2;end_if;
|
|
if toncycle.q then
|
|
NetVarSend_Slave(EN := b_en01, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 11, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en02, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 12, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en03, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 13, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en04, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 14, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en05, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 15, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en06, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 16, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en07, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 17, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en08, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 18, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en09, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 19, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en10, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 20, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en11, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 21, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en12, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 22, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en13, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 23, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en14, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 24, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en15, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 25, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en16, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 26, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en17, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 27, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en18, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 28, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en19, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 29, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en20, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 30, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en21, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 31, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
NetVarSend_Slave(EN := b_en22, IP1 := 192, IP2 := 168, IP3 := 100, IP4 := 32, ADDR_LOCAL := 4000, ADDR_REMOTE := 5000, NUM := 300);
|
|
end_if;
|
|
*)
|
|
|
|
|
|
RNQAHU00000_CM :=LAHU00000_CM ;
|
|
RNQFCU00000_CM :=LFCU00000_CM ;
|
|
RNQLCB00000_CM :=LLCB00000_CM ;
|
|
RNQEAF00000_CM :=LEAF00000_CM ;
|
|
RNQPAU00000_CM :=LPAU00000_CM ;
|
|
RNQFMJ00000_CM :=LFMJ00000_CM ;
|
|
RNQCHR00000_CM :=LCHR00000_CM ;
|
|
|
|
RNQAHUB3X00_TSET :=LAHUB3X00_TSET ;
|
|
RNQAHUB2X00_TSET :=LAHUB2X00_TSET ;
|
|
RNQAHUB1X00_TSET :=LAHUB1X00_TSET ;
|
|
RNQAHU01X00_TSET :=LAHU01X00_TSET ;
|
|
RNQAHU02X00_TSET :=LAHU02X00_TSET ;
|
|
RNQAHU03X00_TSET :=LAHU03X00_TSET ;
|
|
RNQAHU04X00_TSET :=LAHU04X00_TSET ;
|
|
RNQAHU05X00_TSET :=LAHU05X00_TSET ;
|
|
RNQAHU06X00_TSET :=LAHU06X00_TSET ;
|
|
RNQAHU07X00_TSET :=LAHU07X00_TSET ;
|
|
RNQAHU08X00_TSET :=LAHU08X00_TSET ;
|
|
RNQAHUB3X00_SM :=LAHUB3X00_SM ;
|
|
RNQAHUB2X00_SM :=LAHUB2X00_SM ;
|
|
RNQAHUB1X00_SM :=LAHUB1X00_SM ;
|
|
RNQAHU01X00_SM :=LAHU01X00_SM ;
|
|
RNQAHU02X00_SM :=LAHU02X00_SM ;
|
|
RNQAHU03X00_SM :=LAHU03X00_SM ;
|
|
RNQAHU04X00_SM :=LAHU04X00_SM ;
|
|
RNQAHU05X00_SM :=LAHU05X00_SM ;
|
|
RNQAHU06X00_SM :=LAHU06X00_SM ;
|
|
RNQAHU07X00_SM :=LAHU07X00_SM ;
|
|
RNQAHU08X00_SM :=LAHU08X00_SM ;
|
|
RNQAHUB3X00_PC :=LAHUB3X00_C ;
|
|
RNQAHUB2X00_PC :=LAHUB2X00_C ;
|
|
RNQAHUB1X00_PC :=LAHUB1X00_C ;
|
|
RNQAHU01X00_PC :=LAHU01X00_C ;
|
|
RNQAHU02X00_PC :=LAHU02X00_C ;
|
|
RNQAHU03X00_PC :=LAHU03X00_C ;
|
|
RNQAHU04X00_PC :=LAHU04X00_C ;
|
|
RNQAHU05X00_PC :=LAHU05X00_C ;
|
|
RNQAHU06X00_PC :=LAHU06X00_C ;
|
|
RNQAHU07X00_PC :=LAHU07X00_C ;
|
|
RNQAHU08X00_PC :=LAHU08X00_C ;
|
|
RNQFCUB3X00_TSET :=LFCUB3X00_TSET ;
|
|
RNQFCUB2X00_TSET :=LFCUB2X00_TSET ;
|
|
RNQFCUB1X00_TSET :=LFCUB1X00_TSET ;
|
|
RNQFCU01X00_TSET :=LFCU01X00_TSET ;
|
|
RNQFCU02X00_TSET :=LFCU02X00_TSET ;
|
|
RNQFCU03X00_TSET :=LFCU03X00_TSET ;
|
|
RNQFCU04X00_TSET :=LFCU04X00_TSET ;
|
|
RNQFCU05X00_TSET :=LFCU05X00_TSET ;
|
|
RNQFCU06X00_TSET :=LFCU06X00_TSET ;
|
|
RNQFCU07X00_TSET :=LFCU07X00_TSET ;
|
|
RNQFCU08X00_TSET :=LFCU08X00_TSET ;
|
|
RNQFCUB3X00_SM :=LFCUB3X00_SM ;
|
|
RNQFCUB2X00_SM :=LFCUB2X00_SM ;
|
|
RNQFCUB1X00_SM :=LFCUB1X00_SM ;
|
|
RNQFCU01X00_SM :=LFCU01X00_SM ;
|
|
RNQFCU02X00_SM :=LFCU02X00_SM ;
|
|
RNQFCU03X00_SM :=LFCU03X00_SM ;
|
|
RNQFCU04X00_SM :=LFCU04X00_SM ;
|
|
RNQFCU05X00_SM :=LFCU05X00_SM ;
|
|
RNQFCU06X00_SM :=LFCU06X00_SM ;
|
|
RNQFCU07X00_SM :=LFCU07X00_SM ;
|
|
RNQFCU08X00_SM :=LFCU08X00_SM ;
|
|
RNQFCUB3X00_PC :=LFCUB3X00_C ;
|
|
RNQFCUB2X00_PC :=LFCUB2X00_C ;
|
|
RNQFCUB1X00_PC :=LFCUB1X00_C ;
|
|
RNQFCU01X00_PC :=LFCU01X00_C ;
|
|
RNQFCU02X00_PC :=LFCU02X00_C ;
|
|
RNQFCU03X00_PC :=LFCU03X00_C ;
|
|
RNQFCU04X00_PC :=LFCU04X00_C ;
|
|
RNQFCU05X00_PC :=LFCU05X00_C ;
|
|
RNQFCU06X00_PC :=LFCU06X00_C ;
|
|
RNQFCU07X00_PC :=LFCU07X00_C ;
|
|
RNQFCU08X00_PC :=LFCU08X00_C ;(*
|
|
RNQLCBB3X0A_C :=LLCBB3X0A_C ;
|
|
RNQLCBB2X0A_C :=LLCBB2X0A_C ;
|
|
RNQLCBB1X0A_C :=LLCBB1X0A_C ;
|
|
RNQLCB01X0A_C :=LLCB01X0A_C ;
|
|
RNQLCB02X0A_C :=LLCB02X0A_C ;
|
|
RNQLCB03X0A_C :=LLCB03X0A_C ;
|
|
RNQLCB04X0A_C :=LLCB04X0A_C ;
|
|
RNQLCB05X0A_C :=LLCB05X0A_C ;
|
|
RNQLCB06X0A_C :=LLCB06X0A_C ;
|
|
RNQLCB07X0A_C :=LLCB07X0A_C ;
|
|
RNQLCB08X0A_C :=LLCB08X0A_C ;
|
|
RNQLCBB3X0B_C :=LLCBB3X0B_C ;
|
|
RNQLCBB2X0B_C :=LLCBB2X0B_C ;
|
|
RNQLCBB1X0B_C :=LLCBB1X0B_C ;
|
|
RNQLCB01X0B_C :=LLCB01X0B_C ;
|
|
RNQLCB02X0B_C :=LLCB02X0B_C ;
|
|
RNQLCB03X0B_C :=LLCB03X0B_C ;
|
|
RNQLCB04X0B_C :=LLCB04X0B_C ;
|
|
RNQLCB05X0B_C :=LLCB05X0B_C ;
|
|
RNQLCB06X0B_C :=LLCB06X0B_C ;
|
|
RNQLCB07X0B_C :=LLCB07X0B_C ;
|
|
RNQLCB08X0B_C :=LLCB08X0B_C ;
|
|
RNQLCBB3X0C_C :=LLCBB3X0C_C ;
|
|
RNQLCBB2X0C_C :=LLCBB2X0C_C ;
|
|
RNQLCBB1X0C_C :=LLCBB1X0C_C ;
|
|
RNQLCB01X0C_C :=LLCB01X0C_C ;
|
|
RNQLCB02X0C_C :=LLCB02X0C_C ;
|
|
RNQLCB03X0C_C :=LLCB03X0C_C ;
|
|
RNQLCB04X0C_C :=LLCB04X0C_C ;
|
|
RNQLCB05X0C_C :=LLCB05X0C_C ;
|
|
RNQLCB06X0C_C :=LLCB06X0C_C ;
|
|
RNQLCB07X0C_C :=LLCB07X0C_C ;
|
|
RNQLCB08X0C_C :=LLCB08X0C_C ;
|
|
RNQLCBB3X0D_C :=LLCBB3X0D_C ;
|
|
RNQLCBB2X0D_C :=LLCBB2X0D_C ;
|
|
RNQLCBB1X0D_C :=LLCBB1X0D_C ;
|
|
RNQLCB01X0D_C :=LLCB01X0D_C ;
|
|
RNQLCB02X0D_C :=LLCB02X0D_C ;
|
|
RNQLCB03X0D_C :=LLCB03X0D_C ;
|
|
RNQLCB04X0D_C :=LLCB04X0D_C ;
|
|
RNQLCB05X0D_C :=LLCB05X0D_C ;
|
|
RNQLCB06X0D_C :=LLCB06X0D_C ;
|
|
RNQLCB07X0D_C :=LLCB07X0D_C ;
|
|
RNQLCB08X0D_C :=LLCB08X0D_C ;
|
|
RNQLCBB3X0E_C :=LLCBB3X0E_C ;
|
|
RNQLCBB2X0E_C :=LLCBB2X0E_C ;
|
|
RNQLCBB1X0E_C :=LLCBB1X0E_C ;
|
|
RNQLCB01X0E_C :=LLCB01X0E_C ;
|
|
RNQLCB02X0E_C :=LLCB02X0E_C ;
|
|
RNQLCB03X0E_C :=LLCB03X0E_C ;
|
|
RNQLCB04X0E_C :=LLCB04X0E_C ;
|
|
RNQLCB05X0E_C :=LLCB05X0E_C ;
|
|
RNQLCB06X0E_C :=LLCB06X0E_C ;
|
|
RNQLCB07X0E_C :=LLCB07X0E_C ;
|
|
RNQLCB08X0E_C :=LLCB08X0E_C ;
|
|
RNQLCBB3X0F_C :=LLCBB3X0F_C ;
|
|
RNQLCBB2X0F_C :=LLCBB2X0F_C ;
|
|
RNQLCBB1X0F_C :=LLCBB1X0F_C ;
|
|
RNQLCB01X0F_C :=LLCB01X0F_C ;
|
|
RNQLCB02X0F_C :=LLCB02X0F_C ;
|
|
RNQLCB03X0F_C :=LLCB03X0F_C ;
|
|
RNQLCB04X0F_C :=LLCB04X0F_C ;
|
|
RNQLCB05X0F_C :=LLCB05X0F_C ;
|
|
RNQLCB06X0F_C :=LLCB06X0F_C ;
|
|
RNQLCB07X0F_C :=LLCB07X0F_C ;
|
|
RNQLCB08X0F_C :=LLCB08X0F_C ;
|
|
RNQLCBB3X0G_C :=LLCBB3X0G_C ;
|
|
RNQLCBB2X0G_C :=LLCBB2X0G_C ;
|
|
RNQLCBB1X0G_C :=LLCBB1X0G_C ;
|
|
RNQLCB01X0G_C :=LLCB01X0G_C ;
|
|
RNQLCB02X0G_C :=LLCB02X0G_C ;
|
|
RNQLCB03X0G_C :=LLCB03X0G_C ;
|
|
RNQLCB04X0G_C :=LLCB04X0G_C ;
|
|
RNQLCB05X0G_C :=LLCB05X0G_C ;
|
|
RNQLCB06X0G_C :=LLCB06X0G_C ;
|
|
RNQLCB07X0G_C :=LLCB07X0G_C ;
|
|
RNQLCB08X0G_C :=LLCB08X0G_C ;
|
|
RNQLCBB3X0H_C :=LLCBB3X0H_C ;
|
|
RNQLCBB2X0H_C :=LLCBB2X0H_C ;
|
|
RNQLCBB1X0H_C :=LLCBB1X0H_C ;
|
|
RNQLCB01X0H_C :=LLCB01X0H_C ;
|
|
RNQLCB02X0H_C :=LLCB02X0H_C ;
|
|
RNQLCB03X0H_C :=LLCB03X0H_C ;
|
|
RNQLCB04X0H_C :=LLCB04X0H_C ;
|
|
RNQLCB05X0H_C :=LLCB05X0H_C ;
|
|
RNQLCB06X0H_C :=LLCB06X0H_C ;
|
|
RNQLCB07X0H_C :=LLCB07X0H_C ;
|
|
RNQLCB08X0H_C :=LLCB08X0H_C ;*)
|
|
RNQPAU05X00_TSET :=LPAU05X00_TSET ;
|
|
RNQPAU06X00_TSET :=LPAU06X00_TSET ;
|
|
RNQPAU07X00_TSET :=LPAU07X00_TSET ;
|
|
RNQPAU08X00_TSET :=LPAU08X00_TSET ;
|
|
RNQPAU09X00_TSET :=LPAU09X00_TSET ;
|
|
RNQPAU05X00_SM :=LPAU05X00_SM ;
|
|
RNQPAU06X00_SM :=LPAU06X00_SM ;
|
|
RNQPAU07X00_SM :=LPAU07X00_SM ;
|
|
RNQPAU08X00_SM :=LPAU08X00_SM ;
|
|
RNQPAU09X00_SM :=LPAU09X00_SM ;
|
|
RNQPAU05X00_PC :=LPAU05X00_PC ;
|
|
RNQPAU06X00_PC :=LPAU06X00_C ;
|
|
RNQPAU07X00_PC :=LPAU07X00_C ;
|
|
RNQPAU08X00_PC :=LPAU08X00_C ;
|
|
RNQPAU09X00_PC :=LPAU09X00_C ;
|
|
RNQSAFB3X00_PC :=LSAFB3X00_C ;
|
|
RNQSAFB2X00_PC :=LSAFB2X00_C ;
|
|
RNQSAFB1X00_PC :=LSAFB1X00_C ;
|
|
RNQSAF05X00_PC :=LSAF05X00_C ;
|
|
RNQSAF06X00_PC :=LSAF06X00_C ;
|
|
RNQSAF07X00_PC :=LSAF07X00_C ;
|
|
RNQSAF08X00_PC :=LSAF08X00_C ;
|
|
RNQSAF09X00_PC :=LSAF09X00_C ;
|
|
RNQEAFB3X00_PC :=LEAFB3X00_C ;
|
|
RNQEAFB2X00_PC :=LEAFB2X00_C ;
|
|
RNQEAFB1X00_PC :=LEAFB1X00_C ;
|
|
RNQEAF05X00_PC :=LEAF05X00_C ;
|
|
RNQEAF06X00_PC :=LEAF06X00_C ;
|
|
RNQEAF07X00_PC :=LEAF07X00_C ;
|
|
RNQEAF08X00_PC :=LEAF08X00_C ;
|
|
RNQEAF09X00_PC :=LEAF09X00_C ;
|
|
RNQFMJB3X00_PC :=LFMJB3X00_C ;
|
|
RNQFMJB2X00_PC :=LFMJB2X00_C ;
|
|
RNQFMJB1X00_PC :=LFMJB1X00_C ;
|
|
RNQFMJ01X00_PC :=LFMJ01X00_C ;
|
|
RNQFMJ02X00_PC :=LFMJ02X00_C ;
|
|
RNQFMJ03X00_PC :=LFMJ03X00_C ;
|
|
RNQFMJ04X00_PC :=LFMJ04X00_C ;
|
|
RNQFMJ05X00_PC :=LFMJ05X00_C ;
|
|
RNQFMJ06X00_PC :=LFMJ06X00_C ;
|
|
RNQFMJ07X00_PC :=LFMJ07X00_C ;
|
|
RNQFMJ08X00_PC :=LFMJ08X00_C ;
|
|
RNQSMJB3X00_PC :=LSMJB3X00_C ;
|
|
RNQSMJB2X00_PC :=LSMJB2X00_C ;
|
|
RNQSMJB1X00_PC :=LSMJB1X00_C ;
|
|
RNQSMJ01X00_PC :=LSMJ01X00_C ;
|
|
RNQSMJ02X00_PC :=LSMJ02X00_C ;
|
|
RNQSMJ03X00_PC :=LSMJ03X00_C ;
|
|
RNQSMJ04X00_PC :=LSMJ04X00_C ;
|
|
RNQSMJ05X00_PC :=LSMJ05X00_C ;
|
|
RNQSMJ06X00_PC :=LSMJ06X00_C ;
|
|
RNQSMJ07X00_PC :=LSMJ07X00_C ;
|
|
RNQSMJ08X00_PC :=LSMJ08X00_C ;
END_PROGRAM
|