Files
gen1recomp/tests/engine/gen2_clock_palette_2237.lua

35 lines
1.2 KiB
Lua

-- pokecrystal/engine/gfx/cgb_layouts.asm:509-521
-- pokecrystal/home/text.asm:108
package.path = "./?.lua;./?/init.lua;" .. package.path
love = love or require("tests.love_stub")
local T = require("tests.harness")
local eq = T.eq
require("src.core.Logger").warn = function() end
local Chrome = require("src.ui.gen2.Chrome")
local InitClock = require("src.ui.gen2.InitClock")
local function rgb(c) return table.concat(c, ",") end
do
local pal = InitClock.PALETTE
eq(rgb(pal[1]), "255,255,255", "PREDEFPAL_DIPLOMA colour 0 is white")
eq(rgb(pal[2]), "247,181,140", "colour 1 is RGB 30,22,17")
eq(rgb(pal[3]), "132,115,156", "colour 2 is RGB 16,14,19")
eq(rgb(pal[4]), "0,0,0", "colour 3 is black")
end
do
local clock = InitClock.new({ input = {} }, { mode = "clock", save = {} })
eq(clock:palette(), InitClock.PALETTE, "the intro clock draws on SCGB_DIPLOMA")
eq(rgb(clock:palette()[1]), "255,255,255", "so its boxes are white")
local day = InitClock.new({ input = {} }, { mode = "day", save = {} })
eq(day:palette(), Chrome.DEFAULT_BOX_PALETTE,
"SetDayOfWeek's Textbox is the overworld PAL_BG_TEXT")
eq(rgb(day:palette()[1]), "255,255,255", "so Mom's wheel is white too")
end