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

Wysłany: 2019-07-02, 16:36


Pyrek24







Wiek: 25
Na forum: 3438 dni
Posty: 546
Nick w MP: Pyrek

Piwa: 10

Respekt: 50

Witam ot?? pr?bowa?em doda? do panelu logowania dawanie premki gdy dany gracz si? zarejestruje lecz nie wychodzi?o mi to.
element data na premke
setElementData("player:premium"7)

t? 7 doda?em bo chc? by dawa?o na 7dni.
kod s_logowanie

--[[
--[[
     Panel Logowania by Kurianusz @2016 . 
     Regulamin /Licencja
     Korzystanie z tego kodu tylko je?eli posiadasz tzwcopyrightsZakaz usuwania tej notatki!
     Pami?taj ?e nielegalne korzystanie z kodu podpada pod kodeks karny :> Tak samo jak usuni?cie tej notatki!
]]



function sprawdzorganizacje(plr)
local x exports['ogrpg-db']:dbGet("SELECT spawn from ogrpg_organization_list join ogrpg_organizations on ogrpg_organizations.code = ogrpg_organization_list.id WHERE uid=? and not(spawn=?)",getElementData(plr,"player:uid"),"0,0,0")
if and #x > 0 then
local t split(x[1].spawn",")
    return t
end
return false
end

function getAdmin(plr,level)
    if level then
        local result=exports["ogrpg-db"]:dbGet("SELECT * from ogrpg_admins WHERE serial=? AND level=?"getPlayerSerial(plr), level)
        if result and #result > 0 then
            return true
        else
            return false
        end
    else
        local result=exports["ogrpg-db"]:dbGet("SELECT * from ogrpg_admins WHERE serial=?"getPlayerSerial(plr))
        if result and #result > 0 then
            return true
        else
            return false
        end
    end
end

addEvent("logging:checkAccount"true)
addEventHandler("logging:checkAccount"resourceRoot, function(login,pass,save)
    local result=exports["ogrpg-db"]:dbGet("SELECT * FROM ogrpg_users WHERE login=?"login)
    if result and #result > 0 then
        serial=getPlayerSerial(client)
        if result[1].register_serial~=serial then
            tak=true
            for i,v in ipairs(split(result[1].seriale,",")) do
                if v==serial then tak=false end
            end
            if tak then
                return triggerClientEvent(client"logging:result"resourceRootfalse"Nie mo?esz si? zalogowa? na to konto!","nope")
            end
        end
        if result[1].login == login and result[1].pass == md5(passthen
            local query=exports["ogrpg-db"]:dbSet("UPDATE ogrpg_users SET pass=? WHERE login=?",teaEncode(pass,"Trujeczka"),login)
            triggerClientEvent(client"logging:result"resourceRootfalse"Zaaktualizowano twoj profil! Zaloguj sie ponownie!.","git")
            return
        end
        if result[1].login == login and result[1].pass == teaEncode(pass,"Ryjek"then
            local query=exports["ogrpg-db"]:dbSet("UPDATE ogrpg_users SET pass=? WHERE login=?",teaEncode(pass,"Trujeczka"),login)
            triggerClientEvent(client"logging:result"resourceRootfalse"Zaaktualizowano twoj profil! Zaloguj sie ponownie!.","git")
            return
        end
        if result[1].login == login and result[1].pass == teaEncode(pass,"Trujeczka"then
            local query=exports["ogrpg-db"]:dbSet("UPDATE ogrpg_users SET pass=? WHERE login=?",teaEncode(pass,"*****"),login)
            triggerClientEvent(client"logging:result"resourceRootfalse"Zaaktualizowano twoj profil! Zaloguj sie ponownie!.","git")
            return
        end
        if result[1].login == login and result[1].pass == teaEncode(pass,"*****"then
            local query=exports["ogrpg-db"]:dbSet("UPDATE ogrpg_users SET pass=? WHERE login=?",teaEncode(pass,"wypierdalacchuje"),login)
            triggerClientEvent(client"logging:result"resourceRootfalse"Zaaktualizowano twoj profil! Zaloguj sie ponownie!.","git")
            return
        end
        if result[1].login == login and result[1].pass == teaEncode(pass,"wypierdalacchuje"then
            for i,player in pairs(getElementsByType("player")) do
                if getElementData(player,"player:uid") == result[1].id then
                triggerClientEvent(client"logging:result"resourceRootfalse"Kto? jest zalogowany na to konto!!!!!.","blad")
                return
            end
            end
            --local result2=exports['ogrpg-db']:dbGet("SELECT login2 from ogrpg_users where id=?",result[1].id)
            if result[1].login2 == false then
            setPlayerName(clientlogin)
            else
            setPlayerName(clientresult[1].login2)
            triggerClientEvent(client"iyw_notifications:send"client"info""Wykupiono us?uge zmiana pseudonimu, tw?j nick to: "..result[1].login2.."")
            end
            q=exports["ogrpg-db"]:dbGet("select logowania_nagroda from ogrpg_users where id=? limit 1",result[1].id)
            exports["ogrpg-db"]:dbSet("update ogrpg_users set logowania_nagroda=logowania_nagroda+1 WHERE DATE(ostatnio_online) = DATE(NOW() - INTERVAL 1 DAY) and id=? limit 1",result[1].id)
            q3=exports["ogrpg-db"]:dbGet("select logowania_nagroda from ogrpg_users where id=? limit 1",result[1].id)
            if(tonumber(q[1].logowania_nagroda)<q3[1].logowania_nagroda)then
                nagrody[q3[1].logowania_nagroda](client)
                if(q3[1].logowania_nagroda==7)then
                    exports["ogrpg-db"]:dbSet("update ogrpg_users set logowania_nagroda=0 WHERE DATE(ostatnio_online) = DATE(NOW() - INTERVAL 1 DAY) and id=? limit 1",result[1].id)
                end
            else
                exports["ogrpg-db"]:dbSet("update ogrpg_users set logowania_nagroda=0 WHERE DATE(ostatnio_online)<DATE(NOW() - INTERVAL 1 DAY) and id=? limit 1",result[1].id)
            end
            if(savethen
                triggerClientEvent(client"createsaved:login",client,login,pass)
            else
                triggerClientEvent(client"deletesaved:login",client)
            end
            exports["ogrpg-db"]:dbSet("update ogrpg_users set ostatnio_online=NOW() where id=?"result[1].id)
            setElementData(client"player:uid"result[1].id)
            triggerClientEvent(client"logging:result"resourceRoottrue"Zalogowa?e? si? pomyslnie","git")
            triggerEvent("SprawdzDom",root,client)
            setElementData(client,"player:organization:spawn",sprawdzorganizacje(client))
            setElementData(client,"p:title",result[1].rp_tytul)
            if result[1].register_serial == false then
            --local query=exports["ogrpg-db"]:dbSet("UPDATE ogrpg_users SET register_serial=? WHERE login=?",getPlayerSerial(client),login)
            end
            local logs=exports["ogrpg-db"]:dbSet("INSERT INTO ogrpg_logs_login (name,serial,data) VALUES (?,?,NOW())"string.format(login.."("..result[1].id..")"),getPlayerSerial(client))
        else
            triggerClientEvent(client"logging:result"resourceRootfalse"Podane dane s? nieprawid?owe.","blad")
        end
    else
        triggerClientEvent(client"logging:result"resourceRootfalse"Podany login nie istnieje w bazie.","blad")
    end
end)
local maks_ilosc_kont -- Maksymalna ilosc kont do rejestracji
addEvent("logging:newAccount"true)
addEventHandler("logging:newAccount"resourceRoot, function(login,pass)
    local result=exports["ogrpg-db"]:dbGet("SELECT * FROM ogrpg_users WHERE register_serial=?"getPlayerSerial(client))
    if result and #result >= maks_ilosc_kont then
        triggerClientEvent(client"logging:result"resourceRootfalse"Na ten serial zostala utworzona maksymalna ilosc kont.","blad")
    return end
    local result=exports["ogrpg-db"]:dbGet("SELECT * FROM ogrpg_users WHERE login=?"login)
    if result and #result > 0 then
        triggerClientEvent(client"logging:result"resourceRootfalse"Podany login ju? istnieje w bazie.","blad")
    else
        local query=exports["ogrpg-db"]:dbSet("INSERT INTO ogrpg_users (login,pass,register_serial,changedpw) VALUES (?,?,?,?)"loginteaEncode(pass,"wypierdalacchuje"),getPlayerSerial(client),1)
        if query then
            triggerClientEvent(client"logging:result"resourceRootfalse"Pomyslnie zarejestrowales(as) sie!","git")
            setElementData(client"player:premium")
            setPremiumDay(client,7)
            setElementData(client"player:logged"true)
        end
    end
end)


nagrody={
[1]=function(plr)
    triggerClientEvent(client"iyw_notifications:send"client"info""To twoj pierwszy dzien kiedy jestes u nas pod rzad! Niedlugo otrzymasz na nagrode")
end,
[2]=function(plr)
    triggerClientEvent(client"iyw_notifications:send"client"info""To tw?j drugi dzie? kiedy jeste? u nas pod rz?d! Otrzymujesz 500PLN!")
    plr:giveMoney(500)
end,
[3]=function(plr)
    triggerClientEvent(client"iyw_notifications:send"client"info""To tw?j trzeci dzie? kiedy jeste? u nas pod rz?d! Otrzymujesz 600PLN!")
    plr:giveMoney(600)
end,
[4]=function(plr)
    triggerClientEvent(client"iyw_notifications:send"client"info""To tw?j czwarty dzie? kiedy jeste? u nas pod rz?d! Otrzymujesz 750PLN!")
    plr:giveMoney(750)
end,
[5]=function(plr)
    triggerClientEvent(client"iyw_notifications:send"client"info""To tw?j pi?ty dzie? kiedy jeste? u nas pod rz?d! Otrzymujesz 900PLN!")
    plr:giveMoney(900)
end,
[6]=function(plr)
    triggerClientEvent(client"iyw_notifications:send"client"info""To tw?j sz?sty dzie? kiedy jeste? u nas pod rz?d! Otrzymujesz 1000PLN!")
    plr:giveMoney(1000)
end,
[7]=function(plr)
    triggerClientEvent(client"iyw_notifications:send"client"info""To tw?j si?dmy dzie? kiedy jeste? u nas pod rz?d! 1 punkt premium!")
    exports["ogrpg-db"]:dbSet("update ogrpg_users set pp=pp+1 where id=? limit 1",plr:getData("player:uid"))
end,
 
}


Prosi?bym o pomoc.

Podpis
amta
Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-07-02, 17:49


TheBAMBO

restMTA






Wiek: 22
Na forum: 2812 dni
Posty: 73
Nick w MP: zexty

Piwa: 12110

Respekt: 75,8

Zobacz to:


function premka(plr)
if getElementData(plr,"player:logged"then
setElementData(plr,"player:premium"true)
end
end


Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-07-02, 18:06


Pyrek24







Wiek: 25
Na forum: 3438 dni
Posty: 546
Nick w MP: Pyrek

Piwa: 10

Respekt: 50

Nie dzia?a :(
tak zrobi?em

local maks_ilosc_kont -- Maksymalna ilosc kont do rejestracji
addEvent("logging:newAccount"true)
addEventHandler("logging:newAccount"resourceRoot, function(login,pass)
    local result=exports["ogrpg-db"]:dbGet("SELECT * FROM ogrpg_users WHERE register_serial=?"getPlayerSerial(client))
    if result and #result >= maks_ilosc_kont then
        triggerClientEvent(client"logging:result"resourceRootfalse"Na ten serial zostala utworzona maksymalna ilosc kont.","blad")
    return end
    local result=exports["ogrpg-db"]:dbGet("SELECT * FROM ogrpg_users WHERE login=?"login)
    if result and #result > 0 then
        triggerClientEvent(client"logging:result"resourceRootfalse"Podany login ju? istnieje w bazie.","blad")
    else
        local query=exports["ogrpg-db"]:dbSet("INSERT INTO ogrpg_users (login,pass,register_serial,changedpw) VALUES (?,?,?,?)"loginteaEncode(pass,"wypierdalacchuje"),getPlayerSerial(client),1)
        if query then
            triggerClientEvent(client"logging:result"resourceRootfalse"Pomyslnie zarejestrowales(as) sie!","git")        
        function premka(plr)
        if getElementData(plr,"player:logged"then
        setElementData(plr,"player:premium"true)
        setPremiumDay(plr,7)
        end
        end        
        end
    end
end)

Niestety nie dzia?a.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-07-02, 21:23


Wilq







Wiek: 24
Na forum: 4428 dni
Posty: 3410

Piwa: 739

Respekt: 1225,8
Respekt: 1225,8

Gratulacje, wstawi?es funkcje do funkcji.
Skopiuj tylko jej tre??

Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-07-02, 23:25


Pyrek24







Wiek: 25
Na forum: 3438 dni
Posty: 546
Nick w MP: Pyrek

Piwa: 10

Respekt: 50

Wilq no tak xdd. Poprawi?em lecz dalej nic.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-07-02, 23:27


Wilq







Wiek: 24
Na forum: 4428 dni
Posty: 3410

Piwa: 739

Respekt: 1225,8
Respekt: 1225,8

Poka? kod po zmianach.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-07-03, 00:40


Pyrek24







Wiek: 25
Na forum: 3438 dni
Posty: 546
Nick w MP: Pyrek

Piwa: 10

Respekt: 50


local maks_ilosc_kont -- Maksymalna ilosc kont do rejestracji
addEvent("logging:newAccount"true)
addEventHandler("logging:newAccount"resourceRoot, function(login,pass)
    local result=exports["ogrpg-db"]:dbGet("SELECT * FROM ogrpg_users WHERE register_serial=?"getPlayerSerial(client))
    if result and #result >= maks_ilosc_kont then
        triggerClientEvent(client"logging:result"resourceRootfalse"Na ten serial zostala utworzona maksymalna ilosc kont.","blad")
    return end
    local result=exports["ogrpg-db"]:dbGet("SELECT * FROM ogrpg_users WHERE login=?"login)
    if result and #result > 0 then
        triggerClientEvent(client"logging:result"resourceRootfalse"Podany login ju? istnieje w bazie.","blad")
    else
        local query=exports["ogrpg-db"]:dbSet("INSERT INTO ogrpg_users (login,pass,register_serial,changedpw) VALUES (?,?,?,?)"loginteaEncode(pass,"wypierdalacchuje"),getPlayerSerial(client),1)
        if query then
            triggerClientEvent(client"logging:result"resourceRootfalse"Pomyslnie zarejestrowales(as) sie!","git")    
            setElementData(client"player:logged"true)
            if getElementData(client,"player:logged"then
            setElementData(client,"player:premium"true)
        end
        end
    end
end)


Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-07-05, 23:27


TheBAMBO

restMTA






Wiek: 22
Na forum: 2812 dni
Posty: 73
Nick w MP: zexty

Piwa: 12110

Respekt: 75,8

A nie lepiej zrobic tak?




function premka()
setElementData(localPlayer"eldata-premki"true)
end 
addEventHandler("onPlayerJoin"getRootElement(), premka)



[ Dodano: 2019-07-05, 23:27 ]
A nie lepiej zrobic tak?




function premka()
setElementData(localPlayer"eldata-premki"true)
end 
addEventHandler("onPlayerJoin"getRootElement(), premka)



Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-07-06, 14:16


TeeNekk

Cienzaruwka :v






Wiek: 23
Na forum: 3210 dni
Posty: 264
Nick w MP: TeeNekk.

Piwa: 919

Respekt: 110,5
Respekt: 110,5

"TheBAMBO" napisał/a:

A nie lepiej zrobic tak?




function premka()
setElementData(localPlayer"eldata-premki"true)
end 
addEventHandler("onPlayerJoin"getRootElement(), premka)



[ Dodano: 2019-07-05, 23:27 ]
A nie lepiej zrobic tak?




function premka()
setElementData(localPlayer"eldata-premki"true)
end 
addEventHandler("onPlayerJoin"getRootElement(), premka)


Jak nie potraficie w lua, nie pomagajcie.
- raz, localPlayer na source, to raz. Dwa, po co ustawiacie element dat? jak to trzeba w mysql zmieni?? (Nie, nie pomog? poniewa? nawet nie wiem jak wygl?da tabela ogrpg)

Podpis
Pomogłem Ci
? Może zostawiłbyś za to piwko, lub respekt? Dzięki!
Mój projekt:
?
Postaw piwo autorowi tego posta
 

 
Tagi: dawanie :: premki :: zarejestrowaniu
Anonymous





Na forum: 245 dni
Posty: 1



Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA » Dawanie premki po zarejestrowaniu . 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