zdoom/raze-gles
0
0
Fork 0
mirror of https://github.com/ZDoom/raze-gles.git synced 2024-12-25 03:00:46 +00:00
Code Issues Projects Releases Packages Wiki Activity

build.lua: add read_basepal().

Browse source 
git-svn-id: https://svn.eduke32.com/eduke32@4106 1a8010ca-5511-0410-912e-c29ae57300e0
This commit is contained in:
helixhorned 2013-10-16 19:43:03 +00:00
parent 4cb9ab1d7c
commit 1b29ac6db7
1 changed files with 21 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
polymer/eduke32/source/lunatic/util/build.lua
View file

@ -126,6 +126,26 @@ local function doread(fh, basectype, numelts, dontclose)
return cd return cd
end end
-- Read base palette (i.e. first 768 bytes as R,G,B triplets) from a PALETTE.DAT.
-- Returns:
-- on success: <uint8_t [768]> cdata (palette values scaled by 4)
-- on failure: nil, <errmsg>
function read_basepal(filename)
local fh, errmsg = io.open(filename, "rb")
if (fh == nil) then
return nil, errmsg
end
local palette, errmsg = doread(fh, "uint8_t", 768, true)
fh:close()
for i=0,768-1 do
palette[i] = 4*palette[i]
end
return palette, errmsg
end
local function set_secwalspr_mt(structar, maxidx) local function set_secwalspr_mt(structar, maxidx)
local mt = { local mt = {
__index = function(tab, idx) __index = function(tab, idx)
@ -366,12 +386,11 @@ local artfile_mt = {
end, end,
dims = function(self, ltile) dims = function(self, ltile)
self:_check_ltile(ltile)
return self.sizx[ltile], self.sizy[ltile] return self.sizx[ltile], self.sizy[ltile]
end, end,
getpic = function(self, ltile) getpic = function(self, ltile)
self:_check_ltile(ltile)
local sx, sy = self:dims(ltile) local sx, sy = self:dims(ltile)
if (sx == 0 or sy == 0) then if (sx == 0 or sy == 0) then
-- Tile nonexistent/empty in this ART file -- Tile nonexistent/empty in this ART file