:For(Y,0,62)

:Pxl-On(Y,0)

:Pxl-On(Y,94)

:Pxl-On(Y,93)

:End

:For(X,0,94)

:Pxl-On(0,X)

:Pxl-On(62,X)

:Pxl-On(61,X)

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A,B):End

:If C≥-3:Then:Pxl-Off(A,B):End

:End

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A,B+23):End

:If C≥-3:Then:Pxl-Off(A,B+23):End

:End

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A,B+46):End

:If C≥-3:Then:Pxl-Off(A,B+46):End

:End

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A,B+69):End

:If C≥-3:Then:Pxl-Off(A,B+69):End

:End

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A+15,B):End

:If C≥-3:Then:Pxl-Off(A+15,B):End

:End

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A+15,B+23):End

:If C≥-3:Then:Pxl-Off(A+15,B+23):End

:End

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A+15,B+46):End

:If C≥-3:Then:Pxl-Off(A+15,B+46):End

:End

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A+15,B+69):End

:If C≥-3:Then:Pxl-Off(A+15,B+69):End

:End

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A+30,B):End

:If C≥-3:Then:Pxl-Off(A+30,B):End

:End

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A+30,B+23):End

:If C≥-3:Then:Pxl-Off(A+30,B+23):End

:End

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A+30,B+46):End

:If C≥-3:Then:Pxl-Off(A+30,B+46):End

:End

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A+30,B+69):End

:If C≥-3:Then:Pxl-Off(A+30,B+69):End

:End

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A+45,B):End

:If C≥-3:Then:Pxl-Off(A+45,B):End

:End

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A+45,B+23):End

:If C≥-3:Then:Pxl-Off(A+45,B+23):End

:End

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A+45,B+46):End

:If C≥-3:Then:Pxl-Off(A+45,B+46):End

:End

:End

:randM(15,23→[A]

:For(A,1,15)

:For(B,1,23)

:[A](A,B)→C

:If C<-3:Then:Pxl-On(A+45,B):End

:If C≥-3:Then:Pxl-Off(A+45,B):End

:End

:End

:3→X

:3→Y

:Repeat K=21 or pxl-Test(60,92)=1

getKey→K

:If Ans

:Pxl-Off(X,Y)

:sum(ΔList(Ans={25,34}))

:Y+Ans(pxl-Test(Y+Ans,X)≠1)→Y

:sum(ΔList(Ans={24,26}))

:X+Ans(pxl-Test(Y,X+Ans)≠1)→X

:Pxl-On(Y,Ans)

:End

This program will randomly place pixels around the screen then have you navigate from the top left corner to the bottom right using a single pixel. The only problem is that it is over 1500 bytes and is slow at creating the maze. I have tried to condense it to take up less space previously without success. Is there a way to make it faster and/or smaller? Any help would be greatly appreciated.