--trace cv.log,0,{tracelog "A0=%08X, A1=%08X, A2=%08X, A3=%08X, A4=%08X, A5=%08X, A6=%08X, A7=%08X, D0=%08X, D1=%08X, D2=%08X, D3=%08X, D4=%08X, D5=%08X, D6=%08X ",a0,a1,a2,a3,a4,a5,a6,a7,d0,d1,d2,d3,d4,d5,d6}

-------------------------------
----Castlevania Blood Lines----
-------------------------------

---------------
----Toggles----
---------------
local draw_ehp = true -- Set to false to turn off HP display for enemies
local draw_php = true -- Set to false to turn off HP display for 1P
local draw_pproj = true --Set to false to turn off player projectiles

local draw_ph = true -- Set to false to turn off player hitboxes
local draw_eh = true -- Set to false to turn off enemie hitboxes

local infhp = true --Set to false to turn off infinite HP for the player


local playerbase = 0xFFB300
local face = 0x2C
local php = 0xFF9C11
local weapon = 0xFFB480
local spear = 0xFF9CA7
local enemybase = 0xFFB380

local xcord = 0x18
local ycord = 0x1C




local function playerhitbox()

    -------------------------
    ----Vulnerability box----
    -------------------------
    local facing = memory.readbyte(playerbase+face)
    local x = memory.readword(playerbase+0x18)
    local y = memory.readword(playerbase+0x1C)
    local xoff = memory.readwordsigned(playerbase+0x34)
    local yoff = memory.readwordsigned(playerbase+0x36)
    local xrad = memory.readword(playerbase+0x38)
    local yrad = memory.readword(playerbase+0x3A)

    gui.box(x+xoff,y+yoff,x+xoff+xrad,y+yoff+yrad,0x0000FF30,0x0000FFF0)


    ---------------------
    ----weapon hitbox----
    ---------------------
    facing = memory.readbyte(playerbase+face)

    x = memory.readword(weapon+0x18)
    y = memory.readword(weapon+0x1C)
    xoff = memory.readwordsigned(weapon+0x34)
    yoff = memory.readwordsigned(weapon+0x36)
    xrad = memory.readword(weapon+0x38)
    yrad = memory.readword(weapon+0x3A)

    if memory.readbyte(weapon+0x01) == 1 and memory.readbyte(weapon+0x28) > 0 then
        gui.box(x+xoff,y+yoff,x+xoff+xrad,y+yoff+yrad,0xFFFFFF40,0xFFFFFFFF)
    end

end

local function player_projectiles()

    local start = 0xFFC900
    local base
    local x
    local y
    local xoff
    local yoff
    local xrad
    local yrad
    local facing
    local ehp
    local oend = 32
    local active = false

    for i = 0,oend,1 do
        active = false
        base = start

        if i ~= 0 then
            base = start + (i * 0x80)
        end

        x = memory.readword(base + xcord)
        y = memory.readword(base + ycord)

        if memory.readbyte(base+1) == 1 then
            active = true
        end

        if y < 224 and y > 0 and x < 320 and x > 0 and active == true and (memory.readbyte(base+0x45)) > 0 and memory.readbyte(base+0x4F) > 0 and memory.readbyte(base+0x28) == 1 then

            facing = memory.readbyte(base+face)
            x = memory.readword(base+0x18)
            y = memory.readword(base+0x1C)
            xoff = memory.readwordsigned(base+0x34)
            yoff = memory.readwordsigned(base+0x36)
            xrad = memory.readword(base+0x38)
            yrad = memory.readword(base+0x3A)

            gui.box(x+xoff,y+yoff,x+xoff+xrad,y+yoff+yrad,0xFFFFFF40,0xFFFFFFFF)

            gui.text(x-8,y+10,"DMG: " .. memory.readbyte(base+0x45))
        end

    end
end

local function playerinfo()
    local x = memory.readword(playerbase+xcord)
    local y = memory.readword(playerbase+ycord)
    local hp = memory.readbyte(php)

    if draw_php == true then
        gui.text(x-12,y,"HP: " .. hp)
    end

    if draw_ph == true then
        playerhitbox()
    end

    if draw_pproj == true then
        player_projectiles()
    end

end

local function enemyinfo()

    local base
    local x
    local y
    local xoff
    local yoff
    local xrad
    local yrad
    local facing
    local ehp
    local oend = 44
    local active = false

    for i = 0,oend,1 do

        active = false
        base = enemybase

        if i ~= 0 then
            base = enemybase + (i * 0x80)
        end

        x = memory.readword(base + xcord)
        y = memory.readword(base + ycord)

        if memory.readbyte(base+1) == 1 then
            active = true
        end

        if base ~= weapon then

            if y < 224 and y > 0 and x < 320 and x > 0 and active == true then

                if draw_ehp == true then
                    gui.text(x-10,y,"HP: " .. memory.readbyte(base+0x55))
                end

                --------------------
                ----Enemy Hitbox----
                --------------------

                if draw_eh == true then
                    facing = memory.readbyte(base+face)
                    x = memory.readword(base+0x18)
                    y = memory.readword(base+0x1C)
                    xoff = memory.readwordsigned(base+0x34)
                    yoff = memory.readwordsigned(base+0x36)
                    xrad = memory.readword(base+0x38)
                    yrad = memory.readword(base+0x3A)

                    gui.box(x+xoff,y+yoff,x+xoff+xrad,y+yoff+yrad,0xFF000040,0xFF0000FF)

                end

            end
        end

    end

end



local function infinitehp()
    memory.writebyte(php,80)
end

gui.register(function()
    playerinfo()
    enemyinfo()
    if infhp == true then
        infinitehp()
    end
end)