1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 | //---- Client init ----\\ IF NOT xInit THEN VisionGame.ID := 0; VisionGame.Name := 'VisionGame'; VisionGame.GUID := 'e5809357-3b9f-4ac8-a616-e82a19251630'; VisionGame.LockCommands[0]:= 'Hello'; VisionGame.KeyCommands[0]:= 'World'; VisionGame.LockCommands[1]:= 'Foo'; VisionGame.KeyCommands[1]:= 'Bar'; END_IF //---- UI handling ----\\ IF xAbort THEN puzzle.Abort(); IF xClear THEN puzzle.Clear(); IF xHold THEN puzzle.Hold(); IF xReset THEN puzzle.Reset(); IF xStart THEN puzzle.Start(); IF xStop THEN puzzle.Stop(); IF xSuspend THEN puzzle.Suspend(); IF xUnHold THEN puzzle.UnHold(); IF xUnSuspend THEN puzzle.UnSuspend(); VisionGame : PuzzleClient; // e5809357-3b9f-4ac8-a616-e82a19251630 puzzle : VisionGameStateMachine; xAbort : BOOL; xActingStateComplete: BOOL; xClear : BOOL; xHold : BOOL; xReset : BOOL; xStart : BOOL; xStop : BOOL; xSuspend : BOOL; xUnHold : BOOL; xUnSuspend : BOOL; END_VAR |