Advertisement
Guest User

ENIGMA

a guest
Mar 12th, 2016
146
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 4.69 KB | None | 0 0
  1. local sql = dbConnect("mysql", "dbname=mta;hostname=localhost", "root", "", 3306)
  2.  
  3. function join(player, felhNev, passW)
  4.     setCameraMatrix(source, 1468.8785400391, -919.25317382813, 100.153465271, 1468.388671875, -918.42474365234, 99.881813049316)
  5.     fadeCamera(source, true, 3.5)
  6. end
  7. addEventHandler("onPlayerJoin", getRootElement(), join)
  8.  
  9. addEvent("registerEvent", true)
  10. addEventHandler("registerEvent", getRootElement(),
  11.     function(player, felhNev, passW, ID)
  12.         if #felhNev < 6 then outputChatBox("#A52A2ANe 6 karakter legyen a nevedben!", player, true) return end
  13.         if #passW < 8 then outputChatBox("#A52A2ANe 8 karakter legyen a jelszavadban!", player, true) return end
  14.         if getElementData(player, "LoggedIn") == 0 or getElementData(player, "LoggedIn") == nil then
  15.             outputChatBox("Nem vagy bejelentkezve.",player, true)
  16.         end
  17.  
  18.        
  19.         local qh = dbQuery(sql, "SELECT * FROM `accounts`")
  20.         local result = dbPoll ( qh, -1 )
  21.         dbFree(qh)
  22.         for i, accountInfo in ipairs(result) do
  23.             if accountInfo["username"] == felhNev then
  24.                 outputChatBox("Már van ilyen karakter az adatbázisomban!", player, 152, 0, 0, true)
  25.             return
  26.             else
  27.                 outputChatBox("#00F6FFSikeresen regisztráltad A ".. felhNev .. " Nevű karaktered!", player, 152, 0, 0, true)
  28.             end
  29.         end
  30.  
  31.         local sqlInster = dbExec( sql, "INSERT INTO accounts SET username = ?, password = ?, id = ?", felhNev, passW, ID)
  32.         if sqlInster then
  33.             showCursor(player, false)
  34.             triggerClientEvent(player, "loginEltuntetes", getRootElement())
  35.             triggerClientEvent(player, "karakterKeszites", getRootElement())
  36.         else
  37.             outputChatBox("Retek gyorsan keress fel egy admint.!", true)
  38.             return
  39.         end
  40.     end
  41. )
  42.  
  43. addEvent("loginEvent", true)
  44. addEventHandler("loginEvent", root,
  45.     function(player, felhNev, passW, ID)
  46.         dbQuery(function(qh, player)
  47.         query = dbQuery(sql, "SELECT * FROM accounts WHERE id = ?", ID)
  48.         local result, rows, errorMsg = dbPoll(qh, 0)
  49.         fadeCamera ( player, true, 1.0, 255, 0, 0 )
  50.         if rows > 0 then
  51.             for k, v in pairs(result) do
  52.                 if v["username"] ~= felhNev or v["password"] ~= passW then
  53.                     outputChatBox("#A52A2Hibás jelszó avagy felhasználónév!", player, 255, 255, 255, true)
  54.                 else
  55.                     outputChatBox("Üdvözöllek kedves ".. felhNev.. " A szerveren!", player, 152, 0, 0, true)
  56.                     showCursor(player, false)
  57.                     setCameraTarget(player, player)
  58.                     spawnPlayer(player, 0, 0, 3)
  59.                     triggerClientEvent(player, "loginEltuntetes", getRootElement())
  60.                 end
  61.             end
  62.         else
  63.             outputChatBox("Nincs ilyen felhasználónévvel ellátott account!", player)
  64.         end
  65.     end, {player}, sql, "SELECT * FROM accounts WHERE username = ? AND password = ? LIMIT 1", felhNev, passW)
  66. end)
  67.  
  68. function jatekosmentes( kilepestipus )
  69.     if getElementData(source, "LoggedIn") == 1 then
  70.         local x,y,z = getElementPosition( source )
  71.         local rx,ry,rz = getElementRotation ( source )
  72.         local playerHealth = getElementHealth ( source )
  73.         local playerArmor = getPedArmor ( source )
  74.         local mentes = dbQuery(sql,"UPDATE accounts SET X='"..x.."', Y='"..y.."', Z='"..z.."', R='"..rz.."', HP='"..playerHealth.."'BankMoney='"..getElementData(source,"char:bankmoney").."', Money='"..getElementData(source,"char:money").."', Armor='"..playerArmor.."")
  75.         for i = 0, 31 do
  76.             local itemSave = dbQuery(sql,"UPDATE accounts SET item_"..i.."='"..getElementData(source,"item_"..i).."', item_"..i.."_db='"..getElementData(source,"item_"..i.."_db").."', item_"..i.."_info='"..getElementData(source,"item_"..i.."_info").."' WHERE Serial='"..getPlayerSerial ( source ).."'")
  77.         end
  78.     end
  79. end
  80. addEventHandler ( "onPlayerQuit", getRootElement(), jatekosmentes )
  81.  
  82. addEvent("karakterKeszites2", true)
  83. addEventHandler("karakterKeszites2", getRootElement(),
  84.     function(player, mtaUser, Email)
  85.         dbQuery(function(qh, player)
  86.         query = dbQuery(sql, "SELECT * FROM accounts")
  87.             local result, rows, errorMsg = dbPoll(qh, 0)
  88.             if rows > 0 then
  89.                 for k, v in ipairs(result) do
  90.                     if v["mtausername"] ~= mtaUser then
  91.                         outputChatBox("Ilyen karakter már van létrehozva!", player, true)
  92.                     else
  93.                         outputChatBox("Üdvözöllek a játékban "..mtaUser.."!!",player, true)
  94.                         return
  95.                     end
  96.                 end
  97.             else
  98.                 outputChatBox("Beszoptad.",player, true)
  99.             end
  100.         end)
  101.  
  102.  
  103.         local sqlInster = dbExec( sql, "INSERT INTO accounts SET mtausername = ?, email = ?", mtaUser, Email)
  104.             if sqlInster then
  105.                 spawnPlayer(source, 0, 0, 3)
  106.                 setCameraTarget(source, source)
  107.                 triggerClientEvent(source, "loginEltuntetes", getRootElement())
  108.                 return
  109.             end
  110.         end
  111.     end)
  112. -- ITT A BIBI
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement