-- CORONA MARKER --
local cFunc = {}
local cSetting = {}

cSetting["markerID"] = {}

function createCMarker(x, y, z, size, r, g, b, a)
    local sucess = createMarker(x, y, z, "corona", size, r, g, b, a)
    if(sucess) then
        cSetting["markerID"][sucess] = sucess
        setElementAlpha(sucess, 0)
        return sucess;
    else
        error("Bad Argument @ createCoronaMarker")
    end
end


function destroyCMarker(marker)
    return destroyElement(cSetting["markerID"][marker]);
end

-- RENDER --

cSetting["markerTextur"] = dxCreateTexture("corona.png")

cFunc["renderMarker"] = function()
    for marker, marker in pairs(cSetting["markerID"]) do
        if(isElement(marker)) then
            local x, y, z = getElementPosition(marker)
            local x2, y2, z2 = getCameraMatrix()
            if(isLineOfSightClear(x, y, z, x2, y2, z2, true, true, true, true)) then
                local sx, sy = getScreenFromWorldPosition(x, y, z)
                if(sx) and (sy) then
                    local r, g, b, a = getMarkerColor(marker)
                    local size = getMarkerSize(marker)
                    local dis = getDistanceBetweenPoints3D(x, y, z, x2, y2, z2)
                    local width, height = 170*size, 128*size

                    sy = sy-(128/(dis/10))
                    sx = sx+(170/(dis/10))
                    if(sx) and (sy) then
                        dxDrawImage ( sx, sy, width/(dis/10), height/(dis/10), "corona.png", 0, 0, 0, tocolor(r, g, b, 255))
                    end
                end
            end
        --  dxDrawImage ( x, y, z, x, y, z+1, cSetting["markerTextur"], 1, tocolor(r, g, b, 255), getCameraMatrix())
        end
    end
end

addEventHandler("onClientPreRender", getRootElement(), cFunc["renderMarker"])


local m = createCMarker(-720.40710449219, 934.24365234375, 12.1328125, 2.0, 0, 255, 0, 200)



function dxDrawImage3D(x,y,z,w,h,m,c,r,...)
    local lx, ly, lz = x+w, y+h, (z+tonumber(r or 0)) or z
    return dxDrawMaterialLine3D(x,y,z, lx, ly, lz, m, h, c or white, ...)
end