Zaloguj się by uzyskać pełen dostęp. Nie masz jeszcze konta? Założ je już teraz w kilka sekund.

Wysłany: 2019-04-03, 14:32


Yami

Mapper / Uczeń LUA






Wiek: 25
Na forum: 3059 dni
Posty: 379

Piwa: 97

Respekt: 235
Respekt: 235Respekt: 235

Siemka, mam problem z panelem premium z GM East City
Gdy chce kupi? sobie premium przez ten panel to ten kod kt?ry kupie przez sms i go wpisze to nic nie pokazuje. Lecz dzia?a na do?adowanie waluty na svpj przez sms. Wie kto? o co chodzi?

s.lua

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

function ustawIloscDni(graczdni)
    if sprawdzIloscDni(graczthen
    local wyk exports["ogrpg-db"]:dbSet(string.format("UPDATE ogrpg_users SET premiumdate = DATE(premiumdate) + INTERVAL %d DAY WHERE id=%d"dnigetElementData(gracz"player:uid")))
    return end
    local wyk exports["ogrpg-db"]:dbSet(string.format("UPDATE ogrpg_users SET premiumdate = DATE(curdate()) + INTERVAL %d DAY WHERE id=%d"dnigetElementData(gracz"player:uid")))
end

addEvent("skPremium"true)
addEventHandler("skPremium"root, function(koddni)
    local spr "https://admin.serverproject.eu/api/smsapi.php?key=AB5tCGkr9KBwRnQGZSFgBKNxe&amount=$KWOTA&code=$KOD_SMS&desc=$OPIS"..kod.."&serviceid=41944"
    fetchRemote(sprwyk""falseclientdni)
end)

function wyk(responseDataerrnoplayerToReceiveamount)
    if errno == 0 then
    if string.find(responseData"kod"then
    amount nil
        if string.find(responseData'"number":"0"'then
            amount 0
        elseif string.find(responseData'"number":"7136"'then
            amount 3
        elseif string.find(responseData'"number":"7255"'then
            amount 7
        elseif string.find(responseData'"number":"7355"'then
            amount 14
        elseif string.find(responseData'"number":"7455"'then
            amount 30
        elseif string.find(responseData'"number":"7555"'then
            amount 60
        end
        if not amount then return end
        outputChatBox("Zakupi?e? premium na "..amount.." dni."playerToReceive)
        outputChatBox("#ff0000"..getPlayerName(playerToReceive).." #00ff00zakupi? premium na #ff0000"..amount.." dni. #00ff00Dzi?kujemy za wsparcie!"root0,255,0,true)
        setElementData(playerToReceive"player:premium"true)
        ustawIloscDni(playerToReceiveamount)
        setPlayerNametagColor(playerToReceive2552000)
        triggerEvent("save:player",root,playerToReceive)
        triggerEvent("load:player",root,playerToReceive)
    else
        outputChatBox("Podany kod jest nieprawid?owy. ("..responseData..")"playerToReceive)
    end
end
end

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


c.lua

function isEventHandlerAdded(sEventName,pElementAttachedTo,func)
    if type(sEventName)=='string' and isElement(pElementAttachedTo) and type(func)=='function' then local aAttachedFunctions getEventHandlers(sEventName,pElementAttachedTo)
    if type(aAttachedFunctions)=='table' and #aAttachedFunctions > 0 then for i,v in ipairs(aAttachedFunctions) do if v==func then return true end end end
    end return false
end

ww,hh 19201080
www,hhh guiGetScreenSize()
wnhn = (www/ww), (hhh/hh)

local screenWscreenH guiGetScreenSize()
local sxsy guiGetScreenSize()

function mysz(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
local dxfont0_droidsans dxCreateFont(":ogrpg-gui/droid-sans.ttf"12)
local dxfont1_droidsans dxCreateFont(":ogrpg-gui/droid-sans.ttf"14)
local dxfont2_droidsans dxCreateFont(":ogrpg-gui/droid-sans.ttf"15)
local gp = {}

editbox guiCreateEdit(0.430.490.140.04""true)
komboboks guiCreateComboBox(0.440.340.120.13""true)
guiComboBoxAddItem(komboboks"1 dzie?")
guiComboBoxAddItem(komboboks"3 dni")
guiComboBoxAddItem(komboboks"7 dni")
guiComboBoxAddItem(komboboks"14 dni")
guiComboBoxAddItem(komboboks"30 dni")
guiComboBoxAddItem(komboboks"60 dni")
guiSetVisible(komboboks,false)
guiSetVisible(editbox,false)
local pp false

function guiPremka()
                local a interpolateBetween(0,0,255,255,0,255,((getTickCount()-tick)/3350),"Linear") 
                        local a2 interpolateBetween(0,0,141,141,0,141,((getTickCount()-tick)/3350),"Linear") 
        local wybrane guiComboBoxGetSelected(komboboks)
        if not wybrane then return end
        local tekst guiComboBoxGetItemText(komboboks,wybrane)
        if tekst == "1 dzie?" then
            txt="Obecnie brak premium na 1 d."
        elseif tekst == "3 dni" then
            txt="Tre?? sms: AA.SP\nNumer: 7136\nKoszt: 1,23 z?\nPoni?ej wpisz otrzymany w sms kod:"
        elseif tekst == "7 dni" then
            txt="Tre?? sms: AA.SP\nNumer: 7255\nKoszt: 2,45 z?\nPoni?ej wpisz otrzymany w sms kod:"
        elseif tekst == "14 dni" then
            txt="Tre?? sms: AA.SP\nNumer: 7355\nKoszt: 3,69 z?\nPoni?ej wpisz otrzymany w sms kod:"
        elseif tekst == "30 dni" then
            txt="Tre?? sms: AA.SP\nNumer: 7455\nKoszt: 4,92 z?\nPoni?ej wpisz otrzymany w sms kod:"
        elseif tekst == "60 dni" then
            txt="Tre?? sms: AA.SP\nNumer: 7555\nKoszt: 6,15 z?\nPoni?ej wpisz otrzymany w sms kod:"
        else
            txt="Tre?? sms: --\nNumer: --\nKoszt: --\nPoni?ej wpisz otrzymany w sms kod:"
        end
        roundedRectangle(screenW 0.3755screenH 0.2833screenW 0.2495screenH 0.4333tocolor(97107103141), false)
        dxDrawText("Panel kupna konta premium\nPoni?ej wybierz ilo?? dni", (screenW 0.3755) + 1, (screenH 0.2889) + 1, (screenW 0.6250) + 1, (screenH 0.3343) + 1tocolor(000a), 1*wndxfont0_droidsans"center""center"falsefalsefalsefalsefalse)
        dxDrawText("Panel kupna konta premium\nPoni?ej wybierz ilo?? dni"screenW 0.3755screenH 0.2889screenW 0.6250screenH 0.3343tocolor(255255255a), 1*wndxfont0_droidsans"center""center"falsefalsefalsefalsefalse)
        dxDrawText(txt, (screenW 0.4385) + 1, (screenH 0.3648) + 1, (screenW 0.5615) + 1, (screenH 0.4954) + 1tocolor(000a), 1*wndxfont1_droidsans"center""center"falsefalsefalsefalsefalse)
        dxDrawText(txtscreenW 0.4385screenH 0.3648screenW 0.5615screenH 0.4954tocolor(255255255a), 1*wndxfont1_droidsans"center""center"falsefalsefalsefalsefalse)
        if mysz(screenW 0.4307screenH 0.5750screenW 0.1396screenH 0.0583then roundedRectangle(screenW 0.4307screenH 0.5750screenW 0.1396screenH 0.0583tocolor(20184118a2), false) else roundedRectangle(screenW 0.4307screenH 0.5750screenW 0.1396screenH 0.0583tocolor(20184118a), falseend
        --dxDrawText("Zakup premium"827 1*wn621 1*hn1095 1*wn684 1*hntocolor(000a), 1*wndxfont2_droidsans"center""center"falsefalsefalsefalsefalse)
        dxDrawText("Zakup premium"827*wn621*hn1095*wn684*hntocolor(255255255a), 1*wndxfont2_droidsans"center""center"falsefalsefalsefalsefalse)
        if mysz(screenW 0.5984screenH 0.6685screenW 0.0214screenH 0.038then roundedRectangle(screenW 0.5984screenH 0.6685screenW 0.0214screenH 0.0389tocolor(20184118a2), false) else roundedRectangle(screenW 0.5984screenH 0.6685screenW 0.0214screenH 0.0389tocolor(20184118a), falseend
      --  dxDrawText("X", (screenW 0.5984) + 1, (screenH 0.6676) + 1, (screenW 0.6198) + 1, (screenH 0.7074) + 1tocolor(000a), 1*wndxfont0_droidsans"center""center"falsefalsefalsefalsefalse)
        dxDrawText("X"screenW 0.5984screenH 0.6676screenW 0.6198screenH 0.7074tocolor(255255255a), 1*wndxfont0_droidsans"center""center"falsefalsefalsefalsefalse)
end

addEventHandler("onClientClick"root, function(bs)
    if ~= "state" and ~= "down" then return end
    if mysz(screenW 0.4307screenH 0.5750screenW 0.1396screenH 0.0583) and pp == true then
        if guiGetText(editbox) == "" then return end
        local dni 0
        local wybrane guiComboBoxGetSelected(komboboks)
        if not wybrane then return end
        local tekst guiComboBoxGetItemText(komboboks,wybrane)
        if tekst == "1 dzie?" then
            dni 1
        elseif tekst == "3 dni" then
            dni 3
        elseif tekst == "7 dni" then
            dni 7
        elseif tekst == "14 dni" then
            dni 14
        elseif tekst == "30 dni" then
            dni 30
        elseif tekst == "60 dni" then
            dni 60
        else
            dni 0
        end
        if dni == 0 then
            outputChatBox("Nie wybra?e? ilo?ci dni, wybierz i kliknij ponownie.")
            return
        end
        triggerServerEvent("skPremium"localPlayerguiGetText(editbox), dni)
    elseif mysz(screenW 0.5984screenH 0.6685screenW 0.0214screenH 0.0389) and pp == true then
        pp false
guiSetVisible(komboboks,false)
guiSetVisible(editbox,false)
        showCursor(false)
        setElementFrozen(localPlayer,false)
        removeEventHandler("onClientPreRender"rootguiPremka)
    end
end)

addCommandHandler("premium", function()
tick getTickCount()
--if getPlayerSerial(localPlayer) == "8FE50105E2AB81DFA78E08780A079292" or getPlayerSerial(localPlayer) == "26B5B94341856F4168BD00A7DFF6CFB4" then
    if pp ~= true then
        pp true
guiSetVisible(komboboks,true)
guiSetVisible(editbox,true)
        showCursor(truefalse)
        setElementFrozen(localPlayer,true)
        addEventHandler("onClientPreRender"rootguiPremka)
    else
        pp false
guiSetVisible(komboboks,false)
guiSetVisible(editbox,false)
        showCursor(false)
        setElementFrozen(localPlayer,false)
        removeEventHandler("onClientPreRender"rootguiPremka)
    --    end
    end
end)


function roundedRectangle(xywhcolor)
  dxDrawRectangle(xywhcolorfalse)
  dxDrawRectangle(2141colorfalse)
  dxDrawRectangle(2h41colorfalse)
  dxDrawRectangle(1214colorfalse)
  dxDrawRectangle(w214colorfalse)
end 


local spr = "https://admin.serverproject.eu/api/smsapi.php?key=AB5tCGkr9KBwRnQGZSFgBKNxe&amount=$KWOTA&code=$KOD_SMS&desc=$OPIS"..kod.."&serviceid=41944"
Tu sa dane mojego serwera
Na pocz?tku jest adres url z smsapi a dalej id us?ugi mta (41944)

Nie wiem czy dobrze to uzupe?ni?em.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-04-03, 20:41


Dawcio77







Wiek: 22
Na forum: 3312 dni
Posty: 89
Nick w MP: cx_u

Piwa: 136

Respekt: 35,8

Twoje ca?e "local spr [...]" ma z?e argumenty - $AMOUNT / $KOD_SMS / $OPIS
S? to domy?lne warto?ci, kt?re skopiowa?e? z serverproject.pl, musisz to zamieni? na swoje zmienne, dzi?ki czemu b?dzie dzia?a?. Mog? ci ju? powiedzie?, ?e $KOD_SMS b?dzie argumentem "kod", z reszt? (AMOUNT itd.) b?dziesz musia? sam si? pobawi?.

Postaw piwo autorowi tego posta
 

 
Tagi: premium
Anonymous





Na forum: 245 dni
Posty: 1



Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA Ten temat jest zablokowany bez możliwości zmiany postów lub pisania odpowiedzi

Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Dodaj temat do Ulubionych
Wersja do druku