[r62]: / branches / VisonGame2905 / Display_Escape_PLC / Plc Logic / Application / Function Blocks / Puzzle / VisionGameStateMachine / ParseMachine / svnobj  Maximize  Restore  History

Download this file

18 lines (15 with data), 1.9 kB 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
METHOD ParseMachine : BOOL
VAR_INPUT
	sMETH_InputString : STRING;
		parser(	sInputString := sMETH_InputString,
				xStart := TRUE,
			  	);
		
		sInstructionString := parser.sOutputString;
	
		IF parser.xDone THEN;
			xHide_Button3 := FALSE;
			IF xContinueScreen THEN;
				Client.ActualStep := Client.ActualStep + 10;
				parser.xStart := FALSE;
				xHide_Button3 := TRUE;
			END_IF
		END_IF