Advertisement
Guest User

Untitled

a guest
Apr 9th, 2017
99
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.27 KB | None | 0 0
  1. local Table = {
  2. { x, y, z },
  3. { x, y, z },
  4. { x, y, z },
  5. { x, y, z },
  6. { x, y, z },
  7. { x, y, z },
  8. }
  9.  
  10. addEventHandler( "onResourceStart", resourceRoot,
  11. function ( )
  12. executeSQLQuery ( "CREATE TABLE IF NOT EXISTS SaveAccount ( PlayerSerial, UserName, PassWord )" )
  13. executeSQLQuery ( "CREATE TABLE IF NOT EXISTS AutoLogin ( PlayerSerial, AutoLogin )" )
  14. end
  15. )
  16. addEvent( "onRegister", true )
  17. addEventHandler ( "onRegister", root,
  18. function ( User, PassWord )
  19. local Account = addAccount ( tostring ( User ), tostring ( PassWord ) )
  20. if Account then
  21. exports ["guimessages"] : outputServer ( source, "UserName: ".. User , 0, 255, 0, true )
  22. exports ["guimessages"] : outputServer ( source, "PassWord: ".. PassWord , 0, 255, 0, true )
  23. else
  24. exports ["guimessages"] : outputServer ( source, "# - [ #ffffff * This account already exists#ff0000 ] - #" , 255, 0, 0, true )
  25. end
  26. end
  27. )
  28.  
  29. addEvent( "onLogin", true )
  30. addEventHandler ( "onLogin", root,
  31. function ( User, PassWord, Text )
  32. local Account = getAccount ( tostring ( User ), tostring ( PassWord ) )
  33. local SQL = executeSQLQuery ( "SELECT * FROM SaveAccount WHERE PlayerSerial = ? ", getPlayerSerial ( client ) )
  34. local SQL1 = executeSQLQuery ( "SELECT * FROM AutoLogin WHERE PlayerSerial = ? ", getPlayerSerial ( client ) )
  35. if Account then
  36. if Text == "True" then
  37. if #SQL == 0 then
  38. executeSQLQuery ( "INSERT INTO AutoLogin ( PlayerSerial, AutoLogin ) VALUES ( ?, ? ) ", getPlayerSerial ( client ), "1" )
  39. executeSQLQuery ( "INSERT INTO SaveAccount ( PlayerSerial, UserName, PassWord ) VALUES ( ?, ?, ? ) ", getPlayerSerial ( client ), tostring ( User ), tostring ( PassWord ) )
  40. else
  41. executeSQLQuery ( "UPDATE SaveAccount SET PlayerSerial = ?, UserName = ?, PassWord = ? ", getPlayerSerial ( client ), tostring ( User ), tostring ( PassWord ) )
  42. executeSQLQuery ( "UPDATE AutoLogin SET PlayerSerial = ?, AutoLogin = ?", getPlayerSerial ( client ), "1" )
  43. end
  44. else
  45. if #SQL1 == 0 then
  46. executeSQLQuery ( "INSERT INTO AutoLogin ( PlayerSerial, AutoLogin ) VALUES ( ?, ? ) ", getPlayerSerial ( client ), "1" )
  47. else
  48. executeSQLQuery ( "UPDATE AutoLogin SET PlayerSerial = ?, AutoLogin = ?", getPlayerSerial ( client ), "1" )
  49. end
  50. end
  51. logIn ( client, Account, PassWord )
  52. triggerClientEvent ( source, "Yes", source )
  53. exports ["guimessages"] : outputServer ( source, "# - [ #ffffff Welcome To Server#ff0000 ] - #" , 255, 0, 0, true )
  54. local x, y, z = unpack ( Table [ math.random ( #Table ) ] )
  55. setElementPosition ( source, x, y, z )
  56. else
  57. exports ["guimessages"] : outputServer ( source, "# - [ #ffffff * Worng Username Or Password#ff0000 ] - #" , 255, 0, 0, true )
  58. end
  59. end
  60. )
  61.  
  62. addEvent( "On", true )
  63. addEventHandler ( "On", root,
  64. function ( )
  65. local SQLListe = executeSQLQuery ( "SELECT * FROM SaveAccount WHERE PlayerSerial = ? ", getPlayerSerial ( client ) )
  66. local SQLListe1 = executeSQLQuery ( "SELECT * FROM AutoLogin WHERE PlayerSerial = ? ", getPlayerSerial ( client ) )
  67. if #SQLListe ~= 0 then
  68. if #SQLListe1 ~= 0 then
  69. triggerClientEvent ( client, "Yes", client )
  70. local Account = getAccount ( tostring ( SQLListe [ 1 ] [ "UserName"] ), tostring ( SQLListe [ 1 ] [ "PassWord"] ) )
  71. logIn ( client, Account, tostring ( SQLListe [ 1 ] [ "PassWord"] ) )
  72. exports ["guimessages"] : outputServer ( client, "# - [ #ffffff Welcome To Server#ff0000 ] - #" , 255, 0, 0, true )
  73. local x, y, z = unpack ( Table [ math.random ( #Table ) ] )
  74. setElementPosition ( source, x, y, z )
  75. else
  76. triggerClientEvent ( client, "setInfo", client, SQLListe [ 1 ] [ "UserName"], SQLListe [ 1 ] [ "PassWord"] )
  77. end
  78. end
  79. end
  80. )
  81.  
  82. addCommandHandler ( "DELETE",
  83. function ( PlayerSource )
  84. local SQL = executeSQLQuery ( "SELECT * FROM AutoLogin WHERE PlayerSerial = ? ", getPlayerSerial ( PlayerSource ) )
  85. if #SQL == 0 then
  86. exports ["guimessages"] : outputServer ( PlayerSource, "# - [ #ffffff * لقد تم الحذف من قبل#ff0000 ] - #" , 255, 0, 0, true )
  87. else
  88. executeSQLQuery ( "DELETE FROM `AutoLogin` WHERE playerSerial = ?", getPlayerSerial ( PlayerSource ) )
  89. exports ["guimessages"] : outputServer ( PlayerSource, "# - [ #ffffff * تم الحذف بنجاح#ff0000 ] - #" , 255, 0, 0, true )
  90. end
  91. end
  92. )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement