There was also this other program I made. It's Geometry Dash but on the home screen! I think it's cool so far.
Code:
7→Y:1→X
ClrHome
Output(3,4,"GEO-DASH!
Output(4,2,BY: FOXXTROTT
Pause
ClrHome
Output(8,1,"------^^--------
Repeat K=45 or (Y=7 and (X=7 or X=8))
Output(Y,X,"□
rand(1
X+1→X
Output(Y,X-1,"_ //One space
getKey→K
If K:Then
Y-1→Y
X+2→X
Output(Y+1,X,"_
Output(Y,X,"□
rand(1
Y+1→Y
Output(Y-1,X,"_
Output(Y,X,"□
End
If X=17:Goto A
End
Pause "GAME OVER!
DelVar XDelVar YDelVar K
Stop
Lbl A
ClrHome
Disp "YOU BEAT LEVEL","ONE!
Pause
Disp "LEVEL TWO COMING","SOON
Pause
DelVar XDelVar YDelVar K
Stop
I appreciate any feedback!