Minesweeper Hello, I'm back.
This is a game exactly like Minesweeper.
Press the arrow keys to move your selector thingy.
Press Clear when you think you have won.
Press Enter to chose a space.

``````:{16,16→dim([A]   //sorry for the long matrix :) Fixed
:For(W,1,20
:1→[A](randInt(1,8),randInt(1,16
:End
:ClrHome
:8→X
:4→Y
:While 1
:getKey→K
:If not([A](Y,X)=2)
:Output(Y,X," "
:X-(K=24 and X>1)+(K=26 and X<16)→X
:Y-(K=25 and Y>1)+(K=34 and Y<8)→Y
:Output(Y,X,"O
:If K=105 or [A](Y,X)=2
:Then
:0→G
:If X>1
:Then
:If [A](Y,X-1)=1
:G+1→G
:End
:If X<16
:Then
:If [A](Y,X+1)=1
:G+1→G
:End
:If Y>1
:Then
:If [A](Y-1,X-1)=1  //You might have to change Y-1 to Y+1, I can't remember
:G+1→G
:End
:If Y<8
:Then
:If [A](Y+1,X-1)=1  //You might have to change Y+1 to Y-1, I can't remember
:G+1→G
:End
:If [A](Y,X)=1
:Then
:Pause "YOU LOSE
:Output(8,1,9
:End
:Output(Y,X,G
:2→[A](Y,X
:1→X
:1→Y
:0→G
:End
:If K=45
:Then
0→G
:For(H,1,16
:For(I,1,8
:If [A](I,H)=0
:1→G
:End
:End
:If G=0
:Pause "YOU WIN!
:Output(8,1,9
:End
:End
:End```
```