--[[

Adam 'Brother' Jablonsky
|jablonski.adam66@gmail.com|

]]

local abKapcsolat = nil
local mentesValtozo = 0

function jatekosokAdatFrissiteseSzerver()
    mentesValtozo = mentesValtozo + 1

    local jatekosokMentese = false

    if(mentesValtozo >= alapBeallitasok["mentes"]["jatekosMentesIdo"]) then
        jatekosokMentese = true
        mentesValtozo = 0
        abKapcsolat = exports['shark_mysql']:mysqlKapcsolatCallback()
    end
    for kulcs, jatekos in ipairs(getElementsByType("player")) do
        local jatekosFizetes = getElementData(jatekos, "karakter.fizetes")

        setElementData(jatekos, "karakter.fizetes", getElementData(jatekos, "karakter.fizetes")-1)
        if(jatekosFizetes-1 <= 0) then
            abKapcsolat = exports['shark_mysql']:mysqlKapcsolatCallback()
            local frakcioQuery = dbQuery( abKapcsolat, "SELECT f.nev as frakcionev, fr.fizetes as fizetes, f.szef as szef FROM frakciok f INNER JOIN frakcio_kapcs fk ON f.id=fk.frakcio INNER JOIN frakcio_rangok fr ON fk.rang=fr.rang AND fr.frakcio=f.id WHERE fk.kari=??", getElementData(jatekos, "karakter.id") )
            local frakcioQueryEredmeny, frakciokSzama = dbPoll ( frakcioQuery, -1 )
            if(frakciokSzama > 0) then
                for kulcs, sor in ipairs(frakcioQueryEredmeny) do
                    if(sor["szef"] >= sor["fizetes"]) then
                        exports['shark_core']:szerverErtesitesLetrehozasa(jatekos, exports['shark_core']:_w("informacja",nyelv,jatekos), "bal", exports['shark_core']:_w("fizetesInnen",nyelv, jatekos, sor["frakcionev"])..sor["fizetes"], "sikeres", "OutElastic", "Linear") 
                        dbExec(abKapcsolat, "UPDATE bank_szamlak SET egyenleg=egyenleg+?? WHERE tulajID = ? LIMIT 1", sor["fizetes"], getElementData(jatekos, "karakter.id"))
                        break;
                    else
                        exports['shark_core']:szerverErtesitesLetrehozasa(jatekos, exports['shark_core']:_w("informacja",nyelv,jatekos), "bal", exports['shark_core']:_w("nincsPenzFrakcio",nyelv, jatekos, sor["frakcionev"]), "sikeres", "OutElastic", "Linear") 
                    end
                end
            end
            local ingatlanQuery = dbQuery( abKapcsolat, "SELECT id, nev, ar FROM ingatlanok WHERE tipus=2 AND tulajID=??", getElementData(jatekos, "karakter.id") )
            local ingatlanQueryEredmeny, ingatlanokSzama = dbPoll ( ingatlanQuery, -1 )
            if(ingatlanokSzama > 0) then
                for kulcs, sor in ipairs(ingatlanQueryEredmeny) do
                    local szamlaQuery = dbQuery( abKapcsolat, "SELECT id, egyenleg FROM bank_szamlak WHERE tulajID=??", getElementData(jatekos, "karakter.id") )
                    local szamlaQueryEredmeny, szamlakSzama = dbPoll ( szamlaQuery, -1 )
                    if(szamlakSzama > 0) then
                        local kifizette = false
                        for szkulcs, szsor in ipairs(szamlaQueryEredmeny) do
                            if(szsor["egyenleg"] > sor["ar"]) then
                                kifizette = true
                                exports['shark_core']:adminUzenetKuldes(exports['shark_core']:_w("ingatlanFizetes",nyelv,jatekos,sor["nev"]).."-"..sor["ar"].." $", jatekos)
                                dbExec(abKapcsolat, "UPDATE bank_szamlak SET egyenleg=egyenleg-?? WHERE id = ?", tonumber(sor["ar"]), tonumber(szsor["id"]))
                                break;
                            end
                        end
                        if not kifizette then
                            for k, v in ipairs(getElementsByType("pickup")) do
                                local dbID = getElementData(v, "ingatlan.id")
                                if dbID then
                                    if dbID == tonumber(sor["id"]) then
                                        setPickupType ( v, 3, 1273  )
                                        setElementData(v, "ingatlan.tulajID", 0)
                                        exports["shark_przedmioty"]:osszesItemEltavolitas(jatekos, 39, sor["id"])
                                        dbExec(abKapcsolat, "UPDATE ingatlanok SET tulajID=0 WHERE id = ?", tonumber(sor["id"]))
                                        break
                                    end
                                end
                            end
                            exports['shark_core']:szerverErtesitesLetrehozasa(jatekos, exports['shark_core']:_w("informacja",nyelv,jatekos), "felso", exports['shark_core']:_w("nincsPenzIngatlan",nyelv,jatekos), "sikeres", "OutElastic", "Linear")
                        end
                    else
                        for k, v in ipairs(getElementsByType("pickup")) do
                            local dbID = getElementData(v, "ingatlan.id")
                            if dbID then
                                if dbID == tonumber(sor["id"]) then
                                    setPickupType ( v, 3, 1273  )
                                    setElementData(v, "ingatlan.tulajID", 0)
                                    exports["shark_przedmioty"]:osszesItemEltavolitas(jatekos, 39, sor["id"])
                                    dbExec(abKapcsolat, "UPDATE ingatlanok SET tulajID=0 WHERE id = ?", tonumber(sor["id"]))
                                    break
                                end
                            end
                        end
                        exports['shark_core']:szerverErtesitesLetrehozasa(jatekos, exports['shark_core']:_w("informacja",nyelv,jatekos), "felso", exports['shark_core']:_w("nincsSzamlaIngatlan",nyelv,jatekos), "sikeres", "OutElastic", "Linear")
                    end
                end
            end
            setElementData(jatekos, "karakter.fizetes", 1080)
        end
        if(jatekosokMentese) then
            triggerEvent("szerverJatekosMentes", jatekos)
        end
        local belepve = getElementData(jatekos, "belepve")
        local ehseg = 0
        if(belepve) then
            ehseg = getElementData(jatekos, "karakter.ehseg")
            if(ehseg >= 95) then
                setElementHealth(jatekos, getElementHealth(jatekos)-1)
            end
        end
        if(mentesValtozo % 6 == 0) then
            exports['shark_core']:xadatFrissit(jatekos, "karakter", "jatekido", 1, false)
            if(belepve) then
                local bido = getElementData(jatekos, "karakter.bortonido")
                if(bido > 0) then
                    setElementData(jatekos, "karakter.bortonido", bido-1)
                    if(bido <= 1) then
                        triggerEvent("vegeBortonnek", jatekos)
                    end
                end
            end
        elseif(mentesValtozo % 28 == 0) then
            if(belepve) then
                if(ehseg < 100) then
                    setElementData(jatekos, "karakter.ehseg", ehseg+1)
                end
            end
        end
    end
end
setTimer(jatekosokAdatFrissiteseSzerver, 10000, 0)

function osszesJatekosokMentese()
    abKapcsolat = exports['shark_mysql']:mysqlKapcsolatCallback()
    for kulcs, jatekos in ipairs(getElementsByType("player")) do
        triggerEvent("szerverJatekosMentes", jatekos)
    end
    return true
end

function jatekosMentes()
    abKapcsolat = exports['shark_mysql']:mysqlKapcsolatCallback()
    if(source and getElementData(source, "belepve")) then 
        local id = getElementData(source, "karakter.id")
        local jogsi = getElementData(source, "karakter.jogsi")
        local jatekido = getElementData(source, "karakter.jatekido")
        local kezpenz = getElementData(source, "karakter.kezpenz")
        local elet = getElementHealth(source)
        local pajzs = getPedArmor(source)
        local x, y, z = getElementPosition(source)
        local rot = getPedRotation(source)
        local int, dim = getElementInterior ( source ), getElementDimension ( source )
        local tartozkodas = getZoneName(x,y,z)
        local regiSkin, szolgalat = getElementData(source, "karakter.rskin"), getElementData(source, "karakter.szolgal")
        local korhazIdo = getElementData(source, "karakter.korhazido")
        local bortonIdo = getElementData(source, "karakter.bortonido")
        local fizetesIdo = getElementData(source, "karakter.fizetes")
        local ehseg = getElementData(source, "karakter.ehseg")
        local mentesQuery = dbQuery( abKapcsolat, "UPDATE `karakterek` SET `online` = '1', `jogsi` = '??', `elet` = '??', `pajzs` = '??', `ehseg` = '??', `x` = '??', `y` = '??', `z` = '??', `int` = '??', `dim` = '??', `rot` = '??', `tartozkodas` = '??', `jatekido` = '??', `rskin` = '??', `szolgal` = '??', `kezpenz`='??', `korhazido`='??', `bortonido`='??', `fizetes`='??' WHERE `id`=? LIMIT 1", jogsi, elet, pajzs, ehseg, x, y, z, int, dim, rot, tartozkodas, jatekido, regiSkin, szolgalat, kezpenz, korhazIdo, bortonIdo, fizetesIdo, id)
        dbPoll(mentesQuery, -1)
    end
end
addEvent("szerverJatekosMentes", false)
addEventHandler("szerverJatekosMentes", getRootElement(), jatekosMentes)
addEventHandler ( "onPlayerQuit", getRootElement(), jatekosMentes )

function wyszedl()
    abKapcsolat = exports['shark_mysql']:mysqlKapcsolatCallback()
    local id = getElementData(source, "karakter.id")
    local mentesQuery = dbQuery( abKapcsolat, "UPDATE `karakterek` SET `online` = '0' WHERE `id`=? LIMIT 1", id)
    dbPoll(mentesQuery, -1)
end
addEventHandler ( "onPlayerQuit", getRootElement(), wyszedl)