local data={ showed=nil, button={}}


local screenW, screenH = guiGetScreenSize()
local sx, sy = guiGetScreenSize()
function isMouseIn(psx,psy,pssx,pssy,abx,aby)
    if not isCursorShowing() then return end
    cx,cy=getCursorPosition()
    cx,cy=cx*sx,cy*sy
    if cx >= psx and cx <= psx+pssx and cy >= psy and cy <= psy+pssy then
        return true,cx,cy
    else
        return false
    end
end



function renderZoneBox()
        showCursor(true)
        dxDrawRectangle(screenW * 0.3857, screenH * 0.2781, screenW * 0.2369, screenH * 0.4524, tocolor(9, 0, 0, 121), false)
        dxDrawRectangle(screenW *0.3857, screenH *0.2781, screenW * 0.0052, screenH * 0.4524, tocolor(49, 237, 254, 179), false)
        dxDrawText("Premium", screenW * 0.4619, screenH * 0.2905, screenW * 0.5500, screenH * 0.3343, tocolor(255, 255, 255, 255), 2.00, "default", "center", "top", false, false, false, false, false)

        dxDrawText("Numer: 7136 Kod: AA.SP", screenW * 0.4161, screenH * 0.3905, screenW * 0.5976, screenH * 0.6657, tocolor(255, 255, 255, 255), 1.00, "default", "center", "top", false, false, false, false, false)
        dxDrawLine((screenW * 0.4179) - 1, (screenH * 0.6752) - 1, (screenW * 0.4179) - 1, screenH * 0.7210, tocolor(49, 237, 254, 179), 1, false)
        dxDrawLine(screenW * 0.5857, (screenH * 0.6752) - 1, (screenW * 0.4179) - 1, (screenH * 0.6752) - 1, tocolor(49, 237, 254, 179), 1, false)
        dxDrawLine((screenW * 0.4179) - 1, screenH * 0.7210, screenW * 0.5857, screenH * 0.7210, tocolor(49, 237, 254, 179), 1, false)
        dxDrawLine(screenW * 0.5857, screenH * 0.7210, screenW * 0.5857, (screenH * 0.6752) - 1, tocolor(49, 237, 254, 179), 1, false)
        dxDrawRectangle(screenW * 0.4179, screenH * 0.6752, screenW * 0.1679, screenH * 0.0457, tocolor(0, 0, 0, 98), false)
        dxDrawText("Sprawdz", screenW * 0.4561, screenH * 0.6818, screenW * 0.5452, screenH * 0.7048, tocolor(255, 255, 255, 255), 1.00, "bankgothic", "left", "top", false, false, false, false, false)
end

addEventHandler("onClientClick", root, function(btn,state)
    if btn=="left" and state=="down" then
        if isMouseIn(screenW * 0.4601, screenH * 0.6848, screenW * 0.5452, screenH * 0.7048) and data.showed then
    --    outputChatBox("Ten kod ("..guiGetText(data.button[1])..") wyslij na pm do Czeko (/pm Czeko "..guiGetText(data.button[1])..")")
        if guiCheckBoxGetSelected(data.button[2]) then amount = "1" else amount = "9" end
        triggerServerEvent("premiumActive", localPlayer, guiGetText(data.button[1]),amount)
        destroyElement(data.button[1])
        destroyElement(data.button[2])
        removeEventHandler("onClientRender", root, renderZoneBox)
        data.showed=false
        showCursor(false)
        elseif isMouseIn(screenW * 0.3655, screenH * 0.2733, screenW * 0.2696, screenH * 0.0467) and data.showed then
        destroyElement(data.button[1])
        destroyElement(data.button[2])
        removeEventHandler("onClientRender", root, renderZoneBox)
        data.showed=false
        showCursor(false)
        end
    end
end)

function premiumshow()
if data.showed then
    destroyElement(data.button[1])
    destroyElement(data.button[2])
    removeEventHandler("onClientRender", root, renderZoneBox)
    data.showed=false
    showCursor(false)
else
    addEventHandler("onClientRender", root, renderZoneBox) 
    data.button[1] = guiCreateEdit(0.40, 0.57, 0.21, 0.05, "", true)
    --data.button[2] = guiCreateCheckBox(0.40, 0.61, 0.21, 0.05, "D?u?sze premium (60 dni)", false,true)
    guiEditSetMaxLength(data.button[1], 8)  
    data.showed=true
end
end
addCommandHandler('premium', premiumshow)

api1 = "7c173edb493380fc126bf146b"
function getPremiumDate(plr)
    local queryA=exports['ogrpg-db']:dbGet("SELECT * FROM ogrpg_users WHERE id=? AND premiumdate>NOW() LIMIT 1", getElementData(plr,"player:uid"))
    if (queryA and #queryA > 0) then
        return queryA[1].premiumdate
    end
    return false    
end


function setPremiumDay(plr,days)
    if getPremiumDate(plr) then
    local queryA=exports['ogrpg-db']:dbSet(string.format("UPDATE ogrpg_users SET premiumdate = DATE(premiumdate) + INTERVAL %d DAY WHERE id=%d",days,getElementData(plr,"player:uid")))
    return end
    local queryA=exports['ogrpg-db']:dbSet(string.format("UPDATE ogrpg_users SET premiumdate = DATE(curdate()) + INTERVAL %d DAY WHERE id=%d",days,getElementData(plr,"player:uid")))                             api1="7c173edb493380fc126bf146b"
end

addEvent("premiumActive", true)
addEventHandler("premiumActive", root, function(code,amount)
    outputDebugString("Premium>> Konto premium zakupil "..getPlayerName(client).." zakupi?(a) konto premium:"..code..":"..amount)
    local query=string.format("https://admin.serverproject.eu/api/smsapi.php?key="..api1.."&amount=%s&code=%s&desc=%s", tostring(amount),code,string.format("UID:"..getElementData(client,"player:uid")))
    fetchRemote( query, result,"",false, client,amount)
end)

function result(responseData, errno, playerToReceive,amount)
    if errno == 0 then
    if string.find(responseData,"ok") then
        if tonumber(amount) == 10 then amount = 20 end
        setPremiumDay(playerToReceive,amount)
        outputChatBox("* Zakupiono konto premium na "..amount.." dni!", playerToReceive)
    --`    setElementData(playerToReceive,"player:premium", true)
        triggerEvent("save:player",root,playerToReceive)
        triggerEvent("load:player",root,playerToReceive)
    else
        outputChatBox("* B??dny Kod ("..responseData..")", playerToReceive)
--        outputChatBox("*B??dny Kod", client)
    end
    end
end



addCommandHandler("qkx.vip",function(plr,cmd,cel,dni) 
    if exports['pystories-admin']:getAdmin(plr,4) then
    if not cel then outputChatBox("/qkx.vip [gracz] [dni]",plr) return end
    if not dni then outputChatBox("/qkx.vip [gracz] [dni]",plr) return end
    if not tonumber(dni) then outputChatBox("/qkx.vip [gracz] [dni]",plr) return end
        local target=exports["pystories-core"]:findPlayer(plr,cel)
        if not target then
            outputChatBox("* Nie znaleziono podanego gracza.", plr, 255, 0, 0)
            return
        end
        setPremiumDay(target,dni)
        outputChatBox("* Nadano konto premium na "..dni.." dni !", plr)
        outputChatBox("* Otrzyma?e?(a?) konto premium na "..dni.." dni !", target)
        triggerEvent("save:player",root,target)
        triggerEvent("load:player",root,target)
        setElementData(target,"player:premium",true)
    end
end)


addCommandHandler("qkx.rozdajpremke",function(plr)
    if getElementData(plr,"player:uid") == 1 then
    for k,v in ipairs(getElementsByType ( "player" )) do
    if not getElementData(v, "player:uid") then return end
        iledni=2
        setPremiumDay(v,iledni)
        triggerEvent("save:player",root,v)
        triggerEvent("load:player",root,v)
        setElementData(v,"player:premium",true)
                gracze=v
                end
    end
    --outputChatBox("Z powodu dobrego humoru Butlipana, ca?y serwer otrzyma? premium na "..iledni.." dni!", gracze, 255, 255, 255)
end)

addCommandHandler("qkx.rozdajpremke",function(plr)
if getElementData(plr,"player:uid") == 1 then
outputChatBox("* Ca?y serwer otrzymuje konto premium na 1 dni !", root, 0, 192, 255)
end
end)

addEvent("premiumActive", true)
addEventHandler("premiumActive", root, function(code,amount)
    outputDebugString("Premium>> Konto premium zakupil "..getPlayerName(client).." zakupi?(a) konto premium:"..code..":"..amount)
    local query=string.format("https://admin.serverproject.eu/api/smsapi.php?key="..api1.."&amount=%s&code=%s&desc=%s", tostring(amount),code,string.format("UID:"..getElementData(client,"player:uid")))
    if not query then outputDebugString("Blad 1") end
    if fetchRemote( query, result,"",false, client,amount) then else outputDebugString("Blad 1") end
end)

[2017-02-21 15:02] WARNING: [TESTY]/Premium/s_pgui.lua:23: Access denied @ 'fetchRemote'

api1 = "7c173edb493380fc126bf146b"
function getPremiumDate(plr)
    local queryA=exports['ogrpg-db']:dbGet("SELECT * FROM ogrpg_users WHERE id=? AND premiumdate>NOW() LIMIT 1", getElementData(plr,"player:uid"))
    if (queryA and #queryA > 0) then
        return queryA[1].premiumdate
    end
    return false    
end


function setPremiumDay(plr,days)
    if getPremiumDate(plr) then
    local queryA=exports['ogrpg-db']:dbSet(string.format("UPDATE ogrpg_users SET premiumdate = DATE(premiumdate) + INTERVAL %d DAY WHERE id=%d",days,getElementData(plr,"player:uid")))
    return end
    local queryA=exports['ogrpg-db']:dbSet(string.format("UPDATE ogrpg_users SET premiumdate = DATE(curdate()) + INTERVAL %d DAY WHERE id=%d",days,getElementData(plr,"player:uid")))                             api1="7c173edb493380fc126bf146b"
end

addEvent("premiumActive", true)
addEventHandler("premiumActive", root, function(code,amount)
    outputDebugString("Premium>> Konto premium zakupil "..getPlayerName(client).." zakupi?(a) konto premium:"..code..":"..amount)
    local query=string.format("https://admin.serverproject.eu/api/smsapi.php?key="..api1.."&amount=%s&code=%s&desc=%s", tostring(amount),code,string.format("UID:"..getElementData(client,"player:uid")))
    if not query then outputDebugString("Blad 1") end
    if fetchRemote( query, result,"",false, client,amount) then else outputDebugString("Blad 1") end
end)

function result(responseData, errno, playerToReceive,amount)
    if errno == 0 then
    if string.find(responseData,"ok") then
        if tonumber(amount) == 2 then amount = 7 end
        setPremiumDay(playerToReceive,amount)
        outputChatBox("* Zakupiono konto premium na "..amount.." dni!", playerToReceive)
    --`    setElementData(playerToReceive,"player:premium", true)
        triggerEvent("save:player",root,playerToReceive)
        triggerEvent("load:player",root,playerToReceive)
    else
        outputChatBox("* B??dny Kod ("..responseData..")", playerToReceive)
--        outputChatBox("*B??dny Kod", client)
    end
    end
end



addCommandHandler("qkx.vip",function(plr,cmd,cel,dni) 
    if exports['pystories-admin']:getAdmin(plr,4) then
    if not cel then outputChatBox("/qkx.vip [gracz] [dni]",plr) return end
    if not dni then outputChatBox("/qkx.vip [gracz] [dni]",plr) return end
    if not tonumber(dni) then outputChatBox("/qkx.vip [gracz] [dni]",plr) return end
        local target=exports["pystories-core"]:findPlayer(plr,cel)
        if not target then
            outputChatBox("* Nie znaleziono podanego gracza.", plr, 255, 0, 0)
            return
        end
        setPremiumDay(target,dni)
        outputChatBox("* Nadano konto premium na "..dni.." dni !", plr)
        outputChatBox("* Otrzyma?e?(a?) konto premium na "..dni.." dni !", target)
        triggerEvent("save:player",root,target)
        triggerEvent("load:player",root,target)
        setElementData(target,"player:premium",true)
    end
end)


addCommandHandler("qkx.rozdajpremke",function(plr)
    if getElementData(plr,"player:uid") == 1 then
    for k,v in ipairs(getElementsByType ( "player" )) do
    if not getElementData(v, "player:uid") then return end
        iledni=2
        setPremiumDay(v,iledni)
        triggerEvent("save:player",root,v)
        triggerEvent("load:player",root,v)
        setElementData(v,"player:premium",true)
                gracze=v
                end
    end
    --outputChatBox("Z powodu dobrego humoru Butlipana, ca?y serwer otrzyma? premium na "..iledni.." dni!", gracze, 255, 255, 255)
end)

addCommandHandler("qkx.rozdajpremke",function(plr)
if getElementData(plr,"player:uid") == 1 then
outputChatBox("* Ca?y serwer otrzymuje konto premium na 1 dni !", root, 0, 192, 255)
end
end)