Hoy un usuario me a pedido que le modificara el APZ para que se pudiera gestionar usando algunas teclas como son las flechas de dirección y el enter, el ejemplo me a parecido que os podría interesar de modo que lo publico espero que os guste y os sea de gran utilidad, aquí os dejo algunos código que lleva este ejemplo como el enlace de descarga.
ON KEY PAGINA 1
ON KEY DEL RESTO DE PAGINAS:
También he modificado uno a uno los eventos de cada imagen, no os voy a poner todos los eventos de todas las imágenes os voy a poner como ejemplo los eventos de la "Image1".
ON CLICK:
ON ENTER:
ON LEAVE:
DESCARGA:
ON KEY PAGINA 1
if e_Key == 13 then -- (enter) (Intro)
if Plugin.IsVisible("Plugin1") then
if NowPos == "Image1" then
Page.Jump("Page2");
elseif NowPos == "Image2" then
Page.Jump("Page3");
elseif NowPos == "Image3" then
Page.Jump("Page4");
elseif NowPos == "Image4" then
Page.Jump("Page5");
elseif NowPos == "Image5" then
Page.Jump("Page6");
elseif NowPos == "Image6" then
Page.Jump("Page7");
elseif NowPos == "Image7" then
Page.Jump("Page8");
end
end
end
if e_Key == 37 then -- (left arrow) (Flecha Izquierda)
if NowPos == nil then
NowPos = "Image1";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 71, 50);
elseif NowPos == "Image1" then
NowPos = "Image7";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 344, 412);
elseif NowPos == "Image2" then
NowPos = "Image1";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 71, 50);
elseif NowPos == "Image3" then
NowPos = "Image2";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 343, 50);
elseif NowPos == "Image4" then
NowPos = "Image3";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 612, 50);
elseif NowPos == "Image5" then
NowPos = "Image4";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 72, 249);
elseif NowPos == "Image6" then
NowPos = "Image5";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 344, 249);
elseif NowPos == "Image7" then
NowPos = "Image6";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 612, 249);
end
end
if e_Key == 39 then -- (right arrow) (Flecha Derecha)
if NowPos == nil then
NowPos = "Image1";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 71, 50);
elseif NowPos == "Image1" then
NowPos = "Image2";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 343, 50);
elseif NowPos == "Image2" then
NowPos = "Image3";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 612, 50);
elseif NowPos == "Image3" then
NowPos = "Image4";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 72, 249);
elseif NowPos == "Image4" then
NowPos = "Image5";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 344, 249);
elseif NowPos == "Image5" then
NowPos = "Image6";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 612, 249);
elseif NowPos == "Image6" then
NowPos = "Image7";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 344, 412);
elseif NowPos == "Image7" then
NowPos = "Image1";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 71, 50);
end
end
if e_Key == 38 then -- (up arrow) (Flecha Arriba)
if NowPos == nil then
NowPos = "Image1";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 71, 50);
elseif NowPos == "Image1" then
NowPos = "Image6";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 612, 249);
elseif NowPos == "Image2" then
NowPos = "Image4";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 72, 249);
elseif NowPos == "Image3" then
NowPos = "Image7";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 344, 412);
elseif NowPos == "Image4" then
NowPos = "Image1";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 71, 50);
elseif NowPos == "Image5" then
NowPos = "Image2";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 343, 50);
elseif NowPos == "Image6" then
NowPos = "Image3";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 612, 50);
elseif NowPos == "Image7" then
NowPos = "Image5";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 344, 249);
end
end
if e_Key == 40 then -- (down arrow) (Flecha Abajo)
if NowPos == nil then
NowPos = "Image1";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 71, 50);
elseif NowPos == "Image1" then
NowPos = "Image4";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 72, 249);
elseif NowPos == "Image2" then
NowPos = "Image5";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 344, 249);
elseif NowPos == "Image3" then
NowPos = "Image6";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 612, 249);
elseif NowPos == "Image4" then
NowPos = "Image2";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 343, 50);
elseif NowPos == "Image5" then
NowPos = "Image7";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 344, 412);
elseif NowPos == "Image6" then
NowPos = "Image1";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 71, 50);
elseif NowPos == "Image7" then
NowPos = "Image3";
Image.SetSize(NowPos, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 612, 50);
end
end
if e_Key == 8 then
Page.Jump("Page1");
end
ON CLICK:
Page.Jump("Page2");
Image.SetSize(this, 100, 100);
Plugin.SetVisible("Plugin1", true);
Plugin.SetPos("Plugin1", 71, 50);
NowPos = this;
Image.SetSize(this, 89, 89);
Plugin.SetVisible("Plugin1", false);