62 lines
1.8 KiB
Lua
62 lines
1.8 KiB
Lua
-- Show Palette
|
|
-- Click for other palette boxes
|
|
-- P00 - P3F are NES palette values.
|
|
-- P40 - P7F are LUA palette values.
|
|
|
|
-- True or False
|
|
ShowTextLabels=true;
|
|
|
|
function DecToHex(numberin)
|
|
if (numberin < 16) then
|
|
return string.format("0%X",numberin);
|
|
else
|
|
return string.format("%X",numberin);
|
|
end;
|
|
end;
|
|
|
|
function text(x,y,str,text,back)
|
|
if (x > 0 and x < 255 and y > 0 and y < 240) then
|
|
gui.text(x,y,str,text,back);
|
|
end;
|
|
end;
|
|
|
|
local ButtonWasPressed;
|
|
local CurrentPaletteDisplay=0;
|
|
|
|
|
|
|
|
while(true) do
|
|
|
|
FCEU.frameadvance();
|
|
|
|
for i = 0, 7 do
|
|
gui.box(0 + (30*i),0,29 + (30*i),29,"P" .. DecToHex(0+i+(CurrentPaletteDisplay * 8)),"P" .. DecToHex(0+i+(CurrentPaletteDisplay * 8)));
|
|
gui.box(0 + (30*i),30,29 + (30*i),59,"P" .. DecToHex(16+i+(CurrentPaletteDisplay * 8)),"P" .. DecToHex(16+i+(CurrentPaletteDisplay * 8)));
|
|
gui.box(0 + (30*i),60,29 + (30*i),89,"P" .. DecToHex(32+i+(CurrentPaletteDisplay * 8)),"P" .. DecToHex(32+i+(CurrentPaletteDisplay * 8)));
|
|
gui.box(0 + (30*i),90,29 + (30*i),119,"P" .. DecToHex(48+i+(CurrentPaletteDisplay * 8)),"P" .. DecToHex(48+i+(CurrentPaletteDisplay * 8)));
|
|
if(ShowTextLabels == true) then
|
|
text(6 + (30*i),11,"P" .. DecToHex(0+i+(CurrentPaletteDisplay * 8)))
|
|
text(6 + (30*i),41,"P" .. DecToHex(16+i+(CurrentPaletteDisplay * 8)))
|
|
text(6 + (30*i),71,"P" .. DecToHex(32+i+(CurrentPaletteDisplay * 8)))
|
|
text(6 + (30*i),101,"P" .. DecToHex(48+i+(CurrentPaletteDisplay * 8)))
|
|
end;
|
|
end;
|
|
|
|
mousestuff = input.get()
|
|
|
|
if (not ButtonWasPressed) then
|
|
if (mousestuff.leftclick) then
|
|
ButtonWasPressed = 1;
|
|
CurrentPaletteDisplay=CurrentPaletteDisplay+1;
|
|
if (CurrentPaletteDisplay == 2) then
|
|
CurrentPaletteDisplay=8;
|
|
end;
|
|
if (CurrentPaletteDisplay == 10) then
|
|
CurrentPaletteDisplay=0;
|
|
end;
|
|
end;
|
|
end
|
|
|
|
ButtonWasPressed = (mousestuff.leftclick);
|
|
|
|
end; |