Another good practice is to map the actions of each option. Example: VAR ACTION$[3] COPY ACTION$,@MAP IF B AND #UP THEN SELECTION=MAX(0,SELECTION-1) IF B AND #DOWN THEN SELECTION=MIN(2,SELECTION+1) IF B AND #A then CALL ACTION$[SELECTION] DEF option1 ? "You picked the first option" END @MAP DATA "option1","option2","option3"