first set up the matix A like this
{
[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]
[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]
[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]
[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]
[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]
[0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0]
[1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1]
[1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1]
:1→G
:1→F
:1→X
:5→Y
:Lbl A
:Repeat 5≠5
:getKey→K
:Output(1,1," 0 0 00000000000000000 //82 spaces, 1 zero, 13 spaces, 1 zero, 14 spaces, then 17 zeros
:Output(Y,X,"X
:Y+G→Y
:If Y>8
:Goto 0
:If X>1
:Then
:If not([A](Y-1,X-1)=1
:Then
:If K=24
:Then
:If [A](Y,X-1)=1
:Then
:Y-1→Y
:End
:X-1→X
:End
:End
:End
:If X<16
:If not([A](Y-1,X+1)=1
:Then
:If K=26
:Then
:If [A](Y,X+1)=1
:Then
:Y-1→Y
:End
:X+1→X
:End
:End
:End
:If K=25 and F=0
:Then
:If G=1
:Then
:Y-3→Y
:1→F
:Else
:Y-1→Y
:End
:End
:If [A](Y,X)=1
:Then
:Y-1→Y
:0→F
:End
:End
:Lbl 0
:ClrHome
:Disp "YOU DIED
tell me if there are any syntax error. I hope you can use this.