--[[
    Zas?b wykonany na potrzeby ServerProject.pl
    Autor: marcin778
    Prosz? o nie usuwanie mnie z linijki o autorze, w przeciwnym razie prosz? nie liczy? na support z mojej strony.
    Nie odpowiadam za przer?bki kodu przez u?ytkownik?w.
    
    https://wiki.multitheftauto.com/wiki/AddCommandHandler
--]]


addCommandHandler("additem",function(plr, cmd, who)

    if who then
        if getPlayerFromName(who) then
        
            --[[
                Gracz kupi? przedmiot. Wykonaj tutaj dowoln? akcj?, np. dodaj pieni?dze.
            --]]
            
            outputDebugString("Dodano przedmiot graczowi "..getPlayerName(getPlayerFromName(who))..".")
    
            outputChatBox(""..getPlayerName(getPlayerFromName(who)).." kupi?/a przedmiot.",root,255,255,255)
            
        else
            outputDebugString("Na serwerze nie ma gracza '"..who.."'. Gracz musi by? na serwerze, aby doda? mu przedmiot.")
        end
    else
        outputDebugString("Nie podano loginu gracza. U?yj: additem nick_gracza.")
    end
    
end)

function sprawdzIloscDni(gracz)
    local spr = exports['pystories-db']:dbGet("SELECT * FROM pystories_users WHERE id=? AND premiumdate>NOW() LIMIT 1", getElementData(gracz,"player:sid"))
    if (spr and #spr > 0) then
        return spr[1].premiumdate
    end
    return false
end

function ustawIloscDni(gracz, dni)
    if sprawdzIloscDni(gracz) then
    local wyk = exports['pystories-db']:dbSet(string.format("UPDATE pystories_users SET premiumdate = DATE(premiumdate) + INTERVAL %d DAY WHERE id=%d",dni,getElementData(gracz,"player:sid")))
    return end
    local wyk = exports["pystories-db"]:dbSet(string.format("UPDATE pystories_users SET premiumdate = DATE(curdate()) + INTERVAL %d DAY WHERE id=%d", dni, getElementData(gracz, "player:sid")))
end

addEvent("skPremium", true)
addEventHandler("skPremium", root, function(kod, dni)
    local spr = "http://microsms.pl/api/v2/multi.php?userid=4762&code="..kod.."&serviceid=6017"
    fetchRemote(spr, wyk, "", false, client, dni)
end)

function wyk(responseData, errno, playerToReceive, amount)
    if errno == 0 then
    if string.find(responseData, "kod") then
    amount = nil
        if string.find(responseData, '"number":"71480"') then
            amount = 2
        elseif string.find(responseData, '"number":"73480"') then
            amount = 4
        elseif string.find(responseData, '"number":"74480"') then
            amount = 8
        elseif string.find(responseData, '"number":"76480"') then
            amount = 15
        elseif string.find(responseData, '"number":"79480"') then
            amount = 31
        elseif string.find(responseData, '"number":"91900"') then
            amount = 61
        end
        if not amount then return end
        outputChatBox("Zakupi?e? PREMIUM na "..amount.." dni.", playerToReceive)
        outputChatBox("[SMS Premium] Gracz "..getPlayerName(playerToReceive).." zakupi? us?ug? PREMIUM na "..amount.." DNI!. Dzi?kujemy ?e nas wspieracie. Administracja Quaradie!", root, 34,124,255)
        setElementData(playerToReceive, "player:premium", true)
        ustawIloscDni(playerToReceive, amount)
        setPlayerNametagColor(playerToReceive, 255, 200, 0)
        triggerEvent("save:player",root,playerToReceive)
        triggerEvent("load:player",root,playerToReceive)
    else
        outputChatBox("Podany kod jest nieprawid?owy lub prawid?owy. Zg?o? to koniecznie Szym34k! ("..responseData..")", playerToReceive)
    end
end
end

function findPlayer(p, ph)
    for i,v in ipairs(getElementsByType("player")) do
        if tonumber(ph) then
            if getElementData(v, "id") == tonumber(ph) then
                return getPlayerFromName(getPlayerName(v))
            end
        else
            if string.find(string.gsub(getPlayerName(v):lower(),"#%x%x%x%x%x%x", ""), ph:lower(), 1, true) then
                return getPlayerFromName(getPlayerName(v))
            end
        end
    end
end

addCommandHandler("dajpremiumplus",function(plr,cmd,cel,dni) 
    if getAdmin(plr,5) or getAdmin(plr,3) then
    if not cel then outputChatBox("/dajpremiumplus [gracz] [dni]",plr) return end
    if not dni then outputChatBox("/dajpremiumplus [gracz] [dni]",plr) return end
    if not tonumber(dni) then outputChatBox("/dajpremium [gracz] [dni]",plr) return end
        local target=exports["tiyl-core"]:findPlayer(plr,cel)
        if not target then
            outputChatBox("* Nie znaleziono podanego gracza.", plr, 255, 0, 0)
            return
        end
        setsPremiumDay(target,dni)
        outputChatBox("Nadano konto PREMIUM+ na "..dni.." dni!", plr, 255, 128, 64)
        outputChatBox("Otrzymales konto PREMIUM+ na "..dni.." dni!", target, 255, 128, 64)
        setElementData(plr,"player:svip",true)
        triggerEvent("save:player",root,target)
        triggerEvent("load:player",root,target)
    end
end)