Jump to content

مشكلة ب الديبوق ما وجدت لها حل < > !!


Recommended Posts

-- Client Side >

triggerServerEvent("onGetSave",localPlayer) 
  
addEvent("onPutSave",true) 
addEventHandler("onPutSave",root, 
 function (puser,ppass) 
  guiSetText(user,puser) 
  guiSetText(pass,ppass) 
 end 
) 
  
addEventHandler("onClientGUIClick",root, 
 function () 
  local user = guiGetText(user) 
  local pass = guiGetText(pass) 
  if ( source == login ) then 
   if user = "" and pass = "" then 
                                                guiSetVisible ( wnd, false ) 
                                                showCursor(false) 
    if guiCheckBoxGetSelected(Remember) then 
     triggerServerEvent("onLoginWith",localPlayer,user,pass) 
    else 
     triggerServerEvent("onLogin",localPlayer,user,pass) 
    end 
   else 
    outputChatBox("* You Must Write Username Or Password",255,0,0) 
   end 
  elseif ( source == reg ) then 
   if user = "" and pass = "" then 
    triggerServerEvent("onReg",localPlayer,user,pass) 
   else 
    outputChatBox("* You Must Write Username Or Password",255,0,0) 
   end 
  end 
 end 
) 

-- Server side >

executeSQLQuery("CREATE TABLE IF NOT EXISTS players_save( serial TEXT, user TEXT, pass TEXT)") 
  
function AddPlayer(serial,user,pass) 
 executeSQLQuery("INSERT INTO players_save(serial,user,pass) VALUES(?,?,?)",serial,user,pass) 
end 
  
function isPlayerSave(serial) 
 local sel = executeSQLQuery("SELECT serial FROM players_save WHERE serial=?",serial) 
 if sel == 0 then 
  return false 
 else 
  return true 
 end 
end 
  
function getUserAndPass(serial) 
 local user,pass = "","" 
 if isPlayerSave(serial) then 
  local sel = executeSQLQuery("SELECT * FROM players_save WHERE serial=?",serial) 
  for i,player in ipairs(sel) do 
   if i == 1 then 
    user = player.user 
    pass = player.pass 
   end 
  end 
  return user,pass 
 end 
 return false 
end 
  
addEvent("onGetSave",true) 
addEventHandler("onGetSave",root, 
 function () 
  local serial = getPlayerSerial(source) 
  if isPlayerSave(serial) then 
   local user,pass = getUserAndPass(serial) 
   triggerClientEvent(source,"onPutSave",source,user,pass) 
  end 
 end 
) 
  
addEvent("onLoginWith",true) 
addEventHandler("onLoginWith",root, 
 function (user,pass) 
  local acc = getAccount(user,pass) 
  local serial = getPlayerSerial(source) 
  if acc then 
   logIn(source,acc,pass) 
   outputChatBox("* You Have Been Successfuly Login",source,0,255,0) 
   AddPlayer(serial,user,pass) 
   triggerClientEvent(source,"onCl",source) 
  else 
   outputChatBox("* Worng Username Or Password",source,255,0,0) 
  end 
 end 
) 
  
addEvent("onLogin",true) 
addEventHandler("onLogin",root, 
 function (user,pass) 
  local acc = getAccount(user,pass) 
  if acc then 
   logIn(source,acc,pass) 
   outputChatBox("* You Have Been Successfuly Login",source,0,255,0) 
   triggerClientEvent(source,"onCl",source) 
  else 
   outputChatBox("* Worng Username Or Password",source,255,0,0) 
  end 
 end 
) 
  
addEvent("onReg",true) 
addEventHandler("onReg",root, 
 function (user,pass) 
  local acc = getAccount(user,pass) 
  if acc then 
   outputChatBox("* This Account is Already Exist",source,255,0,0) 
  else 
   addAccount(user,pass) 
   outputChatBox("* Username = " .. user .. "",source,0,255,0) 
   outputChatBox("* Password = " .. pass .. "",source,0,255,0) 
  end 
 end 
) 
  
Link to comment

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...