[r9]: / branches / OscarBallast / Main_Escape_PLC / Plc Logic / Application / Function Blocks / Puzzle / BalastTankPuzzleStateMachine / SendCommand / svnobj  Maximize  Restore  History

Download this file

14 lines (12 with data), 1.6 kB 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
METHOD SendCommand : BOOL
VAR_INPUT
	Command : CommandType;
	Value : STRING;	
IF NOT Client.bReadyFromPLC THEN
	Client.sCommandFromPLC:= Value;
	Client.iCommandFromPLC:= Command;
	Client.bReadyFromPLC:= TRUE;
	
	SendCommand := TRUE;
ELSE	
	SendCommand := FALSE;
END_IF