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

Wysłany: 2016-03-29, 19:43


szeroki

BlueRP.pl Zapraszam GTA5






Wiek: 36
Na forum: 3876 dni
Posty: 104

Piwa: 9

Respekt: 55,8

Ostrzeżeń: 40%
server.lua
addEvent "Logowanie:rozpocznij"true )
addEventHandler "Logowanie:rozpocznij"root, function ( loginhaslo )
    local q exports["fr-core"]:wykonajKwerende "SELECT * FROM FR_Accounts WHERE Login = ?"login )
    if #q == 0 then
        return triggerClientEvent "Logowanie:blad"source"Konto nie istnieje w bazie danych" )
    end
    for _,v in pairs ) do
        if v.haslo ~= haslo then
            return triggerClientEvent "Logowanie:blad"source"Has?o do konta '"..login.."' jest b??dne" )
        end
    end
    local konto getAccount loginhaslo )
    if konto == false then
        local account addAccount tostring(login), tostring(haslo) )
        for i=0,do
            outputChatBox " "root )
        end
    else
        local account logIn sourcekontohaslo )
    end
    triggerClientEvent "Logowanie:zakoncz"source )
    for 010 do
        outputChatBox " "source )
    end
    for _,v in pairs ) do
        if v.admin == 1 then
            setElementData source"ranga""Admin" )
            ranga "#FF0000Administrator"
        elseif v.moderator == 1 then
            setElementData source"ranga""Mod" )
            ranga "#008000Moderator"
        elseif v.admin == and v.moderator == 0 then
            setElementData source"ranga""Gracz" )
            ranga "#FFFFFFGracz"
        end
        setElementData source"uid"v["UID"] )
    end
    outputChatBox "#FF00FFPomy?lnie zalogowano jako "..rangasource02550true )
    setPlayerName sourcelogin )
    setPedWalkingStyle source118 )
    toggleControl source"fire"false )
    toggleControl source"aim_weapon"false )
    setElementData source"zalogowany"true )
    local h getAccountData getPlayerAccount source ), "h" ) or 0
    local m getAccountData getPlayerAccount source ), "m" ) or 0
    local s getAccountData getPlayerAccount source ), "s" ) or 0
    setAccountData getPlayerAccount source ), "h")
    setAccountData getPlayerAccount source ), "m")
    setAccountData getPlayerAccount source ), "s")
end)

local function getUID ()
    local u exports["fr-core"]:wykonajKwerende "SELECT * FROM FR_Accounts" )
    for k,_ in ipairs ) do
        liczba k
    end
    if liczba == or not liczba then
        return false
    end
    return liczba
end


addEvent "Rejestracja:rozpocznij"true )
addEventHandler "Rejestracja:rozpocznij"root, function ( loginhaslohaslo2 )
    local u exports["fr-core"]:wykonajKwerende "SELECT * FROM FR_Accounts WHERE Login = ?"login )
    if #u == 1 then
        return triggerClientEvent "Logowanie:blad"source"Konto '"..login.."' ju? istnieje w bazie danych" )
    end
    local uid getUID()
    if not uid then
        uid 1
    elseif uid then
        uid uid 1
    end
    local u exports["fr-core"]:wykonajKwerende "INSERT INTO FR_Accounts ( Login, haslo, UID, admin, moderator ) VALUES ( ?,?,?,?,? )"loginhaslouid"0""0" )
    triggerClientEvent "Rejestracja:zakoncz"source )
    uid 0
end)

addEventHandler "onPlayerJoin"root, function ()
    spawnPlayer source, -2620.014402262.513928.16689 )
    fadeCamera sourcetrue )
end)

a to
client.lua
mojeW,mojeH 640480
sW,sH guiGetScreenSize()
w= (sW/mojeW), (sH/mojeH)



button = {}
logowanie = {}
login = {}
okno = {}
rejestracja = {}


local font guiCreateFont "RobotoSlab-Bold.ttf"10 )

--okno g??wne

okno.glowne guiCreateGridList(71*w0*h149*w480*hfalse)
guiSetAlpha(okno.glowne0.91)
guiSetVisible okno.glownefalse )

button.logowanie guiCreateButton(16*w199*h116*w51*h"Panel\nlogowania"falseokno.glowne)
button.rejestracja guiCreateButton(16*w326*h116*w51*h"Panel\nrejestracji"falseokno.glowne)

guiSetFont button.logowaniefont )
guiSetFont button.rejestracjafont )
informacja guiCreateLabel(269*w34*h327*w25*h""false)
guiSetFont(informacja"default-bold-small")
guiLabelSetHorizontalAlign(informacja"center"false)
guiLabelSetVerticalAlign(informacja"center")
guiLabelSetColor informacja2550)

--okno logowania

okno.logowanie guiCreateGridList(269*w169*h266*w214*hfalse)
guiSetAlpha(okno.logowanie0.80)
guiSetVisible okno.logowaniefalse )

label guiCreateLabel(30*w32*h76*w23*h"Login :"falseokno.logowanie)
guiSetFont labelfont )
guiLabelSetHorizontalAlign(label"center"false)
guiLabelSetVerticalAlign(label"center")
logowanie[1] = guiCreateEdit(47*w61*h168*w23*h""falseokno.logowanie)
guiSetFont logowanie[1], font )
label2 guiCreateLabel(30*w94*h76*w23*h"Has?o :"falseokno.logowanie)
guiSetFont label2font )
guiLabelSetHorizontalAlign(label2"center"false)
guiLabelSetVerticalAlign(label2"center")
logowanie[2] = guiCreateEdit(47*w122*h168*w23*h""falseokno.logowanie)
guiSetFont logowanie[2], font )
guiEditSetMasked(logowanie[2], true)
login.zaloguj guiCreateButton(52*w162*h163*w37*h"Zaloguj na posta?"falseokno.logowanie)
guiSetFont login.zalogujfont )

--okno rejestracji

okno.rejestracja guiCreateGridList(277*w127*h264*w283*hfalse)
guiSetAlpha(okno.rejestracja0.88)
guiSetVisible okno.rejestracjafalse )

label3 guiCreateLabel(10*w22*h123*w22*h"Login :"falseokno.rejestracja)
guiSetFont label3font )
guiLabelSetHorizontalAlign(label3"center"false)
guiLabelSetVerticalAlign(label3"center")
rejestracja[3] = guiCreateEdit(52*w52*h158*w22*h""falseokno.rejestracja)
guiSetFont rejestracja[3], font )
label4 guiCreateLabel(10*w84*h123*w22*h"Has?o :"falseokno.rejestracja)
guiSetFont label4font )
guiLabelSetHorizontalAlign(label4"center"false)
guiLabelSetVerticalAlign(label4"center")
rejestracja[4] = guiCreateEdit(52*w112*h158*w22*h""falseokno.rejestracja)
guiSetFont rejestracja[4], font )
label5 guiCreateLabel(42*w144*h123*w22*h"Potwierd? has?o :"falseokno.rejestracja)
guiLabelSetHorizontalAlign(label5"center"false)
guiSetFont label5font )
guiLabelSetVerticalAlign(label5"center")
rejestracja[5] = guiCreateEdit(52*w176*h158*w22*h""falseokno.rejestracja)
guiSetFont rejestracja[5], font )
rejestracja.rejestruj guiCreateButton(32*w229*h196*w39*h"Zarejestruj posta?"falseokno.rejestracja)
guiSetFont rejestracja.rejestrujfont )

local function drawImageRejestracja ()
    dxDrawImage(224*w338*h35*w31*h"images/strzalka.png"000tocolor(255255255255), true)
end

local function drawImageLogowanie ()
    dxDrawImage(224*w211*h35*w31*h"images/strzalka.png"000tocolor(255255255255), true)
end

local function drawLogo ()
    dxDrawText("Blue-Life-RPG"19*w93*h278*w138*htocolor(000255), 1.10*w"pricedown""center""center"falsefalsetruefalsefalse)
    dxDrawText("Blue-Life-RPG"19*w91*h278*w136*htocolor(000255), 1.10*w"pricedown""center""center"falsefalsetruefalsefalse)
    dxDrawText("Blue-Life-RPG"17*w93*h276*w138*htocolor(000255), 1.10*w"pricedown""center""center"falsefalsetruefalsefalse)
    dxDrawText("Blue-Life-RPG"17*w91*h276*w136*htocolor(000255), 1.10*w"pricedown""center""center"falsefalsetruefalsefalse)
    dxDrawText("Blue-Life-RPG"18*w92*h277*w137*htocolor(255255255255), 1.10*w"pricedown""center""center"falsefalsetruefalsefalse)
end



addEventHandler "onClientResourceStart"resourceRoot, function ()
    guiSetVisible okno.glownetrue )
    showCursor true )
    addEventHandler "onClientRender"rootdrawLogo )
    showPlayerHudComponent "all"false )
    showChat false )
    smoothMoveCamera ( -2277.735112306.4328645.27243, -2331.826422315.0261228.38352, -2566.841312343.0051330.79271, -2627.190432342.3017612.1588860000  )
    setElementData localPlayer"blur"true )
    interSound )
end)

local function openPanelLogin ()
    if guiGetVisible okno.logowanie ) == false then
        guiSetVisible okno.logowanietrue )
        addEventHandler "onClientRender"rootdrawImageLogowanie )
    else
        guiSetVisible okno.logowaniefalse )
        removeEventHandler "onClientRender"rootdrawImageLogowanie )
    end
    if guiGetVisible okno.rejestracja ) == true then
        guiSetVisible okno.rejestracjafalse )
        removeEventHandler "onClientRender"rootdrawImageRejestracja )
        guiSetText rejestracja[3], "" )
        guiSetText rejestracja[4], "" )
        guiSetText rejestracja[5], "" )
    end
end

local function openPanelRegister ()
    if guiGetVisible okno.rejestracja ) == false then
        guiSetVisible okno.rejestracjatrue )
        addEventHandler "onClientRender"rootdrawImageRejestracja )
    else
        guiSetVisible okno.rejestracjafalse )
        removeEventHandler "onClientRender"rootdrawImageRejestracja )
    end
    if guiGetVisible okno.logowanie ) == true then
        guiSetVisible okno.logowaniefalse )
        removeEventHandler "onClientRender"rootdrawImageLogowanie )
        guiSetText logowanie[1], "" )
        guiSetText logowanie[2], "" )
    end
end


addEventHandler "onClientGUIClick"root, function ()
    if source == button.logowanie then
        openPanelLogin ()
        sound playSound "click.wav"false )
        setSoundVolume sound)
    elseif source == button.rejestracja then
        openPanelRegister ()
        sound playSound "click.wav"false )
        setSoundVolume sound)
    elseif source == login.zaloguj then
        local login guiGetText logowanie[1] )
        if login == "" then return guiSetText informacja"Wpisz login!" end
        local haslo guiGetText logowanie[2] )
        if haslo == "" then guiSetText informacja"Wpisz has?o!" ) return end
        triggerServerEvent "Logowanie:rozpocznij"localPlayerloginhaslo )
    elseif source == rejestracja.rejestruj then
        --playSoundFrontEnd 44 )
        local login1 guiGetText rejestracja[3] )
        if login1 == "" then return guiSetText informacja"Wpisz login!" end
        local haslo1 guiGetText rejestracja[4] )
        if haslo1 == "" then return guiSetText informacja"Wpisz has?o!" end
        local haslo2 guiGetText rejestracja[5] )
        if haslo2 == "" then return guiSetText informacja"Potwierd? has?o!" end
        if haslo1 ~= haslo2 then return guiSetText informacja"Wpisa?e? 2 r??ne has?a!" end
        triggerServerEvent "Rejestracja:rozpocznij"localPlayerlogin1haslo1haslo2 )
    end
end)

addEvent "Logowanie:blad"true )
addEventHandler "Logowanie:blad"root, function ( txttype )
    if source == localPlayer then
        guiSetText informacjatxt )
    end
    if not isTimer timer then
        timer setTimer guiSetText50001informacja"" )
    end
    sound playSound "blad.wav"false )
    setSoundVolume sound)
end)

addEvent "Logowanie:zakoncz"true )
addEventHandler "Logowanie:zakoncz"root, function ()
    if source == localPlayer then
        guiSetVisible okno.glownefalse )
        guiSetVisible okno.logowaniefalse )
        showCursor false )
        showChat true )
        showPlayerHudComponent "all"true )
        fadeCamera false )
        setTimer fadeCamera30001true )
        removeEventHandler "onClientRender"rootdrawImageLogowanie )
        removeEventHandler "onClientRender"rootdrawLogo )
        setTimer setCameraTarget20001source )
        --setTimer removeCamHandler2000)
        guiSetVisible informacjafalse )
        setElementData source"blur"false )
        playSound "alarm.wav"false )
        exports.spawn:openSpawn source )
        --exports["fr-characters"]:openCharactersList source )
    end
end)


addEvent "Rejestracja:zakoncz"true )
addEventHandler "Rejestracja:zakoncz"root, function ()
    if source == localPlayer then
        openPanelLogin ()
        sound playSound "complete.wav"false )
        setSoundVolume sound)
    end
end)


local sm = {}
sm.moov 0
sm.object1,sm.object2 nil,nil
 
 function removeCamHandler()
    if(sm.moov == 1)then
        sm.moov 0
    end
end
 
 function camRender()
    if (sm.moov == 1then
        local x1,y1,z1 getElementPosition(sm.object1)
        local x2,y2,z2 getElementPosition(sm.object2)
        setCameraMatrix(x1,y1,z1,x2,y2,z2)
    end
end
addEventHandler("onClientPreRender",root,camRender)
 
function smoothMoveCamera(x1,y1,z1,x1t,y1t,z1t,x2,y2,z2,x2t,y2t,z2t,time)
    if(sm.moov == 1)then return false end
    sm.object1 createObject(1337,x1,y1,z1)
    sm.object2 createObject(1337,x1t,y1t,z1t)
    setElementAlpha(sm.object1,0)
    setElementAlpha(sm.object2,0)
    setObjectScale(sm.object1,0.01)
    setObjectScale(sm.object2,0.01)
    moveObject(sm.object1,time,x2,y2,z2,0,0,0,"Linear")
    moveObject(sm.object2,time,x2t,y2t,z2t,0,0,0,"OutInBounce")
    sm.moov 1
    setTimer(removeCamHandler,time,1)
    setTimer(destroyElement,time,1,sm.object1)
    setTimer(destroyElement,time,1,sm.object2)
    return true
end

function stopS ()
    timer setTimer wycisz200)
end


function interSound type )
    if type == 0 then
        muzyka playSound "muzyka.mp3" )
    elseif type == 1 then
        stopSound muzyka )
    end
end


function wycisz ()
    if getSoundVolume muzyka ) <= 0 then
        stopSound muzyka )
        killTimer timer )
    return end
    volume tonumber getSoundVolume muzyka ) )
    volume volume 0.05
    setSoundVolume muzykavolume )
end


Podpis
**⚡┃CyanRP┃⚡ **

**💻┃*Adres IP:*** *wyspa.cyanrp.pl*
**📱┃*Link do serwera discord:*** *https://discord.gg/MJKqHksanU
Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-03-30, 12:39


AteX







Wiek: 26
Na forum: 4015 dni
Posty: 927
Nick w MP: #AteX

Piwa: 8360

Respekt: 775,3
Respekt: 775,3Respekt: 775,3


Więcej informacji znajdziesz w Wikipedii MTA:

dbConnect


Podpis
MultiTheftAuto++ dla MTA 1.5.7 już dostępne.
Postaw piwo autorowi tego posta
 

 
Tagi: jak :: podloczyc :: logowanie :: bazą
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