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 Vision_game.ID := 0; Vision_game.Name := 'Vision_Game'; Vision_game.GUID := '203e6d01-4f48-4291-986c-42a7257623d7'; Vision_game.LockCommands[0]:= 'Hello'; Vision_game.KeyCommands[0]:= 'World'; Vision_game.LockCommands[1]:= 'Foo'; Vision_game.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(); Vision_game : PuzzleClient; // 203e6d01-4f48-4291-986c-42a7257623d7 puzzle : Vision_GameStateMachine; xAbort : BOOL; xActingStateComplete: BOOL; xClear : BOOL; xHold : BOOL; xReset : BOOL; xStart : BOOL; xStop : BOOL; xSuspend : BOOL; xUnHold : BOOL; xUnSuspend : BOOL; END_VAR |