BPanther's Neutrino Forum

Code: Alles auswählen

<?xml version="1.0" encoding="UTF-8"?>
<bild>Bild1.jpg</bild>
<bild>Bild2.jpg</bild>
<bild>Bild3.jpg</bild>
<bild>Bild4.jpg</bild>
<bild>Bild5.jpg</bild>
<bild>Bild6.jpg</bild>
<bild>Bild7.jpg</bild>
<bild>Bild8.jpg</bild>
<bild>Bild9.jpg</bild>

Code: Alles auswählen

--logo LUA Plugin.
--udog
--2014

--Objekte
function init()
	server = 'http://Udogxxxxxxxx/xxxx/mein Ordner/';  --hier Sever anpassen
	xmldatei = 'boot.xml'; --name der xml anpassen
	pictures = {};
	maxPicture = 0;
	pictureNumber = 0;
	n = neutrino();
end

-- Xml mit Bildernamen auslesen und Array speichern.
function getPictures()
	local fname = "/tmp/tmp_pictures.xml";

	os.execute("wget -q -O " .. fname .. " '" .. server .. xmldatei .. "'" );

	local fp = io.open(fname, "r")
	if fp == nil then
		print("Error opening file '" .. fname .. "'.")
		os.exit(1)
	else
		local s = fp:read("*a")
		fp:close()

		i = 1;

		for picture in string.gmatch(s, "<bild>(.-)</bild>") do
			pictures[i] = picture;
			i = i + 1;
		end

		maxPicture = i - 1;
		pictureNumber = 1;

		if pictures[1] ~= nil then
			getPicture();
		end

	end

end

--herunterladen des Bildes
function getPicture()
	local fname = "/tmp/tmp_bootpicture.jpg"
	os.execute("wget -q -U Mozilla -O " .. fname .. " '" .. server .. pictures[pictureNumber] .. "'");
	showPicture();
end

--Anzeigen der Bilder
function showPicture()
	oldPictureNumber = pictureNumber;

	local spacer = 8;
	local x  = 180;
	local y  = 70;
	local dx = 900;
	local dy = 590;

	w = cwindow.new{x=x, y=y, dx=dx, dy=dy, title="Picture Viewer", btnRed="Zurück", btnGreen="Vor", btnYellow="Diashow"};
	w:paint();

	n:DisplayImage("/tmp/tmp_bootpicture.jpg", 220, 130, 800, 450)

	neutrinoExec();
	CloseNeutrino()

	if oldPictureNumber ~= pictureNumber then
		getPicture();
	end

end

--Fenster anzeigen und auf Tasteneingaben reagieren
function neutrinoExec()
	repeat
		msg, data = n:GetInput(500)
		-- Taste Rot zeigt das vorherige Bild an
		if (msg == RC['left'] or msg == RC['page_left']) then
			if pictureNumber == 1 then
				pictureNumber = maxPicture
			else
				pictureNumber = pictureNumber - 1;
			end
			msg = RC['home'];
		-- Taste Grün zeigt den Text wieder an
		elseif (msg == RC['right'] or msg == RC['page_right']) then
			if pictureNumber == maxPicture then
				pictureNumber = 1;
			else
				pictureNumber = pictureNumber + 1;
			end
			msg = RC['home'];
		-- Taste Gelb speichert das Bootlogo
		elseif (msg == RC['yellow']) then
			getBootlogo(pictureNumber);
		end
	-- Taste Exit oder Menü beendet das Fenster
	until msg == RC['home'] or msg == RC['setup'];
end

--Fenster schließen
function CloseNeutrino()
	w = nil
	collectgarbage();
end

--[[
MAIN
]]
init();
getPictures();
os.execute("rm /tmp/tmp_boot*.*");