(Put menu options here) WHILE 1 B=BUTTON() LOCATE X,Y ?"←" LOCATE X,OY ?" " OY=Y IF B AND #UP THEN DEC Y IF B AND #DOWN THEN INC Y IF Y!=OY THEN WAIT 10 WEND