mirror of
https://github.com/Tolik-Trek/Crazy-Blaster.git
synced 2026-06-15 09:31:37 +03:00
55 lines
2.2 KiB
NASM
55 lines
2.2 KiB
NASM
;
|
||
;------------[LUA functions]------------;
|
||
includelua 'Shared_Includes/LUA/Functions.lua'
|
||
;---------------------------------------;
|
||
|
||
LUA PASS1
|
||
-- <EFBFBD>஢¥à塞 BMP, ¤®áâ ñ¬ ¨§ ¥£® ¯ à ¬¥âàë, ०¥¬ ªã᪨
|
||
bmp_width, bmp_height, bmp_image_size, bmp_image_offset, bmp_colors = Get_bmp8bit_values (sj.get_define("PICTURE_FILE"))
|
||
|
||
if bmp_width ~= 128 then sj.error("Invalid BMP width", bmp_width) end
|
||
if bmp_height ~= 72 then sj.error("Invalid BMP height", bmp_height) end
|
||
if bmp_colors ~= 256 then sj.error("Invalid BMP number of colors", bmp_colors) end
|
||
|
||
if not File_save(sj.get_define("PICTURE_FILE"), "./Build/Bin/LOGO_PAL.BIN", bmp_image_offset-1024, 1024) then sj.error("Palete save error!") end
|
||
if not File_save(sj.get_define("PICTURE_FILE"), "./Build/Bin/LOGO_DAT.BIN", bmp_image_offset, bmp_image_size) then sj.error("Image data save error!") end
|
||
ENDLUA
|
||
|
||
LUA ALLPASS
|
||
function make_pic_files (fileName, needPal, needPic)
|
||
local fileNameBMP = "'" .. fileName .. ".bmp" .. "'"
|
||
local fileNamePAL = fileName .. "_PAL.BIN"
|
||
local fileNameDAT = fileName .. "_DAT.BIN"
|
||
|
||
local bmp_width, bmp_height, bmp_image_size, bmp_image_offset, bmp_colors = Get_bmp8bit_values (fileNameBMP)
|
||
|
||
if needPal == 1 then
|
||
if bmp_width ~= 128 then sj.error(fileNameBMP .. "Invalid BMP width", bmp_width) end
|
||
if bmp_height ~= 72 then sj.error(fileNameBMP .. "Invalid BMP height", bmp_height) end
|
||
if bmp_colors ~= 256 then sj.error(fileNameBMP .. "Invalid BMP number of colors", bmp_colors) end
|
||
if not File_save(fileNameBMP, fileNamePAL, bmp_image_offset-1024, 1024) then
|
||
sj.error(fileNameBMP .. "Palete save error!")
|
||
end
|
||
end
|
||
if needPic == 1 then
|
||
local correctWidth = ((bmp_width*3)%4)+bmp_width
|
||
if correctWidth > bmp_width then
|
||
File_save(fileNameBMP, fileNameDAT, bmp_image_offset, bmp_image_size, bmp_width, correctWidth-bmp_width)
|
||
else
|
||
File_save(fileNameBMP, fileNameDAT, bmp_image_offset, bmp_image_size)
|
||
end
|
||
end
|
||
|
||
print("Resolution: " .. bmp_width .. "x" .. bmp_height, fileNameDAT)
|
||
end
|
||
ENDLUA
|
||
|
||
MODULE MAIN_LOGO
|
||
Pallete:
|
||
INCBIN 'Build/Bin/LOGO_PAL.BIN'
|
||
.length EQU $-Pallete
|
||
Raster:
|
||
INCBIN 'Build/Bin/LOGO_DAT.BIN'
|
||
.length EQU $-Raster
|
||
ENDMODULE
|