BizHawk: Tunic Color

-- Majora's Mask (U): Tunic Color
-- by Jimmie1717
-- BizHawk 2.2.1
-- This will only work with the NTSC-U version of the game.

console.clear();

readByte                = mainmemory.read_u8;
readWord                = mainmemory.read_u16_be;
readSWord               = mainmemory.read_s16_be;
readDWord               = mainmemory.read_u32_be;
readFloat               = mainmemory.readfloat;
writeByte               = mainmemory.write_u8;
writeWord               = mainmemory.write_u16_be;
writeSWord              = mainmemory.write_s16_be;
writeDWord              = mainmemory.write_u32_be;
writeFloat              = mainmemory.writefloat;

version                 = "u";

function tunicForm()
    TUNIC               = forms.newform(217, 148, "Tunic");
    r                   = forms.textbox(TUNIC, "30", 25, 20, "UNSIGNED", 24, 30, false, false);
    g                   = forms.textbox(TUNIC, "105", 25, 20, "UNSIGNED", 73, 30, false, false);
    b                   = forms.textbox(TUNIC, "27", 25, 20, "UNSIGNED", 122, 30, false, false);
    a                   = forms.textbox(TUNIC, "255", 25, 20, "UNSIGNED", 171, 30, false, false);
    red                 = forms.label(TUNIC, "R:", 5, 33, 18, 13, false);
    green               = forms.label(TUNIC, "G:", 54, 33, 18, 13, false);
    blue                = forms.label(TUNIC, "B:", 103, 33, 18, 13, false);
    alpha               = forms.label(TUNIC, "A:", 152, 33, 18, 13, false);
    update              = forms.button(TUNIC, "Update", updateColor, 4, 55, 193, 22);
    default             = forms.button(TUNIC, "Default", resetColor, 4, 81, 193, 22);

    newSample           = forms.pictureBox(TUNIC, 5, 5, 93, 20);
    newBorder           = forms.drawRectangle(newSample, 0, 0, 92, 19, "BLACK", "TRANSPARENT");

    currentSample       = forms.pictureBox(TUNIC, 103, 5, 93, 20);
    currentBorder       = forms.drawRectangle(currentSample, 0, 0, 92, 19, "BLACK", "TRANSPARENT");

    color               = {
        r               = 0x1E,
        g               = 0x69,
        b               = 0x1B,
        a               = 0xFF
    };
end

function updateAddress()

    address             = {
        ["u"]           = readDWord(0x3FFFF4) - 0x80012E58,
        ["j"]           = readDWord(0x4004A4) - 0x80013064
    };

end

function updateColor()

    if (address[version] ~= nil) then
        forms.setproperty(currentSample, "BackColor", forms.createcolor(color.r, color.g, color.b, color.a));
        if (tonumber(forms.gettext(r)) ~= nil and tonumber(forms.gettext(g)) ~= nil and tonumber(forms.gettext(b)) ~= nil) then
            color.r = tonumber(forms.gettext(r));
            color.g = tonumber(forms.gettext(g));
            color.b = tonumber(forms.gettext(b));
            color.a = tonumber(forms.gettext(a));
        else
            gui.addmessage("Error: Reset to default color.");
            color.r = 0x1E;
            color.g = 0x69;
            color.b = 0x1B;
            color.a = 0xFF;
        end
    end

end

function resetColor()

    if (address[version] ~= nil) then
        if (tonumber(forms.gettext(r)) ~= nil and tonumber(forms.gettext(g)) ~= nil and tonumber(forms.gettext(b)) ~= nil) then
            forms.settext(r, 0x1E);
            forms.settext(g, 0x69);
            forms.settext(b, 0x1B);
            forms.settext(a, 0xFF);
            color.r = 0x1E;
            color.g = 0x69;
            color.b = 0x1B;
            color.a = 0xFF;
            tunic();
        end
    end

end

function limitRGBA()

    if (tonumber(forms.gettext(a)) ~= 255) then
        forms.settext(a, 255);
    end

    if (tonumber(forms.gettext(r)) ~= nil and tonumber(forms.gettext(g)) ~= nil and tonumber(forms.gettext(b)) ~= nil) then
        if (tonumber(forms.gettext(r)) > 255) then
            forms.settext(r, 255);
        end
        if (tonumber(forms.gettext(g)) > 255) then
            forms.settext(g, 255);
        end
        if (tonumber(forms.gettext(b)) > 255) then
            forms.settext(b, 255);
        end

        forms.setproperty(newSample, "BackColor", forms.createcolor(tonumber(forms.gettext(r)), tonumber(forms.gettext(g)), tonumber(forms.gettext(b)), 255));
        forms.setproperty(currentSample, "BackColor", forms.createcolor(color.r, color.g, color.b, color.a));

    end

end

function tunic()

    local color = (color.r * 0x1000000) + (color.g * 0x10000) + (color.b * 0x100) + color.a;

    if (readDWord(address[version]) == 0xFA0000FF) then
        writeDWord(address[version] + 0x0004, color);
        writeDWord(address[version] + 0x052C, color);
        writeDWord(address[version] + 0x0A34, color);
        writeDWord(address[version] + 0x0C0C, color);
        writeDWord(address[version] + 0x0CCC, color);
        writeDWord(address[version] + 0x12D4, color);
        writeDWord(address[version] + 0x174C, color);
        writeDWord(address[version] + 0x1984, color);
        writeDWord(address[version] + 0x1E54, color);
    end

end

tunicForm();

while true do

    updateAddress();
    limitRGBA();
    tunic();

    emu.frameadvance();

end