在西门子PLC中使用SCL语言编程的技巧

在西门子PLC中使用SCL语言编程的技巧前言：两年半前我就在工控网上发表了有关SCL编程的知识#lt;#lt;在S7300400型PLC中使用高级语言编程#gt;#gt;,但发表完后，即使我自己都从没有把任何使用SCL编写的程序用到实际控制中，当时的感觉是使用SCL编程到处受限，没有STL语言灵活和强大。直到最近使用施耐德的Unity软件编程，并使用这种已经国际标准化的文本语言（等同于西门子的SCL语言），才体会到它的优点：#lt;1#gt;、程序容易阅读，便于诊断和维护；#lt;2#gt;、程序容易在不同厂家之间的PLC之间转换。西门子的STL语言是强大，但难于阅读，编写程序也需要异常小心，其最强大的可能是它的寄存器寻址（类似于一些计算机高级语言中的地址指针），SCL没有这个功能，那就多费一些程序代码来实现同样的功能，程序是否优秀更应该看重程序的架构和提高程序生产效率的标准化，好的PLC程序不应该只有自己明白，而是让更多的人明白。 在西门子PLC中使用SCL语言的场合一般是编写标准功能块FB,其编程方式和西门子的其他编程语言，如梯形图Lad、语句表STL是完全不同的，同时为了实现程序的国际标准化，即为了方便的将程序代码移植到不同厂家的PLC系统上，尽量不要在SCL中使用西门子独有的功能块。 1、 在FB块中使用结构 编写FB块的准则，就是其使用的内部变量尽量与外部隔离，除了像PLC的新启动/重启动标志，以及一些方波/脉冲波等全局变量可以在FB块中使用外，其他的任何全局变量都不应该在FB内部使用，即使是自定义结构也应该在FB中单独定义，在FB块中使用结构应该在静态类型变量中定义，如下： VAR / Static Variables IM:STRUCT /Data structure of Internal Flags H1_AFCountImp:BOOL:=False; / Aux Flag Counter Impulse H1_CountImp:BOOL:=False; / Counter Impulse H1_ELCountMV:BOOL:=False; / Endless Counter Maximum Value END_STRUCT; /other data structure END_VAR 在使用这些结构时，可以按照如下方式： IM. H1_CountImp:=Imp; 2、 在SCL中替代Set/Reset指令的方法 SCL中不存在Set/Reset指令，或者说也没有必要使用。在SCL中，不使用排他条件Else的条件语句就是一个Set/Reset指令。如下编程： IF THEN Variable name:=1; END_IF; 其等同于： (S) 若加上Else条件，如下： IF THEN Variable name:=1; ELSE Variable name:=0; END_IF; 则等同于： ( ) 一条完整的包含置位和复位的语句可以使用如下方式编程： IF THEN Variable name:=1; END_IF; IF THEN Variable name:=0; END_IF; 其等效于SR指令，若将上面的两个条件语句的先后次序颠倒一下，则等效于RS指令。 3、 简化程序指令 #lt;1#gt;、尽量使用赋值语句替代那些不用于SR/RS指令的BOOL型赋值条件语句，如下： IF fnAdd #amp;(button=false) THEN pus1:=true; ELSE pus1:=false; END_IF; 其等效于pus1:= fnAdd #amp;(NOT button),这样使程序看起来更加简洁和容易阅读。 #lt;2#gt;、对于非BOOL型赋值语句则不能这如上简化，而是可以通过SEL函数实现： IF fnAdd #amp;(button=false) THEN pus1:=value1; ELSE pus1:= value2; END_IF; 其等效于pus1:= SEL (G:= fnAdd #amp;(button=false), IN0:= value2,IN1:= value1); 使用该函数时注意两点：#lt;1#gt;、参数名不能省略；#lt;2#gt;、当选择条件G为TRUE时，选择后一个参数值IN1，为FALSE时，选择前一个参数值IN0,这点与计算机C语言等正好相反。 #lt;3#gt;、XOR指令有着比AND 和OR更为复杂的表达，能使用XOR的地方应该尽量使用 IF (condition1 AND (NOT condition2) OR (condition2 AND ( NOT condition1) THEN Result:=true; ELSE Result:=false; END_IF; 其等效于Result:= condition1 XOR condition2; XOR功能就是两条件不同输出TRUE，相同输出FALSE 4、 脉冲沿检测功能使用以下两条语句替代脉冲上升沿检测函数，譬如检测button_Input上升沿的代码如下： Puls:=button_Input #amp; (NOT button_Last); button_Last:= button_Input; 同样的下降沿脉冲检测如下： Puls:= ( NOT button_Input) #amp; button_Last; button_Last:= button_Input; 5、 编写脉冲发生器 波峰持续时间仅为一个PLC扫描周期的波形称为脉冲波，而波峰持续时间大于或等于两个PLC扫描周期的波形称为方波，脉冲波可用于计数、定时，方波可用于控制信号灯的闪烁输出，可以在西门子PLC的硬件配置中配置一个字节的各种时间的方波（波峰时间和波谷时间为1:1），假设FP_1Sec 为这个字节中1秒的方波，则： #lt;1#gt;、间隔1秒的脉冲波“Impls_1Sec” 如下编程： “Impls_1Sec” := FP_1Sec AND (NOT “Impls_1Sec_Aux”); “Impls_1Sec_Aux”:= FP_1Sec ; #lt;2#gt;、间隔10秒的脉冲波“Impls_10Sec” 如下编程： IF (“Impls_10Sec” ) THEN Count_ Actual:=0; “Impls_10Sec”:=0; ELSE IF (“Impls_1Sec” ) THEN Count_ Actual:= Count _ Actual 1; END_IF; “Impls_10Sec”:= Count_ Actual#gt;=10; END_IF; Count_ Actual的初始值为0，同时当系统新启动时，也需将其设为零。间隔更长时间的脉冲波编程都可以按照上面的方式编程。 6、尽量使用编程计数功能来替代定时器功能，这样使程序更可靠和易于阅读假设Input_Condition为输入，Output_Delay为通过定时处理后的输出，Timer_Setpoint为时间设定点，Timer_Actual为当前时间计数的实际值，“Impls_1Sec” 为系统编程产生的1秒脉冲。 #lt;1#gt;、在输入条件满足的情况下，延时输出的定时器： IF (NOT Input_Condition) THEN Timer_Actual:= 0; Output_Delay:= 0; ELSE IF (“Impls_1Sec” AND NOT Output_Delay) THEN Timer_ Actual:= Timer_ Actual 1; END_IF; Output_Delay:= Timer_Actual #gt;= Timer_Setpoint; END_IF; #lt;2#gt;、有记忆的延时输出定时器，即在延时过程中，若输入条件终止，不影响延时，这种 定时器必须使用其它的信号复位。 IF Input_Condition THEN Output_Aux:=1; END_IF; IF (NOT Output_Aux) THEN Timer_Actual:= 0; Output_Delay:=0； ELSE IF (“Impls_1Sec” AND NOT Output_Delay) THEN Timer_ Actual:= Timer_ Actual 1; END_IF; Output_Delay:= Timer_Actual #gt;= Timer_Setpoint; END_IF; 若想终止Output_Delay的输出，必须在后面追加一条条件语句，用于复位Output_Aux #lt;3#gt;、立即输出，延时断开的定时器 IF Input_Condition THEN Timer_Actual:= 0; Output_Aux:= 0; Output_Delay:=1; /立即输出 ELSE IF (“Impls_1Sec” AND NOT Output_Aux) THEN Timer_ Actual:= Timer_ Actual 1; END_IF; Output_Aux:= Timer_Actual #gt;= Timer_Setpoint; END_IF; IF Output_Aux THEN Output_Delay:=0; /延时断开 END_IF; #lt;4#gt;、在检测到一个上升沿脉冲后，立即输出，并开始计时，在 时间到达后断开。 IF Input_Condition THEN Output_Aux:=1; END_IF; IF (NOT Output_Aux) THEN Timer_Actual:= 0; Timer_Arrived := 0; ELSE IF (NOT Timer_ Arrived AND “Impls_1Sec” ) THEN Timer_Actual:= Timer_Actual 1; END_IF; Timer_ Arrived := Timer_Actual #gt;= Timer_Setpoint; END_IF; IF Timer_ Arrived THEN Output_Aux:=0; END_IF; Output_Delay:= Output_Aux; 通过以上的编程方式可以实现任何定时器功能，而代码却可以为不同的PLC系统所使用。 7、使用编程计数功能来替代计数器在SCL语言中使用计数功能是最为简单的，其关键是必须首先对输入进行脉冲检测假设Input_Imp为输入脉冲，CountImp为输入脉冲检测,Counter为计数值，Factor为计数因子（更详细点就是每来一次脉冲，计数值增加多少）。 (*- Create Impulse (Impulse Evaluation) -*) CountImp:= Input_Imp AND (NOT CountImp_Old); CountImp_Old:= Input_Imp; (*- Counter -*) IF CountImp THEN Counter:= Counter Factor; END_IF; 一个完整的计数程序应该还有计数器复位功能以及计数值上限检测条件（以防止计数值溢出）。 8、 新故障/新警告的检测 一个完整的FB块应该能够检测故障/警告，以及新故障/新警告，假设Input1, Input2 Inputn对应故障的输入（有信号表示OK），Fault1, Fault2 Faultn对应故障位，NFault1, NFault2NFaultn对应新故障位，Flt和NFlt分别对应综合的故障和新故障，Ackn对应故障应答输入，为常开点，Mute对应新故障消除输入（或者称为蜂鸣器沉寂）,为常开点： Fault1:= NOT Input1 OR (Fault1 AND NOT Ackn); NFault1:= Fault1 AND (Mute OR NFault1); Fault2:= NOT Input2 OR (Fault2 AND NOT Ackn); NFault2:= F