Codesys——小灯顺序点亮（case语句）

以下内容纯属个人理解，如有错误欢迎指正。

本篇主要是关于ST编程CASE语句的一个小案例，是顺序亮灯一个小程序。

控制要求:
按下启动按钮 (10.0)，绿灯 (Q0.0)亮3S，然后红灯 (Q0.1)亮 2S，接着红绿灯同时 亮5S 后灭。

在这次程序编写的过程中使用到了一个MOVE指令，下面简单对该指令做个介绍。

MOVE指令

 上图中的指令使用案例： A2 ：= MOVE（A1）；的功能就是将A1的值传送到A2.

完整程序如下：

/********************变量声明************************/
PROGRAM PLC_PRG
VAR
	BUTTON_ON: BOOL;
	BUTTON_OFF: BOOL;
	TEMP0: BOOL;
	STEP: INT;
	LED1: BOOL;
	LED2: BOOL;
	
	TON_0_PT: TIME:=T#3S;
	TON_1_PT: TIME:=T#2S;
	TON_2_PT: TIME:=T#5S;
	TON_0_ET: TIME;
	TON_1_ET: TIME;
	TON_2_ET: TIME;
	TON_0_Q: BOOL;
	TON_1_Q: BOOL;
	TON_2_Q: BOOL;
	
	TON_0: TON;
	TON_1: TON;
	TON_2: TON;
END_VAR
/********************程序编写************************/
TEMP0 := (BUTTON_ON OR TEMP0) AND (NOT BUTTON_OFF) AND (NOT TON_2_Q);
IF TEMP0 THEN
	STEP := MOVE(1);    //第一步:LED1亮3S
	TON_0(IN:=TEMP0 , PT:=TON_0_PT , 
		  Q=>TON_0_Q , ET=>TON_0_ET );
	IF TON_0_Q THEN
		STEP := MOVE(2);  //第二步:LED2亮2S
	END_IF
	TON_1(IN:=TON_0_Q , PT:=TON_1_PT , 
		  Q=>TON_1_Q , ET=>TON_1_ET );
	IF TON_1_Q THEN
		TON_0_Q := FALSE;
	    STEP := MOVE(3);  //第三步:LED1、LED2同时亮5S
	END_IF
	TON_2(IN:=TON_1_Q , PT:=TON_2_PT , 
		  Q=>TON_2_Q , ET=>TON_2_ET );
	IF TON_2_Q THEN
		    TON_1_Q := FALSE;
			STEP := MOVE(4);  //第四步:LED1、LED2同时熄灭
	END_IF
	CASE STEP OF
		1 : 
		LED1 := TRUE;
		LED2 := FALSE;
		2 :
		LED1 := FALSE;
		LED2 := TRUE;
		3 :
		LED1 := TRUE;
		LED2 := TRUE;
		4 :
		LED1 := FALSE;
		LED2 := FALSE;
	END_CASE

END_IF