· 9 years ago · Apr 09, 2017, 05:26 PM
1local 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
10addEventHandler( "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)
16addEvent( "onRegister", true )
17addEventHandler ( "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
29addEvent( "onLogin", true )
30addEventHandler ( "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
62addEvent( "On", true )
63addEventHandler ( "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
82addCommandHandler ( "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)