The one above optimized.
Code:
I prefer the built in menu's myself, doesn't waste space for flashiness.
Code:
2->x
Repeat max(K={45, 24, 26, 21, 105
getkey->K
x-(K=25 and X>2)+(K=34 and X<7->x
Output(x,1,"}
If x>2:Output(x-1,1,"
If x>7:Output(x+1,1,"
End
Return
I prefer the built in menu's myself, doesn't waste space for flashiness.