savegame incomplete script mario luigi superstar saga bizhaw

------ Settings Table ------
local Settings = {
    ["SavegamesX"]=60,
    ["SavegamesY"]=60,
    ["MyFont"]=2,
    ["PaddingTop"]=0,
    ["PaddingBottom"]=0
}

----- Misc Settings -----
local clickedFrames = 0
local clicked=false
local X=0
local Y=0
local XBefore=0
local YBefore=0


------ Extra Padding --------
local PaddingLeft=0
local PaddingRight=0
local PaddingTop=0
local PaddingBottom=0

local PaddingTopSetting=0 -- in "Add Space", before actually adding it to PaddingTop/Bottom
local PaddingBottomSetting=0

------ Read only stuff ------
local FontTable = {{8,"SF Intermosaic B"},
                   {10,"Arial"},
                   {9,"MS Reference Sans Serif"},
                   {9,"Square721 BT"},
                   {9,"Century Gothic"}}
local ColorButtonSelected = 0xB0A0A0A0
local ColorButtonNormal = 0xA0303030

------ Game Version ------
local GameVersion=0
local GameVersionText=""
if gameinfo.getromhash()=="7C303CDDE5061EE329296948060B875CB50BA410" then
    GameVersion=1 -- usa
    GameVersionText="USA"
elseif gameinfo.getromhash()=="EDC538AC505BFCD337ABDD03B3A6F2744D81EAAB" then
    GameVersion=2 -- jp
    GameVersionText="Japan"
elseif gameinfo.getromhash()=="FA2314C2FBE0DB1AB17175F8BE7CCEB0AB084EFC" then
    GameVersion=3 -- eu
    GameVersionText="Europe"
else
    GameVersion=4
    GameVersionText="Game not recognized"
end


local Region=0
if GameVersion==1 or GameVersion==3 then
    Region=1 -- english
elseif GameVersion==2 then
    Region=2 --jp
else Region=3 end  --not M+L


local toboolean = function(string)
    if string=="true" then
        string=true
    elseif string=="false" then
        string=false
    else
        string=nil
    end

    return string
end

function text(x, y, text, color, backcolor)
    if backcolor==nil then backcolor=0x00000000 end
    gui.drawText(x, y, text,color,backcolor,FontTable[ Settings["MyFont"] ][1],FontTable[ Settings["MyFont"] ][2])
end


function box(x,y,x2,y2)
    gui.drawBox(x,y,x2,y2,0x00000000,0xD0000000)
end

function boxNormal(x,y,x2,y2)
    gui.drawBox(x,y,x2,y2,0xFF000000,0xA0000000)
end

function boxSelected(x,y,x2,y2)
    gui.drawBox(x,y,x2,y2,0xFF000000,0xA0505050)
end

function img(path,x,y)
    gui.drawImage(path,x,y)
end

function arrowDown(xpos,ypos,col)
    gui.drawLine(xpos,ypos,xpos+6,ypos,col)
    gui.drawLine(xpos+1,ypos+1,xpos+5,ypos+1,col)
    gui.drawLine(xpos+2,ypos+2,xpos+4,ypos+2,col)
    gui.drawPixel(xpos+3,ypos+3,col)
end

function arrowUp(xpos,ypos,col)
    gui.drawLine(xpos,ypos,xpos+6,ypos,col)
    gui.drawLine(xpos+1,ypos-1,xpos+5,ypos-1,col)
    gui.drawLine(xpos+2,ypos-2,xpos+4,ypos-2,col)
    gui.drawPixel(xpos+3,ypos-3,col)
end

function drawDisplayBox(posx,posy,width,height,bordercolor,color,colorchangesonhover,clickedfunction)

    if colorchangesonhover then

        if X > posx and X < posx+width and Y > posy and Y < posy+height then

            if clicked and clickedFrames > 0 then
                menuscreen=0 -- close menu
                clickedfunction() -- custom function passed in the parameter
            end

            gui.drawBox(posx,posy,posx+width,posy+height,bordercolor,color-0x30000000)
        else
            gui.drawBox(posx,posy,posx+width,posy+height,bordercolor,color)
        end
    else
        if X > posx and X < posx+width and Y > posy and Y < posy+height then

            if clicked and clickedFrames > 0 then
                menuscreen=0 -- close menu
                clickedfunction() -- custom function passed in the parameter
            end

        end

            gui.drawBox(posx,posy,posx+width,posy+height,bordercolor,color)

    end

end

                        --posx,posy,width of the container
function drawCloseButton(posx,posy,width,clickedfunction)

    if X>posx+width-10 and X<posx+width and Y>posy and Y<posy+10 then

        if clicked and clickedFrames==1 then
            clickedfunction()
        end
        gui.drawBox(posx+width-10,posy,posx+width,posy+10,0xFF000000,0xA0C0C0C0)
    else
        gui.drawBox(posx+width-10,posy,posx+width,posy+10,0xFF000000,0xA0A0A0A0)
    end

    text(posx+width-8,posy-(FontTable[ Settings["MyFont"] ][1]-8),"x",0xFFFFFFFF)

end


function drawButton(posx,posy,width,height,label,color,frequency,clickedfunction)

    if X>posx and X<posx+width and Y>posy and Y<posy+height then

        if clicked and clickedFrames%frequency==1 then
            clickedfunction()
        end
        gui.drawBox(posx,posy,posx+width,posy+height,color-0x00303030,color+0x30303030)
    else
        gui.drawBox(posx,posy,posx+width,posy+height,color-0x00303030,color)
    end

    text(posx+2,posy-(FontTable[ Settings["MyFont"] ][1]-8),label,0xFFFFFFFF)

end


local drawEditSavegames = function()

    memory.usememorydomain("EWRAM")
    SavegamesX=Settings["SavegamesX"]
    SavegamesY=Settings["SavegamesY"]
    width=150
    height=94

    drawDisplayBox(SavegamesX,SavegamesY,width,height,0xFF202020,0xA0000000,false, function()

            --what happens if clicked on:
            SavegamesY = SavegamesY + (Y-YBefore) --enables mouse drag
            SavegamesX = SavegamesX + (X-XBefore)

            if SavegamesY < 0 then SavegamesY=0 --prevents display from going offscreen
            elseif SavegamesY > 159-height+PaddingTop+PaddingBottom then SavegamesY=159-height+PaddingTop+PaddingBottom end
            if SavegamesX < 0 then SavegamesX=0
            elseif SavegamesX > 239-width+PaddingLeft+PaddingRight then SavegamesX=239-width+PaddingLeft+PaddingRight end

            Settings["SavegamesY"]=SavegamesY
            Settings["SavegamesX"]=SavegamesX
    end)

-- slots in use
    text(3+SavegamesX,12+SavegamesY,"slots in use:",0xFFFFFFFF)

    if bit.check(memory.read_u8(0x001e7e),0) then
        text(83+SavegamesX,12+SavegamesY, "1", 0xFFFFFF00)
    else
        text(83+SavegamesX,12+SavegamesY, "1", 0x5FFFFFFF)
    end

    if bit.check(memory.read_u8(0x001e7e),1) then
        text(90+SavegamesX,12+SavegamesY, "2", 0xFFFFFF00)
    else
        text(90+SavegamesX,12+SavegamesY, "2", 0x5FFFFFFF)
    end

    if bit.check(memory.read_u8(0x001e7e),2) then
        text(97+SavegamesX,12+SavegamesY, "3", 0xFFFFFF00)
    else
        text(97+SavegamesX,12+SavegamesY, "3", 0x5FFFFFFF)
    end

-- current slot

    memory.usememorydomain("IWRAM")

    if bit.check(memory.read_u8(0x0d40),2) then
        currentslot=2
    elseif bit.check(memory.read_u8(0x0d40),3) then
        currentslot=3
    else
        currentslot=1
    end

    text(3+SavegamesX,22+SavegamesY,"current slot: ".. currentslot,0xFFFFFFFF)

    memory.usememorydomain("EWRAM")

-- copy 1 to 2
    drawButton(SavegamesX+26,SavegamesY+34,70,10,"copy 1 to 2",ColorButtonNormal,20,function()

        --write values
        for i=0,1783,1 do
            memory.write_u8(0x002580+i, memory.read_u8(0x001e88+i) )
        end

        --set "slots in use" flag
        if not bit.check(memory.read_u8(0x001e7e),1) then
            memory.write_u8(   0x001e7e, bit.set(memory.read_u8(0x001e7e),1)   )
        end

        editedMemory=true

    end)

-- copy 1 to 3
    drawButton(SavegamesX+26,SavegamesY+46,70,10,"copy 1 to 3",ColorButtonNormal,20,function()

        --write values
        for i=0,1783,1 do
            memory.write_u8(0x002c78+i, memory.read_u8(0x001e88+i) )
        end

        --set "slots in use" flag
        if not bit.check(memory.read_u8(0x001e7e),2) then
            memory.write_u8(   0x001e7e, bit.set(memory.read_u8(0x001e7e),2)   )
        end

        editedMemory=true

    end)


-- close button
    drawCloseButton(SavegamesX,SavegamesY,width,function()

        Settings["BoolEditSavegames"]=false
        if Settings["BoolNotifications"] then print("Edit Savegames Display has been closed.") end

    end)


-- other text:
    text(3+SavegamesX,SavegamesY,"Edit Savegames",0xFF808080)
    text(3+SavegamesX,58+SavegamesY,"sry, can't finish as long\nas I don't understand\nchecksums...",0xFFFF8020)

end



client.setwindowsize(2)

while true do

    memory.usememorydomain("EWRAM")

    X = input.getmouse().X + PaddingLeft
    Y = input.getmouse().Y + PaddingTop
    clicked = input.getmouse().Left

    if clicked then clickedFrames = clickedFrames + 1
    else clickedFrames = 0 end

    drawEditSavegames()

    XBefore=X
    YBefore=Y

    emu.frameadvance()

    clicked=false

end