; top

IF $ttt1 EQ X
	IF $ttt2 EQ X
		IF $ttt3 EQ X
		setenv tttstatus Player 1 Wins!!!
		setenv finished YES
		wait 4
		ENDIF
	ENDIF
ENDIF

; middle

IF $ttt4 EQ X
	IF $ttt5 EQ X
		IF $ttt6 EQ X
		setenv tttstatus Player 1 Wins!!!
		setenv finished YES
		wait 4
		ENDIF
	ENDIF
ENDIF

; bottom

IF $ttt7 EQ X
	IF $ttt8 EQ X
		IF $ttt9 EQ X
		setenv tttstatus Player 1 Wins!!!
		setenv finished YES
		wait 4
		ENDIF
	ENDIF
ENDIF

; left

IF $ttt1 EQ X
	IF $ttt4 EQ X
		IF $ttt7 EQ X
		setenv tttstatus Player 1 Wins!!!
		setenv finished YES
		wait 4
		ENDIF
	ENDIF
ENDIF

; middle

IF $ttt2 EQ X
	IF $ttt5 EQ X
		IF $ttt8 EQ X
		setenv tttstatus Player 1 Wins!!!
		setenv finished YES
		wait 4
		ENDIF
	ENDIF
ENDIF

; right

IF $ttt3 EQ X
	IF $ttt6 EQ X
		IF $ttt9 EQ X
		setenv tttstatus Player 1 Wins!!!
		setenv finished YES
		wait 4
		ENDIF
	ENDIF
ENDIF

; diag one

IF $ttt1 EQ X
	IF $ttt5 EQ X
		IF $ttt9 EQ X
		setenv tttstatus Player 1 Wins!!!
		setenv finished YES
		wait 4
		ENDIF
	ENDIF
ENDIF

; diag two

IF $ttt3 EQ X
	IF $ttt5 EQ X
		IF $ttt7 EQ X
		setenv tttstatus Player 1 Wins!!!
		setenv finished YES
		wait 4
		ENDIF
	ENDIF
ENDIF