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

Wysłany: 2021-01-07, 19:52


krystek77







Wiek: 28
Na forum: 4172 dni
Posty: 135
Nick w MP: Krystek

Piwa: 176

Respekt: 125,3
Respekt: 125,3

Prosze pomoc nie wiem wyczerpaly mi sie pomysly jak to ogarnac zeby dawalo punkty premium oraz pieniadze przechodzily na serverporject.pl

Orginal:



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

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

addEvent("skPremium", true)
addEventHandler("skPremium", root, function(kod, dni,x)
    if x then
       local spr = "http://microsms.pl/api/v2/multi.php?userid=3051&code="..kod.."&serviceid=3769"
       fetchRemote(spr, wykpp, "", false, client, dni) 
    else
       local spr = "http://microsms.pl/api/v2/multi.php?userid=3051&code="..kod.."&serviceid=3769"
       fetchRemote(spr, wyk, "", false, client, dni)
    end
end)

function wyk(responseData, errno, playerToReceive, amount)
    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":"72480"') then
            amount = 100
        elseif string.find(responseData, '"number":"73480"') then
            amount = 300
        elseif string.find(responseData, '"number":"76480"') then
            amount = 750
        elseif string.find(responseData, '"number":"79480"') then
            amount = 1000
        elseif string.find(responseData, '"number":"92550"') then
            amount = 3500
        end
        if not amount then return end
        exports['yd-noti']:noti(playerToReceive, "Pomy?lnie zakupi?e? "..amount.." punkt?w premium.", "success")
        outputChatBox("#3366ff"..getPlayerName(playerToReceive):gsub("#%x%x%x%x%x%x","").." #cccccczakupi? #3366ff"..amount.." #ccccccpunkt?w premium!", root, 200,200,200,true)
        setElementData(playerToReceive, "pkt:premium", getElementData(playerToReceive, "pkt:premium")+amount)
        triggerEvent("save:player",root,playerToReceive)
        triggerEvent("load:player",root,playerToReceive)
    else
        exports['yd-noti']:noti(playerToReceive, "Podany kod jest nieprawdi?owy.", "error")
    end
end
end


Moja wersja




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

function ustawIloscDni(gracz, dni)
    if sprawdzIloscDni(gracz) then
            local wyk = exports["mysql"]:wykonaj(string.format("UPDATE pystories_users SET goldtime = DATE(goldtime) + INTERVAL %d DAY WHERE id=%d", dni, getElementData(gracz, "player:sid")))
        return 
    end
    local wyk = exports["mysql"]:wykonaj(string.format("UPDATE pystories_users SET goldtime = DATE(curdate()) + INTERVAL %d DAY WHERE id=%d", dni, getElementData(gracz, "player:sid")))
end
api="spmgxgRtYlhb4r0j3Qy5zbLuN"
addEvent("skPremium", true)
addEventHandler("skPremium", root, function(kod, dni,x)
    if x then
       local spr = "http://admin.serverproject.pl/api/smsapi.php?key="..api1.."&amount=%s&code=%s&desc=%s"
       fetchRemote(spr, wykpp, "", false, client, dni,amount) 
    else
       local spr = "http://admin.serverproject.pl/api/smsapi.php?key="..api1.."&amount=%s&code=%s&desc=%s"
       fetchRemote(spr, wyk, "", false, client, dni,amount)
    end
end)



function wyk(responseData, errno, playerToReceive, amount)
    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":"7255"') then
            amount = 100
        elseif string.find(responseData, '"number":"7355"') then
            amount = 300
        elseif string.find(responseData, '"number":"7636"') then
            amount = 750
        elseif string.find(responseData, '"number":"7936"') then
            amount = 1000
        elseif string.find(responseData, '"number":"92555"') then
            amount = 3500
        end
        if not amount then return end
        exports['yd-noti']:noti(playerToReceive, "Pomy?lnie zakupi?e? "..amount.." punkt?w premium.", "success")
        outputChatBox("#f0ff00"..getPlayerName(playerToReceive):gsub("#%x%x%x%x%x%x","").." #cccccczakupi? #f0ff00"..amount.." #ccccccpunkt?w premium!", root, 200,200,200,true)
        setElementData(playerToReceive, "pkt:premium", getElementData(playerToReceive, "pkt:premium")+amount)
        triggerEvent("save:player",root,playerToReceive)
        triggerEvent("load:player",root,playerToReceive)
    else
        exports['yd-noti']:noti(playerToReceive, "Podany kod jest nieprawdi?owy.", "error")
    end
end
end


Daje piwko i repke za pomoc z gory dziekuje.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2021-01-08, 15:08


TheSebaPL

Mod-team






Wiek: 22
Na forum: 3239 dni
Posty: 964

Piwa: 3101

Respekt: 640,5
Respekt: 640,5Respekt: 640,5

krystek77, a jak masz ten kod bez twoich przer?bek to dzia?a ci ?

Postaw piwo autorowi tego posta
 

 
Wysłany: 2021-01-08, 15:11


_jvneczek







Wiek: 22
Na forum: 4466 dni
Posty: 1509
Nick w MP: _jvneczek

Piwa: 3960

Respekt: 337,5
Respekt: 337,5Respekt: 337,5Respekt: 337,5

local spr = "http://admin.serverproject.pl/api/smsapi.php?key="..api1.."&amount=%s&code=%s&desc=%s"

nic dziwnego, api1 nie ma jak zdefiniowa?, w evencie z 'kod' zmien na api1

Postaw piwo autorowi tego posta
 

 
Więcej szczegółów
Wystawiono 1 piw(a):
krystek77
Wysłany: 2021-01-08, 17:19


krystek77







Wiek: 28
Na forum: 4172 dni
Posty: 135
Nick w MP: Krystek

Piwa: 176

Respekt: 125,3
Respekt: 125,3

"satan_" napisał/a:

local spr = "http://admin.serverproject.pl/api/smsapi.php?key="..api1.."&amount=%s&code=%s&desc=%s"

nic dziwnego, api1 nie ma jak zdefiniowa?, w evencie z 'kod' zmien na api1

[21-01-08 17] WARNING: [GameMode]/[ez3n]/yd-dashboard/s.lua:
41: Access denied @ 'fetchRemote'



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

function ustawIloscDni(gracz, dni)
    if sprawdzIloscDni(gracz) then
            local wyk = exports["mysql"]:wykonaj(string.format("UPDATE pystories_users SET goldtime = DATE(goldtime) + INTERVAL %d DAY WHERE id=%d", dni, getElementData(gracz, "player:sid")))
        return 
    end
    local wyk = exports["mysql"]:wykonaj(string.format("UPDATE pystories_users SET goldtime = DATE(curdate()) + INTERVAL %d DAY WHERE id=%d", dni, getElementData(gracz, "player:sid")))
end
api="spmgxgRtYlhb4r0j3Qy5zbLuN"
addEvent("skPremium", true)
addEventHandler("skPremium", root, function(api1, dni,x)
    if x then
       local spr = "http://admin.serverproject.pl/api/smsapi.php?key="..api1.."&amount=%s&code=%s&desc=%s"
       fetchRemote(spr, wykpp, "", false, client, dni,amount) 
    else
       local spr = "http://admin.serverproject.pl/api/smsapi.php?key="..api1.."&amount=%s&code=%s&desc=%s"
       fetchRemote(spr, wyk, "", false, client, dni,amount)
    end
end)



function wyk(responseData, errno, playerToReceive, amount)
    if errno == 0 then
    if string.find(responseData, "api1") then
    amount = nil
        if string.find(responseData, '"number":"0"') then
            amount = 0
        elseif string.find(responseData, '"number":"7255"') then
            amount = 100
        elseif string.find(responseData, '"number":"7355"') then
            amount = 300
        elseif string.find(responseData, '"number":"7636"') then
            amount = 750
        elseif string.find(responseData, '"number":"7936"') then
            amount = 1000
        elseif string.find(responseData, '"number":"92555"') then
            amount = 3500
        end
        if not amount then return end
        exports['yd-noti']:noti(playerToReceive, "Pomy?lnie zakupi?e? "..amount.." punkt?w premium.", "success")
        outputChatBox("#f0ff00"..getPlayerName(playerToReceive):gsub("#%x%x%x%x%x%x","").." #cccccczakupi? #f0ff00"..amount.." #ccccccpunkt?w premium!", root, 200,200,200,true)
        setElementData(playerToReceive, "pkt:premium", getElementData(playerToReceive, "pkt:premium")+amount)
        triggerEvent("save:player",root,playerToReceive)
        triggerEvent("load:player",root,playerToReceive)
    else
        exports['yd-noti']:noti(playerToReceive, "Podany kod jest nieprawdi?owy.", "error")
    end
end
end


Postaw piwo autorowi tego posta
 

 
Wysłany: 2021-01-08, 18:22


_jvneczek







Wiek: 22
Na forum: 4466 dni
Posty: 1509
Nick w MP: _jvneczek

Piwa: 3960

Respekt: 337,5
Respekt: 337,5Respekt: 337,5Respekt: 337,5

Dodaj skrypt do grupy acl admin, resource.nazwaskryptu

Postaw piwo autorowi tego posta
 

 
Więcej szczegółów
Wystawiono 1 piw(a):
krystek77
Wysłany: 2021-01-08, 18:55


krystek77







Wiek: 28
Na forum: 4172 dni
Posty: 135
Nick w MP: Krystek

Piwa: 176

Respekt: 125,3
Respekt: 125,3

"satan_" napisał/a:

Dodaj skrypt do grupy acl admin, resource.nazwaskryptu


Po dodaniu erroru nie ma. Ale r?wnie? nie ma do?adowania chodzi mi tutaj o to ze jak pisze kod i klikam dolatuj nic sie nie dzieje

Postaw piwo autorowi tego posta
 

 
Tagi: brak :: pomyslu :: przerobieniem :: kupna :: 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 » Brak Pomyslu z przerobieniem kupna premium 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