Anuncios Google

problema con [vlua]

hola mi problema es que estaba navegando por la web y encontre este interprete de lua y me decidi a hacer un pequeño programa pero aun soy muy novato en esto de programar y esque cuando inicio mi programa se queda en negro la pantalla y no hace nada y luego se apaga pero cuando puse el menu no lo hacia bueno para menos enrredos aqui esta mi script aver si le encuentran algun problema.

miImagen1 = Print.ImageLoad("./Imagenes/menu1.png")
miImagen2 = Print.ImageLoad("./Imagenes/menu2.png")
miImagen3 = Print.ImageLoad("./Imagenes/menu3.png")
miImagen4 = Print.ImageLoad("./Imagenes/menu4.png")

current = miImagen1

oldpad = Ctrl.Read()

while true do
--menu--

pad = Ctrl.Read()
Print.ClearScreen()

Print.Image(0,0,current)

if pad:down() and oldpad:down() ~= pad:down() and current == miImagen1 then
current = miImagen2
end

if pad:down() and oldpad:down() ~= pad:down() and current == miImagen2 then
current = miImagen3
end

if pad:down() and oldpad:down() ~= pad:down() and current == miImagen3 then
current = miImagen4
end

if pad:up() and oldpad:up() ~= pad:up() and current == miImagen2 then
current = miImagen1
end

if pad:up() and oldpad:up() ~= pad:up() and current == miImagen3 then
current = miImagen2
end

if pad:up() and oldpad:up() ~= pad:up() and current == miImagen4 then
current = miImagen3
end

oldpad = pad
--funciones--
if current == miImagen1 and pad:cross() and oldpad:cross() ~= pad:cross() then
  dofile("./system/opcion1.lua")
end

if current == miImagen2 and pad:cross() and oldpad:cross() ~= pad:cross() then
  dofile("./system/opcion2.lua")
end

if current == miImagen3 and pad:cross() and oldpad:cross() ~= pad:cross() then
  dofile("./system/opcion3.lua")
end

if current == miImagen4 and pad:cross() and oldpad:cross() ~= pad:cross() then
  dofile("./system/opcion4.lua")
end

--afuera--
if pad:start() then
Sys.Exit()
end

Print.FlipScreen()
Print.BufferScreen()

espero me puedan ayudar gracias de antemano


Anuncios Google