Ejemplo de un MENU de selección:
blanco = Color.new ( 255, 255, 255 )
negro = Color.new ( 0, 0, 0 )
pad, oldpad = Controls.read(), pad
opcion_menu, opcion_max = 1, 6
fin_sel_menu, fin_fin_menu = false, false
local function pinta_menu()

screen:clear( negro )
screen:print( 100, 80, "TUTORIAL DE UN MENU POR PIPAGERARDO." , blanco)
screen:print( 100, 90, "------------------------------------" , blanco)
screen:print( 200,100, "OPCION 1." , blanco)
screen:print( 200,110, "OPCION 2." , blanco)
screen:print( 200,120, "OPCION 3." , blanco)
screen:print( 200,130, "OPCION 4." , blanco)
screen:print( 200,140, "OPCION 5." , blanco)
screen:print( 200,150, "SALIR." , blanco)
if opcion_menu == 1 then screen:print( 160, 100, "-1->" , blanco)
elseif opcion_menu == 2 then screen:print( 160, 110, "-2->" , blanco)
elseif opcion_menu == 3 then screen:print( 160, 120, "-3->" , blanco)
elseif opcion_menu == 4 then screen:print( 160, 130, "-4->" , blanco)
elseif opcion_menu == 5 then screen:print( 160, 140, "-5->" , blanco)
elseif opcion_menu == 6 then screen:print( 160, 150, "-S->" , blanco)
end
screen.waitVblankStart() ; screen.flip()

end
repeat

pinta_menu()
repeat

pad = Controls.read()
if pad:right() and not oldpad:right() then

opcion_menu = opcion_menu + 1
if opcion_menu > opcion_max then opcion_menu = 1 end
pinta_menu()

elseif pad:left() and not oldpad:left() then

opcion_menu = opcion_menu - 1
if opcion_menu < 1 then opcion_menu = opcion_max end
pinta_menu()

elseif pad:up() and not oldpad:up() then

opcion_menu = opcion_menu - 1
if opcion_menu < 1 then opcion_menu = opcion_max end
pinta_menu()

elseif pad:down() and not oldpad:down() then

opcion_menu = opcion_menu + 1
if opcion_menu > opcion_max then opcion_menu = 1 end
pinta_menu()

end
if pad:cross() or pad:circle() then fin_sel_menu = true end
screen.waitVblankStart(2)
oldpad = pad

until fin_sel_menu
fin_sel_menu = false
screen:clear( negro )
if opcion_menu == 1 then screen:print(200, 100, "OPCION 1.", blanco)
elseif opcion_menu == 2 then screen:print(200, 110, "OPCION 2.", blanco)
elseif opcion_menu == 3 then screen:print(200, 120, "OPCION 3.", blanco)
elseif opcion_menu == 4 then screen:print(200, 130, "OPCION 4.", blanco)
elseif opcion_menu == 5 then screen:print(200, 140, "OPCION 5.", blanco)
elseif opcion_menu == 6 then screen:print(200, 150, "SALIR." , blanco)
fin_fin_menu = true
end
screen.waitVblankStart(); screen.flip()
screen.waitVblankStart( 60 )

until fin_fin_menu
System.Quit()