Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- function Rejestracja( ja, params )
- local result, passwd = sscanf(params,"s")
- if result == 1 then
- local fileRead = io.open("Baza_Danych/Konta/"..GetPlayerName(ja)..".db","r+")
- if fileRead then
- Wiadomosc(ja,255,0,0,"Istnieje konto z ową nazwą.")
- fileRead:close()
- else
- Wiadomosc(ja,0,255,60,"Konto zostało założone, Podsumowanie. : ")
- Gracz[ja].password = passwd
- Gracz[ja].zalogowany = 1
- Stun(ja,0)
- DajKolor(ja,255,255,255)
- PossAndAngle(ja,38937.015625, 3914.1574707031, -2196.0952148438,271)
- Wiadomosc(ja,0,255,60,"Nazwa Konta. : "..GetPlayerName(ja))
- Wiadomosc(ja,0,255,60,"Haslo do konta. : "..Gracz[ja].password)
- Wiadomosc(ja,0,255,60,"Życzymy miłej gry.")
- ShowDraw(ja,GameTime)
- ShowDraw(ja,realtime)
- Wloczega(ja)
- Gracz[ja].idklasy = 1
- ZapisKonta(ja)
- koloryiprawa(ja)
- local path = PATH_FILE..GetPlayerName(ja).."_items.db";
- if openFile(path, "r") then
- local items = readFileLines(path, "sd");
- if items then
- for i in pairs(items) do
- GiveItem(ja, items[i][1], items[i][2]);
- end
- end
- closeFile(path);
- else
- if openFile(path, "w+") then
- closeFile(path);
- end
- end
- end
- else
- Wiadomosc(ja,255,0,0,"Zła składnia. Wpisz : /zarejestruj hasło")
- end
- end
- function Logowanie( ja, params )
- local result, passwd = sscanf(params,"s")
- if result == 1 then
- local file = io.open("Baza_Danych/Konta/"..GetPlayerName(ja)..".db", "r+")
- if file then
- local result, pass = sscanf(file:read("*l"),"s")
- if result == 1 then
- if pass == passwd then
- Gracz[ja].password = passwd
- Wiadomosc(ja,0,255,60,"Logowanie przebiegło pomyślnie, Życzymy miłej gry.")
- Gracz[ja].zalogowany = 1
- WczytKonta(ja)
- Stun(ja,0)
- DajKolor(ja,255,255,255)
- ShowDraw(ja,GameTime)
- ShowDraw(ja,realtime)
- koloryiprawa(ja)
- local path = PATH_FILE..GetPlayerName(ja).."_items.db";
- if openFile(path, "r") then
- local items = readFileLines(path, "sd");
- if items then
- for i in pairs(items) do
- GiveItem(ja, items[i][1], items[i][2]);
- end
- end
- closeFile(path);
- else
- if openFile(path, "w+") then
- closeFile(path);
- end
- end
- else
- Wiadomosc(ja,255,0,0,"Acces Denied.!")
- end
- end
- file:close()
- else
- Wiadomosc(ja,255,0,0,"Nie posiadasz konta na tym serwerze.!")
- end
- end
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement