كيف

# ~ ! S [ T ] A R . · June 23, 2018

كيف اخلي لو صكيت واحد ميوت م يقدر يفكة لنفسة ارجو حل

Adham · June 23, 2018

تبي رتبة معينه م تقدر تفك الميوت قصدك هيك؟

+Source|> · June 23, 2018

8 hours ago, #Mr.Kams said:

كيف اخلي لو صكيت واحد ميوت م يقدر يفكة لنفسة ارجو حل

سوي فك الميوت يكون بالسيرييال او بالرتب

Rakan# · June 23, 2018

55 minutes ago, +Source|> said:

سوي فك الميوت يكون بالسيرييال او بالرتب

مايحتاج . فقط تحقق اذا كان اللي يبي يفك ميوته هو نفسه اللاعب يقوله ماتقدر

ليه سيريالات وتعب

#Major . · June 23, 2018

57 minutes ago, Rakan# said:

مايحتاج . فقط تحقق اذا كان اللي يبي يفك ميوته هو نفسه اللاعب يقوله ماتقدر

ليه سيريالات وتعب

if ( source ~= player) then

# ~ ! S [ T ] A R . · June 23, 2018

21 minutes ago, *RayaN-Alharbi. said:
if ( source ~= player) then

ابية زي الوزارة م حد يقدر يفك الميوت لنفسة لكن الاعبين تقدر تفكة
؟

2 hours ago, +Source|> said:

سوي فك الميوت يكون بالسيرييال او بالرتب

ابية زي الوزارة م حد يقدر يفك الميوت لنفسة لكن الاعبين تقدر تفكة

م ابية بالسريال

#Major . · June 23, 2018

2 hours ago, #Mr.Kams said:

ابية زي الوزارة م حد يقدر يفك الميوت لنفسة لكن الاعبين تقدر تفكة

هات اكواد لوحة الادمن عند حدث فك الميوت

TOUNSI |, السعأدة · June 23, 2018

ثواني اكتب لك اكواد

local UnmuteTOUNSI = { -- سريالات المسموحة بفك الميوت
["123456789"] = true, -- سريالك
["123456789"] = true, -- سريال اخوك
["123456789"] = true, -- سريال اخوك
}

		
elseif ( source == aTab1.Mute ) then	
if account == account1 then
if player == localPlayer and not ( UnmuteTOUNSI[getPlayerSerial ( )] ) then
outputChatBox('يمنع استخدام الميوت لنفسك',255,0,0)
return
end
end

اي مساعده ارجع كلمني

#Major . · June 23, 2018

2 minutes ago, MR.TOUNSI said:

ثواني اكتب لك اكواد


local UnmuteTOUNSI = { -- سريالات المسموحة بفك الميوت
["123456789"] = true, -- سريالك
["123456789"] = true, -- سريال اخوك
["123456789"] = true, -- سريال اخوك
}

		
elseif ( source == aTab1.Mute ) then	
if account == account1 then
if player == localPlayer and not ( UnmuteTOUNSI[getPlayerSerial ( )] ) then
outputChatBox('يمنع استخدام الميوت لنفسك',255,0,0)
return
end
end

اي مساعده ارجع كلمني

شيك ع خاصك

+

هو قال يبيه م يفك نفسه بس غيره يقدر

TOUNSI |, السعأدة · June 23, 2018

Just now, *RayaN-Alharbi. said:

شيك ع خاصك

+

هو قال يبيه م يفك نفسه بس غيره يقدر

يقدر يحط سرياله ع شن يفك ميوت لنفسه , لو مايحط سريله ميقدرش يفك الميوت للنفسه
رديت عليك ع خاص

# ~ ! S [ T ] A R . · June 23, 2018

1 hour ago, MR.TOUNSI said:

ثواني اكتب لك اكواد


local UnmuteTOUNSI = { -- سريالات المسموحة بفك الميوت
["123456789"] = true, -- سريالك
["123456789"] = true, -- سريال اخوك
["123456789"] = true, -- سريال اخوك
}

		
elseif ( source == aTab1.Mute ) then	
if account == account1 then
if player == localPlayer and not ( UnmuteTOUNSI[getPlayerSerial ( )] ) then
outputChatBox('يمنع استخدام الميوت لنفسك',255,0,0)
return
end
end

اي مساعده ارجع كلمني

انا ابي م يقدر الاعب يفك ميوتة لنفسة لكن الباقي يقدر ..

TOUNSI |, السعأدة · June 23, 2018

2 minutes ago, #Mr.Kams said:

انا ابي م يقدر الاعب يفك ميوتة لنفسة لكن الباقي يقدر ..

يخي فهمتك تبي حق الوزارة ؟
رسلت لك اكواد
اسمع اطرح اكواد لوحة ملف
admin_main

# ~ ! S [ T ] A R . · June 23, 2018

3 minutes ago, MR.TOUNSI said:

يخي فهمتك تبي حق الوزارة ؟
رسلت لك اكواد
اسمع اطرح اكواد لوحة ملف
admin_main

يب
اكواد اللوحة

--[[**********************************
*
*   Multi Theft Auto - Admin Panel
*
*   gui\admin_main.lua
*
*   Original File by lil_Toady
*
**************************************]]

aAdminForm = nil
aLastCheck = 0
aCurrentVehicle = 429
aCurrentWeapon = 30
aCurrentAmmo = 90
aCurrentSlap = 20
aPlayers = {}
aBans = {}
aLastSync = 0
aResources = {}

function aAdminMenu ()
   if ( aAdminForm == nil ) then
       local x, y = guiGetScreenSize()
       aAdminForm           = guiCreateWindow ( x / 2 - 310, y / 2 - 260, 620, 520, "", false )
                           guiWindowSetSizable ( aAdminForm, false )
                          guiSetText ( aAdminForm, "Admi PaneL".._version )
                          guiCreateLabel ( 0.75, 0.05, 0.45, 0.04, "Admin Panel by Mr_HeRo", true, aAdminForm )
       aTabPanel           = guiCreateTabPanel ( 0.01, 0.05, 0.98, 0.95, true, aAdminForm )
       aTab1 = {}
       aTab1.Tab           = guiCreateTab ( "Players", aTabPanel, "players" )
       aTab1.Messages       = guiCreateButton ( 0.75, 0.02, 0.23, 0.04, "0/0 unread messages", true, aTab1.Tab )
       aTab1.PlayerListSearch    = guiCreateEdit ( 0.03, 0.05, 0.16, 0.04, "", true, aTab1.Tab )
                          guiCreateStaticImage ( 0.19, 0.05, 0.035, 0.04, "client\\images\\search.png", true, aTab1.Tab )
       aTab1.HideColorCodes= guiCreateCheckBox ( 0.037, 0.94, 0.20, 0.04, "Hide color codes", true, true, aTab1.Tab )
       aTab1.PlayerList       = guiCreateGridList ( 0.03, 0.10, 0.20, 0.83, true, aTab1.Tab )
                          guiGridListAddColumn( aTab1.PlayerList, "Player Name", 0.85 )
                          for id, player in ipairs ( getElementsByType ( "player" ) ) do guiGridListSetItemPlayerName ( aTab1.PlayerList, guiGridListAddRow ( aTab1.PlayerList ), 1, getPlayerName ( player ), false, false ) end
       aTab1.Kick           = guiCreateButton ( 0.71, 0.125, 0.13, 0.04, "Kick", true, aTab1.Tab, "kick" )
       aTab1.Ban           = guiCreateButton ( 0.85, 0.125, 0.13, 0.04, "Ban", true, aTab1.Tab, "ban" )
       aTab1.Mute           = guiCreateButton ( 0.71, 0.170, 0.13, 0.04, "Mute", true, aTab1.Tab, "mute" )
       aTab1.Freeze       = guiCreateButton ( 0.85, 0.170, 0.13, 0.04, "Freeze", true, aTab1.Tab, "freeze" )
       aTab1.Spectate       = guiCreateButton ( 0.71, 0.215, 0.13, 0.04, "Spectate", true, aTab1.Tab, "spectate" )
       aTab1.Slap           = guiCreateButton ( 0.85, 0.215, 0.13, 0.04, "Slap! "..aCurrentSlap.." _", true, aTab1.Tab, "slap" )
       aTab1.SlapDropDown   = guiCreateStaticImage ( 0.95, 0.215, 0.03, 0.04, "client\\images\\dropdown.png", true, aTab1.Tab )
       aTab1.SlapOptions       = guiCreateGridList ( 0.85, 0.215, 0.13, 0.40, true, aTab1.Tab )
                          guiGridListSetSortingEnabled ( aTab1.SlapOptions, false )
                          guiGridListAddColumn( aTab1.SlapOptions, "", 0.85 )
                          guiSetVisible ( aTab1.SlapOptions, false )
                          for i = 0, 10 do guiGridListSetItemText ( aTab1.SlapOptions, guiGridListAddRow ( aTab1.SlapOptions ), 1, tostring ( i * 10 ), false, false ) end
       aTab1.Nick           = guiCreateButton ( 0.71, 0.260, 0.13, 0.04, "Set Nick", true, aTab1.Tab )
       aTab1.Shout           = guiCreateButton ( 0.85, 0.260, 0.13, 0.04, "Shout!", true, aTab1.Tab, "shout" )
       aTab1.Admin           = guiCreateButton ( 0.71, 0.305, 0.27, 0.04, "Give admin rights", false, aTab1.Tab, "setgroup" )

                          guiCreateHeader ( 0.25, 0.08, 0.20, 0.04, "Player:", true, aTab1.Tab )
       aTab1.Name           = guiCreateLabel ( 0.26, 0.125, 0.30, 0.035, "Name: N/A", true, aTab1.Tab )
       aTab1.IP           = guiCreateLabel ( 0.26, 0.170, 0.30, 0.035, "IP: N/A", true, aTab1.Tab )
       aTab1.Serial       = guiCreateLabel ( 0.26, 0.215, 0.435, 0.035, "Serial: N/A", true, aTab1.Tab )
       --aTab1.Username       = guiCreateLabel ( 0.26, 0.245, 0.435, 0.035, "Username: N/A", true, aTab1.Tab )
       aTab1.Version       = guiCreateLabel ( 0.26, 0.245, 0.435, 0.035, "Version: N/A", true, aTab1.Tab )
       aTab1.Accountname   = guiCreateLabel ( 0.26, 0.275, 0.435, 0.035, "Account Name: N/A", true, aTab1.Tab )
       aTab1.Groups       = guiCreateLabel ( 0.26, 0.305, 0.435, 0.035, "Groups: N/A", true, aTab1.Tab )
       aTab1.Flag           = guiCreateStaticImage ( 0.40, 0.170, 0.025806, 0.021154, "client\\images\\empty.png", true, aTab1.Tab )
       aTab1.CountryCode   = guiCreateLabel ( 0.45, 0.170, 0.04, 0.035, "", true, aTab1.Tab )
                          guiCreateHeader ( 0.25, 0.350, 0.20, 0.04, "Game:", true, aTab1.Tab )
       aTab1.Health       = guiCreateLabel ( 0.26, 0.395, 0.20, 0.04, "Health: 0%", true, aTab1.Tab )
       aTab1.Armour       = guiCreateLabel ( 0.45, 0.395, 0.20, 0.04, "Armour: 0%", true, aTab1.Tab )
       aTab1.Skin           = guiCreateLabel ( 0.26, 0.440, 0.20, 0.04, "Skin: N/A", true, aTab1.Tab )
       aTab1.Team           = guiCreateLabel ( 0.45, 0.440, 0.20, 0.04, "Team: None", true, aTab1.Tab )
       aTab1.Weapon       = guiCreateLabel ( 0.26, 0.485, 0.35, 0.04, "Weapon: N/A", true, aTab1.Tab )
       aTab1.Ping           = guiCreateLabel ( 0.26, 0.530, 0.20, 0.04, "Ping: 0", true, aTab1.Tab )
       aTab1.Money           = guiCreateLabel ( 0.45, 0.530, 0.20, 0.04, "Money: 0", true, aTab1.Tab )
       aTab1.Area           = guiCreateLabel ( 0.26, 0.575, 0.44, 0.04, "Area: Unknown", true, aTab1.Tab )
       aTab1.PositionX       = guiCreateLabel ( 0.26, 0.620, 0.30, 0.04, "X: 0", true, aTab1.Tab )
       aTab1.PositionY       = guiCreateLabel ( 0.26, 0.665, 0.30, 0.04, "Y: 0", true, aTab1.Tab )
       aTab1.PositionZ       = guiCreateLabel ( 0.26, 0.710, 0.30, 0.04, "Z: 0", true, aTab1.Tab )
       aTab1.Dimension       = guiCreateLabel ( 0.26, 0.755, 0.20, 0.04, "Dimension: 0", true, aTab1.Tab )
       aTab1.Interior       = guiCreateLabel ( 0.45, 0.755, 0.20, 0.04, "Interior: 0", true, aTab1.Tab )
       aTab1.SetHealth       = guiCreateButton ( 0.71, 0.395, 0.13, 0.04, "Set Health", true, aTab1.Tab, "sethealth" )
       aTab1.SetArmour       = guiCreateButton ( 0.85, 0.395, 0.13, 0.04, "Set Armour", true, aTab1.Tab, "setarmour" )
       aTab1.SetSkin       = guiCreateButton ( 0.71, 0.440, 0.13, 0.04, "Set Skin", true, aTab1.Tab, "setskin" )
       aTab1.SetTeam       = guiCreateButton ( 0.85, 0.440, 0.13, 0.04, "Set Team", true, aTab1.Tab, "setteam" )
       aTab1.SetDimension   = guiCreateButton ( 0.71, 0.755, 0.13, 0.04, "Set Dimens.", true, aTab1.Tab, "setdimension" )
       aTab1.SetInterior       = guiCreateButton ( 0.85, 0.755, 0.13, 0.04, "Set Interior", true, aTab1.Tab, "setinterior" )
       aTab1.GiveWeapon       = guiCreateButton ( 0.71, 0.485, 0.27, 0.04, "Give: "..getWeaponNameFromID ( aCurrentWeapon ), true, aTab1.Tab, "giveweapon" )
       aTab1.WeaponDropDown   = guiCreateStaticImage ( 0.95, 0.485, 0.03, 0.04, "client\\images\\dropdown.png", true, aTab1.Tab )
       aTab1.WeaponOptions   = guiCreateGridList ( 0.71, 0.485, 0.27, 0.48, true, aTab1.Tab )
                          guiGridListAddColumn( aTab1.WeaponOptions, "", 0.85 )
                          guiSetVisible ( aTab1.WeaponOptions, false )
                          for i = 1, 46 do if ( getWeaponNameFromID ( i ) ~= false ) then guiGridListSetItemText ( aTab1.WeaponOptions, guiGridListAddRow ( aTab1.WeaponOptions ), 1, getWeaponNameFromID ( i ), false, false ) end end
       aTab1.SetMoney       = guiCreateButton ( 0.71, 0.530, 0.13, 0.04, "Set Money", true, aTab1.Tab, "setmoney" )
       aTab1.SetStats       = guiCreateButton ( 0.85, 0.530, 0.13, 0.04, "Set Stats", true, aTab1.Tab, "setstat" )
       aTab1.JetPack       = guiCreateButton ( 0.71, 0.575, 0.27, 0.04, "Give JetPack", true, aTab1.Tab, "jetpack" )
       aTab1.Warp           = guiCreateButton ( 0.71, 0.620, 0.27, 0.04, "Warp to player", true, aTab1.Tab, "warp" )
       aTab1.WarpTo       = guiCreateButton ( 0.71, 0.665, 0.27, 0.04, "Warp player to..", true, aTab1.Tab, "warp" )
                          guiCreateHeader ( 0.25, 0.805, 0.20, 0.04, "Vehicle:", true, aTab1.Tab )
       aTab1.Vehicle       = guiCreateLabel ( 0.26, 0.850, 0.35, 0.04, "Vehicle: N/A", true, aTab1.Tab )
       aTab1.VehicleHealth   = guiCreateLabel ( 0.26, 0.895, 0.25, 0.04, "Vehicle Health: 0%", true, aTab1.Tab )
       aTab1.VehicleFix       = guiCreateButton ( 0.71, 0.84, 0.13, 0.04, "Fix", true, aTab1.Tab, "repair" )
       aTab1.VehicleDestroy   = guiCreateButton ( 0.71, 0.89, 0.13, 0.04, "Destroy", true, aTab1.Tab, "destroyvehicle" )
       aTab1.VehicleBlow       = guiCreateButton ( 0.85, 0.84, 0.13, 0.04, "Blow", true, aTab1.Tab, "blowvehicle" )
       aTab1.VehicleCustomize    = guiCreateButton ( 0.85, 0.89, 0.13, 0.04, "Customize", true, aTab1.Tab, "customize" )
       aTab1.AnonAdmin          = guiCreateCheckBox (0.745, 0.942, 0.20, 0.04, "Anonymous Admin", isAnonAdmin(), false, aTab1.Tab )
       aTab1.GiveVehicle       = guiCreateButton ( 0.71, 0.710, 0.27, 0.04, "Give: "..getVehicleNameFromModel ( aCurrentVehicle ), true, aTab1.Tab, "givevehicle" )
       aTab1.VehicleDropDown    = guiCreateStaticImage ( 0.95, 0.710, 0.03, 0.04, "client\\images\\dropdown.png", true, aTab1.Tab )
       local gx, gy        = guiGetSize ( aTab1.GiveVehicle, false )
       aTab1.VehicleOptions   = guiCreateGridList ( 0, 0, gx, 200, false )
                          guiGridListAddColumn( aTab1.VehicleOptions, "", 0.85 )
                          guiSetAlpha ( aTab1.VehicleOptions, 0.80 )
                          guiSetVisible ( aTab1.VehicleOptions, false )
                           local vehicleNames = {}
                           for i = 400, 611 do
                               if ( getVehicleNameFromModel ( i ) ~= "" ) then
                                   table.insert( vehicleNames, { model = i, name = getVehicleNameFromModel ( i ) } )
                               end
                           end
                           table.sort( vehicleNames, function(a, b) return a.name < b.name end )
                           for _,info in ipairs(vehicleNames) do
                               local row = guiGridListAddRow ( aTab1.VehicleOptions )
                               guiGridListSetItemText ( aTab1.VehicleOptions, row, 1, info.name, false, false )
                               guiGridListSetItemData ( aTab1.VehicleOptions, row, 1, tostring ( info.model ) )
                           end
       aTab2 = {}
       aTab2.Tab           = guiCreateTab ( "Resources", aTabPanel, "resources" )
       aTab2.ManageACL       = guiCreateButton ( 0.75, 0.02, 0.23, 0.04, "Manage ACL", true, aTab2.Tab )
                                       guiSetEnabled(aTab2.ManageACL,false)
       aTab2.ResourceListSearch = guiCreateEdit ( 0.03, 0.05, 0.31, 0.04, "", true, aTab2.Tab )
                          guiCreateStaticImage ( 0.34, 0.05, 0.035, 0.04, "client\\images\\search.png", true, aTab2.Tab )
       aTab2.ResourceList   = guiCreateGridList ( 0.03, 0.10, 0.35, 0.80, true, aTab2.Tab )
                          guiGridListAddColumn( aTab2.ResourceList, "Resource", 0.55 )
                          guiGridListAddColumn( aTab2.ResourceList, "", 0.05 )
                          guiGridListAddColumn( aTab2.ResourceList, "State", 0.35 )
       aTab2.ResourceInclMaps   = guiCreateCheckBox ( 0.03, 0.91, 0.15, 0.04, "Include Maps", false, true, aTab2.Tab )
       aTab2.ResourceRefresh   = guiCreateButton ( 0.20, 0.915, 0.18, 0.04, "Refresh list", true, aTab2.Tab, "listresources" )
       aTab2.ResourceSettings   = guiCreateButton ( 0.40, 0.05, 0.20, 0.04, "Settings", true, aTab2.Tab )
       aTab2.ResourceStart   = guiCreateButton ( 0.40, 0.10, 0.20, 0.04, "Start", true, aTab2.Tab, "start" )
       aTab2.ResourceRestart   = guiCreateButton ( 0.40, 0.15, 0.20, 0.04, "Restart", true, aTab2.Tab, "restart" )
       aTab2.ResourceStop   = guiCreateButton ( 0.40, 0.20, 0.20, 0.04, "Stop", true, aTab2.Tab, "stop" )
       aTab2.ResourceFailture   = guiCreateButton ( 0.63, 0.10, 0.25, 0.04, "Get Load Failture", true, aTab2.Tab )
                          guiSetVisible ( aTab2.ResourceFailture, false )
       aModules           = guiCreateTabPanel ( 0.40, 0.25, 0.57, 0.38, true, aTab2.Tab )
                          guiCreateLabel ( 0.40, 0.77, 0.20, 0.03, "Actions log:", true, aTab2.Tab )
       aTab2.LogLine1       = guiCreateLabel ( 0.41, 0.81, 0.50, 0.03, "", true, aTab2.Tab )
       aTab2.LogLine2       = guiCreateLabel ( 0.41, 0.84, 0.50, 0.03, "", true, aTab2.Tab )
       aTab2.LogLine3       = guiCreateLabel ( 0.41, 0.87, 0.50, 0.03, "", true, aTab2.Tab )
       aTab2.LogLine4       = guiCreateLabel ( 0.41, 0.90, 0.50, 0.03, "", true, aTab2.Tab )
       aTab2.LogLine5       = guiCreateLabel ( 0.41, 0.93, 0.50, 0.03, "", true, aTab2.Tab )
                          guiCreateLabel ( 0.41, 0.65, 0.50, 0.04, "Execute Command:", true, aTab2.Tab )
       aTab2.Command       = guiCreateEdit ( 0.41, 0.70, 0.40, 0.055, "", false, aTab2.Tab )
       aTab2.ExecuteClient   = guiCreateButton ( 0.82, 0.70, 0.16, 0.035, "Client", false, aTab2.Tab, "execute" )
       aTab2.ExecuteServer   = guiCreateButton ( 0.82, 0.736, 0.16, 0.035, "Server", false, aTab2.Tab, "execute" )
       aTab2.ExecuteAdvanced   = guiCreateLabel ( 0.45, 0.71, 0.50, 0.04, "For advanced users only.", false, aTab2.Tab )
                          guiLabelSetColor ( aTab2.ExecuteAdvanced, 255, 0, 0 )
       aLogLines = 1

       createMapTab()

       aTab3 = {}
       aTab3.Tab           = guiCreateTab ( "Server", aTabPanel, "server" )
       aTab3.Server       = guiCreateLabel ( 0.05, 0.05, 0.70, 0.05, "Server: Unknown", true, aTab3.Tab )
       aTab3.Password       = guiCreateLabel ( 0.05, 0.10, 0.40, 0.05, "Password: None", true, aTab3.Tab )
       aTab3.GameType       = guiCreateLabel ( 0.05, 0.15, 0.40, 0.05, "Game Type: None", true, aTab3.Tab )
       aTab3.MapName       = guiCreateLabel ( 0.05, 0.20, 0.40, 0.05, "Map Name: None", true, aTab3.Tab )
       aTab3.Players       = guiCreateLabel ( 0.05, 0.25, 0.20, 0.05, "Players: 0/0", true, aTab3.Tab )
       aTab3.SetPassword       = guiCreateButton ( 0.80, 0.05, 0.18, 0.04, "Set Password", false, aTab3.Tab, "setpassword" )
       aTab3.ResetPassword   = guiCreateButton ( 0.80, 0.10, 0.18, 0.04, "Reset Password", true, aTab3.Tab, "setpassword" )
       aTab3.SetGameType       = guiCreateButton ( 0.80, 0.15, 0.18, 0.04, "Set Game Type", true, aTab3.Tab, "setgame" )
       aTab3.SetMapName       = guiCreateButton ( 0.80, 0.20, 0.18, 0.04, "Set Map Name", true, aTab3.Tab, "setmap" )
       aTab3.SetWelcome       = guiCreateButton ( 0.80, 0.25, 0.18, 0.04, "Welcome Message", true, aTab3.Tab, "setwelcome" )
                          guiCreateStaticImage ( 0.05, 0.32, 0.50, 0.0025, "client\\images\\dot.png", true, aTab3.Tab )
       aTab3.WeatherCurrent   = guiCreateLabel ( 0.05, 0.35, 0.45, 0.05, "Current Weather: "..getWeather().." ("..getWeatherNameFromID ( getWeather() )..")", true, aTab3.Tab )
       aTab3.WeatherDec       = guiCreateButton ( 0.05, 0.40, 0.035, 0.04, "<", true, aTab3.Tab )
       aTab3.Weather       = guiCreateEdit ( 0.095, 0.40, 0.35, 0.04, getWeather().." ("..getWeatherNameFromID ( getWeather() )..")", true, aTab3.Tab )
       aTab3.WeatherInc       = guiCreateButton ( 0.45, 0.40, 0.035, 0.04, ">", true, aTab3.Tab )
                          guiEditSetReadOnly ( aTab3.Weather, true )
       aTab3.WeatherSet       = guiCreateButton ( 0.50, 0.40, 0.10, 0.04, "Set", true, aTab3.Tab, "setweather" )
       aTab3.WeatherBlend   = guiCreateButton ( 0.61, 0.40, 0.15, 0.04, "Set Blended", true, aTab3.Tab, "blendweather" )

                          local th, tm = getTime()
       aTab3.TimeCurrent       = guiCreateLabel ( 0.05, 0.45, 0.25, 0.04, "Time: "..th..":"..tm, true, aTab3.Tab )
       aTab3.TimeH           = guiCreateEdit ( 0.35, 0.45, 0.055, 0.04, "12", true, aTab3.Tab )
       aTab3.TimeM           = guiCreateEdit ( 0.425, 0.45, 0.055, 0.04, "00", true, aTab3.Tab )
                          guiCreateLabel ( 0.415, 0.45, 0.05, 0.04, ":", true, aTab3.Tab )
                          guiEditSetMaxLength ( aTab3.TimeH, 2 )
                          guiEditSetMaxLength ( aTab3.TimeM, 2 )
       aTab3.TimeSet       = guiCreateButton ( 0.50, 0.45, 0.10, 0.04, "Set", true, aTab3.Tab, "settime" )
                          guiCreateLabel ( 0.63, 0.45, 0.12, 0.04, "( 0-23:0-59 )", true, aTab3.Tab )

       aTab3.GravityCurrent   = guiCreateLabel ( 0.05, 0.50, 0.28, 0.04, "Gravitation: "..string.sub ( getGravity(), 0, 6 ), true, aTab3.Tab )
       aTab3.Gravity       = guiCreateEdit ( 0.35, 0.50, 0.135, 0.04, "0.008", true, aTab3.Tab )
       aTab3.GravitySet       = guiCreateButton ( 0.50, 0.50, 0.10, 0.04, "Set", true, aTab3.Tab, "setgravity" )

       aTab3.SpeedCurrent   = guiCreateLabel ( 0.05, 0.55, 0.30, 0.04, "Game Speed: "..getGameSpeed(), true, aTab3.Tab )
       aTab3.Speed           = guiCreateEdit ( 0.35, 0.55, 0.135, 0.04, "1", true, aTab3.Tab )
       aTab3.SpeedSet       = guiCreateButton ( 0.50, 0.55, 0.10, 0.04, "Set", true, aTab3.Tab, "setgamespeed" )
                          guiCreateLabel ( 0.63, 0.55, 0.09, 0.04, "( 0-10 )", true, aTab3.Tab )

       aTab3.WavesCurrent   = guiCreateLabel ( 0.05, 0.60, 0.25, 0.04, "Wave Height: "..getWaveHeight(), true, aTab3.Tab )
       aTab3.Waves           = guiCreateEdit ( 0.35, 0.60, 0.135, 0.04, "0", true, aTab3.Tab )
       aTab3.WavesSet       = guiCreateButton ( 0.50, 0.60, 0.10, 0.04, "Set", true, aTab3.Tab, "setwaveheight" )
                      guiCreateLabel ( 0.63, 0.60, 0.09, 0.04, "( 0-100 )", true, aTab3.Tab )

       aTab4 = {}
       aTab4.Tab           = guiCreateTab ( "Bans", aTabPanel, "bans" )
       aTab4.BansList       = guiCreateGridList ( 0.03, 0.05, 0.80, 0.87, true, aTab4.Tab )
                          guiGridListAddColumn( aTab4.BansList, "Name", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "IP", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "Serial", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "By", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "Date", 0.17 )
                          guiGridListAddColumn( aTab4.BansList, "Time", 0.13 )
                          guiGridListAddColumn( aTab4.BansList, "Reason", 0.92 )
                          guiGridListSetSortingEnabled( aTab4.BansList, false )
       aTab4.Unban           = guiCreateButton ( 0.85, 0.20, 0.13, 0.04, "Unban", true, aTab4.Tab, "unban" )
       aTab4.UnbanIP       = guiCreateButton ( 0.85, 0.25, 0.13, 0.04, "Unban IP", true, aTab4.Tab, "unbanip" )
       aTab4.UnbanSerial       = guiCreateButton ( 0.85, 0.30, 0.13, 0.04, "Unban Serial", true, aTab4.Tab, "unbanserial" )
       aTab4.BanIP           = guiCreateButton ( 0.85, 0.40, 0.13, 0.04, "Ban IP", true, aTab4.Tab, "banip" )
       aTab4.BanSerial       = guiCreateButton ( 0.85, 0.45, 0.13, 0.04, "Ban Serial", true, aTab4.Tab, "banserial" )
       aTab4.BansRefresh       = guiCreateButton ( 0.85, 0.85, 0.13, 0.04, "Refresh", true, aTab4.Tab, "listbans" )

       aTab4.BansTotal       = guiCreateLabel ( 0.20, 0.94, 0.31, 0.04, "Showing 0 / 0 bans", true, aTab4.Tab )
       aTab4.BansMore       = guiCreateButton ( 0.50, 0.94, 0.13, 0.04, "Get more...", true, aTab4.Tab, "listbans" )

       aTab5 = {}
       aTab5.Tab           = guiCreateTab ( "Admin Chat", aTabPanel, "adminchat" )
       aTab5.AdminChat       = guiCreateMemo ( 0.03, 0.05, 0.75, 0.85, "", true, aTab5.Tab )
                          guiSetProperty ( aTab5.AdminChat, "ReadOnly", "true" )
       aTab5.AdminPlayers   = guiCreateGridList ( 0.79, 0.05, 0.18, 0.80, true, aTab5.Tab )
                          guiGridListAddColumn ( aTab5.AdminPlayers, "Admins", 0.90 )
       aTab5.AdminChatSound   = guiCreateCheckBox ( 0.79, 0.86, 0.18, 0.04, "Play Sound", true, true, aTab5.Tab )
       aTab5.AdminText       = guiCreateEdit ( 0.03, 0.92, 0.80, 0.06, "", true, aTab5.Tab )
       aTab5.AdminSay       = guiCreateButton ( 0.85, 0.92, 0.08, 0.06, "Say", true, aTab5.Tab )
       aTab5.AdminChatHelp   = guiCreateButton ( 0.94, 0.92, 0.03, 0.06, "?", true, aTab5.Tab )

       aTab6 = {}
       aTab6.Tab           = guiCreateTab ( "Options", aTabPanel )
                          guiCreateHeader ( 0.03, 0.05, 0.10, 0.05, "Main:", true, aTab6.Tab )
       aTab6.OutputPlayer   = guiCreateCheckBox ( 0.05, 0.10, 0.47, 0.04, "Output player information to console on select", false, true, aTab6.Tab )
                          guiCreateLabel ( 0.08, 0.15, 0.40, 0.04, "This might be useful to copy player data", true, aTab6.Tab )
       aTab6.AdminChatOutput    = guiCreateCheckBox ( 0.05, 0.20, 0.47, 0.04, "Output admin messages to chat box", false, true, aTab6.Tab )
                          guiCreateHeader ( 0.03, 0.30, 0.47, 0.04, "Appearance:", true, aTab6.Tab )
                          guiCreateHeader ( 0.63, 0.05, 0.10, 0.05, "Account:", true, aTab6.Tab )
       aTab6.AutoLogin       = guiCreateCheckBox ( 0.65, 0.10, 0.47, 0.04, "Auto-login by serial", false, true, aTab6.Tab )
                          guiSetVisible ( aTab6.AutoLogin, false )   -- Not used
                          guiCreateHeader ( 0.63, 0.15, 0.25, 0.05, "Change Password:", true, aTab6.Tab )
                          guiCreateLabel ( 0.65, 0.20, 0.15, 0.05, "Old password:", true, aTab6.Tab )
                          guiCreateLabel ( 0.65, 0.25, 0.15, 0.05, "New password:", true, aTab6.Tab )
                          guiCreateLabel ( 0.65, 0.30, 0.15, 0.05, "Confirm:", true, aTab6.Tab )
       aTab6.PasswordOld       = guiCreateEdit ( 0.80, 0.20, 0.15, 0.045, "", true, aTab6.Tab )
       aTab6.PasswordNew       = guiCreateEdit ( 0.80, 0.25, 0.15, 0.045, "", true, aTab6.Tab )
       aTab6.PasswordConfirm   = guiCreateEdit ( 0.80, 0.30, 0.15, 0.045, "", true, aTab6.Tab )
                          guiEditSetMasked ( aTab6.PasswordOld, true )
                          guiEditSetMasked ( aTab6.PasswordNew, true )
                          guiEditSetMasked ( aTab6.PasswordConfirm, true )
       aTab6.PasswordChange   = guiCreateButton ( 0.85, 0.35, 0.10, 0.04, "Accept", true, aTab6.Tab )
                          guiCreateHeader ( 0.03, 0.65, 0.20, 0.055, "Performance:", true, aTab6.Tab )
                          guiCreateStaticImage ( 0.03, 0.69, 0.94, 0.0025, "client\\images\\dot.png", true, aTab6.Tab )
                          guiCreateLabel ( 0.05, 0.71, 0.20, 0.055, "Performance priority:", true, aTab6.Tab )
                          guiCreateLabel ( 0.11, 0.76, 0.10, 0.05, "Memory", true, aTab6.Tab )
                          guiCreateLabel ( 0.11, 0.81, 0.10, 0.05, "Auto", true, aTab6.Tab )
                          guiCreateLabel ( 0.11, 0.86, 0.10, 0.05, "Speed", true, aTab6.Tab )
       aTab6.PerformanceRAM   = guiCreateRadioButton ( 0.07, 0.75, 0.05, 0.055, "", true, aTab6.Tab )
       aTab6.PerformanceAuto   = guiCreateRadioButton ( 0.07, 0.80, 0.05, 0.055, "", true, aTab6.Tab )
       aTab6.PerformanceCPU   = guiCreateRadioButton ( 0.07, 0.85, 0.05, 0.055, "", true, aTab6.Tab )
                          if ( aGetSetting ( "performance" ) == "RAM" ) then guiRadioButtonSetSelected ( aTab6.PerformanceRAM, true )
                          elseif ( aGetSetting ( "performance" ) == "CPU" ) then guiRadioButtonSetSelected ( aTab6.PerformanceCPU, true )
                          else guiRadioButtonSetSelected ( aTab6.PerformanceAuto, true ) end
       aTab6.PerformanceAdvanced = guiCreateButton ( 0.05, 0.91, 0.11, 0.04, "Advanced", true, aTab6.Tab )
       aPerformance()
                             guiCreateLabel ( 0.70, 0.90, 0.19, 0.055, "Refresh Delay(MS):", true, aTab6.Tab )
       aTab6.RefreshDelay   = guiCreateEdit ( 0.89, 0.90, 0.08, 0.045, "50", true, aTab6.Tab )

       if ( aGetSetting ( "outputPlayer" ) ) then guiCheckBoxSetSelected ( aTab6.OutputPlayer, true ) end
       if ( aGetSetting ( "adminChatOutput" ) ) then guiCheckBoxSetSelected ( aTab6.AdminChatOutput, true ) end
       if ( aGetSetting ( "adminChatSound" ) ) then guiCheckBoxSetSelected ( aTab5.AdminChatSound, true ) end
       --if ( tonumber ( aGetSetting ( "adminChatLines" ) ) ) then guiSetText ( aTab6.AdminChatLines, aGetSetting ( "adminChatLines" ) ) end
       if ( ( tonumber ( aGetSetting ( "refreshDelay" ) ) ) and ( tonumber ( aGetSetting ( "refreshDelay" ) ) >= 50 ) ) then guiSetText ( aTab6.RefreshDelay, aGetSetting ( "refreshDelay" ) ) end

       addEventHandler ( "aClientLog", _root, aClientLog )
       addEventHandler ( "aClientAdminChat", _root, aClientAdminChat )
       addEventHandler ( "aClientSync", _root, aClientSync )
       addEventHandler ( "aMessage", _root, aMessage )
       addEventHandler ( "aClientResourceStart", _root, aClientResourceStart )
       addEventHandler ( "aClientResourceStop", _root, aClientResourceStop )
       addEventHandler ( "aClientPlayerJoin", _root, aClientPlayerJoin )
       addEventHandler ( "onClientPlayerQuit", _root, aClientPlayerQuit )
       addEventHandler ( "onClientMouseEnter", _root, aClientMouseEnter )
       addEventHandler ( "onClientGUIClick", aAdminForm, aClientClick )
       addEventHandler ( "onClientGUIScroll", aAdminForm, aClientScroll )
       addEventHandler ( "onClientGUIDoubleClick", aAdminForm, aClientDoubleClick )
       addEventHandler ( "onClientGUIDoubleClick", aTab1.VehicleOptions, aClientDoubleClick )
       addEventHandler ( "onClientGUIAccepted", aAdminForm, aClientGUIAccepted )
       addEventHandler ( "onClientGUIChanged", aAdminForm, aClientGUIChanged )
       addEventHandler ( "onClientCursorMove", _root, aClientCursorMove )
       addEventHandler ( "onClientRender", _root, aClientRender )
       addEventHandler ( "onClientPlayerChangeNick", _root, aClientPlayerChangeNick )
       addEventHandler ( "onClientResourceStop", _root, aMainSaveSettings )
       addEventHandler ( "onClientGUITabSwitched", aTabPanel, aClientGUITabSwitched )

       bindKey ( "arrow_d", "down", aPlayerListScroll, 1 )
       bindKey ( "arrow_u", "down", aPlayerListScroll, -1 )

       triggerServerEvent ( "aSync", getLocalPlayer(), "players" )
       if ( hasPermissionTo ( "command.listmessages" ) ) then triggerServerEvent ( "aSync", getLocalPlayer(), "messages" ) end
       triggerServerEvent ( "aSync", getLocalPlayer(), "server" )
       triggerEvent ( "onAdminInitialize", resourceRoot )
       showCursor ( true )

       if getVersion().sortable and getVersion().sortable < "1.0.4-9.02436" then
           guiSetText ( aAdminForm, "Warning - Admin Panel not compatible with server version" )
           guiLabelSetHorizontalAlign ( guiCreateLabel ( 0.30, 0.11, 0.4, 0.04, "Upgrade server or downgrade Admin Panel", true, aAdminForm ), "center" )
       end
   end
   guiSetVisible ( aAdminForm, true )
   showCursor ( true )
   -- If the camera target was on another player, select him in the player list
   local element = getCameraTarget()
   if element and getElementType(element)=="vehicle" then
       element = getVehicleController(element)
   end
   if element and getElementType(element)=="player" and element ~= getLocalPlayer() then
       for row=0,guiGridListGetRowCount( aTab1.PlayerList )-1 do
           if ( guiGridListGetItemPlayerName ( aTab1.PlayerList, row, 1 ) == getPlayerName ( element ) ) then
               guiGridListSetSelectedItem ( aTab1.PlayerList, row, 1 )
               break
           end
       end
   end
end

function aAdminMenuClose ( destroy )
   if ( destroy ) then
       aMainSaveSettings ()
       aPlayers = {}
       aWeathers = {}
       aBans = {}
       removeEventHandler ( "aClientLog", _root, aClientLog )
       removeEventHandler ( "aClientAdminChat", _root, aClientAdminChat )
       removeEventHandler ( "aClientSync", _root, aClientSync )
       removeEventHandler ( "aMessage", _root, aMessage )
       removeEventHandler ( "aClientResourceStart", _root, aClientResourceStart )
       removeEventHandler ( "aClientResourceStop", _root, aClientResourceStop )
       removeEventHandler ( "aClientPlayerJoin", _root, aClientPlayerJoin )
       removeEventHandler ( "onClientPlayerQuit", _root, aClientPlayerQuit )
       removeEventHandler ( "onClientMouseEnter", _root, aClientMouseEnter )
       removeEventHandler ( "onClientGUIClick", aAdminForm, aClientClick )
       removeEventHandler ( "onClientGUIScroll", aAdminForm, aClientScroll )
       removeEventHandler ( "onClientGUIDoubleClick", aAdminForm, aClientDoubleClick )
       removeEventHandler ( "onClientGUIDoubleClick", aTab1.VehicleOptions, aClientDoubleClick )
       removeEventHandler ( "onClientGUIAccepted", aAdminForm, aClientGUIAccepted )
       removeEventHandler ( "onClientGUIChanged", aAdminForm, aClientGUIChanged )
       removeEventHandler ( "onClientCursorMove", _root, aClientCursorMove )
       removeEventHandler ( "onClientRender", _root, aClientRender )
       removeEventHandler ( "onClientPlayerChangeNick", _root, aClientPlayerChangeNick )
       removeEventHandler ( "onClientResourceStop", _root, aMainSaveSettings )
       unbindKey ( "arrow_d", "down", aPlayerListScroll )
       unbindKey ( "arrow_u", "down", aPlayerListScroll )
       destroyElement ( aTab1.VehicleOptions )
       destroyElement ( aAdminForm )
       aAdminForm = nil
   else
       guiSetVisible ( aTab1.VehicleOptions, false )
       guiSetVisible ( aAdminForm, false )
   end
   guiSetInputEnabled ( false )
   showCursor ( false )
end

function aMainSaveSettings ()
   aSetSetting ( "outputPlayer", guiCheckBoxGetSelected ( aTab6.OutputPlayer ) )
   aSetSetting ( "adminChatOutput", guiCheckBoxGetSelected ( aTab6.AdminChatOutput ) )
   aSetSetting ( "adminChatSound", guiCheckBoxGetSelected ( aTab5.AdminChatSound ) )
   --aSetSetting ( "adminChatLines", guiGetText ( aTab6.AdminChatLines ) )
   aSetSetting ( "refreshDelay", guiGetText ( aTab6.RefreshDelay ) )
   aSetSetting ( "currentWeapon", aCurrentWeapon )
   aSetSetting ( "currentAmmo", aCurrentAmmo )
   aSetSetting ( "currentVehicle", aCurrentVehicle )
   aSetSetting ( "currentSlap", aCurrentSlap )
   if ( guiRadioButtonGetSelected ( aTab6.PerformanceRAM ) ) then aSetSetting ( "performance", "RAM" )
   elseif ( guiRadioButtonGetSelected ( aTab6.PerformanceCPU ) ) then aSetSetting ( "performance", "CPU" )
   else aSetSetting ( "performance", "Auto" ) end
end

function aAdminRefresh ()
   if ( guiGridListGetSelectedItem ( aTab1.PlayerList ) ~= -1 ) then
       local player = getPlayerFromNick ( guiGridListGetItemPlayerName ( aTab1.PlayerList, guiGridListGetSelectedItem( aTab1.PlayerList ), 1 ) )
       if ( player and aPlayers[player] ) then
           guiSetText ( aTab1.Name, "Name: "..aPlayers[player]["name"] )
           guiSetText ( aTab1.Mute, iif ( aPlayers[player]["mute"], "Unmute", "Mute" ) )
           guiSetText ( aTab1.Freeze, iif ( aPlayers[player]["freeze"], "Unfreeze", "Freeze" ) )
           --guiSetText ( aTab1.Username, "Community Username: "..( aPlayers[player]["username"] or "" ) )
           guiSetText ( aTab1.Version, "Version: "..( aPlayers[player]["version"] or "" ) )
           guiSetText ( aTab1.Accountname, "Account Name: "..( aPlayers[player]["accountname"] or "" ) )
           guiSetText ( aTab1.Groups, "Groups: "..( aPlayers[player]["groups"] or "None" ) )
           if ( isPlayerDead ( player ) ) then guiSetText ( aTab1.Health, "Health: Dead" )
           else guiSetText ( aTab1.Health, "Health: "..math.ceil ( getElementHealth ( player ) ).."%" ) end
           guiSetText ( aTab1.Armour, "Armour: "..math.ceil ( getPedArmor ( player ) ).."%" )
           guiSetText ( aTab1.Skin, "Skin: "..iif ( getElementModel ( player ), getElementModel ( player ), "N/A" ) )
           if ( getPlayerTeam ( player ) ) then guiSetText ( aTab1.Team, "Team: "..getTeamName ( getPlayerTeam ( player ) ) )
           else guiSetText ( aTab1.Team, "Team: None" ) end
           guiSetText ( aTab1.Ping, "Ping: "..getPlayerPing ( player ) )
           guiSetText ( aTab1.Money, "Money: "..( aPlayers[player]["money"] or 0 ) )
           if ( getElementDimension ( player ) ) then guiSetText ( aTab1.Dimension, "Dimension: "..getElementDimension ( player ) ) end
           if ( getElementInterior ( player ) ) then guiSetText ( aTab1.Interior, "Interior: "..getElementInterior ( player ) ) end
           guiSetText ( aTab1.JetPack, iif ( doesPedHaveJetPack ( player ), "Remove JetPack", "Give JetPack" ) )
           if ( getPedWeapon ( player ) ) then guiSetText ( aTab1.Weapon, "Weapon: "..getWeaponNameFromID ( getPedWeapon ( player ) ).." (ID: "..getPedWeapon ( player )..")" ) end
           local x, y, z = getElementPosition ( player )
           guiSetText ( aTab1.Area, "Area: "..iif ( getZoneName ( x, y, z, false ) == getZoneName ( x, y, z, true ), getZoneName ( x, y, z, false ), getZoneName ( x, y, z, false ).." ("..getZoneName ( x, y, z, true )..")" ) )
           guiSetText ( aTab1.PositionX, "X: "..x )
           guiSetText ( aTab1.PositionY, "Y: "..y )
           guiSetText ( aTab1.PositionZ, "Z: "..z )
           local vehicle = getPedOccupiedVehicle ( player )
           if ( vehicle ) then
               guiSetText ( aTab1.Vehicle, "Vehicle: "..getVehicleName ( vehicle ).." (ID: "..getElementModel ( vehicle )..")" )
               guiSetText ( aTab1.VehicleHealth, "Vehicle Health: "..math.ceil ( getElementHealth ( vehicle ) ).."%" )
           else
               guiSetText ( aTab1.Vehicle, "Vehicle: Foot" )
               guiSetText ( aTab1.VehicleHealth, "Vehicle Health: 0%" )
           end
           if ( aPlayers[player]["admin"] ) then
               guiSetText(aTab1.Admin, "Revoke admin rights")
           else
               guiSetText(aTab1.Admin, "Give admin rights")
           end
           return player
       end
   end
end

function aClientSync ( type, table )
   if ( type == "player" and aPlayers[source] ) then
       for type, data in pairs ( table ) do
           aPlayers[source][type] = data
       end
   elseif ( type == "players" ) then
       aPlayers = table
   elseif ( type == "resources" ) then
       local bInclMaps = guiCheckBoxGetSelected ( aTab2.ResourceInclMaps )
       aResources = table
       for id, resource in ipairs(table) do
           if bInclMaps or resource["type"] ~= "map" then
               local row = guiGridListAddRow ( aTab2.ResourceList )
               guiGridListSetItemText ( aTab2.ResourceList, row, 1, resource["name"], false, false )
               guiGridListSetItemText ( aTab2.ResourceList, row, 2, resource["numsettings"] > 0 and tostring(resource["numsettings"]) or "", false, false )
               guiGridListSetItemText ( aTab2.ResourceList, row, 3, resource["state"], false, false )
           end
       end
   elseif ( type == "loggedout" ) then
       aAdminDestroy()
   elseif ( type == "admins" ) then
       --if ( guiGridListGetRowCount ( aTab5.AdminPlayers ) > 0 ) then guiGridListClear ( aTab5.AdminPlayers ) end
       for id, player in ipairs(getElementsByType("player")) do
           if ( table[player]["admin"] == false ) and ( player == getLocalPlayer() ) then
               aAdminDestroy()
               break
           elseif aPlayers[player] then
               aPlayers[player]["groups"] = table[player]["groups"]
               if ( table[player]["chat"] ) then
                   local id = 0
                   local exists = false
                   while ( id <= guiGridListGetRowCount( aTab5.AdminPlayers ) ) do
                       if ( guiGridListGetItemPlayerName ( aTab5.AdminPlayers, id, 1 ) == getPlayerName ( player ) ) then
                           exists = true
                       end
                       id = id + 1
                   end
                   if ( exists == false ) then guiGridListSetItemPlayerName ( aTab5.AdminPlayers, guiGridListAddRow ( aTab5.AdminPlayers ), 1, getPlayerName ( player ), false, false ) end
               end
           end
       end
   elseif ( type == "server" ) then
       guiSetText ( aTab3.Server, "Server: "..table["name"] )
       guiSetText ( aTab3.Players, "Players: "..#getElementsByType ( "player" ).."/"..table["players"] )
       guiSetText ( aTab3.Password, "Password: "..( table["password"] or "None" ) )
       guiSetText ( aTab3.GameType, "Game Type: "..( table["game"] or "None" ) )
       guiSetText ( aTab3.MapName, "Map Name: "..( table["map"] or "None" ) )
   elseif ( type == "bansdirty" ) then
       g_GotLatestBansList = false
       if aAdminForm and guiGetVisible ( aAdminForm ) and guiGetSelectedTab( aTabPanel ) == aTab4.Tab then
           -- Request full bans list if bans tab is displayed when 'bansdirty' is received
           triggerServerEvent ( "aSync", getLocalPlayer(), "bans" )
       end
   elseif ( type == "bans" or type == "bansmore" ) then
       if type == "bans" then
           g_GotLatestBansList = true
           guiGridListClear ( aTab4.BansList )
           aBans = {}
           aBans["Serial"] = {}
           aBans["IP"] = {}
       end
       local total = tonumber(table.total) or 0
       local amount = guiGridListGetRowCount( aTab4.BansList ) + #table
       guiSetText( aTab4.BansTotal, "Showing " .. amount .. " / " .. total .. " bans" )
       if g_GotLatestBansList then
           for i=1,#table do
               local ban = table
               if ban.serial then
                   aBans["Serial"][ban.serial] = ban
               end
               if ban.ip then
                   aBans["IP"][ban.ip] = ban
               end
               local time, date = "-", "-"
               if ban.seconds then
                   local realTime = getRealTime( ban.seconds )
                   time = string.format("%02d:%02d", realTime.hour, realTime.minute )
                   date = string.format("%04d-%02d-%02d", realTime.year + 1900, realTime.month + 1, realTime.monthday )
               end
               local reason = ban["reason"] and ban["reason"]~="nil" and ban["reason"] or ""
               local row = guiGridListAddRow ( aTab4.BansList )
               guiGridListSetItemText ( aTab4.BansList, row, 1, ban["nick"]   or "n/a", false, false )
               guiGridListSetItemText ( aTab4.BansList, row, 2, ban.ip           or "n/a", false, false )
               guiGridListSetItemText ( aTab4.BansList, row, 3, ban.serial       or "n/a", false, false )
               guiGridListSetItemText ( aTab4.BansList, row, 4, ban["banner"]   or "n/a", false, false )
               guiGridListSetItemText ( aTab4.BansList, row, 5, date,                   false, false )
               guiGridListSetItemText ( aTab4.BansList, row, 6, time,                   false, false )
               guiGridListSetItemText ( aTab4.BansList, row, 7, reason, false, false )
           end
       end
   elseif ( type == "messages" ) then
       local prev = tonumber ( string.sub ( guiGetText ( aTab1.Messages ), 1, 1 ) )
       if ( prev < table["unread"] ) then
           playSoundFrontEnd ( 18 )
       end
       guiSetText ( aTab1.Messages, table["unread"].."/"..table["total"].." unread messages" )
   end
end

function aClientGUITabSwitched( selectedTab )
   if getElementParent( selectedTab ) == aTabPanel then
       if selectedTab == aTab2.Tab then
           -- Handle initial update of resources list
           if guiGridListGetRowCount( aTab2.ResourceList ) == 0 then
               if ( hasPermissionTo ( "command.listresources" ) ) then
                   triggerServerEvent ( "aSync", getLocalPlayer(), "resources" )
               end
           end
       elseif selectedTab == aTabMap.Tab then
           -- Handle initial update of map list
           if guiGridListGetRowCount( aTabMap.MapList ) == 0 then
               if ( hasPermissionTo ( "command.listresources" ) ) then
                   triggerServerEvent ( "getMaps_s", getLocalPlayer(), getLocalPlayer(), true )
               end
           end
       elseif selectedTab == aTab4.Tab then
           if not g_GotLatestBansList then
               -- Request full bans list if bans tab is selected and current list is out of date
               triggerServerEvent ( "aSync", getLocalPlayer(), "bans" )
           end
       end
   end
end

function aMessage ( )

end

function aClientResourceStart ( resource )
   local id = 0
   while ( id <= guiGridListGetRowCount( aTab2.ResourceList ) ) do
       if ( guiGridListGetItemText ( aTab2.ResourceList, id, 1 ) == resource ) then
           guiGridListSetItemText ( aTab2.ResourceList, id, 3, "running", false, false )
       end
       id = id + 1
   end
end

function aClientResourceStop ( resource )
   local id = 0
   while ( id <= guiGridListGetRowCount( aTab2.ResourceList ) ) do
       if ( guiGridListGetItemText ( aTab2.ResourceList, id, 1 ) == resource ) then
           guiGridListSetItemText ( aTab2.ResourceList, id, 3, "loaded", false, false )
       end
       id = id + 1
   end
end

function aClientPlayerJoin ( ip, username, accountname, serial, admin, country )
   if ip == false and serial == false then
       -- Update country only
       if aPlayers[source] then
           aPlayers[source]["country"] = country
       end
       return
   end
   aPlayers[source] = {}
   aPlayers[source]["name"] = getPlayerName ( source )
   aPlayers[source]["IP"] = ip
   aPlayers[source]["username"] = username or "N/A"
   aPlayers[source]["accountname"] = accountname or "N/A"
   aPlayers[source]["serial"] = serial
   aPlayers[source]["admin"] = admin
   aPlayers[source]["country"] = country
   local row = guiGridListAddRow ( aTab1.PlayerList )
   guiGridListSetItemPlayerName ( aTab1.PlayerList, row, 1, getPlayerName ( source ), false, false )
   if ( admin ) then
       local row = guiGridListAddRow ( aTab5.AdminPlayers )
       guiGridListSetItemPlayerName ( aTab5.AdminPlayers, row, 1, getPlayerName ( source ), false, false )
   end
   if ( aSpectator.PlayerList ) then
       local row = guiGridListAddRow ( aSpectator.PlayerList )
       guiGridListSetItemPlayerName ( aSpectator.PlayerList, row, 1, getPlayerName ( source ), false, false )
   end
end

function aClientPlayerQuit ()
   local id = 0
   while ( id <= guiGridListGetRowCount( aTab1.PlayerList ) ) do
       if ( guiGridListGetItemPlayerName ( aTab1.PlayerList, id, 1 ) == getPlayerName ( source ) ) then
           guiGridListRemoveRow ( aTab1.PlayerList, id )
       end
       id = id + 1
   end
   if ( aPlayers[source] and aPlayers[source]["admin"] ) then
       local id = 0
       while ( id <= guiGridListGetRowCount( aTab5.AdminPlayers ) ) do
           if ( guiGridListGetItemPlayerName ( aTab5.AdminPlayers, id, 1 ) == getPlayerName ( source ) ) then
               guiGridListRemoveRow ( aTab5.AdminPlayers, id )
           end
           id = id + 1
       end
   end
   if ( aSpectator.PlayerList ) then
       local id = 0
       while ( id <= guiGridListGetRowCount( aSpectator.PlayerList ) ) do
           if ( guiGridListGetItemPlayerName ( aSpectator.PlayerList, id, 1 ) == getPlayerName ( source ) ) then
               guiGridListRemoveRow ( aSpectator.PlayerList, id )
           end
           id = id + 1
       end
   end
   aPlayers[source] = nil
end

function aPlayerListScroll ( key, state, inc )
   if ( not guiGetVisible ( aAdminForm ) ) then return end
   local max = guiGridListGetRowCount ( aTab1.PlayerList )
   if ( max <= 0 ) then return end
   local current = guiGridListGetSelectedItem ( aTab1.PlayerList )
   local next = current + inc
   max = max - 1
   if ( current == -1 ) then
       guiGridListSetSelectedItem ( aTab1.PlayerList, 0, 1 )
   elseif ( next > max ) then return
   elseif ( next < 0 ) then return
   else
       guiGridListSetSelectedItem ( aTab1.PlayerList, next, 1 )
   end
   local oldsource = source
   source = aTab1.PlayerList;
   aClientClick ( "left" )
   source = oldsource
end

function aClientPlayerChangeNick ( oldNick, newNick )
   local lists = { aTab1.PlayerList, aTab5.AdminPlayers, aSpectator.PlayerList }
   for _,gridlist in ipairs(lists) do
       for row=0,guiGridListGetRowCount(gridlist)-1 do
           if ( guiGridListGetItemPlayerName ( gridlist, row, 1 ) == oldNick ) then
               guiGridListSetItemPlayerName ( gridlist, row, 1, newNick, false, false )
           end
       end
   end
end

function aClientLog ( text )
   text = "#"..aLogLines..": "..text
   if ( guiGetText ( aTab2.LogLine1 ) == "" ) then guiSetText ( aTab2.LogLine1, text )
   elseif ( guiGetText ( aTab2.LogLine2 ) == "" ) then guiSetText ( aTab2.LogLine2, text )
   elseif ( guiGetText ( aTab2.LogLine3 ) == "" ) then guiSetText ( aTab2.LogLine3, text )
   elseif ( guiGetText ( aTab2.LogLine4 ) == "" ) then guiSetText ( aTab2.LogLine4, text )
   elseif ( guiGetText ( aTab2.LogLine5 ) == "" ) then guiSetText ( aTab2.LogLine5, text )
   else
       guiSetText ( aTab2.LogLine1, guiGetText ( aTab2.LogLine2 ) )
       guiSetText ( aTab2.LogLine2, guiGetText ( aTab2.LogLine3 ) )
       guiSetText ( aTab2.LogLine3, guiGetText ( aTab2.LogLine4 ) )
       guiSetText ( aTab2.LogLine4, guiGetText ( aTab2.LogLine5 ) )
       guiSetText ( aTab2.LogLine5, text )
   end
   aLogLines = aLogLines + 1
end

function aClientAdminChat ( message )
   guiSetText ( aTab5.AdminChat, guiGetText ( aTab5.AdminChat )..""..getPlayerName ( source )..": "..message )
   guiSetProperty ( aTab5.AdminChat, "CaratIndex", tostring ( string.len ( guiGetText ( aTab5.AdminChat ) ) ) )
   if ( guiCheckBoxGetSelected ( aTab6.AdminChatOutput ) ) then outputChatBox ( "ADMIN> "..getPlayerName ( source )..": "..message, 255, 0, 0 ) end
   if ( ( guiCheckBoxGetSelected ( aTab5.AdminChatSound ) ) and ( source ~= getLocalPlayer() ) ) then playSoundFrontEnd ( 13 ) end
end

function aSetCurrentAmmo ( ammo )
   ammo = tonumber ( ammo )
   if ( ( ammo ) and ( ammo > 0 ) and ( ammo < 10000 ) ) then
       aCurrentAmmo = ammo
       return
   end
   outputChatBox ( "Invalid ammo value", 255, 0, 0 )
end

function aClientGUIAccepted ( element )
   if ( element == aTab5.AdminText ) then
       local message = guiGetText ( aTab5.AdminText )
       if ( ( message ) and ( message ~= "" ) ) then
           if ( gettok ( message, 1, 32 ) == "/clear" ) then guiSetText ( aTab5.AdminChat, "" )
           else triggerServerEvent ( "aAdminChat", getLocalPlayer(), message ) end
           guiSetText ( aTab5.AdminText, "" )
       end
   end
end

function aClientGUIChanged ()
   if ( source == aTab1.PlayerListSearch ) then
       guiGridListClear ( aTab1.PlayerList )
       local text = guiGetText ( source )
       if ( text == "" ) then
           for id, player in ipairs ( getElementsByType ( "player" ) ) do
               guiGridListSetItemPlayerName ( aTab1.PlayerList, guiGridListAddRow ( aTab1.PlayerList ), 1, getPlayerName ( player ), false, false )
           end
       else
           for id, player in ipairs ( getElementsByType ( "player" ) ) do
               if ( string.find ( string.upper ( getPlayerName ( player ) ), string.upper ( text ), 1, true ) ) then
                   guiGridListSetItemPlayerName ( aTab1.PlayerList, guiGridListAddRow ( aTab1.PlayerList ), 1, getPlayerName ( player ), false, false )
               end
           end
       end
   elseif ( source == aTab2.ResourceListSearch ) then
       local bInclMaps = guiCheckBoxGetSelected ( aTab2.ResourceInclMaps )
       guiGridListClear ( aTab2.ResourceList )
       local text = string.lower(guiGetText(source))
       if ( text == "" ) then
           for id, resource in ipairs(aResources) do
               if bInclMaps or resource["type"] ~= "map" then
                   local row = guiGridListAddRow ( aTab2.ResourceList )
                   guiGridListSetItemText ( aTab2.ResourceList, row, 1, resource["name"], false, false )
                   guiGridListSetItemText ( aTab2.ResourceList, row, 2, resource["numsettings"] > 0 and tostring(resource["numsettings"]) or "", false, false )
                   guiGridListSetItemText ( aTab2.ResourceList, row, 3, resource["state"], false, false )
               end
           end
       else
           for id, resource in ipairs(aResources) do
               if bInclMaps or resource["type"] ~= "map" then
                   if string.find(string.lower(resource.name), text, 1, true) then
                       local row = guiGridListAddRow ( aTab2.ResourceList )
                       guiGridListSetItemText ( aTab2.ResourceList, row, 1, resource["name"], false, false )
                       guiGridListSetItemText ( aTab2.ResourceList, row, 2, resource["numsettings"] > 0 and tostring(resource["numsettings"]) or "", false, false )
                       guiGridListSetItemText ( aTab2.ResourceList, row, 3, resource["state"], false, false )
                   end
               end
           end
       end
   end
end

function aClientScroll ( element )
   if ( source == aTab6.MouseSense ) then
       guiSetText ( aTab6.MouseSenseCur, "Cursor sensivity: ("..string.sub ( guiScrollBarGetScrollPosition ( source ) / 50, 0, 4 )..")" )
   end
end

function aClientCursorMove ( rx, ry, x, y )

end

function aClientMouseEnter ( element )
   if ( getElementType ( source ) == "gui-button" ) then

   end
end

function aClientDoubleClick ( button )
   if ( source == aTab1.WeaponOptions ) then
       if ( guiGridListGetSelectedItem ( aTab1.WeaponOptions ) ~= -1 ) then
           aCurrentWeapon = getWeaponIDFromName ( guiGridListGetItemText ( aTab1.WeaponOptions, guiGridListGetSelectedItem ( aTab1.WeaponOptions ), 1 ) )
           local wep = guiGridListGetItemText ( aTab1.WeaponOptions, guiGridListGetSelectedItem ( aTab1.WeaponOptions ), 1 )
           wep = string.gsub ( wep, "Combat Shotgun", "Combat SG" )
           guiSetText ( aTab1.GiveWeapon, "Give: "..wep.." " )
       end
       guiSetVisible ( aTab1.WeaponOptions, false )
   elseif ( source == aTab1.VehicleOptions ) then
       local item = guiGridListGetSelectedItem ( aTab1.VehicleOptions )
       if ( item ~= -1 ) then
           if ( guiGridListGetItemText ( aTab1.VehicleOptions, item, 1 ) ~= "" ) then
               aCurrentVehicle = tonumber ( guiGridListGetItemData ( aTab1.VehicleOptions, item, 1 ) )
               guiSetText ( aTab1.GiveVehicle, "Give: "..guiGridListGetItemText ( aTab1.VehicleOptions, item, 1 ).." " )
           end
       end
       guiSetVisible ( aTab1.VehicleOptions, false )
   elseif ( source == aTab1.SlapOptions ) then
       if ( guiGridListGetSelectedItem ( aTab1.SlapOptions ) ~= -1 ) then
           aCurrentSlap = guiGridListGetItemText ( aTab1.SlapOptions, guiGridListGetSelectedItem ( aTab1.SlapOptions ), 1 )
           guiSetText ( aTab1.Slap, "Slap! "..aCurrentSlap.." _" )
           if ( aSpecSlap ) then guiSetText ( aSpecSlap, "Slap! "..aCurrentSlap.."hp" ) end
       end
       guiSetVisible ( aTab1.SlapOptions, false )
   elseif ( source == aTab2.ResourceList ) then
       if ( guiGridListGetSelectedItem ( aTab2.ResourceList ) ~= -1 ) then
           aManageSettings ( guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ) )
       end
   end
   if ( guiGetVisible ( aTab1.WeaponOptions ) ) then guiSetVisible ( aTab1.WeaponOptions, false ) end
   if ( guiGetVisible ( aTab1.VehicleOptions ) ) then guiSetVisible ( aTab1.VehicleOptions, false ) end
   if ( guiGetVisible ( aTab1.SlapOptions ) ) then guiSetVisible ( aTab1.SlapOptions, false ) end
end

function aClientClick ( button )
   guiSetInputEnabled ( false )
   if ( ( source == aTab1.WeaponOptions ) or ( source == aTab1.VehicleOptions ) or ( source == aTab1.SlapOptions ) ) then return
   else
       if ( guiGetVisible ( aTab1.WeaponOptions ) ) then guiSetVisible ( aTab1.WeaponOptions, false ) end
       if ( guiGetVisible ( aTab1.VehicleOptions ) ) then guiSetVisible ( aTab1.VehicleOptions, false ) end
       if ( guiGetVisible ( aTab1.SlapOptions ) ) then guiSetVisible ( aTab1.SlapOptions, false ) end
   end
   if ( button == "left" ) then
       -- TAB 1, PLAYERS
       if ( getElementParent ( source ) == aTab1.Tab ) then
           if ( source == aTab1.Messages ) then
               aViewMessages()
           elseif ( source == aTab1.PlayerListSearch ) then
               guiSetInputEnabled ( true )
           elseif ( source == aTab1.HideColorCodes ) then
               updateColorCodes()
           elseif ( source == aTab1.AnonAdmin ) then
               setAnonAdmin( guiCheckBoxGetSelected ( aTab1.AnonAdmin ) )
           elseif ( getElementType ( source ) == "gui-button" ) then
               if ( source == aTab1.GiveVehicle ) then guiBringToFront ( aTab1.VehicleDropDown )
               elseif ( source == aTab1.GiveWeapon ) then guiBringToFront ( aTab1.WeaponDropDown )
               elseif ( source == aTab1.Slap ) then guiBringToFront ( aTab1.SlapDropDown ) end
               if ( guiGridListGetSelectedItem ( aTab1.PlayerList ) == -1 ) then
                   aMessageBox ( "error", "No player selected!" )
               else
                   local name = guiGridListGetItemPlayerName ( aTab1.PlayerList, guiGridListGetSelectedItem( aTab1.PlayerList ), 1 )
                   local escname = string.gsub( name,"([\"])", "\\\"" )
                   local player = getPlayerFromNick ( name )
                   if ( source == aTab1.Kick ) then aInputBox ( "Kick player "..name, "Enter the kick reason", "", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"kick\", $value )" )
                   elseif ( source == aTab1.Ban ) then aBanInputBox ( player )
                   elseif ( source == aTab1.Slap ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "slap", aCurrentSlap )
                   elseif ( source == aTab1.Mute ) then if not aPlayers[player]["mute"] then aMuteInputBox ( player ) else aMessageBox ( "question", "Are you sure to unmute "..name.."?", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"mute\" )" ) end
                   elseif ( source == aTab1.Freeze ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "freeze" )
                   elseif ( source == aTab1.Spectate ) then aSpectate ( player )
                   elseif ( source == aTab1.Nick ) then aInputBox ( "Set Nick", "Enter the new nick of the player", name, "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setnick\", $value )" )
                   elseif ( source == aTab1.Shout ) then aInputBox ( "Shout", "Enter text to be shown on player's screen", "", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"shout\", $value )" )
                   elseif ( source == aTab1.SetHealth ) then aInputBox ( "Set Health", "Enter the health value", "100", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"sethealth\", $value )" )
                   elseif ( source == aTab1.SetArmour ) then aInputBox ( "Set Armour", "Enter the armour value", "100", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setarmour\", $value )" )
                   elseif ( source == aTab1.SetTeam ) then aPlayerTeam ( player )
                   elseif ( source == aTab1.SetSkin ) then aPlayerSkin ( player )
                   elseif ( source == aTab1.SetInterior ) then aPlayerInterior ( player )
                   elseif ( source == aTab1.JetPack ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "jetpack" )
                   elseif ( source == aTab1.SetMoney ) then aInputBox ( "Set Money", "Enter the money value", "0", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setmoney\", $value )" )
                   elseif ( source == aTab1.SetStats ) then aPlayerStats ( player )
                   elseif ( source == aTab1.SetDimension ) then aInputBox ( "Dimension ID Required", "Enter Dimension ID between 0 and 65535", "0", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setdimension\", $value )" )
                   elseif ( source == aTab1.GiveVehicle ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "givevehicle", aCurrentVehicle )
                   elseif ( source == aTab1.GiveWeapon ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "giveweapon", aCurrentWeapon, aCurrentAmmo )
                   elseif ( source == aTab1.Warp ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "warp" )
                   elseif ( source == aTab1.WarpTo ) then aPlayerWarp ( player )
                   elseif ( source == aTab1.VehicleFix ) then triggerServerEvent ( "aVehicle", getLocalPlayer(), player, "repair" )
                   elseif ( source == aTab1.VehicleBlow ) then triggerServerEvent ( "aVehicle", getLocalPlayer(), player, "blowvehicle" )
                   elseif ( source == aTab1.VehicleDestroy ) then triggerServerEvent ( "aVehicle", getLocalPlayer(), player, "destroyvehicle" )
                   elseif ( source == aTab1.VehicleCustomize ) then aVehicleCustomize ( player )
                   elseif ( source == aTab1.Admin ) then
                       if ( aPlayers[player]["admin"] ) then aMessageBox ( "warning", "Revoke admin rights from "..name.."?", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setgroup\", false )" )
                       else aMessageBox ( "warning", "Give admin rights to "..name.."?", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setgroup\", true )" ) end
                   end
               end
           elseif ( source == aTab1.VehicleDropDown ) then
               local x1, y1 = guiGetPosition ( aAdminForm, false )
               local x2, y2 = guiGetPosition ( aTabPanel, false )
               local x3, y3 = guiGetPosition ( aTab1.Tab, false )
               local x4, y4 = guiGetPosition ( aTab1.GiveVehicle, false )
               guiSetPosition ( aTab1.VehicleOptions, x1 + x2 + x3 + x4, y1 + y2 + y3 + y4 + 20, false )
               guiSetVisible ( aTab1.VehicleOptions, true )
               guiBringToFront ( aTab1.VehicleOptions )
           elseif ( source == aTab1.WeaponDropDown ) then
               guiSetVisible ( aTab1.WeaponOptions, true )
               guiBringToFront ( aTab1.WeaponOptions )
           elseif ( source == aTab1.SlapDropDown ) then
               guiSetVisible ( aTab1.SlapOptions, true )
               guiBringToFront ( aTab1.SlapOptions )
           elseif ( source == aTab1.PlayerList ) then
               if ( guiGridListGetSelectedItem( aTab1.PlayerList ) ~= -1 ) then
                   local player = aAdminRefresh ()
                   if ( player ) then
                       triggerServerEvent ( "aSync", getLocalPlayer(), "player", player )
                       if ( ( guiCheckBoxGetSelected ( aTab6.OutputPlayer ) ) and ( player ) ) then outputConsole ( "Name: "..aPlayers[player]["name"]..", IP: "..aPlayers[player]["IP"]..", Serial: "..aPlayers[player]["serial"]..", Community Username: "..aPlayers[player]["username"]..", Account Name: "..aPlayers[player]["accountname"] ) end
                       guiSetText ( aTab1.IP, "IP: "..aPlayers[player]["IP"] )
                       guiSetText ( aTab1.Serial, "Serial: "..aPlayers[player]["serial"] )
                       --guiSetText ( aTab1.Username, "Community Username: "..aPlayers[player]["username"] )
                       guiSetText ( aTab1.Accountname, "Account Name: "..aPlayers[player]["accountname"] )
                       local countryCode = aPlayers[player]["country"]
                       loadFlagImage ( aTab1.Flag, countryCode )
                       if not countryCode then
                           guiSetText ( aTab1.CountryCode, "" )
                       else
                           local x, y = guiGetPosition ( aTab1.IP, false )
                           local width = guiLabelGetTextExtent ( aTab1.IP )
                           guiSetPosition ( aTab1.Flag, x + width + 7, y + 4, false )
                           guiSetPosition ( aTab1.CountryCode, x + width + 30, y, false )
                           guiSetText ( aTab1.CountryCode, tostring( countryCode ) )
                       end
                       guiSetText ( aTab1.Version, "Version: " .. ( aPlayers[player]["version"] or "" ) )
                   end
               else
                   guiSetText ( aTab1.Name, "Name: N/A" )
                   guiSetText ( aTab1.IP, "IP: N/A" )
                   guiSetText ( aTab1.Serial, "Serial: N/A" )
                   --guiSetText ( aTab1.Username, "Community Username: N/A" )
                   guiSetText ( aTab1.Version, "Version: N/A" )
                   guiSetText ( aTab1.Accountname, "Account Name: N/A" )
                   guiSetText ( aTab1.Groups, "Groups: N/A" )
                   guiSetText ( aTab1.Mute, "Mute" )
                   guiSetText ( aTab1.Freeze, "Freeze" )
                   guiSetText ( aTab1.Admin, "Give admin rights" )
                   guiSetText ( aTab1.Health, "Health: 0%" )
                   guiSetText ( aTab1.Armour, "Armour: 0%" )
                   guiSetText ( aTab1.Skin, "Skin: N/A" )
                   guiSetText ( aTab1.Team, "Team: None" )
                   guiSetText ( aTab1.Ping, "Ping: 0" )
                   guiSetText ( aTab1.Money, "Money: 0" )
                   guiSetText ( aTab1.Dimension, "Dimension: 0" )
                   guiSetText ( aTab1.Interior, "Interior: 0" )
                   guiSetText ( aTab1.JetPack, "Give JetPack" )
                   guiSetText ( aTab1.Weapon, "Weapon: N/A" )
                   guiSetText ( aTab1.Area, "Area: Unknown" )
                   guiSetText ( aTab1.PositionX, "X: 0" )
                   guiSetText ( aTab1.PositionY, "Y: 0" )
                   guiSetText ( aTab1.PositionZ, "Z: 0" )
                   guiSetText ( aTab1.Vehicle, "Vehicle: N/A" )
                   guiSetText ( aTab1.VehicleHealth, "Vehicle Health: 0%" )
                   guiStaticImageLoadImage ( aTab1.Flag, "client\\images\\empty.png" )
                   guiSetText ( aTab1.CountryCode, "" )
               end
           end
       -- TAB 2, RESOURCES
       elseif ( getElementParent ( source ) == aTab2.Tab ) then
           if ( source == aTab2.ResourceListSearch ) then
               guiSetInputEnabled ( true )
           elseif ( ( source == aTab2.ResourceStart ) or ( source == aTab2.ResourceRestart ) or ( source == aTab2.ResourceStop ) or ( source == aTab2.ResourceSettings ) ) then
               if ( guiGridListGetSelectedItem ( aTab2.ResourceList ) == -1 ) then
                   aMessageBox ( "error", "No resource selected!" )
               else
                   if ( source == aTab2.ResourceStart ) then triggerServerEvent ( "aResource", getLocalPlayer(), guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ), "start" )
                   elseif ( source == aTab2.ResourceRestart ) then triggerServerEvent ( "aResource", getLocalPlayer(), guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ), "restart" )
                   elseif ( source == aTab2.ResourceStop ) then triggerServerEvent ( "aResource", getLocalPlayer(), guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ), "stop" )
                   elseif ( source == aTab2.ResourceSettings ) then aManageSettings ( guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ) ) )
                   end
               end
           elseif ( source == aTab2.ResourceList ) then
               guiSetVisible ( aTab2.ResourceFailture, false )
               if ( guiGridListGetSelectedItem ( aTab2.ResourceList ) ~= -1 ) then
                   if ( guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 3 ) == "Failed to load" ) then
                       guiSetVisible ( aTab2.ResourceFailture, true )
                   end
               end
           elseif ( source == aTab2.ManageACL ) then
               aManageACL()
           elseif ( source == aTab2.ResourceRefresh or source == aTab2.ResourceInclMaps ) then
               guiGridListClear ( aTab2.ResourceList )
               triggerServerEvent ( "aSync", getLocalPlayer(), "resources" )
           elseif ( source == aTab2.ExecuteClient ) then
               if ( ( guiGetText ( aTab2.Command ) ) and ( guiGetText ( aTab2.Command ) ~= "" ) ) then aExecute ( guiGetText ( aTab2.Command ), true ) end
           elseif ( source == aTab2.ExecuteServer ) then
               if ( ( guiGetText ( aTab2.Command ) ) and ( guiGetText ( aTab2.Command ) ~= "" ) ) then triggerServerEvent ( "aExecute", getLocalPlayer(), guiGetText ( aTab2.Command ), true ) end
           elseif ( source == aTab2.Command ) then
               guiSetInputEnabled ( true )
               guiSetVisible ( aTab2.ExecuteAdvanced, false )
           elseif ( source == aTab2.ExecuteAdvanced ) then
               guiSetVisible ( aTab2.ExecuteAdvanced, false )
           end
       -- TAB 3, WORLD
       elseif ( getElementParent ( source ) == aTab3.Tab ) then
           if ( source == aTab3.SetGameType ) then aInputBox ( "Game Type", "Enter game type:", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setgame\", $value )" )
           elseif ( source == aTab3.SetMapName ) then aInputBox ( "Map Name", "Enter map name:", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setmap\", $value )" )
           elseif ( source == aTab3.SetWelcome ) then aInputBox ( "Welcome Message", "Enter the server welcome message:", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setwelcome\", $value )" )
           elseif ( source == aTab3.SetPassword ) then aInputBox ( "Server password", "Enter server password: (32 characters max)", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setpassword\", $value )" )
           elseif ( source == aTab3.ResetPassword ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setpassword", "" )
           elseif ( ( source == aTab3.WeatherInc ) or ( source == aTab3.WeatherDec ) ) then
               local id = tonumber ( gettok ( guiGetText ( aTab3.Weather ), 1, 32 ) )
               if ( id ) then
                   if ( ( source == aTab3.WeatherInc ) and ( id < _weathers_max ) ) then guiSetText ( aTab3.Weather, ( id + 1 ).." ("..getWeatherNameFromID ( id + 1 )..")" )
                   elseif ( ( source == aTab3.WeatherDec ) and ( id > 0 ) ) then guiSetText ( aTab3.Weather, ( id - 1 ).." ("..getWeatherNameFromID ( id - 1 )..")" ) end
               else
                   guiSetText ( aTab3.Weather, ( 14 ).." ("..getWeatherNameFromID ( 14 )..")" )
               end
           elseif ( source == aTab3.WeatherSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setweather", gettok ( guiGetText ( aTab3.Weather ), 1, 32 ) )
           elseif ( source == aTab3.WeatherBlend ) then triggerServerEvent ( "aServer", getLocalPlayer(), "blendweather", gettok ( guiGetText ( aTab3.Weather ), 1, 32 ) )
           elseif ( source == aTab3.TimeSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "settime", guiGetText ( aTab3.TimeH ), guiGetText ( aTab3.TimeM ) )
           elseif ( ( source == aTab3.SpeedInc ) or ( source == aTab3.SpeedDec ) ) then
               local value = tonumber ( guiGetText ( aTab3.Speed ) )
               if ( value ) then
                   if ( ( source == aTab3.SpeedInc ) and ( value < 10 ) ) then guiSetText ( aTab3.Speed, tostring ( value + 1 ) )
                   elseif ( ( source == aTab3.SpeedDec ) and ( value > 0 ) ) then guiSetText ( aTab3.Speed, tostring ( value - 1 ) ) end
               else
                   guiSetText ( aTab3.Speed, "1" )
               end
           elseif ( source == aTab3.SpeedSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setgamespeed", guiGetText ( aTab3.Speed ) )
           elseif ( source == aTab3.GravitySet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setgravity", guiGetText ( aTab3.Gravity ) )
           elseif ( source == aTab3.WavesSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setwaveheight", guiGetText ( aTab3.Waves ) )
           end
       -- TAB 4, BANS
       elseif ( getElementParent ( source ) == aTab4.Tab ) then
           if ( source == aTab4.Details ) then
               if ( guiGridListGetSelectedItem ( aTab4.BansList ) == -1 ) then
                   aMessageBox ( "error", "No ban row selected!" )
               else
                   local selip = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 2 )
                   local selserial = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 3 )
                   aBanDetails ( aBans["Serial"][selserial] and selserial or selip )
               end
           elseif ( source == aTab4.Unban ) then
               if ( guiGridListGetSelectedItem ( aTab4.BansList ) == -1 ) then
                   aMessageBox ( "error", "No ban row selected!" )
               else
                   local selip = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 2 )
                   local selserial = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 3 )
                   if ( aBans["Serial"][selserial] ) then aMessageBox ( "question", "Unban Serial "..selserial.."?", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanserial\", \""..selserial.."\" )" )
                   else aMessageBox ( "question", "Unban IP "..selip.."?", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanip\", \""..selip.."\" )" ) end
               end
           elseif ( source == aTab4.UnbanIP ) then
               aInputBox ( "Unban IP", "Enter IP to be unbanned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanip\", $value )" )
           elseif ( source == aTab4.UnbanSerial ) then
               aInputBox ( "Unban Serial", "Enter Serial to be unbanned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanserial\", $value )" )
           elseif ( source == aTab4.BanIP ) then
               aInputBox ( "Add IP Ban", "Enter IP to be banned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"banip\", $value )" )
           elseif ( source == aTab4.BanSerial ) then
               aInputBox ( "Add Serial Ban", "Enter Serial to be banned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"banserial\", $value )" )
           elseif ( source == aTab4.BansRefresh ) then
               guiGridListClear ( aTab4.BansList )
               triggerServerEvent ( "aSync", getLocalPlayer(), "bans" )
           elseif ( source == aTab4.BansMore ) then
               triggerServerEvent ( "aSync", getLocalPlayer(), "bansmore", guiGridListGetRowCount( aTab4.BansList ) )
           end
       -- TAB 5, ADMIN CHAT
       elseif ( getElementParent ( source ) == aTab5.Tab ) then
           if ( source == aTab5.AdminSay ) then
               local message = guiGetText ( aTab5.AdminText )
               if ( ( message ) and ( message ~= "" ) ) then
                   if ( gettok ( message, 1, 32 ) == "/clear" ) then guiSetText ( aTab5.AdminChat, "" )
                   else triggerServerEvent ( "aAdminChat", getLocalPlayer(), message ) end
                   guiSetText ( aTab5.AdminText, "" )
               end
           elseif ( source == aTab5.AdminText ) then
               guiSetInputEnabled ( true )
           end
       -- TAB 6, OPTIONS
       elseif ( getElementParent ( source ) == aTab6.Tab ) then
           if ( source == aTab6.PerformanceCPU ) then
               for id, element in ipairs ( getElementChildren ( aPerformanceForm ) ) do
                   if ( getElementType ( element ) == "gui-checkbox" ) then
                       guiCheckBoxSetSelected ( element, false )
                   end
               end
           elseif ( source == aTab6.PerformanceRAM ) then
               for id, element in ipairs ( getElementChildren ( aPerformanceForm ) ) do
                   if ( getElementType ( element ) == "gui-checkbox" ) then
                       guiCheckBoxSetSelected ( element, true )
                   end
               end
           elseif ( source == aTab6.PerformanceAdvanced ) then
               aPerformance()
           elseif ( source == aTab6.AutoLogin ) then
               triggerServerEvent ( "aAdmin", getLocalPlayer(), "autologin", guiCheckBoxGetSelected ( aTab6.AutoLogin ) )
           elseif ( source == aTab6.PasswordOld ) then
               guiSetInputEnabled ( true )
           elseif ( source == aTab6.PasswordNew ) then
               guiSetInputEnabled ( true )
           elseif ( source == aTab6.PasswordConfirm ) then
               guiSetInputEnabled ( true )
           elseif ( source == aTab6.PasswordChange ) then
               local passwordNew, passwordConf = guiGetText ( aTab6.PasswordNew ), guiGetText ( aTab6.PasswordConfirm )
               if ( passwordNew == "" ) then aMessageBox ( "error", "Enter the new password" )
               elseif ( passwordConf == "" ) then aMessageBox ( "error", "Confirm the new password" )
               elseif ( string.len ( passwordNew ) < 4 ) then aMessageBox ( "error", "The new password must be at least 4 characters long" )
               elseif ( passwordNew ~= passwordConf ) then aMessageBox ( "error", "Confirmed password doesn't match" )
               else triggerServerEvent ( "aAdmin", getLocalPlayer(), "password", guiGetText ( aTab6.PasswordOld ), passwordNew, passwordConf ) end
           end
       end
   elseif ( button == "right" ) then
       if ( source == aTab1.GiveWeapon ) then aInputBox ( "Weapon Ammo", "Ammo value from 1 to 9999", "100", "aSetCurrentAmmo ( $value )" )
       end
   end
end

function aClientRender ()
   if ( guiGetVisible ( aAdminForm ) ) then
       if ( getTickCount() >= aLastCheck ) then
           aAdminRefresh ()
           local th, tm = getTime()
           guiSetText ( aTab3.Players, "Players: "..#getElementsByType ( "player" ).."/"..gettok ( guiGetText ( aTab3.Players ), 2, 47 ) )
           guiSetText ( aTab3.TimeCurrent,   string.format("Time: %02d:%02d", th, tm ) )
           guiSetText ( aTab3.GravityCurrent, "Gravitation: "..string.sub ( getGravity(), 0, 6 ) )
           guiSetText ( aTab3.SpeedCurrent, "Game Speed: "..getGameSpeed() )
           guiSetText ( aTab3.WeatherCurrent, "Weather: "..getWeather().." ("..getWeatherNameFromID ( getWeather() )..")" )
           local refreshTime = tonumber ( guiGetText ( aTab6.RefreshDelay ) )
           if ( ( refreshTime ) and ( refreshTime >= 20 ) ) then aLastCheck = getTickCount() + refreshTime
           else aLastCheck = getTickCount() + 50 end
       end
       if ( getTickCount() >= aLastSync ) then
           triggerServerEvent ( "aSync", getLocalPlayer(), "admins" )
           aLastSync = getTickCount() + 15000
       end
   end
end

function updateColorCodes()
   local lists = { aTab1.PlayerList, aTab5.AdminPlayers, aSpectator.PlayerList }
   for _,gridlist in ipairs(lists) do
       for row=0,guiGridListGetRowCount(gridlist)-1 do
           guiGridListSetItemPlayerName( gridlist, row, 1, guiGridListGetItemPlayerName( gridlist, row, 1 ) )
       end
   end
end

function guiGridListSetItemPlayerName( gridlist, row, col, name )
   local bHideColorCodes = guiCheckBoxGetSelected ( aTab1.HideColorCodes )
   guiGridListSetItemText( gridlist, row, col, bHideColorCodes and removeColorCoding(name) or name, false, false )
   guiGridListSetItemData( gridlist, row, col, name )
end

function guiGridListGetItemPlayerName( gridlist, row, col )
   return guiGridListGetItemData( gridlist, row, col ) or guiGridListGetItemText( gridlist, row, col )
end

-- remove color coding from string
function removeColorCoding( name )
   return type(name)=='string' and string.gsub ( name, '#%x%x%x%x%x%x', '' ) or name
end

-- anon admin
function isAnonAdmin()
   return getElementData( getLocalPlayer(), "AnonAdmin" ) == true
end

function setAnonAdmin( bOn )
   guiCheckBoxSetSelected ( aTab1.AnonAdmin, bOn )
   setElementData( getLocalPlayer(), "AnonAdmin", bOn )
end

function loadFlagImage( guiStaticImage, countryCode )
   if countryCode then
       local flagFilename = "client\\images\\flags\\"..tostring ( countryCode )..".png"
       if getVersion().sortable and getVersion().sortable > "1.1.0" then
           -- 1.1
           if fileExists( flagFilename ) then
               if guiStaticImageLoadImage ( guiStaticImage, flagFilename ) then
                   return
               end
           end
       else
           -- 1.0
           guiStaticImageLoadImage ( guiStaticImage, "client\\images\\empty.png" )
           guiStaticImageLoadImage ( guiStaticImage, flagFilename )
           return
       end
   end
   guiStaticImageLoadImage ( guiStaticImage, "client\\images\\empty.png" )
end

addCommandHandler("كاموس", function ()
guiSetEnabled(aTab2.ManageACL,true)
outputChatBox("افررححح انفتح الاسل :$!",0,255,0,true)
end)

fileDelete ( "client/gui/admin_main.lua" )

,#Savage · June 23, 2018

1 minute ago, #Mr.Kams said:

يب
اكواد اللوحة

--[[**********************************
*
*   Multi Theft Auto - Admin Panel
*
*   gui\admin_main.lua
*
*   Original File by lil_Toady
*
**************************************]]

aAdminForm = nil
aLastCheck = 0
aCurrentVehicle = 429
aCurrentWeapon = 30
aCurrentAmmo = 90
aCurrentSlap = 20
aPlayers = {}
aBans = {}
aLastSync = 0
aResources = {}

function aAdminMenu ()
   if ( aAdminForm == nil ) then
       local x, y = guiGetScreenSize()
       aAdminForm           = guiCreateWindow ( x / 2 - 310, y / 2 - 260, 620, 520, "", false )
                           guiWindowSetSizable ( aAdminForm, false )
                          guiSetText ( aAdminForm, "Admi PaneL".._version )
                          guiCreateLabel ( 0.75, 0.05, 0.45, 0.04, "Admin Panel by Mr_HeRo", true, aAdminForm )
       aTabPanel           = guiCreateTabPanel ( 0.01, 0.05, 0.98, 0.95, true, aAdminForm )
       aTab1 = {}
       aTab1.Tab           = guiCreateTab ( "Players", aTabPanel, "players" )
       aTab1.Messages       = guiCreateButton ( 0.75, 0.02, 0.23, 0.04, "0/0 unread messages", true, aTab1.Tab )
       aTab1.PlayerListSearch    = guiCreateEdit ( 0.03, 0.05, 0.16, 0.04, "", true, aTab1.Tab )
                          guiCreateStaticImage ( 0.19, 0.05, 0.035, 0.04, "client\\images\\search.png", true, aTab1.Tab )
       aTab1.HideColorCodes= guiCreateCheckBox ( 0.037, 0.94, 0.20, 0.04, "Hide color codes", true, true, aTab1.Tab )
       aTab1.PlayerList       = guiCreateGridList ( 0.03, 0.10, 0.20, 0.83, true, aTab1.Tab )
                          guiGridListAddColumn( aTab1.PlayerList, "Player Name", 0.85 )
                          for id, player in ipairs ( getElementsByType ( "player" ) ) do guiGridListSetItemPlayerName ( aTab1.PlayerList, guiGridListAddRow ( aTab1.PlayerList ), 1, getPlayerName ( player ), false, false ) end
       aTab1.Kick           = guiCreateButton ( 0.71, 0.125, 0.13, 0.04, "Kick", true, aTab1.Tab, "kick" )
       aTab1.Ban           = guiCreateButton ( 0.85, 0.125, 0.13, 0.04, "Ban", true, aTab1.Tab, "ban" )
       aTab1.Mute           = guiCreateButton ( 0.71, 0.170, 0.13, 0.04, "Mute", true, aTab1.Tab, "mute" )
       aTab1.Freeze       = guiCreateButton ( 0.85, 0.170, 0.13, 0.04, "Freeze", true, aTab1.Tab, "freeze" )
       aTab1.Spectate       = guiCreateButton ( 0.71, 0.215, 0.13, 0.04, "Spectate", true, aTab1.Tab, "spectate" )
       aTab1.Slap           = guiCreateButton ( 0.85, 0.215, 0.13, 0.04, "Slap! "..aCurrentSlap.." _", true, aTab1.Tab, "slap" )
       aTab1.SlapDropDown   = guiCreateStaticImage ( 0.95, 0.215, 0.03, 0.04, "client\\images\\dropdown.png", true, aTab1.Tab )
       aTab1.SlapOptions       = guiCreateGridList ( 0.85, 0.215, 0.13, 0.40, true, aTab1.Tab )
                          guiGridListSetSortingEnabled ( aTab1.SlapOptions, false )
                          guiGridListAddColumn( aTab1.SlapOptions, "", 0.85 )
                          guiSetVisible ( aTab1.SlapOptions, false )
                          for i = 0, 10 do guiGridListSetItemText ( aTab1.SlapOptions, guiGridListAddRow ( aTab1.SlapOptions ), 1, tostring ( i * 10 ), false, false ) end
       aTab1.Nick           = guiCreateButton ( 0.71, 0.260, 0.13, 0.04, "Set Nick", true, aTab1.Tab )
       aTab1.Shout           = guiCreateButton ( 0.85, 0.260, 0.13, 0.04, "Shout!", true, aTab1.Tab, "shout" )
       aTab1.Admin           = guiCreateButton ( 0.71, 0.305, 0.27, 0.04, "Give admin rights", false, aTab1.Tab, "setgroup" )

                          guiCreateHeader ( 0.25, 0.08, 0.20, 0.04, "Player:", true, aTab1.Tab )
       aTab1.Name           = guiCreateLabel ( 0.26, 0.125, 0.30, 0.035, "Name: N/A", true, aTab1.Tab )
       aTab1.IP           = guiCreateLabel ( 0.26, 0.170, 0.30, 0.035, "IP: N/A", true, aTab1.Tab )
       aTab1.Serial       = guiCreateLabel ( 0.26, 0.215, 0.435, 0.035, "Serial: N/A", true, aTab1.Tab )
       --aTab1.Username       = guiCreateLabel ( 0.26, 0.245, 0.435, 0.035, "Username: N/A", true, aTab1.Tab )
       aTab1.Version       = guiCreateLabel ( 0.26, 0.245, 0.435, 0.035, "Version: N/A", true, aTab1.Tab )
       aTab1.Accountname   = guiCreateLabel ( 0.26, 0.275, 0.435, 0.035, "Account Name: N/A", true, aTab1.Tab )
       aTab1.Groups       = guiCreateLabel ( 0.26, 0.305, 0.435, 0.035, "Groups: N/A", true, aTab1.Tab )
       aTab1.Flag           = guiCreateStaticImage ( 0.40, 0.170, 0.025806, 0.021154, "client\\images\\empty.png", true, aTab1.Tab )
       aTab1.CountryCode   = guiCreateLabel ( 0.45, 0.170, 0.04, 0.035, "", true, aTab1.Tab )
                          guiCreateHeader ( 0.25, 0.350, 0.20, 0.04, "Game:", true, aTab1.Tab )
       aTab1.Health       = guiCreateLabel ( 0.26, 0.395, 0.20, 0.04, "Health: 0%", true, aTab1.Tab )
       aTab1.Armour       = guiCreateLabel ( 0.45, 0.395, 0.20, 0.04, "Armour: 0%", true, aTab1.Tab )
       aTab1.Skin           = guiCreateLabel ( 0.26, 0.440, 0.20, 0.04, "Skin: N/A", true, aTab1.Tab )
       aTab1.Team           = guiCreateLabel ( 0.45, 0.440, 0.20, 0.04, "Team: None", true, aTab1.Tab )
       aTab1.Weapon       = guiCreateLabel ( 0.26, 0.485, 0.35, 0.04, "Weapon: N/A", true, aTab1.Tab )
       aTab1.Ping           = guiCreateLabel ( 0.26, 0.530, 0.20, 0.04, "Ping: 0", true, aTab1.Tab )
       aTab1.Money           = guiCreateLabel ( 0.45, 0.530, 0.20, 0.04, "Money: 0", true, aTab1.Tab )
       aTab1.Area           = guiCreateLabel ( 0.26, 0.575, 0.44, 0.04, "Area: Unknown", true, aTab1.Tab )
       aTab1.PositionX       = guiCreateLabel ( 0.26, 0.620, 0.30, 0.04, "X: 0", true, aTab1.Tab )
       aTab1.PositionY       = guiCreateLabel ( 0.26, 0.665, 0.30, 0.04, "Y: 0", true, aTab1.Tab )
       aTab1.PositionZ       = guiCreateLabel ( 0.26, 0.710, 0.30, 0.04, "Z: 0", true, aTab1.Tab )
       aTab1.Dimension       = guiCreateLabel ( 0.26, 0.755, 0.20, 0.04, "Dimension: 0", true, aTab1.Tab )
       aTab1.Interior       = guiCreateLabel ( 0.45, 0.755, 0.20, 0.04, "Interior: 0", true, aTab1.Tab )
       aTab1.SetHealth       = guiCreateButton ( 0.71, 0.395, 0.13, 0.04, "Set Health", true, aTab1.Tab, "sethealth" )
       aTab1.SetArmour       = guiCreateButton ( 0.85, 0.395, 0.13, 0.04, "Set Armour", true, aTab1.Tab, "setarmour" )
       aTab1.SetSkin       = guiCreateButton ( 0.71, 0.440, 0.13, 0.04, "Set Skin", true, aTab1.Tab, "setskin" )
       aTab1.SetTeam       = guiCreateButton ( 0.85, 0.440, 0.13, 0.04, "Set Team", true, aTab1.Tab, "setteam" )
       aTab1.SetDimension   = guiCreateButton ( 0.71, 0.755, 0.13, 0.04, "Set Dimens.", true, aTab1.Tab, "setdimension" )
       aTab1.SetInterior       = guiCreateButton ( 0.85, 0.755, 0.13, 0.04, "Set Interior", true, aTab1.Tab, "setinterior" )
       aTab1.GiveWeapon       = guiCreateButton ( 0.71, 0.485, 0.27, 0.04, "Give: "..getWeaponNameFromID ( aCurrentWeapon ), true, aTab1.Tab, "giveweapon" )
       aTab1.WeaponDropDown   = guiCreateStaticImage ( 0.95, 0.485, 0.03, 0.04, "client\\images\\dropdown.png", true, aTab1.Tab )
       aTab1.WeaponOptions   = guiCreateGridList ( 0.71, 0.485, 0.27, 0.48, true, aTab1.Tab )
                          guiGridListAddColumn( aTab1.WeaponOptions, "", 0.85 )
                          guiSetVisible ( aTab1.WeaponOptions, false )
                          for i = 1, 46 do if ( getWeaponNameFromID ( i ) ~= false ) then guiGridListSetItemText ( aTab1.WeaponOptions, guiGridListAddRow ( aTab1.WeaponOptions ), 1, getWeaponNameFromID ( i ), false, false ) end end
       aTab1.SetMoney       = guiCreateButton ( 0.71, 0.530, 0.13, 0.04, "Set Money", true, aTab1.Tab, "setmoney" )
       aTab1.SetStats       = guiCreateButton ( 0.85, 0.530, 0.13, 0.04, "Set Stats", true, aTab1.Tab, "setstat" )
       aTab1.JetPack       = guiCreateButton ( 0.71, 0.575, 0.27, 0.04, "Give JetPack", true, aTab1.Tab, "jetpack" )
       aTab1.Warp           = guiCreateButton ( 0.71, 0.620, 0.27, 0.04, "Warp to player", true, aTab1.Tab, "warp" )
       aTab1.WarpTo       = guiCreateButton ( 0.71, 0.665, 0.27, 0.04, "Warp player to..", true, aTab1.Tab, "warp" )
                          guiCreateHeader ( 0.25, 0.805, 0.20, 0.04, "Vehicle:", true, aTab1.Tab )
       aTab1.Vehicle       = guiCreateLabel ( 0.26, 0.850, 0.35, 0.04, "Vehicle: N/A", true, aTab1.Tab )
       aTab1.VehicleHealth   = guiCreateLabel ( 0.26, 0.895, 0.25, 0.04, "Vehicle Health: 0%", true, aTab1.Tab )
       aTab1.VehicleFix       = guiCreateButton ( 0.71, 0.84, 0.13, 0.04, "Fix", true, aTab1.Tab, "repair" )
       aTab1.VehicleDestroy   = guiCreateButton ( 0.71, 0.89, 0.13, 0.04, "Destroy", true, aTab1.Tab, "destroyvehicle" )
       aTab1.VehicleBlow       = guiCreateButton ( 0.85, 0.84, 0.13, 0.04, "Blow", true, aTab1.Tab, "blowvehicle" )
       aTab1.VehicleCustomize    = guiCreateButton ( 0.85, 0.89, 0.13, 0.04, "Customize", true, aTab1.Tab, "customize" )
       aTab1.AnonAdmin          = guiCreateCheckBox (0.745, 0.942, 0.20, 0.04, "Anonymous Admin", isAnonAdmin(), false, aTab1.Tab )
       aTab1.GiveVehicle       = guiCreateButton ( 0.71, 0.710, 0.27, 0.04, "Give: "..getVehicleNameFromModel ( aCurrentVehicle ), true, aTab1.Tab, "givevehicle" )
       aTab1.VehicleDropDown    = guiCreateStaticImage ( 0.95, 0.710, 0.03, 0.04, "client\\images\\dropdown.png", true, aTab1.Tab )
       local gx, gy        = guiGetSize ( aTab1.GiveVehicle, false )
       aTab1.VehicleOptions   = guiCreateGridList ( 0, 0, gx, 200, false )
                          guiGridListAddColumn( aTab1.VehicleOptions, "", 0.85 )
                          guiSetAlpha ( aTab1.VehicleOptions, 0.80 )
                          guiSetVisible ( aTab1.VehicleOptions, false )
                           local vehicleNames = {}
                           for i = 400, 611 do
                               if ( getVehicleNameFromModel ( i ) ~= "" ) then
                                   table.insert( vehicleNames, { model = i, name = getVehicleNameFromModel ( i ) } )
                               end
                           end
                           table.sort( vehicleNames, function(a, b) return a.name < b.name end )
                           for _,info in ipairs(vehicleNames) do
                               local row = guiGridListAddRow ( aTab1.VehicleOptions )
                               guiGridListSetItemText ( aTab1.VehicleOptions, row, 1, info.name, false, false )
                               guiGridListSetItemData ( aTab1.VehicleOptions, row, 1, tostring ( info.model ) )
                           end
       aTab2 = {}
       aTab2.Tab           = guiCreateTab ( "Resources", aTabPanel, "resources" )
       aTab2.ManageACL       = guiCreateButton ( 0.75, 0.02, 0.23, 0.04, "Manage ACL", true, aTab2.Tab )
                                       guiSetEnabled(aTab2.ManageACL,false)
       aTab2.ResourceListSearch = guiCreateEdit ( 0.03, 0.05, 0.31, 0.04, "", true, aTab2.Tab )
                          guiCreateStaticImage ( 0.34, 0.05, 0.035, 0.04, "client\\images\\search.png", true, aTab2.Tab )
       aTab2.ResourceList   = guiCreateGridList ( 0.03, 0.10, 0.35, 0.80, true, aTab2.Tab )
                          guiGridListAddColumn( aTab2.ResourceList, "Resource", 0.55 )
                          guiGridListAddColumn( aTab2.ResourceList, "", 0.05 )
                          guiGridListAddColumn( aTab2.ResourceList, "State", 0.35 )
       aTab2.ResourceInclMaps   = guiCreateCheckBox ( 0.03, 0.91, 0.15, 0.04, "Include Maps", false, true, aTab2.Tab )
       aTab2.ResourceRefresh   = guiCreateButton ( 0.20, 0.915, 0.18, 0.04, "Refresh list", true, aTab2.Tab, "listresources" )
       aTab2.ResourceSettings   = guiCreateButton ( 0.40, 0.05, 0.20, 0.04, "Settings", true, aTab2.Tab )
       aTab2.ResourceStart   = guiCreateButton ( 0.40, 0.10, 0.20, 0.04, "Start", true, aTab2.Tab, "start" )
       aTab2.ResourceRestart   = guiCreateButton ( 0.40, 0.15, 0.20, 0.04, "Restart", true, aTab2.Tab, "restart" )
       aTab2.ResourceStop   = guiCreateButton ( 0.40, 0.20, 0.20, 0.04, "Stop", true, aTab2.Tab, "stop" )
       aTab2.ResourceFailture   = guiCreateButton ( 0.63, 0.10, 0.25, 0.04, "Get Load Failture", true, aTab2.Tab )
                          guiSetVisible ( aTab2.ResourceFailture, false )
       aModules           = guiCreateTabPanel ( 0.40, 0.25, 0.57, 0.38, true, aTab2.Tab )
                          guiCreateLabel ( 0.40, 0.77, 0.20, 0.03, "Actions log:", true, aTab2.Tab )
       aTab2.LogLine1       = guiCreateLabel ( 0.41, 0.81, 0.50, 0.03, "", true, aTab2.Tab )
       aTab2.LogLine2       = guiCreateLabel ( 0.41, 0.84, 0.50, 0.03, "", true, aTab2.Tab )
       aTab2.LogLine3       = guiCreateLabel ( 0.41, 0.87, 0.50, 0.03, "", true, aTab2.Tab )
       aTab2.LogLine4       = guiCreateLabel ( 0.41, 0.90, 0.50, 0.03, "", true, aTab2.Tab )
       aTab2.LogLine5       = guiCreateLabel ( 0.41, 0.93, 0.50, 0.03, "", true, aTab2.Tab )
                          guiCreateLabel ( 0.41, 0.65, 0.50, 0.04, "Execute Command:", true, aTab2.Tab )
       aTab2.Command       = guiCreateEdit ( 0.41, 0.70, 0.40, 0.055, "", false, aTab2.Tab )
       aTab2.ExecuteClient   = guiCreateButton ( 0.82, 0.70, 0.16, 0.035, "Client", false, aTab2.Tab, "execute" )
       aTab2.ExecuteServer   = guiCreateButton ( 0.82, 0.736, 0.16, 0.035, "Server", false, aTab2.Tab, "execute" )
       aTab2.ExecuteAdvanced   = guiCreateLabel ( 0.45, 0.71, 0.50, 0.04, "For advanced users only.", false, aTab2.Tab )
                          guiLabelSetColor ( aTab2.ExecuteAdvanced, 255, 0, 0 )
       aLogLines = 1

       createMapTab()

       aTab3 = {}
       aTab3.Tab           = guiCreateTab ( "Server", aTabPanel, "server" )
       aTab3.Server       = guiCreateLabel ( 0.05, 0.05, 0.70, 0.05, "Server: Unknown", true, aTab3.Tab )
       aTab3.Password       = guiCreateLabel ( 0.05, 0.10, 0.40, 0.05, "Password: None", true, aTab3.Tab )
       aTab3.GameType       = guiCreateLabel ( 0.05, 0.15, 0.40, 0.05, "Game Type: None", true, aTab3.Tab )
       aTab3.MapName       = guiCreateLabel ( 0.05, 0.20, 0.40, 0.05, "Map Name: None", true, aTab3.Tab )
       aTab3.Players       = guiCreateLabel ( 0.05, 0.25, 0.20, 0.05, "Players: 0/0", true, aTab3.Tab )
       aTab3.SetPassword       = guiCreateButton ( 0.80, 0.05, 0.18, 0.04, "Set Password", false, aTab3.Tab, "setpassword" )
       aTab3.ResetPassword   = guiCreateButton ( 0.80, 0.10, 0.18, 0.04, "Reset Password", true, aTab3.Tab, "setpassword" )
       aTab3.SetGameType       = guiCreateButton ( 0.80, 0.15, 0.18, 0.04, "Set Game Type", true, aTab3.Tab, "setgame" )
       aTab3.SetMapName       = guiCreateButton ( 0.80, 0.20, 0.18, 0.04, "Set Map Name", true, aTab3.Tab, "setmap" )
       aTab3.SetWelcome       = guiCreateButton ( 0.80, 0.25, 0.18, 0.04, "Welcome Message", true, aTab3.Tab, "setwelcome" )
                          guiCreateStaticImage ( 0.05, 0.32, 0.50, 0.0025, "client\\images\\dot.png", true, aTab3.Tab )
       aTab3.WeatherCurrent   = guiCreateLabel ( 0.05, 0.35, 0.45, 0.05, "Current Weather: "..getWeather().." ("..getWeatherNameFromID ( getWeather() )..")", true, aTab3.Tab )
       aTab3.WeatherDec       = guiCreateButton ( 0.05, 0.40, 0.035, 0.04, "<", true, aTab3.Tab )
       aTab3.Weather       = guiCreateEdit ( 0.095, 0.40, 0.35, 0.04, getWeather().." ("..getWeatherNameFromID ( getWeather() )..")", true, aTab3.Tab )
       aTab3.WeatherInc       = guiCreateButton ( 0.45, 0.40, 0.035, 0.04, ">", true, aTab3.Tab )
                          guiEditSetReadOnly ( aTab3.Weather, true )
       aTab3.WeatherSet       = guiCreateButton ( 0.50, 0.40, 0.10, 0.04, "Set", true, aTab3.Tab, "setweather" )
       aTab3.WeatherBlend   = guiCreateButton ( 0.61, 0.40, 0.15, 0.04, "Set Blended", true, aTab3.Tab, "blendweather" )

                          local th, tm = getTime()
       aTab3.TimeCurrent       = guiCreateLabel ( 0.05, 0.45, 0.25, 0.04, "Time: "..th..":"..tm, true, aTab3.Tab )
       aTab3.TimeH           = guiCreateEdit ( 0.35, 0.45, 0.055, 0.04, "12", true, aTab3.Tab )
       aTab3.TimeM           = guiCreateEdit ( 0.425, 0.45, 0.055, 0.04, "00", true, aTab3.Tab )
                          guiCreateLabel ( 0.415, 0.45, 0.05, 0.04, ":", true, aTab3.Tab )
                          guiEditSetMaxLength ( aTab3.TimeH, 2 )
                          guiEditSetMaxLength ( aTab3.TimeM, 2 )
       aTab3.TimeSet       = guiCreateButton ( 0.50, 0.45, 0.10, 0.04, "Set", true, aTab3.Tab, "settime" )
                          guiCreateLabel ( 0.63, 0.45, 0.12, 0.04, "( 0-23:0-59 )", true, aTab3.Tab )

       aTab3.GravityCurrent   = guiCreateLabel ( 0.05, 0.50, 0.28, 0.04, "Gravitation: "..string.sub ( getGravity(), 0, 6 ), true, aTab3.Tab )
       aTab3.Gravity       = guiCreateEdit ( 0.35, 0.50, 0.135, 0.04, "0.008", true, aTab3.Tab )
       aTab3.GravitySet       = guiCreateButton ( 0.50, 0.50, 0.10, 0.04, "Set", true, aTab3.Tab, "setgravity" )

       aTab3.SpeedCurrent   = guiCreateLabel ( 0.05, 0.55, 0.30, 0.04, "Game Speed: "..getGameSpeed(), true, aTab3.Tab )
       aTab3.Speed           = guiCreateEdit ( 0.35, 0.55, 0.135, 0.04, "1", true, aTab3.Tab )
       aTab3.SpeedSet       = guiCreateButton ( 0.50, 0.55, 0.10, 0.04, "Set", true, aTab3.Tab, "setgamespeed" )
                          guiCreateLabel ( 0.63, 0.55, 0.09, 0.04, "( 0-10 )", true, aTab3.Tab )

       aTab3.WavesCurrent   = guiCreateLabel ( 0.05, 0.60, 0.25, 0.04, "Wave Height: "..getWaveHeight(), true, aTab3.Tab )
       aTab3.Waves           = guiCreateEdit ( 0.35, 0.60, 0.135, 0.04, "0", true, aTab3.Tab )
       aTab3.WavesSet       = guiCreateButton ( 0.50, 0.60, 0.10, 0.04, "Set", true, aTab3.Tab, "setwaveheight" )
                      guiCreateLabel ( 0.63, 0.60, 0.09, 0.04, "( 0-100 )", true, aTab3.Tab )

       aTab4 = {}
       aTab4.Tab           = guiCreateTab ( "Bans", aTabPanel, "bans" )
       aTab4.BansList       = guiCreateGridList ( 0.03, 0.05, 0.80, 0.87, true, aTab4.Tab )
                          guiGridListAddColumn( aTab4.BansList, "Name", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "IP", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "Serial", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "By", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "Date", 0.17 )
                          guiGridListAddColumn( aTab4.BansList, "Time", 0.13 )
                          guiGridListAddColumn( aTab4.BansList, "Reason", 0.92 )
                          guiGridListSetSortingEnabled( aTab4.BansList, false )
       aTab4.Unban           = guiCreateButton ( 0.85, 0.20, 0.13, 0.04, "Unban", true, aTab4.Tab, "unban" )
       aTab4.UnbanIP       = guiCreateButton ( 0.85, 0.25, 0.13, 0.04, "Unban IP", true, aTab4.Tab, "unbanip" )
       aTab4.UnbanSerial       = guiCreateButton ( 0.85, 0.30, 0.13, 0.04, "Unban Serial", true, aTab4.Tab, "unbanserial" )
       aTab4.BanIP           = guiCreateButton ( 0.85, 0.40, 0.13, 0.04, "Ban IP", true, aTab4.Tab, "banip" )
       aTab4.BanSerial       = guiCreateButton ( 0.85, 0.45, 0.13, 0.04, "Ban Serial", true, aTab4.Tab, "banserial" )
       aTab4.BansRefresh       = guiCreateButton ( 0.85, 0.85, 0.13, 0.04, "Refresh", true, aTab4.Tab, "listbans" )

       aTab4.BansTotal       = guiCreateLabel ( 0.20, 0.94, 0.31, 0.04, "Showing 0 / 0 bans", true, aTab4.Tab )
       aTab4.BansMore       = guiCreateButton ( 0.50, 0.94, 0.13, 0.04, "Get more...", true, aTab4.Tab, "listbans" )

       aTab5 = {}
       aTab5.Tab           = guiCreateTab ( "Admin Chat", aTabPanel, "adminchat" )
       aTab5.AdminChat       = guiCreateMemo ( 0.03, 0.05, 0.75, 0.85, "", true, aTab5.Tab )
                          guiSetProperty ( aTab5.AdminChat, "ReadOnly", "true" )
       aTab5.AdminPlayers   = guiCreateGridList ( 0.79, 0.05, 0.18, 0.80, true, aTab5.Tab )
                          guiGridListAddColumn ( aTab5.AdminPlayers, "Admins", 0.90 )
       aTab5.AdminChatSound   = guiCreateCheckBox ( 0.79, 0.86, 0.18, 0.04, "Play Sound", true, true, aTab5.Tab )
       aTab5.AdminText       = guiCreateEdit ( 0.03, 0.92, 0.80, 0.06, "", true, aTab5.Tab )
       aTab5.AdminSay       = guiCreateButton ( 0.85, 0.92, 0.08, 0.06, "Say", true, aTab5.Tab )
       aTab5.AdminChatHelp   = guiCreateButton ( 0.94, 0.92, 0.03, 0.06, "?", true, aTab5.Tab )

       aTab6 = {}
       aTab6.Tab           = guiCreateTab ( "Options", aTabPanel )
                          guiCreateHeader ( 0.03, 0.05, 0.10, 0.05, "Main:", true, aTab6.Tab )
       aTab6.OutputPlayer   = guiCreateCheckBox ( 0.05, 0.10, 0.47, 0.04, "Output player information to console on select", false, true, aTab6.Tab )
                          guiCreateLabel ( 0.08, 0.15, 0.40, 0.04, "This might be useful to copy player data", true, aTab6.Tab )
       aTab6.AdminChatOutput    = guiCreateCheckBox ( 0.05, 0.20, 0.47, 0.04, "Output admin messages to chat box", false, true, aTab6.Tab )
                          guiCreateHeader ( 0.03, 0.30, 0.47, 0.04, "Appearance:", true, aTab6.Tab )
                          guiCreateHeader ( 0.63, 0.05, 0.10, 0.05, "Account:", true, aTab6.Tab )
       aTab6.AutoLogin       = guiCreateCheckBox ( 0.65, 0.10, 0.47, 0.04, "Auto-login by serial", false, true, aTab6.Tab )
                          guiSetVisible ( aTab6.AutoLogin, false )   -- Not used
                          guiCreateHeader ( 0.63, 0.15, 0.25, 0.05, "Change Password:", true, aTab6.Tab )
                          guiCreateLabel ( 0.65, 0.20, 0.15, 0.05, "Old password:", true, aTab6.Tab )
                          guiCreateLabel ( 0.65, 0.25, 0.15, 0.05, "New password:", true, aTab6.Tab )
                          guiCreateLabel ( 0.65, 0.30, 0.15, 0.05, "Confirm:", true, aTab6.Tab )
       aTab6.PasswordOld       = guiCreateEdit ( 0.80, 0.20, 0.15, 0.045, "", true, aTab6.Tab )
       aTab6.PasswordNew       = guiCreateEdit ( 0.80, 0.25, 0.15, 0.045, "", true, aTab6.Tab )
       aTab6.PasswordConfirm   = guiCreateEdit ( 0.80, 0.30, 0.15, 0.045, "", true, aTab6.Tab )
                          guiEditSetMasked ( aTab6.PasswordOld, true )
                          guiEditSetMasked ( aTab6.PasswordNew, true )
                          guiEditSetMasked ( aTab6.PasswordConfirm, true )
       aTab6.PasswordChange   = guiCreateButton ( 0.85, 0.35, 0.10, 0.04, "Accept", true, aTab6.Tab )
                          guiCreateHeader ( 0.03, 0.65, 0.20, 0.055, "Performance:", true, aTab6.Tab )
                          guiCreateStaticImage ( 0.03, 0.69, 0.94, 0.0025, "client\\images\\dot.png", true, aTab6.Tab )
                          guiCreateLabel ( 0.05, 0.71, 0.20, 0.055, "Performance priority:", true, aTab6.Tab )
                          guiCreateLabel ( 0.11, 0.76, 0.10, 0.05, "Memory", true, aTab6.Tab )
                          guiCreateLabel ( 0.11, 0.81, 0.10, 0.05, "Auto", true, aTab6.Tab )
                          guiCreateLabel ( 0.11, 0.86, 0.10, 0.05, "Speed", true, aTab6.Tab )
       aTab6.PerformanceRAM   = guiCreateRadioButton ( 0.07, 0.75, 0.05, 0.055, "", true, aTab6.Tab )
       aTab6.PerformanceAuto   = guiCreateRadioButton ( 0.07, 0.80, 0.05, 0.055, "", true, aTab6.Tab )
       aTab6.PerformanceCPU   = guiCreateRadioButton ( 0.07, 0.85, 0.05, 0.055, "", true, aTab6.Tab )
                          if ( aGetSetting ( "performance" ) == "RAM" ) then guiRadioButtonSetSelected ( aTab6.PerformanceRAM, true )
                          elseif ( aGetSetting ( "performance" ) == "CPU" ) then guiRadioButtonSetSelected ( aTab6.PerformanceCPU, true )
                          else guiRadioButtonSetSelected ( aTab6.PerformanceAuto, true ) end
       aTab6.PerformanceAdvanced = guiCreateButton ( 0.05, 0.91, 0.11, 0.04, "Advanced", true, aTab6.Tab )
       aPerformance()
                             guiCreateLabel ( 0.70, 0.90, 0.19, 0.055, "Refresh Delay(MS):", true, aTab6.Tab )
       aTab6.RefreshDelay   = guiCreateEdit ( 0.89, 0.90, 0.08, 0.045, "50", true, aTab6.Tab )

       if ( aGetSetting ( "outputPlayer" ) ) then guiCheckBoxSetSelected ( aTab6.OutputPlayer, true ) end
       if ( aGetSetting ( "adminChatOutput" ) ) then guiCheckBoxSetSelected ( aTab6.AdminChatOutput, true ) end
       if ( aGetSetting ( "adminChatSound" ) ) then guiCheckBoxSetSelected ( aTab5.AdminChatSound, true ) end
       --if ( tonumber ( aGetSetting ( "adminChatLines" ) ) ) then guiSetText ( aTab6.AdminChatLines, aGetSetting ( "adminChatLines" ) ) end
       if ( ( tonumber ( aGetSetting ( "refreshDelay" ) ) ) and ( tonumber ( aGetSetting ( "refreshDelay" ) ) >= 50 ) ) then guiSetText ( aTab6.RefreshDelay, aGetSetting ( "refreshDelay" ) ) end

       addEventHandler ( "aClientLog", _root, aClientLog )
       addEventHandler ( "aClientAdminChat", _root, aClientAdminChat )
       addEventHandler ( "aClientSync", _root, aClientSync )
       addEventHandler ( "aMessage", _root, aMessage )
       addEventHandler ( "aClientResourceStart", _root, aClientResourceStart )
       addEventHandler ( "aClientResourceStop", _root, aClientResourceStop )
       addEventHandler ( "aClientPlayerJoin", _root, aClientPlayerJoin )
       addEventHandler ( "onClientPlayerQuit", _root, aClientPlayerQuit )
       addEventHandler ( "onClientMouseEnter", _root, aClientMouseEnter )
       addEventHandler ( "onClientGUIClick", aAdminForm, aClientClick )
       addEventHandler ( "onClientGUIScroll", aAdminForm, aClientScroll )
       addEventHandler ( "onClientGUIDoubleClick", aAdminForm, aClientDoubleClick )
       addEventHandler ( "onClientGUIDoubleClick", aTab1.VehicleOptions, aClientDoubleClick )
       addEventHandler ( "onClientGUIAccepted", aAdminForm, aClientGUIAccepted )
       addEventHandler ( "onClientGUIChanged", aAdminForm, aClientGUIChanged )
       addEventHandler ( "onClientCursorMove", _root, aClientCursorMove )
       addEventHandler ( "onClientRender", _root, aClientRender )
       addEventHandler ( "onClientPlayerChangeNick", _root, aClientPlayerChangeNick )
       addEventHandler ( "onClientResourceStop", _root, aMainSaveSettings )
       addEventHandler ( "onClientGUITabSwitched", aTabPanel, aClientGUITabSwitched )

       bindKey ( "arrow_d", "down", aPlayerListScroll, 1 )
       bindKey ( "arrow_u", "down", aPlayerListScroll, -1 )

       triggerServerEvent ( "aSync", getLocalPlayer(), "players" )
       if ( hasPermissionTo ( "command.listmessages" ) ) then triggerServerEvent ( "aSync", getLocalPlayer(), "messages" ) end
       triggerServerEvent ( "aSync", getLocalPlayer(), "server" )
       triggerEvent ( "onAdminInitialize", resourceRoot )
       showCursor ( true )

       if getVersion().sortable and getVersion().sortable < "1.0.4-9.02436" then
           guiSetText ( aAdminForm, "Warning - Admin Panel not compatible with server version" )
           guiLabelSetHorizontalAlign ( guiCreateLabel ( 0.30, 0.11, 0.4, 0.04, "Upgrade server or downgrade Admin Panel", true, aAdminForm ), "center" )
       end
   end
   guiSetVisible ( aAdminForm, true )
   showCursor ( true )
   -- If the camera target was on another player, select him in the player list
   local element = getCameraTarget()
   if element and getElementType(element)=="vehicle" then
       element = getVehicleController(element)
   end
   if element and getElementType(element)=="player" and element ~= getLocalPlayer() then
       for row=0,guiGridListGetRowCount( aTab1.PlayerList )-1 do
           if ( guiGridListGetItemPlayerName ( aTab1.PlayerList, row, 1 ) == getPlayerName ( element ) ) then
               guiGridListSetSelectedItem ( aTab1.PlayerList, row, 1 )
               break
           end
       end
   end
end

function aAdminMenuClose ( destroy )
   if ( destroy ) then
       aMainSaveSettings ()
       aPlayers = {}
       aWeathers = {}
       aBans = {}
       removeEventHandler ( "aClientLog", _root, aClientLog )
       removeEventHandler ( "aClientAdminChat", _root, aClientAdminChat )
       removeEventHandler ( "aClientSync", _root, aClientSync )
       removeEventHandler ( "aMessage", _root, aMessage )
       removeEventHandler ( "aClientResourceStart", _root, aClientResourceStart )
       removeEventHandler ( "aClientResourceStop", _root, aClientResourceStop )
       removeEventHandler ( "aClientPlayerJoin", _root, aClientPlayerJoin )
       removeEventHandler ( "onClientPlayerQuit", _root, aClientPlayerQuit )
       removeEventHandler ( "onClientMouseEnter", _root, aClientMouseEnter )
       removeEventHandler ( "onClientGUIClick", aAdminForm, aClientClick )
       removeEventHandler ( "onClientGUIScroll", aAdminForm, aClientScroll )
       removeEventHandler ( "onClientGUIDoubleClick", aAdminForm, aClientDoubleClick )
       removeEventHandler ( "onClientGUIDoubleClick", aTab1.VehicleOptions, aClientDoubleClick )
       removeEventHandler ( "onClientGUIAccepted", aAdminForm, aClientGUIAccepted )
       removeEventHandler ( "onClientGUIChanged", aAdminForm, aClientGUIChanged )
       removeEventHandler ( "onClientCursorMove", _root, aClientCursorMove )
       removeEventHandler ( "onClientRender", _root, aClientRender )
       removeEventHandler ( "onClientPlayerChangeNick", _root, aClientPlayerChangeNick )
       removeEventHandler ( "onClientResourceStop", _root, aMainSaveSettings )
       unbindKey ( "arrow_d", "down", aPlayerListScroll )
       unbindKey ( "arrow_u", "down", aPlayerListScroll )
       destroyElement ( aTab1.VehicleOptions )
       destroyElement ( aAdminForm )
       aAdminForm = nil
   else
       guiSetVisible ( aTab1.VehicleOptions, false )
       guiSetVisible ( aAdminForm, false )
   end
   guiSetInputEnabled ( false )
   showCursor ( false )
end

function aMainSaveSettings ()
   aSetSetting ( "outputPlayer", guiCheckBoxGetSelected ( aTab6.OutputPlayer ) )
   aSetSetting ( "adminChatOutput", guiCheckBoxGetSelected ( aTab6.AdminChatOutput ) )
   aSetSetting ( "adminChatSound", guiCheckBoxGetSelected ( aTab5.AdminChatSound ) )
   --aSetSetting ( "adminChatLines", guiGetText ( aTab6.AdminChatLines ) )
   aSetSetting ( "refreshDelay", guiGetText ( aTab6.RefreshDelay ) )
   aSetSetting ( "currentWeapon", aCurrentWeapon )
   aSetSetting ( "currentAmmo", aCurrentAmmo )
   aSetSetting ( "currentVehicle", aCurrentVehicle )
   aSetSetting ( "currentSlap", aCurrentSlap )
   if ( guiRadioButtonGetSelected ( aTab6.PerformanceRAM ) ) then aSetSetting ( "performance", "RAM" )
   elseif ( guiRadioButtonGetSelected ( aTab6.PerformanceCPU ) ) then aSetSetting ( "performance", "CPU" )
   else aSetSetting ( "performance", "Auto" ) end
end

function aAdminRefresh ()
   if ( guiGridListGetSelectedItem ( aTab1.PlayerList ) ~= -1 ) then
       local player = getPlayerFromNick ( guiGridListGetItemPlayerName ( aTab1.PlayerList, guiGridListGetSelectedItem( aTab1.PlayerList ), 1 ) )
       if ( player and aPlayers[player] ) then
           guiSetText ( aTab1.Name, "Name: "..aPlayers[player]["name"] )
           guiSetText ( aTab1.Mute, iif ( aPlayers[player]["mute"], "Unmute", "Mute" ) )
           guiSetText ( aTab1.Freeze, iif ( aPlayers[player]["freeze"], "Unfreeze", "Freeze" ) )
           --guiSetText ( aTab1.Username, "Community Username: "..( aPlayers[player]["username"] or "" ) )
           guiSetText ( aTab1.Version, "Version: "..( aPlayers[player]["version"] or "" ) )
           guiSetText ( aTab1.Accountname, "Account Name: "..( aPlayers[player]["accountname"] or "" ) )
           guiSetText ( aTab1.Groups, "Groups: "..( aPlayers[player]["groups"] or "None" ) )
           if ( isPlayerDead ( player ) ) then guiSetText ( aTab1.Health, "Health: Dead" )
           else guiSetText ( aTab1.Health, "Health: "..math.ceil ( getElementHealth ( player ) ).."%" ) end
           guiSetText ( aTab1.Armour, "Armour: "..math.ceil ( getPedArmor ( player ) ).."%" )
           guiSetText ( aTab1.Skin, "Skin: "..iif ( getElementModel ( player ), getElementModel ( player ), "N/A" ) )
           if ( getPlayerTeam ( player ) ) then guiSetText ( aTab1.Team, "Team: "..getTeamName ( getPlayerTeam ( player ) ) )
           else guiSetText ( aTab1.Team, "Team: None" ) end
           guiSetText ( aTab1.Ping, "Ping: "..getPlayerPing ( player ) )
           guiSetText ( aTab1.Money, "Money: "..( aPlayers[player]["money"] or 0 ) )
           if ( getElementDimension ( player ) ) then guiSetText ( aTab1.Dimension, "Dimension: "..getElementDimension ( player ) ) end
           if ( getElementInterior ( player ) ) then guiSetText ( aTab1.Interior, "Interior: "..getElementInterior ( player ) ) end
           guiSetText ( aTab1.JetPack, iif ( doesPedHaveJetPack ( player ), "Remove JetPack", "Give JetPack" ) )
           if ( getPedWeapon ( player ) ) then guiSetText ( aTab1.Weapon, "Weapon: "..getWeaponNameFromID ( getPedWeapon ( player ) ).." (ID: "..getPedWeapon ( player )..")" ) end
           local x, y, z = getElementPosition ( player )
           guiSetText ( aTab1.Area, "Area: "..iif ( getZoneName ( x, y, z, false ) == getZoneName ( x, y, z, true ), getZoneName ( x, y, z, false ), getZoneName ( x, y, z, false ).." ("..getZoneName ( x, y, z, true )..")" ) )
           guiSetText ( aTab1.PositionX, "X: "..x )
           guiSetText ( aTab1.PositionY, "Y: "..y )
           guiSetText ( aTab1.PositionZ, "Z: "..z )
           local vehicle = getPedOccupiedVehicle ( player )
           if ( vehicle ) then
               guiSetText ( aTab1.Vehicle, "Vehicle: "..getVehicleName ( vehicle ).." (ID: "..getElementModel ( vehicle )..")" )
               guiSetText ( aTab1.VehicleHealth, "Vehicle Health: "..math.ceil ( getElementHealth ( vehicle ) ).."%" )
           else
               guiSetText ( aTab1.Vehicle, "Vehicle: Foot" )
               guiSetText ( aTab1.VehicleHealth, "Vehicle Health: 0%" )
           end
           if ( aPlayers[player]["admin"] ) then
               guiSetText(aTab1.Admin, "Revoke admin rights")
           else
               guiSetText(aTab1.Admin, "Give admin rights")
           end
           return player
       end
   end
end

function aClientSync ( type, table )
   if ( type == "player" and aPlayers[source] ) then
       for type, data in pairs ( table ) do
           aPlayers[source][type] = data
       end
   elseif ( type == "players" ) then
       aPlayers = table
   elseif ( type == "resources" ) then
       local bInclMaps = guiCheckBoxGetSelected ( aTab2.ResourceInclMaps )
       aResources = table
       for id, resource in ipairs(table) do
           if bInclMaps or resource["type"] ~= "map" then
               local row = guiGridListAddRow ( aTab2.ResourceList )
               guiGridListSetItemText ( aTab2.ResourceList, row, 1, resource["name"], false, false )
               guiGridListSetItemText ( aTab2.ResourceList, row, 2, resource["numsettings"] > 0 and tostring(resource["numsettings"]) or "", false, false )
               guiGridListSetItemText ( aTab2.ResourceList, row, 3, resource["state"], false, false )
           end
       end
   elseif ( type == "loggedout" ) then
       aAdminDestroy()
   elseif ( type == "admins" ) then
       --if ( guiGridListGetRowCount ( aTab5.AdminPlayers ) > 0 ) then guiGridListClear ( aTab5.AdminPlayers ) end
       for id, player in ipairs(getElementsByType("player")) do
           if ( table[player]["admin"] == false ) and ( player == getLocalPlayer() ) then
               aAdminDestroy()
               break
           elseif aPlayers[player] then
               aPlayers[player]["groups"] = table[player]["groups"]
               if ( table[player]["chat"] ) then
                   local id = 0
                   local exists = false
                   while ( id <= guiGridListGetRowCount( aTab5.AdminPlayers ) ) do
                       if ( guiGridListGetItemPlayerName ( aTab5.AdminPlayers, id, 1 ) == getPlayerName ( player ) ) then
                           exists = true
                       end
                       id = id + 1
                   end
                   if ( exists == false ) then guiGridListSetItemPlayerName ( aTab5.AdminPlayers, guiGridListAddRow ( aTab5.AdminPlayers ), 1, getPlayerName ( player ), false, false ) end
               end
           end
       end
   elseif ( type == "server" ) then
       guiSetText ( aTab3.Server, "Server: "..table["name"] )
       guiSetText ( aTab3.Players, "Players: "..#getElementsByType ( "player" ).."/"..table["players"] )
       guiSetText ( aTab3.Password, "Password: "..( table["password"] or "None" ) )
       guiSetText ( aTab3.GameType, "Game Type: "..( table["game"] or "None" ) )
       guiSetText ( aTab3.MapName, "Map Name: "..( table["map"] or "None" ) )
   elseif ( type == "bansdirty" ) then
       g_GotLatestBansList = false
       if aAdminForm and guiGetVisible ( aAdminForm ) and guiGetSelectedTab( aTabPanel ) == aTab4.Tab then
           -- Request full bans list if bans tab is displayed when 'bansdirty' is received
           triggerServerEvent ( "aSync", getLocalPlayer(), "bans" )
       end
   elseif ( type == "bans" or type == "bansmore" ) then
       if type == "bans" then
           g_GotLatestBansList = true
           guiGridListClear ( aTab4.BansList )
           aBans = {}
           aBans["Serial"] = {}
           aBans["IP"] = {}
       end
       local total = tonumber(table.total) or 0
       local amount = guiGridListGetRowCount( aTab4.BansList ) + #table
       guiSetText( aTab4.BansTotal, "Showing " .. amount .. " / " .. total .. " bans" )
       if g_GotLatestBansList then
           for i=1,#table do
               local ban = table
               if ban.serial then
                   aBans["Serial"][ban.serial] = ban
               end
               if ban.ip then
                   aBans["IP"][ban.ip] = ban
               end
               local time, date = "-", "-"
               if ban.seconds then
                   local realTime = getRealTime( ban.seconds )
                   time = string.format("%02d:%02d", realTime.hour, realTime.minute )
                   date = string.format("%04d-%02d-%02d", realTime.year + 1900, realTime.month + 1, realTime.monthday )
               end
               local reason = ban["reason"] and ban["reason"]~="nil" and ban["reason"] or ""
               local row = guiGridListAddRow ( aTab4.BansList )
               guiGridListSetItemText ( aTab4.BansList, row, 1, ban["nick"]   or "n/a", false, false )
               guiGridListSetItemText ( aTab4.BansList, row, 2, ban.ip           or "n/a", false, false )
               guiGridListSetItemText ( aTab4.BansList, row, 3, ban.serial       or "n/a", false, false )
               guiGridListSetItemText ( aTab4.BansList, row, 4, ban["banner"]   or "n/a", false, false )
               guiGridListSetItemText ( aTab4.BansList, row, 5, date,                   false, false )
               guiGridListSetItemText ( aTab4.BansList, row, 6, time,                   false, false )
               guiGridListSetItemText ( aTab4.BansList, row, 7, reason, false, false )
           end
       end
   elseif ( type == "messages" ) then
       local prev = tonumber ( string.sub ( guiGetText ( aTab1.Messages ), 1, 1 ) )
       if ( prev < table["unread"] ) then
           playSoundFrontEnd ( 18 )
       end
       guiSetText ( aTab1.Messages, table["unread"].."/"..table["total"].." unread messages" )
   end
end

function aClientGUITabSwitched( selectedTab )
   if getElementParent( selectedTab ) == aTabPanel then
       if selectedTab == aTab2.Tab then
           -- Handle initial update of resources list
           if guiGridListGetRowCount( aTab2.ResourceList ) == 0 then
               if ( hasPermissionTo ( "command.listresources" ) ) then
                   triggerServerEvent ( "aSync", getLocalPlayer(), "resources" )
               end
           end
       elseif selectedTab == aTabMap.Tab then
           -- Handle initial update of map list
           if guiGridListGetRowCount( aTabMap.MapList ) == 0 then
               if ( hasPermissionTo ( "command.listresources" ) ) then
                   triggerServerEvent ( "getMaps_s", getLocalPlayer(), getLocalPlayer(), true )
               end
           end
       elseif selectedTab == aTab4.Tab then
           if not g_GotLatestBansList then
               -- Request full bans list if bans tab is selected and current list is out of date
               triggerServerEvent ( "aSync", getLocalPlayer(), "bans" )
           end
       end
   end
end

function aMessage ( )

end

function aClientResourceStart ( resource )
   local id = 0
   while ( id <= guiGridListGetRowCount( aTab2.ResourceList ) ) do
       if ( guiGridListGetItemText ( aTab2.ResourceList, id, 1 ) == resource ) then
           guiGridListSetItemText ( aTab2.ResourceList, id, 3, "running", false, false )
       end
       id = id + 1
   end
end

function aClientResourceStop ( resource )
   local id = 0
   while ( id <= guiGridListGetRowCount( aTab2.ResourceList ) ) do
       if ( guiGridListGetItemText ( aTab2.ResourceList, id, 1 ) == resource ) then
           guiGridListSetItemText ( aTab2.ResourceList, id, 3, "loaded", false, false )
       end
       id = id + 1
   end
end

function aClientPlayerJoin ( ip, username, accountname, serial, admin, country )
   if ip == false and serial == false then
       -- Update country only
       if aPlayers[source] then
           aPlayers[source]["country"] = country
       end
       return
   end
   aPlayers[source] = {}
   aPlayers[source]["name"] = getPlayerName ( source )
   aPlayers[source]["IP"] = ip
   aPlayers[source]["username"] = username or "N/A"
   aPlayers[source]["accountname"] = accountname or "N/A"
   aPlayers[source]["serial"] = serial
   aPlayers[source]["admin"] = admin
   aPlayers[source]["country"] = country
   local row = guiGridListAddRow ( aTab1.PlayerList )
   guiGridListSetItemPlayerName ( aTab1.PlayerList, row, 1, getPlayerName ( source ), false, false )
   if ( admin ) then
       local row = guiGridListAddRow ( aTab5.AdminPlayers )
       guiGridListSetItemPlayerName ( aTab5.AdminPlayers, row, 1, getPlayerName ( source ), false, false )
   end
   if ( aSpectator.PlayerList ) then
       local row = guiGridListAddRow ( aSpectator.PlayerList )
       guiGridListSetItemPlayerName ( aSpectator.PlayerList, row, 1, getPlayerName ( source ), false, false )
   end
end

function aClientPlayerQuit ()
   local id = 0
   while ( id <= guiGridListGetRowCount( aTab1.PlayerList ) ) do
       if ( guiGridListGetItemPlayerName ( aTab1.PlayerList, id, 1 ) == getPlayerName ( source ) ) then
           guiGridListRemoveRow ( aTab1.PlayerList, id )
       end
       id = id + 1
   end
   if ( aPlayers[source] and aPlayers[source]["admin"] ) then
       local id = 0
       while ( id <= guiGridListGetRowCount( aTab5.AdminPlayers ) ) do
           if ( guiGridListGetItemPlayerName ( aTab5.AdminPlayers, id, 1 ) == getPlayerName ( source ) ) then
               guiGridListRemoveRow ( aTab5.AdminPlayers, id )
           end
           id = id + 1
       end
   end
   if ( aSpectator.PlayerList ) then
       local id = 0
       while ( id <= guiGridListGetRowCount( aSpectator.PlayerList ) ) do
           if ( guiGridListGetItemPlayerName ( aSpectator.PlayerList, id, 1 ) == getPlayerName ( source ) ) then
               guiGridListRemoveRow ( aSpectator.PlayerList, id )
           end
           id = id + 1
       end
   end
   aPlayers[source] = nil
end

function aPlayerListScroll ( key, state, inc )
   if ( not guiGetVisible ( aAdminForm ) ) then return end
   local max = guiGridListGetRowCount ( aTab1.PlayerList )
   if ( max <= 0 ) then return end
   local current = guiGridListGetSelectedItem ( aTab1.PlayerList )
   local next = current + inc
   max = max - 1
   if ( current == -1 ) then
       guiGridListSetSelectedItem ( aTab1.PlayerList, 0, 1 )
   elseif ( next > max ) then return
   elseif ( next < 0 ) then return
   else
       guiGridListSetSelectedItem ( aTab1.PlayerList, next, 1 )
   end
   local oldsource = source
   source = aTab1.PlayerList;
   aClientClick ( "left" )
   source = oldsource
end

function aClientPlayerChangeNick ( oldNick, newNick )
   local lists = { aTab1.PlayerList, aTab5.AdminPlayers, aSpectator.PlayerList }
   for _,gridlist in ipairs(lists) do
       for row=0,guiGridListGetRowCount(gridlist)-1 do
           if ( guiGridListGetItemPlayerName ( gridlist, row, 1 ) == oldNick ) then
               guiGridListSetItemPlayerName ( gridlist, row, 1, newNick, false, false )
           end
       end
   end
end

function aClientLog ( text )
   text = "#"..aLogLines..": "..text
   if ( guiGetText ( aTab2.LogLine1 ) == "" ) then guiSetText ( aTab2.LogLine1, text )
   elseif ( guiGetText ( aTab2.LogLine2 ) == "" ) then guiSetText ( aTab2.LogLine2, text )
   elseif ( guiGetText ( aTab2.LogLine3 ) == "" ) then guiSetText ( aTab2.LogLine3, text )
   elseif ( guiGetText ( aTab2.LogLine4 ) == "" ) then guiSetText ( aTab2.LogLine4, text )
   elseif ( guiGetText ( aTab2.LogLine5 ) == "" ) then guiSetText ( aTab2.LogLine5, text )
   else
       guiSetText ( aTab2.LogLine1, guiGetText ( aTab2.LogLine2 ) )
       guiSetText ( aTab2.LogLine2, guiGetText ( aTab2.LogLine3 ) )
       guiSetText ( aTab2.LogLine3, guiGetText ( aTab2.LogLine4 ) )
       guiSetText ( aTab2.LogLine4, guiGetText ( aTab2.LogLine5 ) )
       guiSetText ( aTab2.LogLine5, text )
   end
   aLogLines = aLogLines + 1
end

function aClientAdminChat ( message )
   guiSetText ( aTab5.AdminChat, guiGetText ( aTab5.AdminChat )..""..getPlayerName ( source )..": "..message )
   guiSetProperty ( aTab5.AdminChat, "CaratIndex", tostring ( string.len ( guiGetText ( aTab5.AdminChat ) ) ) )
   if ( guiCheckBoxGetSelected ( aTab6.AdminChatOutput ) ) then outputChatBox ( "ADMIN> "..getPlayerName ( source )..": "..message, 255, 0, 0 ) end
   if ( ( guiCheckBoxGetSelected ( aTab5.AdminChatSound ) ) and ( source ~= getLocalPlayer() ) ) then playSoundFrontEnd ( 13 ) end
end

function aSetCurrentAmmo ( ammo )
   ammo = tonumber ( ammo )
   if ( ( ammo ) and ( ammo > 0 ) and ( ammo < 10000 ) ) then
       aCurrentAmmo = ammo
       return
   end
   outputChatBox ( "Invalid ammo value", 255, 0, 0 )
end

function aClientGUIAccepted ( element )
   if ( element == aTab5.AdminText ) then
       local message = guiGetText ( aTab5.AdminText )
       if ( ( message ) and ( message ~= "" ) ) then
           if ( gettok ( message, 1, 32 ) == "/clear" ) then guiSetText ( aTab5.AdminChat, "" )
           else triggerServerEvent ( "aAdminChat", getLocalPlayer(), message ) end
           guiSetText ( aTab5.AdminText, "" )
       end
   end
end

function aClientGUIChanged ()
   if ( source == aTab1.PlayerListSearch ) then
       guiGridListClear ( aTab1.PlayerList )
       local text = guiGetText ( source )
       if ( text == "" ) then
           for id, player in ipairs ( getElementsByType ( "player" ) ) do
               guiGridListSetItemPlayerName ( aTab1.PlayerList, guiGridListAddRow ( aTab1.PlayerList ), 1, getPlayerName ( player ), false, false )
           end
       else
           for id, player in ipairs ( getElementsByType ( "player" ) ) do
               if ( string.find ( string.upper ( getPlayerName ( player ) ), string.upper ( text ), 1, true ) ) then
                   guiGridListSetItemPlayerName ( aTab1.PlayerList, guiGridListAddRow ( aTab1.PlayerList ), 1, getPlayerName ( player ), false, false )
               end
           end
       end
   elseif ( source == aTab2.ResourceListSearch ) then
       local bInclMaps = guiCheckBoxGetSelected ( aTab2.ResourceInclMaps )
       guiGridListClear ( aTab2.ResourceList )
       local text = string.lower(guiGetText(source))
       if ( text == "" ) then
           for id, resource in ipairs(aResources) do
               if bInclMaps or resource["type"] ~= "map" then
                   local row = guiGridListAddRow ( aTab2.ResourceList )
                   guiGridListSetItemText ( aTab2.ResourceList, row, 1, resource["name"], false, false )
                   guiGridListSetItemText ( aTab2.ResourceList, row, 2, resource["numsettings"] > 0 and tostring(resource["numsettings"]) or "", false, false )
                   guiGridListSetItemText ( aTab2.ResourceList, row, 3, resource["state"], false, false )
               end
           end
       else
           for id, resource in ipairs(aResources) do
               if bInclMaps or resource["type"] ~= "map" then
                   if string.find(string.lower(resource.name), text, 1, true) then
                       local row = guiGridListAddRow ( aTab2.ResourceList )
                       guiGridListSetItemText ( aTab2.ResourceList, row, 1, resource["name"], false, false )
                       guiGridListSetItemText ( aTab2.ResourceList, row, 2, resource["numsettings"] > 0 and tostring(resource["numsettings"]) or "", false, false )
                       guiGridListSetItemText ( aTab2.ResourceList, row, 3, resource["state"], false, false )
                   end
               end
           end
       end
   end
end

function aClientScroll ( element )
   if ( source == aTab6.MouseSense ) then
       guiSetText ( aTab6.MouseSenseCur, "Cursor sensivity: ("..string.sub ( guiScrollBarGetScrollPosition ( source ) / 50, 0, 4 )..")" )
   end
end

function aClientCursorMove ( rx, ry, x, y )

end

function aClientMouseEnter ( element )
   if ( getElementType ( source ) == "gui-button" ) then

   end
end

function aClientDoubleClick ( button )
   if ( source == aTab1.WeaponOptions ) then
       if ( guiGridListGetSelectedItem ( aTab1.WeaponOptions ) ~= -1 ) then
           aCurrentWeapon = getWeaponIDFromName ( guiGridListGetItemText ( aTab1.WeaponOptions, guiGridListGetSelectedItem ( aTab1.WeaponOptions ), 1 ) )
           local wep = guiGridListGetItemText ( aTab1.WeaponOptions, guiGridListGetSelectedItem ( aTab1.WeaponOptions ), 1 )
           wep = string.gsub ( wep, "Combat Shotgun", "Combat SG" )
           guiSetText ( aTab1.GiveWeapon, "Give: "..wep.." " )
       end
       guiSetVisible ( aTab1.WeaponOptions, false )
   elseif ( source == aTab1.VehicleOptions ) then
       local item = guiGridListGetSelectedItem ( aTab1.VehicleOptions )
       if ( item ~= -1 ) then
           if ( guiGridListGetItemText ( aTab1.VehicleOptions, item, 1 ) ~= "" ) then
               aCurrentVehicle = tonumber ( guiGridListGetItemData ( aTab1.VehicleOptions, item, 1 ) )
               guiSetText ( aTab1.GiveVehicle, "Give: "..guiGridListGetItemText ( aTab1.VehicleOptions, item, 1 ).." " )
           end
       end
       guiSetVisible ( aTab1.VehicleOptions, false )
   elseif ( source == aTab1.SlapOptions ) then
       if ( guiGridListGetSelectedItem ( aTab1.SlapOptions ) ~= -1 ) then
           aCurrentSlap = guiGridListGetItemText ( aTab1.SlapOptions, guiGridListGetSelectedItem ( aTab1.SlapOptions ), 1 )
           guiSetText ( aTab1.Slap, "Slap! "..aCurrentSlap.." _" )
           if ( aSpecSlap ) then guiSetText ( aSpecSlap, "Slap! "..aCurrentSlap.."hp" ) end
       end
       guiSetVisible ( aTab1.SlapOptions, false )
   elseif ( source == aTab2.ResourceList ) then
       if ( guiGridListGetSelectedItem ( aTab2.ResourceList ) ~= -1 ) then
           aManageSettings ( guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ) )
       end
   end
   if ( guiGetVisible ( aTab1.WeaponOptions ) ) then guiSetVisible ( aTab1.WeaponOptions, false ) end
   if ( guiGetVisible ( aTab1.VehicleOptions ) ) then guiSetVisible ( aTab1.VehicleOptions, false ) end
   if ( guiGetVisible ( aTab1.SlapOptions ) ) then guiSetVisible ( aTab1.SlapOptions, false ) end
end

function aClientClick ( button )
   guiSetInputEnabled ( false )
   if ( ( source == aTab1.WeaponOptions ) or ( source == aTab1.VehicleOptions ) or ( source == aTab1.SlapOptions ) ) then return
   else
       if ( guiGetVisible ( aTab1.WeaponOptions ) ) then guiSetVisible ( aTab1.WeaponOptions, false ) end
       if ( guiGetVisible ( aTab1.VehicleOptions ) ) then guiSetVisible ( aTab1.VehicleOptions, false ) end
       if ( guiGetVisible ( aTab1.SlapOptions ) ) then guiSetVisible ( aTab1.SlapOptions, false ) end
   end
   if ( button == "left" ) then
       -- TAB 1, PLAYERS
       if ( getElementParent ( source ) == aTab1.Tab ) then
           if ( source == aTab1.Messages ) then
               aViewMessages()
           elseif ( source == aTab1.PlayerListSearch ) then
               guiSetInputEnabled ( true )
           elseif ( source == aTab1.HideColorCodes ) then
               updateColorCodes()
           elseif ( source == aTab1.AnonAdmin ) then
               setAnonAdmin( guiCheckBoxGetSelected ( aTab1.AnonAdmin ) )
           elseif ( getElementType ( source ) == "gui-button" ) then
               if ( source == aTab1.GiveVehicle ) then guiBringToFront ( aTab1.VehicleDropDown )
               elseif ( source == aTab1.GiveWeapon ) then guiBringToFront ( aTab1.WeaponDropDown )
               elseif ( source == aTab1.Slap ) then guiBringToFront ( aTab1.SlapDropDown ) end
               if ( guiGridListGetSelectedItem ( aTab1.PlayerList ) == -1 ) then
                   aMessageBox ( "error", "No player selected!" )
               else
                   local name = guiGridListGetItemPlayerName ( aTab1.PlayerList, guiGridListGetSelectedItem( aTab1.PlayerList ), 1 )
                   local escname = string.gsub( name,"([\"])", "\\\"" )
                   local player = getPlayerFromNick ( name )
                   if ( source == aTab1.Kick ) then aInputBox ( "Kick player "..name, "Enter the kick reason", "", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"kick\", $value )" )
                   elseif ( source == aTab1.Ban ) then aBanInputBox ( player )
                   elseif ( source == aTab1.Slap ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "slap", aCurrentSlap )
                   elseif ( source == aTab1.Mute ) then if not aPlayers[player]["mute"] then aMuteInputBox ( player ) else aMessageBox ( "question", "Are you sure to unmute "..name.."?", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"mute\" )" ) end
                   elseif ( source == aTab1.Freeze ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "freeze" )
                   elseif ( source == aTab1.Spectate ) then aSpectate ( player )
                   elseif ( source == aTab1.Nick ) then aInputBox ( "Set Nick", "Enter the new nick of the player", name, "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setnick\", $value )" )
                   elseif ( source == aTab1.Shout ) then aInputBox ( "Shout", "Enter text to be shown on player's screen", "", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"shout\", $value )" )
                   elseif ( source == aTab1.SetHealth ) then aInputBox ( "Set Health", "Enter the health value", "100", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"sethealth\", $value )" )
                   elseif ( source == aTab1.SetArmour ) then aInputBox ( "Set Armour", "Enter the armour value", "100", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setarmour\", $value )" )
                   elseif ( source == aTab1.SetTeam ) then aPlayerTeam ( player )
                   elseif ( source == aTab1.SetSkin ) then aPlayerSkin ( player )
                   elseif ( source == aTab1.SetInterior ) then aPlayerInterior ( player )
                   elseif ( source == aTab1.JetPack ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "jetpack" )
                   elseif ( source == aTab1.SetMoney ) then aInputBox ( "Set Money", "Enter the money value", "0", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setmoney\", $value )" )
                   elseif ( source == aTab1.SetStats ) then aPlayerStats ( player )
                   elseif ( source == aTab1.SetDimension ) then aInputBox ( "Dimension ID Required", "Enter Dimension ID between 0 and 65535", "0", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setdimension\", $value )" )
                   elseif ( source == aTab1.GiveVehicle ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "givevehicle", aCurrentVehicle )
                   elseif ( source == aTab1.GiveWeapon ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "giveweapon", aCurrentWeapon, aCurrentAmmo )
                   elseif ( source == aTab1.Warp ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "warp" )
                   elseif ( source == aTab1.WarpTo ) then aPlayerWarp ( player )
                   elseif ( source == aTab1.VehicleFix ) then triggerServerEvent ( "aVehicle", getLocalPlayer(), player, "repair" )
                   elseif ( source == aTab1.VehicleBlow ) then triggerServerEvent ( "aVehicle", getLocalPlayer(), player, "blowvehicle" )
                   elseif ( source == aTab1.VehicleDestroy ) then triggerServerEvent ( "aVehicle", getLocalPlayer(), player, "destroyvehicle" )
                   elseif ( source == aTab1.VehicleCustomize ) then aVehicleCustomize ( player )
                   elseif ( source == aTab1.Admin ) then
                       if ( aPlayers[player]["admin"] ) then aMessageBox ( "warning", "Revoke admin rights from "..name.."?", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setgroup\", false )" )
                       else aMessageBox ( "warning", "Give admin rights to "..name.."?", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setgroup\", true )" ) end
                   end
               end
           elseif ( source == aTab1.VehicleDropDown ) then
               local x1, y1 = guiGetPosition ( aAdminForm, false )
               local x2, y2 = guiGetPosition ( aTabPanel, false )
               local x3, y3 = guiGetPosition ( aTab1.Tab, false )
               local x4, y4 = guiGetPosition ( aTab1.GiveVehicle, false )
               guiSetPosition ( aTab1.VehicleOptions, x1 + x2 + x3 + x4, y1 + y2 + y3 + y4 + 20, false )
               guiSetVisible ( aTab1.VehicleOptions, true )
               guiBringToFront ( aTab1.VehicleOptions )
           elseif ( source == aTab1.WeaponDropDown ) then
               guiSetVisible ( aTab1.WeaponOptions, true )
               guiBringToFront ( aTab1.WeaponOptions )
           elseif ( source == aTab1.SlapDropDown ) then
               guiSetVisible ( aTab1.SlapOptions, true )
               guiBringToFront ( aTab1.SlapOptions )
           elseif ( source == aTab1.PlayerList ) then
               if ( guiGridListGetSelectedItem( aTab1.PlayerList ) ~= -1 ) then
                   local player = aAdminRefresh ()
                   if ( player ) then
                       triggerServerEvent ( "aSync", getLocalPlayer(), "player", player )
                       if ( ( guiCheckBoxGetSelected ( aTab6.OutputPlayer ) ) and ( player ) ) then outputConsole ( "Name: "..aPlayers[player]["name"]..", IP: "..aPlayers[player]["IP"]..", Serial: "..aPlayers[player]["serial"]..", Community Username: "..aPlayers[player]["username"]..", Account Name: "..aPlayers[player]["accountname"] ) end
                       guiSetText ( aTab1.IP, "IP: "..aPlayers[player]["IP"] )
                       guiSetText ( aTab1.Serial, "Serial: "..aPlayers[player]["serial"] )
                       --guiSetText ( aTab1.Username, "Community Username: "..aPlayers[player]["username"] )
                       guiSetText ( aTab1.Accountname, "Account Name: "..aPlayers[player]["accountname"] )
                       local countryCode = aPlayers[player]["country"]
                       loadFlagImage ( aTab1.Flag, countryCode )
                       if not countryCode then
                           guiSetText ( aTab1.CountryCode, "" )
                       else
                           local x, y = guiGetPosition ( aTab1.IP, false )
                           local width = guiLabelGetTextExtent ( aTab1.IP )
                           guiSetPosition ( aTab1.Flag, x + width + 7, y + 4, false )
                           guiSetPosition ( aTab1.CountryCode, x + width + 30, y, false )
                           guiSetText ( aTab1.CountryCode, tostring( countryCode ) )
                       end
                       guiSetText ( aTab1.Version, "Version: " .. ( aPlayers[player]["version"] or "" ) )
                   end
               else
                   guiSetText ( aTab1.Name, "Name: N/A" )
                   guiSetText ( aTab1.IP, "IP: N/A" )
                   guiSetText ( aTab1.Serial, "Serial: N/A" )
                   --guiSetText ( aTab1.Username, "Community Username: N/A" )
                   guiSetText ( aTab1.Version, "Version: N/A" )
                   guiSetText ( aTab1.Accountname, "Account Name: N/A" )
                   guiSetText ( aTab1.Groups, "Groups: N/A" )
                   guiSetText ( aTab1.Mute, "Mute" )
                   guiSetText ( aTab1.Freeze, "Freeze" )
                   guiSetText ( aTab1.Admin, "Give admin rights" )
                   guiSetText ( aTab1.Health, "Health: 0%" )
                   guiSetText ( aTab1.Armour, "Armour: 0%" )
                   guiSetText ( aTab1.Skin, "Skin: N/A" )
                   guiSetText ( aTab1.Team, "Team: None" )
                   guiSetText ( aTab1.Ping, "Ping: 0" )
                   guiSetText ( aTab1.Money, "Money: 0" )
                   guiSetText ( aTab1.Dimension, "Dimension: 0" )
                   guiSetText ( aTab1.Interior, "Interior: 0" )
                   guiSetText ( aTab1.JetPack, "Give JetPack" )
                   guiSetText ( aTab1.Weapon, "Weapon: N/A" )
                   guiSetText ( aTab1.Area, "Area: Unknown" )
                   guiSetText ( aTab1.PositionX, "X: 0" )
                   guiSetText ( aTab1.PositionY, "Y: 0" )
                   guiSetText ( aTab1.PositionZ, "Z: 0" )
                   guiSetText ( aTab1.Vehicle, "Vehicle: N/A" )
                   guiSetText ( aTab1.VehicleHealth, "Vehicle Health: 0%" )
                   guiStaticImageLoadImage ( aTab1.Flag, "client\\images\\empty.png" )
                   guiSetText ( aTab1.CountryCode, "" )
               end
           end
       -- TAB 2, RESOURCES
       elseif ( getElementParent ( source ) == aTab2.Tab ) then
           if ( source == aTab2.ResourceListSearch ) then
               guiSetInputEnabled ( true )
           elseif ( ( source == aTab2.ResourceStart ) or ( source == aTab2.ResourceRestart ) or ( source == aTab2.ResourceStop ) or ( source == aTab2.ResourceSettings ) ) then
               if ( guiGridListGetSelectedItem ( aTab2.ResourceList ) == -1 ) then
                   aMessageBox ( "error", "No resource selected!" )
               else
                   if ( source == aTab2.ResourceStart ) then triggerServerEvent ( "aResource", getLocalPlayer(), guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ), "start" )
                   elseif ( source == aTab2.ResourceRestart ) then triggerServerEvent ( "aResource", getLocalPlayer(), guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ), "restart" )
                   elseif ( source == aTab2.ResourceStop ) then triggerServerEvent ( "aResource", getLocalPlayer(), guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ), "stop" )
                   elseif ( source == aTab2.ResourceSettings ) then aManageSettings ( guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ) ) )
                   end
               end
           elseif ( source == aTab2.ResourceList ) then
               guiSetVisible ( aTab2.ResourceFailture, false )
               if ( guiGridListGetSelectedItem ( aTab2.ResourceList ) ~= -1 ) then
                   if ( guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 3 ) == "Failed to load" ) then
                       guiSetVisible ( aTab2.ResourceFailture, true )
                   end
               end
           elseif ( source == aTab2.ManageACL ) then
               aManageACL()
           elseif ( source == aTab2.ResourceRefresh or source == aTab2.ResourceInclMaps ) then
               guiGridListClear ( aTab2.ResourceList )
               triggerServerEvent ( "aSync", getLocalPlayer(), "resources" )
           elseif ( source == aTab2.ExecuteClient ) then
               if ( ( guiGetText ( aTab2.Command ) ) and ( guiGetText ( aTab2.Command ) ~= "" ) ) then aExecute ( guiGetText ( aTab2.Command ), true ) end
           elseif ( source == aTab2.ExecuteServer ) then
               if ( ( guiGetText ( aTab2.Command ) ) and ( guiGetText ( aTab2.Command ) ~= "" ) ) then triggerServerEvent ( "aExecute", getLocalPlayer(), guiGetText ( aTab2.Command ), true ) end
           elseif ( source == aTab2.Command ) then
               guiSetInputEnabled ( true )
               guiSetVisible ( aTab2.ExecuteAdvanced, false )
           elseif ( source == aTab2.ExecuteAdvanced ) then
               guiSetVisible ( aTab2.ExecuteAdvanced, false )
           end
       -- TAB 3, WORLD
       elseif ( getElementParent ( source ) == aTab3.Tab ) then
           if ( source == aTab3.SetGameType ) then aInputBox ( "Game Type", "Enter game type:", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setgame\", $value )" )
           elseif ( source == aTab3.SetMapName ) then aInputBox ( "Map Name", "Enter map name:", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setmap\", $value )" )
           elseif ( source == aTab3.SetWelcome ) then aInputBox ( "Welcome Message", "Enter the server welcome message:", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setwelcome\", $value )" )
           elseif ( source == aTab3.SetPassword ) then aInputBox ( "Server password", "Enter server password: (32 characters max)", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setpassword\", $value )" )
           elseif ( source == aTab3.ResetPassword ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setpassword", "" )
           elseif ( ( source == aTab3.WeatherInc ) or ( source == aTab3.WeatherDec ) ) then
               local id = tonumber ( gettok ( guiGetText ( aTab3.Weather ), 1, 32 ) )
               if ( id ) then
                   if ( ( source == aTab3.WeatherInc ) and ( id < _weathers_max ) ) then guiSetText ( aTab3.Weather, ( id + 1 ).." ("..getWeatherNameFromID ( id + 1 )..")" )
                   elseif ( ( source == aTab3.WeatherDec ) and ( id > 0 ) ) then guiSetText ( aTab3.Weather, ( id - 1 ).." ("..getWeatherNameFromID ( id - 1 )..")" ) end
               else
                   guiSetText ( aTab3.Weather, ( 14 ).." ("..getWeatherNameFromID ( 14 )..")" )
               end
           elseif ( source == aTab3.WeatherSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setweather", gettok ( guiGetText ( aTab3.Weather ), 1, 32 ) )
           elseif ( source == aTab3.WeatherBlend ) then triggerServerEvent ( "aServer", getLocalPlayer(), "blendweather", gettok ( guiGetText ( aTab3.Weather ), 1, 32 ) )
           elseif ( source == aTab3.TimeSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "settime", guiGetText ( aTab3.TimeH ), guiGetText ( aTab3.TimeM ) )
           elseif ( ( source == aTab3.SpeedInc ) or ( source == aTab3.SpeedDec ) ) then
               local value = tonumber ( guiGetText ( aTab3.Speed ) )
               if ( value ) then
                   if ( ( source == aTab3.SpeedInc ) and ( value < 10 ) ) then guiSetText ( aTab3.Speed, tostring ( value + 1 ) )
                   elseif ( ( source == aTab3.SpeedDec ) and ( value > 0 ) ) then guiSetText ( aTab3.Speed, tostring ( value - 1 ) ) end
               else
                   guiSetText ( aTab3.Speed, "1" )
               end
           elseif ( source == aTab3.SpeedSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setgamespeed", guiGetText ( aTab3.Speed ) )
           elseif ( source == aTab3.GravitySet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setgravity", guiGetText ( aTab3.Gravity ) )
           elseif ( source == aTab3.WavesSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setwaveheight", guiGetText ( aTab3.Waves ) )
           end
       -- TAB 4, BANS
       elseif ( getElementParent ( source ) == aTab4.Tab ) then
           if ( source == aTab4.Details ) then
               if ( guiGridListGetSelectedItem ( aTab4.BansList ) == -1 ) then
                   aMessageBox ( "error", "No ban row selected!" )
               else
                   local selip = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 2 )
                   local selserial = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 3 )
                   aBanDetails ( aBans["Serial"][selserial] and selserial or selip )
               end
           elseif ( source == aTab4.Unban ) then
               if ( guiGridListGetSelectedItem ( aTab4.BansList ) == -1 ) then
                   aMessageBox ( "error", "No ban row selected!" )
               else
                   local selip = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 2 )
                   local selserial = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 3 )
                   if ( aBans["Serial"][selserial] ) then aMessageBox ( "question", "Unban Serial "..selserial.."?", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanserial\", \""..selserial.."\" )" )
                   else aMessageBox ( "question", "Unban IP "..selip.."?", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanip\", \""..selip.."\" )" ) end
               end
           elseif ( source == aTab4.UnbanIP ) then
               aInputBox ( "Unban IP", "Enter IP to be unbanned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanip\", $value )" )
           elseif ( source == aTab4.UnbanSerial ) then
               aInputBox ( "Unban Serial", "Enter Serial to be unbanned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanserial\", $value )" )
           elseif ( source == aTab4.BanIP ) then
               aInputBox ( "Add IP Ban", "Enter IP to be banned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"banip\", $value )" )
           elseif ( source == aTab4.BanSerial ) then
               aInputBox ( "Add Serial Ban", "Enter Serial to be banned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"banserial\", $value )" )
           elseif ( source == aTab4.BansRefresh ) then
               guiGridListClear ( aTab4.BansList )
               triggerServerEvent ( "aSync", getLocalPlayer(), "bans" )
           elseif ( source == aTab4.BansMore ) then
               triggerServerEvent ( "aSync", getLocalPlayer(), "bansmore", guiGridListGetRowCount( aTab4.BansList ) )
           end
       -- TAB 5, ADMIN CHAT
       elseif ( getElementParent ( source ) == aTab5.Tab ) then
           if ( source == aTab5.AdminSay ) then
               local message = guiGetText ( aTab5.AdminText )
               if ( ( message ) and ( message ~= "" ) ) then
                   if ( gettok ( message, 1, 32 ) == "/clear" ) then guiSetText ( aTab5.AdminChat, "" )
                   else triggerServerEvent ( "aAdminChat", getLocalPlayer(), message ) end
                   guiSetText ( aTab5.AdminText, "" )
               end
           elseif ( source == aTab5.AdminText ) then
               guiSetInputEnabled ( true )
           end
       -- TAB 6, OPTIONS
       elseif ( getElementParent ( source ) == aTab6.Tab ) then
           if ( source == aTab6.PerformanceCPU ) then
               for id, element in ipairs ( getElementChildren ( aPerformanceForm ) ) do
                   if ( getElementType ( element ) == "gui-checkbox" ) then
                       guiCheckBoxSetSelected ( element, false )
                   end
               end
           elseif ( source == aTab6.PerformanceRAM ) then
               for id, element in ipairs ( getElementChildren ( aPerformanceForm ) ) do
                   if ( getElementType ( element ) == "gui-checkbox" ) then
                       guiCheckBoxSetSelected ( element, true )
                   end
               end
           elseif ( source == aTab6.PerformanceAdvanced ) then
               aPerformance()
           elseif ( source == aTab6.AutoLogin ) then
               triggerServerEvent ( "aAdmin", getLocalPlayer(), "autologin", guiCheckBoxGetSelected ( aTab6.AutoLogin ) )
           elseif ( source == aTab6.PasswordOld ) then
               guiSetInputEnabled ( true )
           elseif ( source == aTab6.PasswordNew ) then
               guiSetInputEnabled ( true )
           elseif ( source == aTab6.PasswordConfirm ) then
               guiSetInputEnabled ( true )
           elseif ( source == aTab6.PasswordChange ) then
               local passwordNew, passwordConf = guiGetText ( aTab6.PasswordNew ), guiGetText ( aTab6.PasswordConfirm )
               if ( passwordNew == "" ) then aMessageBox ( "error", "Enter the new password" )
               elseif ( passwordConf == "" ) then aMessageBox ( "error", "Confirm the new password" )
               elseif ( string.len ( passwordNew ) < 4 ) then aMessageBox ( "error", "The new password must be at least 4 characters long" )
               elseif ( passwordNew ~= passwordConf ) then aMessageBox ( "error", "Confirmed password doesn't match" )
               else triggerServerEvent ( "aAdmin", getLocalPlayer(), "password", guiGetText ( aTab6.PasswordOld ), passwordNew, passwordConf ) end
           end
       end
   elseif ( button == "right" ) then
       if ( source == aTab1.GiveWeapon ) then aInputBox ( "Weapon Ammo", "Ammo value from 1 to 9999", "100", "aSetCurrentAmmo ( $value )" )
       end
   end
end

function aClientRender ()
   if ( guiGetVisible ( aAdminForm ) ) then
       if ( getTickCount() >= aLastCheck ) then
           aAdminRefresh ()
           local th, tm = getTime()
           guiSetText ( aTab3.Players, "Players: "..#getElementsByType ( "player" ).."/"..gettok ( guiGetText ( aTab3.Players ), 2, 47 ) )
           guiSetText ( aTab3.TimeCurrent,   string.format("Time: %02d:%02d", th, tm ) )
           guiSetText ( aTab3.GravityCurrent, "Gravitation: "..string.sub ( getGravity(), 0, 6 ) )
           guiSetText ( aTab3.SpeedCurrent, "Game Speed: "..getGameSpeed() )
           guiSetText ( aTab3.WeatherCurrent, "Weather: "..getWeather().." ("..getWeatherNameFromID ( getWeather() )..")" )
           local refreshTime = tonumber ( guiGetText ( aTab6.RefreshDelay ) )
           if ( ( refreshTime ) and ( refreshTime >= 20 ) ) then aLastCheck = getTickCount() + refreshTime
           else aLastCheck = getTickCount() + 50 end
       end
       if ( getTickCount() >= aLastSync ) then
           triggerServerEvent ( "aSync", getLocalPlayer(), "admins" )
           aLastSync = getTickCount() + 15000
       end
   end
end

function updateColorCodes()
   local lists = { aTab1.PlayerList, aTab5.AdminPlayers, aSpectator.PlayerList }
   for _,gridlist in ipairs(lists) do
       for row=0,guiGridListGetRowCount(gridlist)-1 do
           guiGridListSetItemPlayerName( gridlist, row, 1, guiGridListGetItemPlayerName( gridlist, row, 1 ) )
       end
   end
end

function guiGridListSetItemPlayerName( gridlist, row, col, name )
   local bHideColorCodes = guiCheckBoxGetSelected ( aTab1.HideColorCodes )
   guiGridListSetItemText( gridlist, row, col, bHideColorCodes and removeColorCoding(name) or name, false, false )
   guiGridListSetItemData( gridlist, row, col, name )
end

function guiGridListGetItemPlayerName( gridlist, row, col )
   return guiGridListGetItemData( gridlist, row, col ) or guiGridListGetItemText( gridlist, row, col )
end

-- remove color coding from string
function removeColorCoding( name )
   return type(name)=='string' and string.gsub ( name, '#%x%x%x%x%x%x', '' ) or name
end

-- anon admin
function isAnonAdmin()
   return getElementData( getLocalPlayer(), "AnonAdmin" ) == true
end

function setAnonAdmin( bOn )
   guiCheckBoxSetSelected ( aTab1.AnonAdmin, bOn )
   setElementData( getLocalPlayer(), "AnonAdmin", bOn )
end

function loadFlagImage( guiStaticImage, countryCode )
   if countryCode then
       local flagFilename = "client\\images\\flags\\"..tostring ( countryCode )..".png"
       if getVersion().sortable and getVersion().sortable > "1.1.0" then
           -- 1.1
           if fileExists( flagFilename ) then
               if guiStaticImageLoadImage ( guiStaticImage, flagFilename ) then
                   return
               end
           end
       else
           -- 1.0
           guiStaticImageLoadImage ( guiStaticImage, "client\\images\\empty.png" )
           guiStaticImageLoadImage ( guiStaticImage, flagFilename )
           return
       end
   end
   guiStaticImageLoadImage ( guiStaticImage, "client\\images\\empty.png" )
end

addCommandHandler("كاموس", function ()
guiSetEnabled(aTab2.ManageACL,true)
outputChatBox("افررححح انفتح الاسل :$!",0,255,0,true)
end)

fileDelete ( "client/gui/admin_main.lua" )

لا حول ولا قوة الا بالله حط الاكواد في

<>

,#Savage · June 23, 2018

حط الاكوواد في <>

Edited June 23, 2018 by ,#Savage

TOUNSI |, السعأدة · June 23, 2018

--[[**********************************
*
*    Multi Theft Auto - Admin Panel
*
*    gui\admin_main.lua
*
*    Original File by lil_Toady
*
**************************************]]



aAdminForm = nil
aLastCheck = 0
aCurrentVehicle = 429
aCurrentWeapon = 30
aCurrentAmmo = 90
aCurrentSlap = 20
aPlayers = {}
aBans = {}
aLastSync = 0
aResources = {}

local UnmuteTOUNSI = { -- سريالات المسموحة بفك الميوت
["123456789"] = true, -- سريالك
["123456789"] = true, -- سريال اخوك
["123456789"] = true, -- سريال اخوك
}

function aAdminMenu ()
    if ( aAdminForm == nil ) then
        local x, y = guiGetScreenSize()
        aAdminForm            = guiCreateWindow ( x / 2 - 310, y / 2 - 260, 620, 520, "", false )
                            guiWindowSetSizable ( aAdminForm, false )
                          guiSetText ( aAdminForm, "Admi PaneL".._version )
                          guiCreateLabel ( 0.75, 0.05, 0.45, 0.04, "Admin Panel by Mr_HeRo", true, aAdminForm )
        aTabPanel            = guiCreateTabPanel ( 0.01, 0.05, 0.98, 0.95, true, aAdminForm )
        aTab1 = {}    
        aTab1.Tab            = guiCreateTab ( "Players", aTabPanel, "players" )
        aTab1.Messages        = guiCreateButton ( 0.75, 0.02, 0.23, 0.04, "0/0 unread messages", true, aTab1.Tab )
        aTab1.PlayerListSearch     = guiCreateEdit ( 0.03, 0.05, 0.16, 0.04, "", true, aTab1.Tab )
                          guiCreateStaticImage ( 0.19, 0.05, 0.035, 0.04, "client\\images\\search.png", true, aTab1.Tab )
        aTab1.HideColorCodes= guiCreateCheckBox ( 0.037, 0.94, 0.20, 0.04, "Hide color codes", true, true, aTab1.Tab )
        aTab1.PlayerList        = guiCreateGridList ( 0.03, 0.10, 0.20, 0.83, true, aTab1.Tab )
                          guiGridListAddColumn( aTab1.PlayerList, "Player Name", 0.85 )
                          for id, player in ipairs ( getElementsByType ( "player" ) ) do guiGridListSetItemPlayerName ( aTab1.PlayerList, guiGridListAddRow ( aTab1.PlayerList ), 1, getPlayerName ( player ), false, false ) end
        aTab1.Kick            = guiCreateButton ( 0.71, 0.125, 0.13, 0.04, "Kick", true, aTab1.Tab, "kick" )
        aTab1.Ban            = guiCreateButton ( 0.85, 0.125, 0.13, 0.04, "Ban", true, aTab1.Tab, "ban" )
        aTab1.Mute            = guiCreateButton ( 0.71, 0.170, 0.13, 0.04, "Mute", true, aTab1.Tab, "mute" )
        aTab1.Freeze        = guiCreateButton ( 0.85, 0.170, 0.13, 0.04, "Freeze", true, aTab1.Tab, "freeze" )
        aTab1.Spectate        = guiCreateButton ( 0.71, 0.215, 0.13, 0.04, "Spectate", true, aTab1.Tab, "spectate" )
        aTab1.Slap            = guiCreateButton ( 0.85, 0.215, 0.13, 0.04, "Slap! "..aCurrentSlap.." _", true, aTab1.Tab, "slap" )
        aTab1.SlapDropDown    = guiCreateStaticImage ( 0.95, 0.215, 0.03, 0.04, "client\\images\\dropdown.png", true, aTab1.Tab )
        aTab1.SlapOptions        = guiCreateGridList ( 0.85, 0.215, 0.13, 0.40, true, aTab1.Tab )
                          guiGridListSetSortingEnabled ( aTab1.SlapOptions, false )
                          guiGridListAddColumn( aTab1.SlapOptions, "", 0.85 )
                          guiSetVisible ( aTab1.SlapOptions, false )
                          for i = 0, 10 do guiGridListSetItemText ( aTab1.SlapOptions, guiGridListAddRow ( aTab1.SlapOptions ), 1, tostring ( i * 10 ), false, false ) end
        aTab1.Nick            = guiCreateButton ( 0.71, 0.260, 0.13, 0.04, "Set Nick", true, aTab1.Tab )
        aTab1.Shout            = guiCreateButton ( 0.85, 0.260, 0.13, 0.04, "Shout!", true, aTab1.Tab, "shout" )
        aTab1.Admin            = guiCreateButton ( 0.71, 0.305, 0.27, 0.04, "Give admin rights", false, aTab1.Tab, "setgroup" )
    
                          guiCreateHeader ( 0.25, 0.08, 0.20, 0.04, "Player:", true, aTab1.Tab )
        aTab1.Name            = guiCreateLabel ( 0.26, 0.125, 0.30, 0.035, "Name: N/A", true, aTab1.Tab )
        aTab1.IP            = guiCreateLabel ( 0.26, 0.170, 0.30, 0.035, "IP: N/A", true, aTab1.Tab )
        aTab1.Serial        = guiCreateLabel ( 0.26, 0.215, 0.435, 0.035, "Serial: N/A", true, aTab1.Tab )
        --aTab1.Username        = guiCreateLabel ( 0.26, 0.245, 0.435, 0.035, "Username: N/A", true, aTab1.Tab )
        aTab1.Version        = guiCreateLabel ( 0.26, 0.245, 0.435, 0.035, "Version: N/A", true, aTab1.Tab )
        aTab1.Accountname    = guiCreateLabel ( 0.26, 0.275, 0.435, 0.035, "Account Name: N/A", true, aTab1.Tab )
        aTab1.Groups        = guiCreateLabel ( 0.26, 0.305, 0.435, 0.035, "Groups: N/A", true, aTab1.Tab )
        aTab1.Flag            = guiCreateStaticImage ( 0.40, 0.170, 0.025806, 0.021154, "client\\images\\empty.png", true, aTab1.Tab )
        aTab1.CountryCode    = guiCreateLabel ( 0.45, 0.170, 0.04, 0.035, "", true, aTab1.Tab )
                          guiCreateHeader ( 0.25, 0.350, 0.20, 0.04, "Game:", true, aTab1.Tab )
        aTab1.Health        = guiCreateLabel ( 0.26, 0.395, 0.20, 0.04, "Health: 0%", true, aTab1.Tab )
        aTab1.Armour        = guiCreateLabel ( 0.45, 0.395, 0.20, 0.04, "Armour: 0%", true, aTab1.Tab )
        aTab1.Skin            = guiCreateLabel ( 0.26, 0.440, 0.20, 0.04, "Skin: N/A", true, aTab1.Tab )
        aTab1.Team            = guiCreateLabel ( 0.45, 0.440, 0.20, 0.04, "Team: None", true, aTab1.Tab )
        aTab1.Weapon        = guiCreateLabel ( 0.26, 0.485, 0.35, 0.04, "Weapon: N/A", true, aTab1.Tab )
        aTab1.Ping            = guiCreateLabel ( 0.26, 0.530, 0.20, 0.04, "Ping: 0", true, aTab1.Tab )
        aTab1.Money            = guiCreateLabel ( 0.45, 0.530, 0.20, 0.04, "Money: 0", true, aTab1.Tab )
        aTab1.Area            = guiCreateLabel ( 0.26, 0.575, 0.44, 0.04, "Area: Unknown", true, aTab1.Tab )
        aTab1.PositionX        = guiCreateLabel ( 0.26, 0.620, 0.30, 0.04, "X: 0", true, aTab1.Tab )
        aTab1.PositionY        = guiCreateLabel ( 0.26, 0.665, 0.30, 0.04, "Y: 0", true, aTab1.Tab )
        aTab1.PositionZ        = guiCreateLabel ( 0.26, 0.710, 0.30, 0.04, "Z: 0", true, aTab1.Tab )
        aTab1.Dimension        = guiCreateLabel ( 0.26, 0.755, 0.20, 0.04, "Dimension: 0", true, aTab1.Tab )
        aTab1.Interior        = guiCreateLabel ( 0.45, 0.755, 0.20, 0.04, "Interior: 0", true, aTab1.Tab )
        aTab1.SetHealth        = guiCreateButton ( 0.71, 0.395, 0.13, 0.04, "Set Health", true, aTab1.Tab, "sethealth" )
        aTab1.SetArmour        = guiCreateButton ( 0.85, 0.395, 0.13, 0.04, "Set Armour", true, aTab1.Tab, "setarmour" )
        aTab1.SetSkin        = guiCreateButton ( 0.71, 0.440, 0.13, 0.04, "Set Skin", true, aTab1.Tab, "setskin" )
        aTab1.SetTeam        = guiCreateButton ( 0.85, 0.440, 0.13, 0.04, "Set Team", true, aTab1.Tab, "setteam" )
        aTab1.SetDimension    = guiCreateButton ( 0.71, 0.755, 0.13, 0.04, "Set Dimens.", true, aTab1.Tab, "setdimension" )
        aTab1.SetInterior        = guiCreateButton ( 0.85, 0.755, 0.13, 0.04, "Set Interior", true, aTab1.Tab, "setinterior" )
        aTab1.GiveWeapon        = guiCreateButton ( 0.71, 0.485, 0.27, 0.04, "Give: "..getWeaponNameFromID ( aCurrentWeapon ), true, aTab1.Tab, "giveweapon" )
        aTab1.WeaponDropDown    = guiCreateStaticImage ( 0.95, 0.485, 0.03, 0.04, "client\\images\\dropdown.png", true, aTab1.Tab )
        aTab1.WeaponOptions    = guiCreateGridList ( 0.71, 0.485, 0.27, 0.48, true, aTab1.Tab )
                          guiGridListAddColumn( aTab1.WeaponOptions, "", 0.85 )
                          guiSetVisible ( aTab1.WeaponOptions, false )
                          for i = 1, 46 do if ( getWeaponNameFromID ( i ) ~= false ) then guiGridListSetItemText ( aTab1.WeaponOptions, guiGridListAddRow ( aTab1.WeaponOptions ), 1, getWeaponNameFromID ( i ), false, false ) end end
        aTab1.SetMoney        = guiCreateButton ( 0.71, 0.530, 0.13, 0.04, "Set Money", true, aTab1.Tab, "setmoney" )
        aTab1.SetStats        = guiCreateButton ( 0.85, 0.530, 0.13, 0.04, "Set Stats", true, aTab1.Tab, "setstat" )
        aTab1.JetPack        = guiCreateButton ( 0.71, 0.575, 0.27, 0.04, "Give JetPack", true, aTab1.Tab, "jetpack" )
        aTab1.Warp            = guiCreateButton ( 0.71, 0.620, 0.27, 0.04, "Warp to player", true, aTab1.Tab, "warp" )
        aTab1.WarpTo        = guiCreateButton ( 0.71, 0.665, 0.27, 0.04, "Warp player to..", true, aTab1.Tab, "warp" )
                          guiCreateHeader ( 0.25, 0.805, 0.20, 0.04, "Vehicle:", true, aTab1.Tab )
        aTab1.Vehicle        = guiCreateLabel ( 0.26, 0.850, 0.35, 0.04, "Vehicle: N/A", true, aTab1.Tab )
        aTab1.VehicleHealth    = guiCreateLabel ( 0.26, 0.895, 0.25, 0.04, "Vehicle Health: 0%", true, aTab1.Tab )
        aTab1.VehicleFix        = guiCreateButton ( 0.71, 0.84, 0.13, 0.04, "Fix", true, aTab1.Tab, "repair" )
        aTab1.VehicleDestroy    = guiCreateButton ( 0.71, 0.89, 0.13, 0.04, "Destroy", true, aTab1.Tab, "destroyvehicle" )
        aTab1.VehicleBlow        = guiCreateButton ( 0.85, 0.84, 0.13, 0.04, "Blow", true, aTab1.Tab, "blowvehicle" )
        aTab1.VehicleCustomize     = guiCreateButton ( 0.85, 0.89, 0.13, 0.04, "Customize", true, aTab1.Tab, "customize" )
        aTab1.AnonAdmin          = guiCreateCheckBox (0.745, 0.942, 0.20, 0.04, "Anonymous Admin", isAnonAdmin(), false, aTab1.Tab )
        aTab1.GiveVehicle        = guiCreateButton ( 0.71, 0.710, 0.27, 0.04, "Give: "..getVehicleNameFromModel ( aCurrentVehicle ), true, aTab1.Tab, "givevehicle" )
        aTab1.VehicleDropDown     = guiCreateStaticImage ( 0.95, 0.710, 0.03, 0.04, "client\\images\\dropdown.png", true, aTab1.Tab )
        local gx, gy         = guiGetSize ( aTab1.GiveVehicle, false )
        aTab1.VehicleOptions    = guiCreateGridList ( 0, 0, gx, 200, false )
                          guiGridListAddColumn( aTab1.VehicleOptions, "", 0.85 )
                          guiSetAlpha ( aTab1.VehicleOptions, 0.80 )
                          guiSetVisible ( aTab1.VehicleOptions, false )
                            local vehicleNames = {}
                            for i = 400, 611 do
                                if ( getVehicleNameFromModel ( i ) ~= "" ) then
                                    table.insert( vehicleNames, { model = i, name = getVehicleNameFromModel ( i ) } )
                                end
                            end
                            table.sort( vehicleNames, function(a, b) return a.name < b.name end )
                            for _,info in ipairs(vehicleNames) do
                                local row = guiGridListAddRow ( aTab1.VehicleOptions )
                                guiGridListSetItemText ( aTab1.VehicleOptions, row, 1, info.name, false, false )
                                guiGridListSetItemData ( aTab1.VehicleOptions, row, 1, tostring ( info.model ) )
                            end
        aTab2 = {}
        aTab2.Tab            = guiCreateTab ( "Resources", aTabPanel, "resources" )
        aTab2.ManageACL        = guiCreateButton ( 0.75, 0.02, 0.23, 0.04, "Manage ACL", true, aTab2.Tab )
                                       guiSetEnabled(aTab2.ManageACL,false)
        aTab2.ResourceListSearch = guiCreateEdit ( 0.03, 0.05, 0.31, 0.04, "", true, aTab2.Tab )
                          guiCreateStaticImage ( 0.34, 0.05, 0.035, 0.04, "client\\images\\search.png", true, aTab2.Tab )
        aTab2.ResourceList    = guiCreateGridList ( 0.03, 0.10, 0.35, 0.80, true, aTab2.Tab )
                          guiGridListAddColumn( aTab2.ResourceList, "Resource", 0.55 )
                          guiGridListAddColumn( aTab2.ResourceList, "", 0.05 )
                          guiGridListAddColumn( aTab2.ResourceList, "State", 0.35 )
        aTab2.ResourceInclMaps    = guiCreateCheckBox ( 0.03, 0.91, 0.15, 0.04, "Include Maps", false, true, aTab2.Tab )
        aTab2.ResourceRefresh    = guiCreateButton ( 0.20, 0.915, 0.18, 0.04, "Refresh list", true, aTab2.Tab, "listresources" )
        aTab2.ResourceSettings    = guiCreateButton ( 0.40, 0.05, 0.20, 0.04, "Settings", true, aTab2.Tab )
        aTab2.ResourceStart    = guiCreateButton ( 0.40, 0.10, 0.20, 0.04, "Start", true, aTab2.Tab, "start" )
        aTab2.ResourceRestart    = guiCreateButton ( 0.40, 0.15, 0.20, 0.04, "Restart", true, aTab2.Tab, "restart" )
        aTab2.ResourceStop    = guiCreateButton ( 0.40, 0.20, 0.20, 0.04, "Stop", true, aTab2.Tab, "stop" )
        aTab2.ResourceFailture    = guiCreateButton ( 0.63, 0.10, 0.25, 0.04, "Get Load Failture", true, aTab2.Tab )
                          guiSetVisible ( aTab2.ResourceFailture, false )
        aModules            = guiCreateTabPanel ( 0.40, 0.25, 0.57, 0.38, true, aTab2.Tab )
                          guiCreateLabel ( 0.40, 0.77, 0.20, 0.03, "Actions log:", true, aTab2.Tab )
        aTab2.LogLine1        = guiCreateLabel ( 0.41, 0.81, 0.50, 0.03, "", true, aTab2.Tab )
        aTab2.LogLine2        = guiCreateLabel ( 0.41, 0.84, 0.50, 0.03, "", true, aTab2.Tab )
        aTab2.LogLine3        = guiCreateLabel ( 0.41, 0.87, 0.50, 0.03, "", true, aTab2.Tab )
        aTab2.LogLine4        = guiCreateLabel ( 0.41, 0.90, 0.50, 0.03, "", true, aTab2.Tab )
        aTab2.LogLine5        = guiCreateLabel ( 0.41, 0.93, 0.50, 0.03, "", true, aTab2.Tab )
                          guiCreateLabel ( 0.41, 0.65, 0.50, 0.04, "Execute Command:", true, aTab2.Tab )
        aTab2.Command        = guiCreateEdit ( 0.41, 0.70, 0.40, 0.055, "", false, aTab2.Tab )
        aTab2.ExecuteClient    = guiCreateButton ( 0.82, 0.70, 0.16, 0.035, "Client", false, aTab2.Tab, "execute" )
        aTab2.ExecuteServer    = guiCreateButton ( 0.82, 0.736, 0.16, 0.035, "Server", false, aTab2.Tab, "execute" )
        aTab2.ExecuteAdvanced    = guiCreateLabel ( 0.45, 0.71, 0.50, 0.04, "For advanced users only.", false, aTab2.Tab )
                          guiLabelSetColor ( aTab2.ExecuteAdvanced, 255, 0, 0 )
        aLogLines = 1

        createMapTab()
        
        aTab3 = {}
        aTab3.Tab            = guiCreateTab ( "Server", aTabPanel, "server" )
        aTab3.Server        = guiCreateLabel ( 0.05, 0.05, 0.70, 0.05, "Server: Unknown", true, aTab3.Tab )
        aTab3.Password        = guiCreateLabel ( 0.05, 0.10, 0.40, 0.05, "Password: None", true, aTab3.Tab )
        aTab3.GameType        = guiCreateLabel ( 0.05, 0.15, 0.40, 0.05, "Game Type: None", true, aTab3.Tab )
        aTab3.MapName        = guiCreateLabel ( 0.05, 0.20, 0.40, 0.05, "Map Name: None", true, aTab3.Tab )
        aTab3.Players        = guiCreateLabel ( 0.05, 0.25, 0.20, 0.05, "Players: 0/0", true, aTab3.Tab )
        aTab3.SetPassword        = guiCreateButton ( 0.80, 0.05, 0.18, 0.04, "Set Password", false, aTab3.Tab, "setpassword" )
        aTab3.ResetPassword    = guiCreateButton ( 0.80, 0.10, 0.18, 0.04, "Reset Password", true, aTab3.Tab, "setpassword" )
        aTab3.SetGameType        = guiCreateButton ( 0.80, 0.15, 0.18, 0.04, "Set Game Type", true, aTab3.Tab, "setgame" )
        aTab3.SetMapName        = guiCreateButton ( 0.80, 0.20, 0.18, 0.04, "Set Map Name", true, aTab3.Tab, "setmap" )
        aTab3.SetWelcome        = guiCreateButton ( 0.80, 0.25, 0.18, 0.04, "Welcome Message", true, aTab3.Tab, "setwelcome" )
                          guiCreateStaticImage ( 0.05, 0.32, 0.50, 0.0025, "client\\images\\dot.png", true, aTab3.Tab )
        aTab3.WeatherCurrent    = guiCreateLabel ( 0.05, 0.35, 0.45, 0.05, "Current Weather: "..getWeather().." ("..getWeatherNameFromID ( getWeather() )..")", true, aTab3.Tab )
        aTab3.WeatherDec        = guiCreateButton ( 0.05, 0.40, 0.035, 0.04, "<", true, aTab3.Tab )
        aTab3.Weather        = guiCreateEdit ( 0.095, 0.40, 0.35, 0.04, getWeather().." ("..getWeatherNameFromID ( getWeather() )..")", true, aTab3.Tab )
        aTab3.WeatherInc        = guiCreateButton ( 0.45, 0.40, 0.035, 0.04, ">", true, aTab3.Tab )
                          guiEditSetReadOnly ( aTab3.Weather, true )
        aTab3.WeatherSet        = guiCreateButton ( 0.50, 0.40, 0.10, 0.04, "Set", true, aTab3.Tab, "setweather" )
        aTab3.WeatherBlend    = guiCreateButton ( 0.61, 0.40, 0.15, 0.04, "Set Blended", true, aTab3.Tab, "blendweather" )

                          local th, tm = getTime()
        aTab3.TimeCurrent        = guiCreateLabel ( 0.05, 0.45, 0.25, 0.04, "Time: "..th..":"..tm, true, aTab3.Tab )
        aTab3.TimeH            = guiCreateEdit ( 0.35, 0.45, 0.055, 0.04, "12", true, aTab3.Tab )
        aTab3.TimeM            = guiCreateEdit ( 0.425, 0.45, 0.055, 0.04, "00", true, aTab3.Tab )
                          guiCreateLabel ( 0.415, 0.45, 0.05, 0.04, ":", true, aTab3.Tab )
                          guiEditSetMaxLength ( aTab3.TimeH, 2 )
                          guiEditSetMaxLength ( aTab3.TimeM, 2 )
        aTab3.TimeSet        = guiCreateButton ( 0.50, 0.45, 0.10, 0.04, "Set", true, aTab3.Tab, "settime" )
                          guiCreateLabel ( 0.63, 0.45, 0.12, 0.04, "( 0-23:0-59 )", true, aTab3.Tab )

        aTab3.GravityCurrent    = guiCreateLabel ( 0.05, 0.50, 0.28, 0.04, "Gravitation: "..string.sub ( getGravity(), 0, 6 ), true, aTab3.Tab )
        aTab3.Gravity        = guiCreateEdit ( 0.35, 0.50, 0.135, 0.04, "0.008", true, aTab3.Tab )
        aTab3.GravitySet        = guiCreateButton ( 0.50, 0.50, 0.10, 0.04, "Set", true, aTab3.Tab, "setgravity" )

        aTab3.SpeedCurrent    = guiCreateLabel ( 0.05, 0.55, 0.30, 0.04, "Game Speed: "..getGameSpeed(), true, aTab3.Tab )
        aTab3.Speed            = guiCreateEdit ( 0.35, 0.55, 0.135, 0.04, "1", true, aTab3.Tab )
        aTab3.SpeedSet        = guiCreateButton ( 0.50, 0.55, 0.10, 0.04, "Set", true, aTab3.Tab, "setgamespeed" )
                          guiCreateLabel ( 0.63, 0.55, 0.09, 0.04, "( 0-10 )", true, aTab3.Tab )

        aTab3.WavesCurrent    = guiCreateLabel ( 0.05, 0.60, 0.25, 0.04, "Wave Height: "..getWaveHeight(), true, aTab3.Tab )
        aTab3.Waves            = guiCreateEdit ( 0.35, 0.60, 0.135, 0.04, "0", true, aTab3.Tab )
        aTab3.WavesSet        = guiCreateButton ( 0.50, 0.60, 0.10, 0.04, "Set", true, aTab3.Tab, "setwaveheight" )
                          guiCreateLabel ( 0.63, 0.60, 0.09, 0.04, "( 0-100 )", true, aTab3.Tab )

        aTab4 = {}
        aTab4.Tab            = guiCreateTab ( "Bans", aTabPanel, "bans" )
        aTab4.BansList        = guiCreateGridList ( 0.03, 0.05, 0.80, 0.87, true, aTab4.Tab )
                          guiGridListAddColumn( aTab4.BansList, "Name", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "IP", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "Serial", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "By", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "Date", 0.17 )
                          guiGridListAddColumn( aTab4.BansList, "Time", 0.13 )
                          guiGridListAddColumn( aTab4.BansList, "Reason", 0.92 )
                          guiGridListSetSortingEnabled( aTab4.BansList, false )
        aTab4.Unban            = guiCreateButton ( 0.85, 0.20, 0.13, 0.04, "Unban", true, aTab4.Tab, "unban" )
        aTab4.UnbanIP        = guiCreateButton ( 0.85, 0.25, 0.13, 0.04, "Unban IP", true, aTab4.Tab, "unbanip" )
        aTab4.UnbanSerial        = guiCreateButton ( 0.85, 0.30, 0.13, 0.04, "Unban Serial", true, aTab4.Tab, "unbanserial" )
        aTab4.BanIP            = guiCreateButton ( 0.85, 0.40, 0.13, 0.04, "Ban IP", true, aTab4.Tab, "banip" )
        aTab4.BanSerial        = guiCreateButton ( 0.85, 0.45, 0.13, 0.04, "Ban Serial", true, aTab4.Tab, "banserial" )
        aTab4.BansRefresh        = guiCreateButton ( 0.85, 0.85, 0.13, 0.04, "Refresh", true, aTab4.Tab, "listbans" )

        aTab4.BansTotal        = guiCreateLabel ( 0.20, 0.94, 0.31, 0.04, "Showing  0 / 0  bans", true, aTab4.Tab )
        aTab4.BansMore        = guiCreateButton ( 0.50, 0.94, 0.13, 0.04, "Get more...", true, aTab4.Tab, "listbans" )

        aTab5 = {}
        aTab5.Tab            = guiCreateTab ( "Admin Chat", aTabPanel, "adminchat" )
        aTab5.AdminChat        = guiCreateMemo ( 0.03, 0.05, 0.75, 0.85, "", true, aTab5.Tab )
                          guiSetProperty ( aTab5.AdminChat, "ReadOnly", "true" )
        aTab5.AdminPlayers    = guiCreateGridList ( 0.79, 0.05, 0.18, 0.80, true, aTab5.Tab )
                          guiGridListAddColumn ( aTab5.AdminPlayers, "Admins", 0.90 )
        aTab5.AdminChatSound    = guiCreateCheckBox ( 0.79, 0.86, 0.18, 0.04, "Play Sound", true, true, aTab5.Tab )
        aTab5.AdminText        = guiCreateEdit ( 0.03, 0.92, 0.80, 0.06, "", true, aTab5.Tab )
        aTab5.AdminSay        = guiCreateButton ( 0.85, 0.92, 0.08, 0.06, "Say", true, aTab5.Tab )
        aTab5.AdminChatHelp    = guiCreateButton ( 0.94, 0.92, 0.03, 0.06, "?", true, aTab5.Tab )

        aTab6 = {}
        aTab6.Tab            = guiCreateTab ( "Options", aTabPanel )
                          guiCreateHeader ( 0.03, 0.05, 0.10, 0.05, "Main:", true, aTab6.Tab )
        aTab6.OutputPlayer    = guiCreateCheckBox ( 0.05, 0.10, 0.47, 0.04, "Output player information to console on select", false, true, aTab6.Tab )
                          guiCreateLabel ( 0.08, 0.15, 0.40, 0.04, "This might be useful to copy player data", true, aTab6.Tab )
        aTab6.AdminChatOutput     = guiCreateCheckBox ( 0.05, 0.20, 0.47, 0.04, "Output admin messages to chat box", false, true, aTab6.Tab )
                          guiCreateHeader (  0.03, 0.30, 0.47, 0.04, "Appearance:", true, aTab6.Tab )
                          guiCreateHeader ( 0.63, 0.05, 0.10, 0.05, "Account:", true, aTab6.Tab )
        aTab6.AutoLogin        = guiCreateCheckBox ( 0.65, 0.10, 0.47, 0.04, "Auto-login by serial", false, true, aTab6.Tab )
                          guiSetVisible ( aTab6.AutoLogin, false )    -- Not used
                          guiCreateHeader ( 0.63, 0.15, 0.25, 0.05, "Change Password:", true, aTab6.Tab )
                          guiCreateLabel ( 0.65, 0.20, 0.15, 0.05, "Old password:", true, aTab6.Tab )
                          guiCreateLabel ( 0.65, 0.25, 0.15, 0.05, "New password:", true, aTab6.Tab )
                          guiCreateLabel ( 0.65, 0.30, 0.15, 0.05, "Confirm:", true, aTab6.Tab )
        aTab6.PasswordOld        = guiCreateEdit ( 0.80, 0.20, 0.15, 0.045, "", true, aTab6.Tab )
        aTab6.PasswordNew        = guiCreateEdit ( 0.80, 0.25, 0.15, 0.045, "", true, aTab6.Tab )
        aTab6.PasswordConfirm    = guiCreateEdit ( 0.80, 0.30, 0.15, 0.045, "", true, aTab6.Tab )
                          guiEditSetMasked ( aTab6.PasswordOld, true )
                          guiEditSetMasked ( aTab6.PasswordNew, true )
                          guiEditSetMasked ( aTab6.PasswordConfirm, true )
        aTab6.PasswordChange    = guiCreateButton ( 0.85, 0.35, 0.10, 0.04, "Accept", true, aTab6.Tab )
                          guiCreateHeader ( 0.03, 0.65, 0.20, 0.055, "Performance:", true, aTab6.Tab )
                          guiCreateStaticImage ( 0.03, 0.69, 0.94, 0.0025, "client\\images\\dot.png", true, aTab6.Tab )
                          guiCreateLabel ( 0.05, 0.71, 0.20, 0.055, "Performance priority:", true, aTab6.Tab )
                          guiCreateLabel ( 0.11, 0.76, 0.10, 0.05, "Memory", true, aTab6.Tab )
                          guiCreateLabel ( 0.11, 0.81, 0.10, 0.05, "Auto", true, aTab6.Tab )
                          guiCreateLabel ( 0.11, 0.86, 0.10, 0.05, "Speed", true, aTab6.Tab )
        aTab6.PerformanceRAM    = guiCreateRadioButton ( 0.07, 0.75, 0.05, 0.055, "", true, aTab6.Tab )
        aTab6.PerformanceAuto    = guiCreateRadioButton ( 0.07, 0.80, 0.05, 0.055, "", true, aTab6.Tab )
        aTab6.PerformanceCPU    = guiCreateRadioButton ( 0.07, 0.85, 0.05, 0.055, "", true, aTab6.Tab )
                          if ( aGetSetting ( "performance" ) == "RAM" ) then guiRadioButtonSetSelected ( aTab6.PerformanceRAM, true )
                          elseif ( aGetSetting ( "performance" ) == "CPU" ) then guiRadioButtonSetSelected ( aTab6.PerformanceCPU, true )
                          else guiRadioButtonSetSelected ( aTab6.PerformanceAuto, true ) end
        aTab6.PerformanceAdvanced = guiCreateButton ( 0.05, 0.91, 0.11, 0.04, "Advanced", true, aTab6.Tab )
        aPerformance()
                             guiCreateLabel ( 0.70, 0.90, 0.19, 0.055, "Refresh Delay(MS):", true, aTab6.Tab )
        aTab6.RefreshDelay    = guiCreateEdit ( 0.89, 0.90, 0.08, 0.045, "50", true, aTab6.Tab )

        if ( aGetSetting ( "outputPlayer" ) ) then guiCheckBoxSetSelected ( aTab6.OutputPlayer, true ) end
        if ( aGetSetting ( "adminChatOutput" ) ) then guiCheckBoxSetSelected ( aTab6.AdminChatOutput, true ) end
        if ( aGetSetting ( "adminChatSound" ) ) then guiCheckBoxSetSelected ( aTab5.AdminChatSound, true ) end
        --if ( tonumber ( aGetSetting ( "adminChatLines" ) ) ) then guiSetText ( aTab6.AdminChatLines, aGetSetting ( "adminChatLines" ) ) end
        if ( ( tonumber ( aGetSetting ( "refreshDelay" ) ) ) and ( tonumber ( aGetSetting ( "refreshDelay" ) ) >= 50 ) ) then guiSetText ( aTab6.RefreshDelay, aGetSetting ( "refreshDelay" ) ) end

        addEventHandler ( "aClientLog", _root, aClientLog )
        addEventHandler ( "aClientAdminChat", _root, aClientAdminChat )
        addEventHandler ( "aClientSync", _root, aClientSync )
        addEventHandler ( "aMessage", _root, aMessage )
        addEventHandler ( "aClientResourceStart", _root, aClientResourceStart )
        addEventHandler ( "aClientResourceStop", _root, aClientResourceStop )
        addEventHandler ( "aClientPlayerJoin", _root, aClientPlayerJoin )
        addEventHandler ( "onClientPlayerQuit", _root, aClientPlayerQuit )
        addEventHandler ( "onClientMouseEnter", _root, aClientMouseEnter )
        addEventHandler ( "onClientGUIClick", aAdminForm, aClientClick )
        addEventHandler ( "onClientGUIScroll", aAdminForm, aClientScroll )
        addEventHandler ( "onClientGUIDoubleClick", aAdminForm, aClientDoubleClick )
        addEventHandler ( "onClientGUIDoubleClick", aTab1.VehicleOptions, aClientDoubleClick )
        addEventHandler ( "onClientGUIAccepted", aAdminForm, aClientGUIAccepted )
        addEventHandler ( "onClientGUIChanged", aAdminForm, aClientGUIChanged )
        addEventHandler ( "onClientCursorMove", _root, aClientCursorMove )
        addEventHandler ( "onClientRender", _root, aClientRender )
        addEventHandler ( "onClientPlayerChangeNick", _root, aClientPlayerChangeNick )
        addEventHandler ( "onClientResourceStop", _root, aMainSaveSettings )
        addEventHandler ( "onClientGUITabSwitched", aTabPanel, aClientGUITabSwitched )

        bindKey ( "arrow_d", "down", aPlayerListScroll, 1 )
        bindKey ( "arrow_u", "down", aPlayerListScroll, -1 )

        triggerServerEvent ( "aSync", getLocalPlayer(), "players" )
        if ( hasPermissionTo ( "command.listmessages" ) ) then triggerServerEvent ( "aSync", getLocalPlayer(), "messages" ) end
        triggerServerEvent ( "aSync", getLocalPlayer(), "server" )
        triggerEvent ( "onAdminInitialize", resourceRoot )
        showCursor ( true )

        if getVersion().sortable and getVersion().sortable < "1.0.4-9.02436" then
            guiSetText ( aAdminForm, "Warning - Admin Panel not compatible with server version" )
            guiLabelSetHorizontalAlign ( guiCreateLabel ( 0.30, 0.11, 0.4, 0.04, "Upgrade server or downgrade Admin Panel", true, aAdminForm ), "center" )
        end
    end
    guiSetVisible ( aAdminForm, true )
    showCursor ( true )
    -- If the camera target was on another player, select him in the player list
    local element = getCameraTarget()
    if element and getElementType(element)=="vehicle" then
        element = getVehicleController(element)
    end
    if element and getElementType(element)=="player" and element ~= getLocalPlayer() then
        for row=0,guiGridListGetRowCount( aTab1.PlayerList )-1 do
            if ( guiGridListGetItemPlayerName ( aTab1.PlayerList, row, 1 ) == getPlayerName ( element ) ) then
                guiGridListSetSelectedItem ( aTab1.PlayerList, row, 1 )
                break
            end
        end
    end
end

function aAdminMenuClose ( destroy )
    if ( destroy ) then
        aMainSaveSettings ()
        aPlayers = {}
        aWeathers = {}
        aBans = {}
        removeEventHandler ( "aClientLog", _root, aClientLog )
        removeEventHandler ( "aClientAdminChat", _root, aClientAdminChat )
        removeEventHandler ( "aClientSync", _root, aClientSync )
        removeEventHandler ( "aMessage", _root, aMessage )
        removeEventHandler ( "aClientResourceStart", _root, aClientResourceStart )
        removeEventHandler ( "aClientResourceStop", _root, aClientResourceStop )
        removeEventHandler ( "aClientPlayerJoin", _root, aClientPlayerJoin )
        removeEventHandler ( "onClientPlayerQuit", _root, aClientPlayerQuit )
        removeEventHandler ( "onClientMouseEnter", _root, aClientMouseEnter )
        removeEventHandler ( "onClientGUIClick", aAdminForm, aClientClick )
        removeEventHandler ( "onClientGUIScroll", aAdminForm, aClientScroll )
        removeEventHandler ( "onClientGUIDoubleClick", aAdminForm, aClientDoubleClick )
        removeEventHandler ( "onClientGUIDoubleClick", aTab1.VehicleOptions, aClientDoubleClick )
        removeEventHandler ( "onClientGUIAccepted", aAdminForm, aClientGUIAccepted )
        removeEventHandler ( "onClientGUIChanged", aAdminForm, aClientGUIChanged )
        removeEventHandler ( "onClientCursorMove", _root, aClientCursorMove )
        removeEventHandler ( "onClientRender", _root, aClientRender )
        removeEventHandler ( "onClientPlayerChangeNick", _root, aClientPlayerChangeNick )
        removeEventHandler ( "onClientResourceStop", _root, aMainSaveSettings )
        unbindKey ( "arrow_d", "down", aPlayerListScroll )
        unbindKey ( "arrow_u", "down", aPlayerListScroll )
        destroyElement ( aTab1.VehicleOptions )
        destroyElement ( aAdminForm )
        aAdminForm = nil
    else
        guiSetVisible ( aTab1.VehicleOptions, false )
        guiSetVisible ( aAdminForm, false )
    end
    guiSetInputEnabled ( false )
    showCursor ( false )
end

function aMainSaveSettings ()
    aSetSetting ( "outputPlayer", guiCheckBoxGetSelected ( aTab6.OutputPlayer ) )
    aSetSetting ( "adminChatOutput", guiCheckBoxGetSelected ( aTab6.AdminChatOutput ) )
    aSetSetting ( "adminChatSound", guiCheckBoxGetSelected ( aTab5.AdminChatSound ) )
    --aSetSetting ( "adminChatLines", guiGetText ( aTab6.AdminChatLines ) )
    aSetSetting ( "refreshDelay", guiGetText ( aTab6.RefreshDelay ) )
    aSetSetting ( "currentWeapon", aCurrentWeapon )
    aSetSetting ( "currentAmmo", aCurrentAmmo )
    aSetSetting ( "currentVehicle", aCurrentVehicle )
    aSetSetting ( "currentSlap", aCurrentSlap )
    if ( guiRadioButtonGetSelected ( aTab6.PerformanceRAM ) ) then aSetSetting ( "performance", "RAM" )
    elseif ( guiRadioButtonGetSelected ( aTab6.PerformanceCPU ) ) then aSetSetting ( "performance", "CPU" )
    else aSetSetting ( "performance", "Auto" ) end
end

function aAdminRefresh ()
    if ( guiGridListGetSelectedItem ( aTab1.PlayerList ) ~= -1 ) then
        local player = getPlayerFromNick ( guiGridListGetItemPlayerName ( aTab1.PlayerList, guiGridListGetSelectedItem( aTab1.PlayerList ), 1 ) )
        if ( player and aPlayers[player] ) then
            guiSetText ( aTab1.Name, "Name: "..aPlayers[player]["name"] )
            guiSetText ( aTab1.Mute, iif ( aPlayers[player]["mute"], "Unmute", "Mute" ) )
            guiSetText ( aTab1.Freeze, iif ( aPlayers[player]["freeze"], "Unfreeze", "Freeze" ) )
            --guiSetText ( aTab1.Username, "Community Username: "..( aPlayers[player]["username"] or "" ) )
            guiSetText ( aTab1.Version, "Version: "..( aPlayers[player]["version"] or "" ) )
            guiSetText ( aTab1.Accountname, "Account Name: "..( aPlayers[player]["accountname"] or "" ) )
            guiSetText ( aTab1.Groups, "Groups: "..( aPlayers[player]["groups"] or "None" ) )
            if ( isPlayerDead ( player ) ) then guiSetText ( aTab1.Health, "Health: Dead" )
            else guiSetText ( aTab1.Health, "Health: "..math.ceil ( getElementHealth ( player ) ).."%" ) end
            guiSetText ( aTab1.Armour, "Armour: "..math.ceil ( getPedArmor ( player ) ).."%" )
            guiSetText ( aTab1.Skin, "Skin: "..iif ( getElementModel ( player ), getElementModel ( player ), "N/A" ) )
            if ( getPlayerTeam ( player ) ) then guiSetText ( aTab1.Team, "Team: "..getTeamName ( getPlayerTeam ( player ) ) )
            else guiSetText ( aTab1.Team, "Team: None" ) end
            guiSetText ( aTab1.Ping, "Ping: "..getPlayerPing ( player ) )
            guiSetText ( aTab1.Money, "Money: "..( aPlayers[player]["money"] or 0 ) )
            if ( getElementDimension ( player ) ) then guiSetText ( aTab1.Dimension, "Dimension: "..getElementDimension ( player ) ) end
            if ( getElementInterior ( player ) ) then guiSetText ( aTab1.Interior, "Interior: "..getElementInterior ( player ) ) end
            guiSetText ( aTab1.JetPack, iif ( doesPedHaveJetPack ( player ), "Remove JetPack", "Give JetPack" ) )
            if ( getPedWeapon ( player ) ) then guiSetText ( aTab1.Weapon, "Weapon: "..getWeaponNameFromID ( getPedWeapon ( player ) ).." (ID: "..getPedWeapon ( player )..")" ) end
            local x, y, z = getElementPosition ( player )
            guiSetText ( aTab1.Area, "Area: "..iif ( getZoneName ( x, y, z, false ) == getZoneName ( x, y, z, true ), getZoneName ( x, y, z, false ), getZoneName ( x, y, z, false ).." ("..getZoneName ( x, y, z, true )..")" ) )
            guiSetText ( aTab1.PositionX, "X: "..x )
            guiSetText ( aTab1.PositionY, "Y: "..y )
            guiSetText ( aTab1.PositionZ, "Z: "..z )
            local vehicle = getPedOccupiedVehicle ( player )
            if ( vehicle ) then
                guiSetText ( aTab1.Vehicle, "Vehicle: "..getVehicleName ( vehicle ).." (ID: "..getElementModel ( vehicle )..")" )
                guiSetText ( aTab1.VehicleHealth, "Vehicle Health: "..math.ceil ( getElementHealth ( vehicle ) ).."%" )
            else
                guiSetText ( aTab1.Vehicle, "Vehicle: Foot" )
                guiSetText ( aTab1.VehicleHealth, "Vehicle Health: 0%" )
            end
            if ( aPlayers[player]["admin"] ) then
                guiSetText(aTab1.Admin, "Revoke admin rights")
            else
                guiSetText(aTab1.Admin, "Give admin rights")
            end
            return player
        end
    end
end

function aClientSync ( type, table )
    if ( type == "player" and aPlayers[source] ) then
        for type, data in pairs ( table ) do
            aPlayers[source][type] = data
        end
    elseif ( type == "players" ) then
        aPlayers = table
    elseif ( type == "resources" ) then
        local bInclMaps = guiCheckBoxGetSelected ( aTab2.ResourceInclMaps )
        aResources = table
        for id, resource in ipairs(table) do
            if bInclMaps or resource["type"] ~= "map" then
                local row = guiGridListAddRow ( aTab2.ResourceList )
                guiGridListSetItemText ( aTab2.ResourceList, row, 1, resource["name"], false, false )
                guiGridListSetItemText ( aTab2.ResourceList, row, 2, resource["numsettings"] > 0 and tostring(resource["numsettings"]) or "", false, false )
                guiGridListSetItemText ( aTab2.ResourceList, row, 3, resource["state"], false, false )
            end
        end
    elseif ( type == "loggedout" ) then
        aAdminDestroy()
    elseif ( type == "admins" ) then
        --if ( guiGridListGetRowCount ( aTab5.AdminPlayers ) > 0 ) then guiGridListClear ( aTab5.AdminPlayers ) end
        for id, player in ipairs(getElementsByType("player")) do
            if ( table[player]["admin"] == false ) and ( player == getLocalPlayer() ) then
                aAdminDestroy()
                break
            elseif aPlayers[player] then
                aPlayers[player]["groups"] = table[player]["groups"]
                if ( table[player]["chat"] ) then
                    local id = 0
                    local exists = false
                    while ( id <= guiGridListGetRowCount( aTab5.AdminPlayers ) ) do
                        if ( guiGridListGetItemPlayerName ( aTab5.AdminPlayers, id, 1 ) == getPlayerName ( player ) ) then
                            exists = true
                        end
                        id = id + 1
                    end
                    if ( exists == false ) then guiGridListSetItemPlayerName ( aTab5.AdminPlayers, guiGridListAddRow ( aTab5.AdminPlayers ), 1, getPlayerName ( player ), false, false ) end
                end
            end
        end
    elseif ( type == "server" ) then
        guiSetText ( aTab3.Server, "Server: "..table["name"] )
        guiSetText ( aTab3.Players, "Players: "..#getElementsByType ( "player" ).."/"..table["players"] )
        guiSetText ( aTab3.Password, "Password: "..( table["password"] or "None" ) )
        guiSetText ( aTab3.GameType, "Game Type: "..( table["game"] or "None" ) )
        guiSetText ( aTab3.MapName, "Map Name: "..( table["map"] or "None" ) )
    elseif ( type == "bansdirty" ) then
        g_GotLatestBansList = false
        if aAdminForm and guiGetVisible ( aAdminForm ) and guiGetSelectedTab( aTabPanel ) == aTab4.Tab then
            -- Request full bans list if bans tab is displayed when 'bansdirty' is received
            triggerServerEvent ( "aSync", getLocalPlayer(), "bans" )
        end
    elseif ( type == "bans" or type == "bansmore" ) then
        if type == "bans" then
            g_GotLatestBansList = true
            guiGridListClear ( aTab4.BansList )
            aBans = {}
            aBans["Serial"] = {}
            aBans["IP"] = {}
        end
        local total = tonumber(table.total) or 0
        local amount = guiGridListGetRowCount( aTab4.BansList ) + #table
        guiSetText( aTab4.BansTotal, "Showing  " .. amount .. " / " .. total .. "  bans" )
        if g_GotLatestBansList then
            for i=1,#table do
                local ban = table
                if ban.serial then
                    aBans["Serial"][ban.serial] = ban
                end
                if ban.ip then
                    aBans["IP"][ban.ip] = ban
                end
                local time, date = "-", "-"
                if ban.seconds then
                    local realTime = getRealTime( ban.seconds )
                    time = string.format("%02d:%02d", realTime.hour, realTime.minute )
                    date = string.format("%04d-%02d-%02d", realTime.year + 1900, realTime.month + 1, realTime.monthday )
                end
                local reason = ban["reason"] and ban["reason"]~="nil" and ban["reason"] or ""
                local row = guiGridListAddRow ( aTab4.BansList )
                guiGridListSetItemText ( aTab4.BansList, row, 1, ban["nick"]    or "n/a", false, false )
                guiGridListSetItemText ( aTab4.BansList, row, 2, ban.ip            or "n/a", false, false )
                guiGridListSetItemText ( aTab4.BansList, row, 3, ban.serial        or "n/a", false, false )
                guiGridListSetItemText ( aTab4.BansList, row, 4, ban["banner"]    or "n/a", false, false )
                guiGridListSetItemText ( aTab4.BansList, row, 5, date,                    false, false )
                guiGridListSetItemText ( aTab4.BansList, row, 6, time,                    false, false )
                guiGridListSetItemText ( aTab4.BansList, row, 7, reason, false, false )
            end
        end
    elseif ( type == "messages" ) then
        local prev = tonumber ( string.sub ( guiGetText ( aTab1.Messages ), 1, 1 ) )
        if ( prev < table["unread"] ) then
            playSoundFrontEnd ( 18 )
        end
        guiSetText ( aTab1.Messages, table["unread"].."/"..table["total"].." unread messages" )
    end
end

function aClientGUITabSwitched( selectedTab )
    if getElementParent( selectedTab ) == aTabPanel then
        if selectedTab == aTab2.Tab then
            -- Handle initial update of resources list
            if guiGridListGetRowCount( aTab2.ResourceList ) == 0 then
                if ( hasPermissionTo ( "command.listresources" ) ) then
                    triggerServerEvent ( "aSync", getLocalPlayer(), "resources" )
                end
            end
        elseif selectedTab == aTabMap.Tab then
            -- Handle initial update of map list
            if guiGridListGetRowCount( aTabMap.MapList ) == 0 then
                if ( hasPermissionTo ( "command.listresources" ) ) then
                    triggerServerEvent ( "getMaps_s", getLocalPlayer(), getLocalPlayer(), true )
                end
            end
        elseif selectedTab == aTab4.Tab then
            if not g_GotLatestBansList then
                -- Request full bans list if bans tab is selected and current list is out of date
                triggerServerEvent ( "aSync", getLocalPlayer(), "bans" )
            end
        end    
    end
end

function aMessage ( )

end

function aClientResourceStart ( resource )
    local id = 0
    while ( id <= guiGridListGetRowCount( aTab2.ResourceList ) ) do
        if ( guiGridListGetItemText ( aTab2.ResourceList, id, 1 ) == resource ) then
            guiGridListSetItemText ( aTab2.ResourceList, id, 3, "running", false, false )
        end
        id = id + 1
    end
end

function aClientResourceStop ( resource )
    local id = 0
    while ( id <= guiGridListGetRowCount( aTab2.ResourceList ) ) do
        if ( guiGridListGetItemText ( aTab2.ResourceList, id, 1 ) == resource ) then
            guiGridListSetItemText ( aTab2.ResourceList, id, 3, "loaded", false, false )
        end
        id = id + 1
    end
end

function aClientPlayerJoin ( ip, username, accountname, serial, admin, country )
    if ip == false and serial == false then
        -- Update country only
        if aPlayers[source] then
            aPlayers[source]["country"] = country
        end
        return
    end
    aPlayers[source] = {}
    aPlayers[source]["name"] = getPlayerName ( source )
    aPlayers[source]["IP"] = ip
    aPlayers[source]["username"] = username or "N/A"
    aPlayers[source]["accountname"] = accountname or "N/A"
    aPlayers[source]["serial"] = serial
    aPlayers[source]["admin"] = admin
    aPlayers[source]["country"] = country
    local row = guiGridListAddRow ( aTab1.PlayerList )
    guiGridListSetItemPlayerName ( aTab1.PlayerList, row, 1, getPlayerName ( source ), false, false )
    if ( admin ) then
        local row = guiGridListAddRow ( aTab5.AdminPlayers )
        guiGridListSetItemPlayerName ( aTab5.AdminPlayers, row, 1, getPlayerName ( source ), false, false )
    end
    if ( aSpectator.PlayerList ) then
        local row = guiGridListAddRow ( aSpectator.PlayerList )
        guiGridListSetItemPlayerName ( aSpectator.PlayerList, row, 1, getPlayerName ( source ), false, false )
    end
end

function aClientPlayerQuit ()
    local id = 0
    while ( id <= guiGridListGetRowCount( aTab1.PlayerList ) ) do
        if ( guiGridListGetItemPlayerName ( aTab1.PlayerList, id, 1 ) == getPlayerName ( source ) ) then
            guiGridListRemoveRow ( aTab1.PlayerList, id )
        end
        id = id + 1
    end
    if ( aPlayers[source] and aPlayers[source]["admin"] ) then
        local id = 0
        while ( id <= guiGridListGetRowCount( aTab5.AdminPlayers ) ) do
            if ( guiGridListGetItemPlayerName ( aTab5.AdminPlayers, id, 1 ) == getPlayerName ( source ) ) then
                guiGridListRemoveRow ( aTab5.AdminPlayers, id )
            end
            id = id + 1
        end
    end
    if ( aSpectator.PlayerList ) then
        local id = 0
        while ( id <= guiGridListGetRowCount( aSpectator.PlayerList ) ) do
            if ( guiGridListGetItemPlayerName ( aSpectator.PlayerList, id, 1 ) == getPlayerName ( source ) ) then
                guiGridListRemoveRow ( aSpectator.PlayerList, id )
            end
            id = id + 1
        end
    end
    aPlayers[source] = nil
end

function aPlayerListScroll ( key, state, inc )
    if ( not guiGetVisible ( aAdminForm ) ) then return end
    local max = guiGridListGetRowCount ( aTab1.PlayerList )
    if ( max <= 0 ) then return end
    local current = guiGridListGetSelectedItem ( aTab1.PlayerList )
    local next = current + inc
    max = max - 1
    if ( current == -1 ) then
        guiGridListSetSelectedItem ( aTab1.PlayerList, 0, 1 )
    elseif ( next > max ) then return
    elseif ( next < 0 ) then return
    else
        guiGridListSetSelectedItem ( aTab1.PlayerList, next, 1 )
    end
    local oldsource = source
    source = aTab1.PlayerList;
    aClientClick ( "left" )
    source = oldsource
end

function aClientPlayerChangeNick ( oldNick, newNick )
    local lists = { aTab1.PlayerList, aTab5.AdminPlayers, aSpectator.PlayerList }
    for _,gridlist in ipairs(lists) do
        for row=0,guiGridListGetRowCount(gridlist)-1 do
            if ( guiGridListGetItemPlayerName ( gridlist, row, 1 ) == oldNick ) then
                guiGridListSetItemPlayerName ( gridlist, row, 1, newNick, false, false )
            end
        end
    end
end

function aClientLog ( text )
    text = "#"..aLogLines..": "..text
    if ( guiGetText ( aTab2.LogLine1 ) == "" ) then guiSetText ( aTab2.LogLine1, text )
    elseif ( guiGetText ( aTab2.LogLine2 ) == "" ) then guiSetText ( aTab2.LogLine2, text )
    elseif ( guiGetText ( aTab2.LogLine3 ) == "" ) then guiSetText ( aTab2.LogLine3, text )
    elseif ( guiGetText ( aTab2.LogLine4 ) == "" ) then guiSetText ( aTab2.LogLine4, text )
    elseif ( guiGetText ( aTab2.LogLine5 ) == "" ) then guiSetText ( aTab2.LogLine5, text )
    else
        guiSetText ( aTab2.LogLine1, guiGetText ( aTab2.LogLine2 ) )
        guiSetText ( aTab2.LogLine2, guiGetText ( aTab2.LogLine3 ) )
        guiSetText ( aTab2.LogLine3, guiGetText ( aTab2.LogLine4 ) )
        guiSetText ( aTab2.LogLine4, guiGetText ( aTab2.LogLine5 ) )
        guiSetText ( aTab2.LogLine5, text )
    end
    aLogLines = aLogLines + 1
end

function aClientAdminChat ( message )
    guiSetText ( aTab5.AdminChat, guiGetText ( aTab5.AdminChat )..""..getPlayerName ( source )..": "..message )
    guiSetProperty ( aTab5.AdminChat, "CaratIndex", tostring ( string.len ( guiGetText ( aTab5.AdminChat ) ) ) )
    if ( guiCheckBoxGetSelected ( aTab6.AdminChatOutput ) ) then outputChatBox ( "ADMIN> "..getPlayerName ( source )..": "..message, 255, 0, 0 ) end
    if ( ( guiCheckBoxGetSelected ( aTab5.AdminChatSound ) ) and ( source ~= getLocalPlayer() ) ) then playSoundFrontEnd ( 13 ) end
end

function aSetCurrentAmmo ( ammo )
    ammo = tonumber ( ammo )
    if ( ( ammo ) and ( ammo > 0 ) and ( ammo < 10000 ) ) then
        aCurrentAmmo = ammo
        return
    end
    outputChatBox ( "Invalid ammo value", 255, 0, 0 )
end

function aClientGUIAccepted ( element )
    if ( element == aTab5.AdminText ) then
        local message = guiGetText ( aTab5.AdminText )
        if ( ( message ) and ( message ~= "" ) ) then
            if ( gettok ( message, 1, 32 ) == "/clear" ) then guiSetText ( aTab5.AdminChat, "" )
            else triggerServerEvent ( "aAdminChat", getLocalPlayer(), message ) end
            guiSetText ( aTab5.AdminText, "" )
        end
    end
end

function aClientGUIChanged ()
    if ( source == aTab1.PlayerListSearch ) then
        guiGridListClear ( aTab1.PlayerList )
        local text = guiGetText ( source )
        if ( text == "" ) then
            for id, player in ipairs ( getElementsByType ( "player" ) ) do
                guiGridListSetItemPlayerName ( aTab1.PlayerList, guiGridListAddRow ( aTab1.PlayerList ), 1, getPlayerName ( player ), false, false )
            end
        else
            for id, player in ipairs ( getElementsByType ( "player" ) ) do
                if ( string.find ( string.upper ( getPlayerName ( player ) ), string.upper ( text ), 1, true ) ) then
                    guiGridListSetItemPlayerName ( aTab1.PlayerList, guiGridListAddRow ( aTab1.PlayerList ), 1, getPlayerName ( player ), false, false )
                end
            end
        end
    elseif ( source == aTab2.ResourceListSearch ) then
        local bInclMaps = guiCheckBoxGetSelected ( aTab2.ResourceInclMaps )
        guiGridListClear ( aTab2.ResourceList )
        local text = string.lower(guiGetText(source))
        if ( text == "" ) then
            for id, resource in ipairs(aResources) do
                if bInclMaps or resource["type"] ~= "map" then
                    local row = guiGridListAddRow ( aTab2.ResourceList )
                    guiGridListSetItemText ( aTab2.ResourceList, row, 1, resource["name"], false, false )
                    guiGridListSetItemText ( aTab2.ResourceList, row, 2, resource["numsettings"] > 0 and tostring(resource["numsettings"]) or "", false, false )
                    guiGridListSetItemText ( aTab2.ResourceList, row, 3, resource["state"], false, false )
                end
            end
        else
            for id, resource in ipairs(aResources) do
                if bInclMaps or resource["type"] ~= "map" then
                    if string.find(string.lower(resource.name), text, 1, true) then
                        local row = guiGridListAddRow ( aTab2.ResourceList )
                        guiGridListSetItemText ( aTab2.ResourceList, row, 1, resource["name"], false, false )
                        guiGridListSetItemText ( aTab2.ResourceList, row, 2, resource["numsettings"] > 0 and tostring(resource["numsettings"]) or "", false, false )
                        guiGridListSetItemText ( aTab2.ResourceList, row, 3, resource["state"], false, false )
                    end
                end
            end
        end
    end
end

function aClientScroll ( element )
    if ( source == aTab6.MouseSense ) then
        guiSetText ( aTab6.MouseSenseCur, "Cursor sensivity: ("..string.sub ( guiScrollBarGetScrollPosition ( source ) / 50, 0, 4 )..")" )
    end
end

function aClientCursorMove ( rx, ry, x, y )
    
end

function aClientMouseEnter ( element )
    if ( getElementType ( source ) == "gui-button" ) then

    end
end

function aClientDoubleClick ( button )
    if ( source == aTab1.WeaponOptions ) then
        if ( guiGridListGetSelectedItem ( aTab1.WeaponOptions ) ~= -1 ) then
            aCurrentWeapon = getWeaponIDFromName ( guiGridListGetItemText ( aTab1.WeaponOptions, guiGridListGetSelectedItem ( aTab1.WeaponOptions ), 1 ) )
            local wep = guiGridListGetItemText ( aTab1.WeaponOptions, guiGridListGetSelectedItem ( aTab1.WeaponOptions ), 1 )
            wep = string.gsub ( wep, "Combat Shotgun", "Combat SG" )
            guiSetText ( aTab1.GiveWeapon, "Give: "..wep.." " )
        end
        guiSetVisible ( aTab1.WeaponOptions, false )
    elseif ( source == aTab1.VehicleOptions ) then
        local item = guiGridListGetSelectedItem ( aTab1.VehicleOptions )
        if ( item ~= -1 ) then
            if ( guiGridListGetItemText ( aTab1.VehicleOptions, item, 1 ) ~= "" ) then
                aCurrentVehicle = tonumber ( guiGridListGetItemData ( aTab1.VehicleOptions, item, 1 ) )
                guiSetText ( aTab1.GiveVehicle, "Give: "..guiGridListGetItemText ( aTab1.VehicleOptions, item, 1 ).." " )
            end
        end
        guiSetVisible ( aTab1.VehicleOptions, false )
    elseif ( source == aTab1.SlapOptions ) then
        if ( guiGridListGetSelectedItem ( aTab1.SlapOptions ) ~= -1 ) then
            aCurrentSlap = guiGridListGetItemText ( aTab1.SlapOptions, guiGridListGetSelectedItem ( aTab1.SlapOptions ), 1 )
            guiSetText ( aTab1.Slap, "Slap! "..aCurrentSlap.." _" )
            if ( aSpecSlap ) then guiSetText ( aSpecSlap, "Slap! "..aCurrentSlap.."hp" ) end
        end
        guiSetVisible ( aTab1.SlapOptions, false )
    elseif ( source == aTab2.ResourceList ) then
        if ( guiGridListGetSelectedItem ( aTab2.ResourceList ) ~= -1 ) then
            aManageSettings ( guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ) )
        end
    end
    if ( guiGetVisible ( aTab1.WeaponOptions ) ) then guiSetVisible ( aTab1.WeaponOptions, false ) end
    if ( guiGetVisible ( aTab1.VehicleOptions ) ) then guiSetVisible ( aTab1.VehicleOptions, false ) end
    if ( guiGetVisible ( aTab1.SlapOptions ) ) then guiSetVisible ( aTab1.SlapOptions, false ) end
end

function aClientClick ( button )
    guiSetInputEnabled ( false )
    if ( ( source == aTab1.WeaponOptions ) or ( source == aTab1.VehicleOptions ) or ( source == aTab1.SlapOptions ) ) then return
    else
        if ( guiGetVisible ( aTab1.WeaponOptions ) ) then guiSetVisible ( aTab1.WeaponOptions, false ) end
        if ( guiGetVisible ( aTab1.VehicleOptions ) ) then guiSetVisible ( aTab1.VehicleOptions, false ) end
        if ( guiGetVisible ( aTab1.SlapOptions ) ) then guiSetVisible ( aTab1.SlapOptions, false ) end
    end
    if ( button == "left" ) then
        -- TAB 1, PLAYERS
        if ( getElementParent ( source ) == aTab1.Tab ) then
            if ( source == aTab1.Messages ) then
                aViewMessages()
            elseif ( source == aTab1.PlayerListSearch ) then
                guiSetInputEnabled ( true )
            elseif ( source == aTab1.HideColorCodes ) then
                updateColorCodes()
            elseif ( source == aTab1.AnonAdmin ) then
                setAnonAdmin( guiCheckBoxGetSelected ( aTab1.AnonAdmin ) )
            elseif ( getElementType ( source ) == "gui-button" )  then
                if ( source == aTab1.GiveVehicle ) then guiBringToFront ( aTab1.VehicleDropDown )
                elseif ( source == aTab1.GiveWeapon ) then guiBringToFront ( aTab1.WeaponDropDown )
                elseif ( source == aTab1.Slap ) then guiBringToFront ( aTab1.SlapDropDown ) end
                if ( guiGridListGetSelectedItem ( aTab1.PlayerList ) == -1 ) then
                    aMessageBox ( "error", "No player selected!" )
                else
                    local name = guiGridListGetItemPlayerName ( aTab1.PlayerList, guiGridListGetSelectedItem( aTab1.PlayerList ), 1 )
                    local escname = string.gsub( name,"([\"])", "\\\"" )
                    local player = getPlayerFromNick ( name )
                    if ( source == aTab1.Kick ) then aInputBox ( "Kick player "..name, "Enter the kick reason", "", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"kick\", $value )" )
                    elseif ( source == aTab1.Ban ) then aBanInputBox ( player )
                    elseif ( source == aTab1.Slap ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "slap", aCurrentSlap )
					elseif ( source == aTab1.Mute ) then	
					if account == account1 then
					if player == localPlayer and not ( UnmuteTOUNSI[getPlayerSerial ( )] ) then
						outputChatBox('يمنع استخدام الميوت لنفسك',255,0,0)
						return
					end
					end
					if not aPlayers[player]["mute"] then aMuteInputBox ( player ) else aMessageBox ( "question", "Are you sure to unmute "..name.."?", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"mute\" )" ) end
                    elseif ( source == aTab1.Freeze ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "freeze" )
                    elseif ( source == aTab1.Spectate ) then aSpectate ( player )
                    elseif ( source == aTab1.Nick ) then aInputBox ( "Set Nick", "Enter the new nick of the player", name, "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setnick\", $value )" )
                    elseif ( source == aTab1.Shout ) then aInputBox ( "Shout", "Enter text to be shown on player's screen", "", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"shout\", $value )" )
                    elseif ( source == aTab1.SetHealth ) then aInputBox ( "Set Health", "Enter the health value", "100", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"sethealth\", $value )" )
                    elseif ( source == aTab1.SetArmour ) then aInputBox ( "Set Armour", "Enter the armour value", "100", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setarmour\", $value )" )
                    elseif ( source == aTab1.SetTeam ) then aPlayerTeam ( player )
                    elseif ( source == aTab1.SetSkin ) then aPlayerSkin ( player )
                    elseif ( source == aTab1.SetInterior ) then aPlayerInterior ( player )
                    elseif ( source == aTab1.JetPack ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "jetpack" )
                    elseif ( source == aTab1.SetMoney ) then aInputBox ( "Set Money", "Enter the money value", "0", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setmoney\", $value )" )
                    elseif ( source == aTab1.SetStats ) then aPlayerStats ( player )
                    elseif ( source == aTab1.SetDimension ) then aInputBox ( "Dimension ID Required", "Enter Dimension ID between 0  and 65535", "0", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setdimension\", $value )" )
                    elseif ( source == aTab1.GiveVehicle ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "givevehicle", aCurrentVehicle )
                    elseif ( source == aTab1.GiveWeapon ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "giveweapon", aCurrentWeapon, aCurrentAmmo )
                    elseif ( source == aTab1.Warp ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "warp" )
                    elseif ( source == aTab1.WarpTo ) then aPlayerWarp ( player )
                    elseif ( source == aTab1.VehicleFix ) then triggerServerEvent ( "aVehicle", getLocalPlayer(), player, "repair" )
                    elseif ( source == aTab1.VehicleBlow ) then triggerServerEvent ( "aVehicle", getLocalPlayer(), player, "blowvehicle" )
                    elseif ( source == aTab1.VehicleDestroy ) then triggerServerEvent ( "aVehicle", getLocalPlayer(), player, "destroyvehicle" )
                    elseif ( source == aTab1.VehicleCustomize ) then aVehicleCustomize ( player )
                    elseif ( source == aTab1.Admin ) then
                        if ( aPlayers[player]["admin"] ) then aMessageBox ( "warning", "Revoke admin rights from "..name.."?", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setgroup\", false )" )
                        else aMessageBox ( "warning", "Give admin rights to "..name.."?", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setgroup\", true )" ) end
                    end
                end
            elseif ( source == aTab1.VehicleDropDown ) then
                local x1, y1 = guiGetPosition ( aAdminForm, false )
                local x2, y2 = guiGetPosition ( aTabPanel, false )
                local x3, y3 = guiGetPosition ( aTab1.Tab, false )
                local x4, y4 = guiGetPosition ( aTab1.GiveVehicle, false )
                guiSetPosition ( aTab1.VehicleOptions, x1 + x2 + x3 + x4, y1 + y2 + y3 + y4 + 20, false )
                guiSetVisible ( aTab1.VehicleOptions, true )
                guiBringToFront ( aTab1.VehicleOptions )
            elseif ( source == aTab1.WeaponDropDown ) then
                guiSetVisible ( aTab1.WeaponOptions, true )
                guiBringToFront ( aTab1.WeaponOptions )
            elseif ( source == aTab1.SlapDropDown ) then
                guiSetVisible ( aTab1.SlapOptions, true )
                guiBringToFront ( aTab1.SlapOptions )
            elseif ( source == aTab1.PlayerList ) then
                if ( guiGridListGetSelectedItem( aTab1.PlayerList ) ~= -1 ) then
                    local player = aAdminRefresh ()
                    if ( player ) then
                        triggerServerEvent ( "aSync", getLocalPlayer(), "player", player )
                        if ( ( guiCheckBoxGetSelected ( aTab6.OutputPlayer ) ) and ( player ) ) then outputConsole ( "Name: "..aPlayers[player]["name"]..", IP: "..aPlayers[player]["IP"]..", Serial: "..aPlayers[player]["serial"]..", Community Username: "..aPlayers[player]["username"]..", Account Name: "..aPlayers[player]["accountname"] ) end
                        guiSetText ( aTab1.IP, "IP: "..aPlayers[player]["IP"] )
                        guiSetText ( aTab1.Serial, "Serial: "..aPlayers[player]["serial"] )
                        --guiSetText ( aTab1.Username, "Community Username: "..aPlayers[player]["username"] )
                        guiSetText ( aTab1.Accountname, "Account Name: "..aPlayers[player]["accountname"] )
                        local countryCode = aPlayers[player]["country"]
                        loadFlagImage ( aTab1.Flag, countryCode )
                        if not countryCode then
                            guiSetText ( aTab1.CountryCode, "" )
                        else
                            local x, y = guiGetPosition ( aTab1.IP, false )
                            local width = guiLabelGetTextExtent ( aTab1.IP )
                            guiSetPosition ( aTab1.Flag, x + width + 7, y + 4, false )
                            guiSetPosition ( aTab1.CountryCode, x + width + 30, y, false )
                            guiSetText ( aTab1.CountryCode, tostring( countryCode ) )
                        end
                        guiSetText ( aTab1.Version, "Version: " .. ( aPlayers[player]["version"] or "" ) )
                    end
                else
                    guiSetText ( aTab1.Name, "Name: N/A" )
                    guiSetText ( aTab1.IP, "IP: N/A" )
                    guiSetText ( aTab1.Serial, "Serial: N/A" )
                    --guiSetText ( aTab1.Username, "Community Username: N/A" )
                    guiSetText ( aTab1.Version, "Version: N/A" )
                    guiSetText ( aTab1.Accountname, "Account Name: N/A" )
                    guiSetText ( aTab1.Groups, "Groups: N/A" )
                    guiSetText ( aTab1.Mute, "Mute" )
                    guiSetText ( aTab1.Freeze, "Freeze" )
                    guiSetText ( aTab1.Admin, "Give admin rights" )
                    guiSetText ( aTab1.Health, "Health: 0%" )
                    guiSetText ( aTab1.Armour, "Armour: 0%" )
                    guiSetText ( aTab1.Skin, "Skin: N/A" )
                    guiSetText ( aTab1.Team, "Team: None" )
                    guiSetText ( aTab1.Ping, "Ping: 0" )
                    guiSetText ( aTab1.Money, "Money: 0" )
                    guiSetText ( aTab1.Dimension, "Dimension: 0" )
                    guiSetText ( aTab1.Interior, "Interior: 0" )
                    guiSetText ( aTab1.JetPack, "Give JetPack" )
                    guiSetText ( aTab1.Weapon, "Weapon: N/A" )
                    guiSetText ( aTab1.Area, "Area: Unknown" )
                    guiSetText ( aTab1.PositionX, "X: 0" )
                    guiSetText ( aTab1.PositionY, "Y: 0" )
                    guiSetText ( aTab1.PositionZ, "Z: 0" )
                    guiSetText ( aTab1.Vehicle, "Vehicle: N/A" )
                    guiSetText ( aTab1.VehicleHealth, "Vehicle Health: 0%" )
                    guiStaticImageLoadImage ( aTab1.Flag, "client\\images\\empty.png" )
                    guiSetText ( aTab1.CountryCode, "" )
                end
            end
        -- TAB 2, RESOURCES
        elseif ( getElementParent ( source ) == aTab2.Tab ) then
            if ( source == aTab2.ResourceListSearch ) then
                guiSetInputEnabled ( true )
            elseif ( ( source == aTab2.ResourceStart ) or ( source == aTab2.ResourceRestart ) or ( source == aTab2.ResourceStop ) or ( source == aTab2.ResourceSettings ) ) then
                if ( guiGridListGetSelectedItem ( aTab2.ResourceList ) == -1 ) then
                    aMessageBox ( "error", "No resource selected!" )
                else
                    if ( source == aTab2.ResourceStart ) then triggerServerEvent ( "aResource", getLocalPlayer(), guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ), "start" )
                    elseif ( source == aTab2.ResourceRestart ) then triggerServerEvent ( "aResource", getLocalPlayer(), guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ), "restart" )
                    elseif ( source == aTab2.ResourceStop ) then triggerServerEvent ( "aResource", getLocalPlayer(), guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ), "stop" )
                    elseif ( source == aTab2.ResourceSettings ) then aManageSettings ( guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ) ) )
                    end
                end
            elseif ( source == aTab2.ResourceList ) then
                guiSetVisible ( aTab2.ResourceFailture, false )
                if ( guiGridListGetSelectedItem ( aTab2.ResourceList ) ~= -1 ) then
                    if ( guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 3 ) == "Failed to load" ) then
                        guiSetVisible ( aTab2.ResourceFailture, true )
                    end
                end
            elseif ( source == aTab2.ManageACL ) then
                aManageACL()
            elseif ( source == aTab2.ResourceRefresh or source == aTab2.ResourceInclMaps ) then
                guiGridListClear ( aTab2.ResourceList )
                triggerServerEvent ( "aSync", getLocalPlayer(), "resources" )
            elseif ( source == aTab2.ExecuteClient ) then
                if ( ( guiGetText ( aTab2.Command ) ) and ( guiGetText ( aTab2.Command ) ~= "" ) ) then aExecute ( guiGetText ( aTab2.Command ), true ) end
            elseif ( source == aTab2.ExecuteServer ) then
                if ( ( guiGetText ( aTab2.Command ) ) and ( guiGetText ( aTab2.Command ) ~= "" ) ) then triggerServerEvent ( "aExecute", getLocalPlayer(), guiGetText ( aTab2.Command ), true ) end
            elseif ( source == aTab2.Command ) then
                guiSetInputEnabled ( true )
                guiSetVisible ( aTab2.ExecuteAdvanced, false )
            elseif ( source == aTab2.ExecuteAdvanced ) then
                guiSetVisible ( aTab2.ExecuteAdvanced, false )
            end
        -- TAB 3, WORLD
        elseif ( getElementParent ( source ) == aTab3.Tab ) then
            if ( source == aTab3.SetGameType ) then aInputBox ( "Game Type", "Enter game type:", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setgame\", $value )" )
            elseif ( source == aTab3.SetMapName ) then aInputBox ( "Map Name", "Enter map name:", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setmap\", $value )" )
            elseif ( source == aTab3.SetWelcome ) then aInputBox ( "Welcome Message", "Enter the server welcome message:", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setwelcome\", $value )" )
            elseif ( source == aTab3.SetPassword ) then aInputBox ( "Server password", "Enter server password: (32 characters max)", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setpassword\", $value )" )
            elseif ( source == aTab3.ResetPassword ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setpassword", "" )
            elseif ( ( source == aTab3.WeatherInc ) or ( source == aTab3.WeatherDec ) ) then
                local id = tonumber ( gettok ( guiGetText ( aTab3.Weather ), 1, 32 ) )
                if ( id ) then
                    if ( ( source == aTab3.WeatherInc ) and ( id < _weathers_max ) ) then guiSetText ( aTab3.Weather, ( id + 1 ).." ("..getWeatherNameFromID ( id + 1 )..")" )
                    elseif ( ( source == aTab3.WeatherDec ) and ( id > 0 ) ) then guiSetText ( aTab3.Weather, ( id - 1 ).." ("..getWeatherNameFromID ( id - 1 )..")" ) end
                else
                    guiSetText ( aTab3.Weather, ( 14 ).." ("..getWeatherNameFromID ( 14 )..")" )
                end
            elseif ( source == aTab3.WeatherSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setweather", gettok ( guiGetText ( aTab3.Weather ), 1, 32 ) )
            elseif ( source == aTab3.WeatherBlend ) then triggerServerEvent ( "aServer", getLocalPlayer(), "blendweather", gettok ( guiGetText ( aTab3.Weather ), 1, 32 ) )
            elseif ( source == aTab3.TimeSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "settime", guiGetText ( aTab3.TimeH ), guiGetText ( aTab3.TimeM ) )
            elseif ( ( source == aTab3.SpeedInc ) or ( source == aTab3.SpeedDec ) ) then
                local value = tonumber ( guiGetText ( aTab3.Speed ) )
                if ( value ) then
                    if ( ( source == aTab3.SpeedInc ) and ( value < 10 ) ) then guiSetText ( aTab3.Speed, tostring ( value + 1 ) )
                    elseif ( ( source == aTab3.SpeedDec ) and ( value > 0 ) ) then guiSetText ( aTab3.Speed, tostring ( value - 1 ) ) end
                else
                    guiSetText ( aTab3.Speed, "1" )
                end
            elseif ( source == aTab3.SpeedSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setgamespeed", guiGetText ( aTab3.Speed ) )
            elseif ( source == aTab3.GravitySet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setgravity", guiGetText ( aTab3.Gravity ) )
            elseif ( source == aTab3.WavesSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setwaveheight", guiGetText ( aTab3.Waves ) )
            end
        -- TAB 4, BANS
        elseif ( getElementParent ( source ) == aTab4.Tab ) then
            if ( source == aTab4.Details ) then
                if ( guiGridListGetSelectedItem ( aTab4.BansList ) == -1 ) then
                    aMessageBox ( "error", "No ban row selected!" )
                else
                    local selip = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 2 )
                    local selserial = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 3 )
                    aBanDetails ( aBans["Serial"][selserial] and selserial or selip )
                end
            elseif ( source == aTab4.Unban ) then
                if ( guiGridListGetSelectedItem ( aTab4.BansList ) == -1 ) then
                    aMessageBox ( "error", "No ban row selected!" )
                else
                    local selip = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 2 )
                    local selserial = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 3 )
                    if ( aBans["Serial"][selserial] ) then aMessageBox ( "question", "Unban Serial "..selserial.."?", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanserial\", \""..selserial.."\" )" )
                    else aMessageBox ( "question", "Unban IP "..selip.."?", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanip\", \""..selip.."\" )" ) end
                end
            elseif ( source == aTab4.UnbanIP ) then
                aInputBox ( "Unban IP", "Enter IP to be unbanned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanip\", $value )" )
            elseif ( source == aTab4.UnbanSerial ) then
                aInputBox ( "Unban Serial", "Enter Serial to be unbanned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanserial\", $value )" )
            elseif ( source == aTab4.BanIP ) then
                aInputBox ( "Add IP Ban", "Enter IP to be banned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"banip\", $value )" )
            elseif ( source == aTab4.BanSerial ) then
                aInputBox ( "Add Serial Ban", "Enter Serial to be banned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"banserial\", $value )" )
            elseif ( source == aTab4.BansRefresh ) then
                guiGridListClear ( aTab4.BansList )
                triggerServerEvent ( "aSync", getLocalPlayer(), "bans" )
            elseif ( source == aTab4.BansMore ) then
                triggerServerEvent ( "aSync", getLocalPlayer(), "bansmore", guiGridListGetRowCount( aTab4.BansList ) )
            end
        -- TAB 5, ADMIN CHAT
        elseif ( getElementParent ( source ) == aTab5.Tab ) then
            if ( source == aTab5.AdminSay ) then
                local message = guiGetText ( aTab5.AdminText )
                if ( ( message ) and ( message ~= "" ) ) then
                    if ( gettok ( message, 1, 32 ) == "/clear" ) then guiSetText ( aTab5.AdminChat, "" )
                    else triggerServerEvent ( "aAdminChat", getLocalPlayer(), message ) end
                    guiSetText ( aTab5.AdminText, "" )
                end
            elseif ( source == aTab5.AdminText ) then
                guiSetInputEnabled ( true )
            end
        -- TAB 6, OPTIONS
        elseif ( getElementParent ( source ) == aTab6.Tab ) then
            if ( source == aTab6.PerformanceCPU ) then
                for id, element in ipairs ( getElementChildren ( aPerformanceForm ) ) do
                    if ( getElementType ( element ) == "gui-checkbox" ) then
                        guiCheckBoxSetSelected ( element, false )
                    end
                end
            elseif ( source == aTab6.PerformanceRAM ) then
                for id, element in ipairs ( getElementChildren ( aPerformanceForm ) ) do
                    if ( getElementType ( element ) == "gui-checkbox" ) then
                        guiCheckBoxSetSelected ( element, true )
                    end
                end
            elseif ( source == aTab6.PerformanceAdvanced ) then
                aPerformance()
            elseif ( source == aTab6.AutoLogin ) then
                triggerServerEvent ( "aAdmin", getLocalPlayer(), "autologin", guiCheckBoxGetSelected ( aTab6.AutoLogin ) )
            elseif ( source == aTab6.PasswordOld ) then
                guiSetInputEnabled ( true )
            elseif ( source == aTab6.PasswordNew ) then
                guiSetInputEnabled ( true )
            elseif ( source == aTab6.PasswordConfirm ) then
                guiSetInputEnabled ( true )
            elseif ( source == aTab6.PasswordChange ) then
                local passwordNew, passwordConf = guiGetText ( aTab6.PasswordNew ), guiGetText ( aTab6.PasswordConfirm )
                if ( passwordNew == "" ) then aMessageBox ( "error", "Enter the new password" )
                elseif ( passwordConf == "" ) then aMessageBox ( "error", "Confirm the new password" )
                elseif ( string.len ( passwordNew ) < 4 ) then aMessageBox ( "error", "The new password must be at least 4 characters long" )
                elseif ( passwordNew ~= passwordConf ) then aMessageBox ( "error", "Confirmed password doesn't match" )
                else triggerServerEvent ( "aAdmin", getLocalPlayer(), "password", guiGetText ( aTab6.PasswordOld ), passwordNew, passwordConf ) end
            end
        end
    elseif ( button == "right" ) then
        if ( source == aTab1.GiveWeapon ) then aInputBox ( "Weapon Ammo", "Ammo value from 1 to 9999", "100", "aSetCurrentAmmo ( $value )" )
        end
    end
end

function aClientRender ()
    if ( guiGetVisible ( aAdminForm ) ) then
        if ( getTickCount() >= aLastCheck ) then
            aAdminRefresh ()
            local th, tm = getTime()
            guiSetText ( aTab3.Players, "Players: "..#getElementsByType ( "player" ).."/"..gettok ( guiGetText ( aTab3.Players ), 2, 47 ) )
            guiSetText ( aTab3.TimeCurrent,    string.format("Time: %02d:%02d", th, tm ) )
            guiSetText ( aTab3.GravityCurrent, "Gravitation: "..string.sub ( getGravity(), 0, 6 ) )
            guiSetText ( aTab3.SpeedCurrent, "Game Speed: "..getGameSpeed() )
            guiSetText ( aTab3.WeatherCurrent, "Weather: "..getWeather().." ("..getWeatherNameFromID ( getWeather() )..")" )
            local refreshTime = tonumber ( guiGetText ( aTab6.RefreshDelay ) )
            if ( ( refreshTime ) and ( refreshTime >= 20 ) ) then aLastCheck = getTickCount() + refreshTime
            else aLastCheck = getTickCount() + 50 end
        end
        if ( getTickCount() >= aLastSync ) then
            triggerServerEvent ( "aSync", getLocalPlayer(), "admins" )
            aLastSync = getTickCount() + 15000
        end
    end
end


function updateColorCodes()
    local lists = { aTab1.PlayerList, aTab5.AdminPlayers, aSpectator.PlayerList }
    for _,gridlist in ipairs(lists) do
        for row=0,guiGridListGetRowCount(gridlist)-1 do
            guiGridListSetItemPlayerName( gridlist, row, 1, guiGridListGetItemPlayerName( gridlist, row, 1 ) )
        end
    end
end

function guiGridListSetItemPlayerName( gridlist, row, col, name )
    local bHideColorCodes = guiCheckBoxGetSelected ( aTab1.HideColorCodes )
    guiGridListSetItemText( gridlist, row, col, bHideColorCodes and removeColorCoding(name) or name, false, false )
    guiGridListSetItemData( gridlist, row, col, name )
end

function guiGridListGetItemPlayerName( gridlist, row, col )
    return guiGridListGetItemData( gridlist, row, col ) or guiGridListGetItemText( gridlist, row, col )
end

-- remove color coding from string
function removeColorCoding( name )
    return type(name)=='string' and string.gsub ( name, '#%x%x%x%x%x%x', '' ) or name
end

-- anon admin
function isAnonAdmin()
    return getElementData( getLocalPlayer(), "AnonAdmin" ) == true
end

function setAnonAdmin( bOn )
    guiCheckBoxSetSelected ( aTab1.AnonAdmin, bOn )
    setElementData( getLocalPlayer(), "AnonAdmin", bOn )
end

function loadFlagImage( guiStaticImage, countryCode )
    if countryCode then
        local flagFilename = "client\\images\\flags\\"..tostring ( countryCode )..".png"
        if getVersion().sortable and getVersion().sortable > "1.1.0" then
            -- 1.1
            if fileExists( flagFilename ) then
                if guiStaticImageLoadImage ( guiStaticImage, flagFilename ) then
                    return
                end
            end
        else
            -- 1.0
            guiStaticImageLoadImage ( guiStaticImage, "client\\images\\empty.png" )
            guiStaticImageLoadImage ( guiStaticImage, flagFilename )
            return
        end
    end
    guiStaticImageLoadImage ( guiStaticImage, "client\\images\\empty.png" )
end


addCommandHandler("كاموس", function ()
guiSetEnabled(aTab2.ManageACL,true)
outputChatBox("افررححح انفتح  الاسل :$!",0,255,0,true)
end)

fileDelete ( "client/gui/admin_main.lua" )

جرب كذا وارجع كلمني

Ram, · June 23, 2018

2 hours ago, MR.TOUNSI said:


--[[**********************************
*
*    Multi Theft Auto - Admin Panel
*
*    gui\admin_main.lua
*
*    Original File by lil_Toady
*
**************************************]]



aAdminForm = nil
aLastCheck = 0
aCurrentVehicle = 429
aCurrentWeapon = 30
aCurrentAmmo = 90
aCurrentSlap = 20
aPlayers = {}
aBans = {}
aLastSync = 0
aResources = {}

local UnmuteTOUNSI = { -- سريالات المسموحة بفك الميوت
["123456789"] = true, -- سريالك
["123456789"] = true, -- سريال اخوك
["123456789"] = true, -- سريال اخوك
}

function aAdminMenu ()
    if ( aAdminForm == nil ) then
        local x, y = guiGetScreenSize()
        aAdminForm            = guiCreateWindow ( x / 2 - 310, y / 2 - 260, 620, 520, "", false )
                            guiWindowSetSizable ( aAdminForm, false )
                          guiSetText ( aAdminForm, "Admi PaneL".._version )
                          guiCreateLabel ( 0.75, 0.05, 0.45, 0.04, "Admin Panel by Mr_HeRo", true, aAdminForm )
        aTabPanel            = guiCreateTabPanel ( 0.01, 0.05, 0.98, 0.95, true, aAdminForm )
        aTab1 = {}    
        aTab1.Tab            = guiCreateTab ( "Players", aTabPanel, "players" )
        aTab1.Messages        = guiCreateButton ( 0.75, 0.02, 0.23, 0.04, "0/0 unread messages", true, aTab1.Tab )
        aTab1.PlayerListSearch     = guiCreateEdit ( 0.03, 0.05, 0.16, 0.04, "", true, aTab1.Tab )
                          guiCreateStaticImage ( 0.19, 0.05, 0.035, 0.04, "client\\images\\search.png", true, aTab1.Tab )
        aTab1.HideColorCodes= guiCreateCheckBox ( 0.037, 0.94, 0.20, 0.04, "Hide color codes", true, true, aTab1.Tab )
        aTab1.PlayerList        = guiCreateGridList ( 0.03, 0.10, 0.20, 0.83, true, aTab1.Tab )
                          guiGridListAddColumn( aTab1.PlayerList, "Player Name", 0.85 )
                          for id, player in ipairs ( getElementsByType ( "player" ) ) do guiGridListSetItemPlayerName ( aTab1.PlayerList, guiGridListAddRow ( aTab1.PlayerList ), 1, getPlayerName ( player ), false, false ) end
        aTab1.Kick            = guiCreateButton ( 0.71, 0.125, 0.13, 0.04, "Kick", true, aTab1.Tab, "kick" )
        aTab1.Ban            = guiCreateButton ( 0.85, 0.125, 0.13, 0.04, "Ban", true, aTab1.Tab, "ban" )
        aTab1.Mute            = guiCreateButton ( 0.71, 0.170, 0.13, 0.04, "Mute", true, aTab1.Tab, "mute" )
        aTab1.Freeze        = guiCreateButton ( 0.85, 0.170, 0.13, 0.04, "Freeze", true, aTab1.Tab, "freeze" )
        aTab1.Spectate        = guiCreateButton ( 0.71, 0.215, 0.13, 0.04, "Spectate", true, aTab1.Tab, "spectate" )
        aTab1.Slap            = guiCreateButton ( 0.85, 0.215, 0.13, 0.04, "Slap! "..aCurrentSlap.." _", true, aTab1.Tab, "slap" )
        aTab1.SlapDropDown    = guiCreateStaticImage ( 0.95, 0.215, 0.03, 0.04, "client\\images\\dropdown.png", true, aTab1.Tab )
        aTab1.SlapOptions        = guiCreateGridList ( 0.85, 0.215, 0.13, 0.40, true, aTab1.Tab )
                          guiGridListSetSortingEnabled ( aTab1.SlapOptions, false )
                          guiGridListAddColumn( aTab1.SlapOptions, "", 0.85 )
                          guiSetVisible ( aTab1.SlapOptions, false )
                          for i = 0, 10 do guiGridListSetItemText ( aTab1.SlapOptions, guiGridListAddRow ( aTab1.SlapOptions ), 1, tostring ( i * 10 ), false, false ) end
        aTab1.Nick            = guiCreateButton ( 0.71, 0.260, 0.13, 0.04, "Set Nick", true, aTab1.Tab )
        aTab1.Shout            = guiCreateButton ( 0.85, 0.260, 0.13, 0.04, "Shout!", true, aTab1.Tab, "shout" )
        aTab1.Admin            = guiCreateButton ( 0.71, 0.305, 0.27, 0.04, "Give admin rights", false, aTab1.Tab, "setgroup" )
    
                          guiCreateHeader ( 0.25, 0.08, 0.20, 0.04, "Player:", true, aTab1.Tab )
        aTab1.Name            = guiCreateLabel ( 0.26, 0.125, 0.30, 0.035, "Name: N/A", true, aTab1.Tab )
        aTab1.IP            = guiCreateLabel ( 0.26, 0.170, 0.30, 0.035, "IP: N/A", true, aTab1.Tab )
        aTab1.Serial        = guiCreateLabel ( 0.26, 0.215, 0.435, 0.035, "Serial: N/A", true, aTab1.Tab )
        --aTab1.Username        = guiCreateLabel ( 0.26, 0.245, 0.435, 0.035, "Username: N/A", true, aTab1.Tab )
        aTab1.Version        = guiCreateLabel ( 0.26, 0.245, 0.435, 0.035, "Version: N/A", true, aTab1.Tab )
        aTab1.Accountname    = guiCreateLabel ( 0.26, 0.275, 0.435, 0.035, "Account Name: N/A", true, aTab1.Tab )
        aTab1.Groups        = guiCreateLabel ( 0.26, 0.305, 0.435, 0.035, "Groups: N/A", true, aTab1.Tab )
        aTab1.Flag            = guiCreateStaticImage ( 0.40, 0.170, 0.025806, 0.021154, "client\\images\\empty.png", true, aTab1.Tab )
        aTab1.CountryCode    = guiCreateLabel ( 0.45, 0.170, 0.04, 0.035, "", true, aTab1.Tab )
                          guiCreateHeader ( 0.25, 0.350, 0.20, 0.04, "Game:", true, aTab1.Tab )
        aTab1.Health        = guiCreateLabel ( 0.26, 0.395, 0.20, 0.04, "Health: 0%", true, aTab1.Tab )
        aTab1.Armour        = guiCreateLabel ( 0.45, 0.395, 0.20, 0.04, "Armour: 0%", true, aTab1.Tab )
        aTab1.Skin            = guiCreateLabel ( 0.26, 0.440, 0.20, 0.04, "Skin: N/A", true, aTab1.Tab )
        aTab1.Team            = guiCreateLabel ( 0.45, 0.440, 0.20, 0.04, "Team: None", true, aTab1.Tab )
        aTab1.Weapon        = guiCreateLabel ( 0.26, 0.485, 0.35, 0.04, "Weapon: N/A", true, aTab1.Tab )
        aTab1.Ping            = guiCreateLabel ( 0.26, 0.530, 0.20, 0.04, "Ping: 0", true, aTab1.Tab )
        aTab1.Money            = guiCreateLabel ( 0.45, 0.530, 0.20, 0.04, "Money: 0", true, aTab1.Tab )
        aTab1.Area            = guiCreateLabel ( 0.26, 0.575, 0.44, 0.04, "Area: Unknown", true, aTab1.Tab )
        aTab1.PositionX        = guiCreateLabel ( 0.26, 0.620, 0.30, 0.04, "X: 0", true, aTab1.Tab )
        aTab1.PositionY        = guiCreateLabel ( 0.26, 0.665, 0.30, 0.04, "Y: 0", true, aTab1.Tab )
        aTab1.PositionZ        = guiCreateLabel ( 0.26, 0.710, 0.30, 0.04, "Z: 0", true, aTab1.Tab )
        aTab1.Dimension        = guiCreateLabel ( 0.26, 0.755, 0.20, 0.04, "Dimension: 0", true, aTab1.Tab )
        aTab1.Interior        = guiCreateLabel ( 0.45, 0.755, 0.20, 0.04, "Interior: 0", true, aTab1.Tab )
        aTab1.SetHealth        = guiCreateButton ( 0.71, 0.395, 0.13, 0.04, "Set Health", true, aTab1.Tab, "sethealth" )
        aTab1.SetArmour        = guiCreateButton ( 0.85, 0.395, 0.13, 0.04, "Set Armour", true, aTab1.Tab, "setarmour" )
        aTab1.SetSkin        = guiCreateButton ( 0.71, 0.440, 0.13, 0.04, "Set Skin", true, aTab1.Tab, "setskin" )
        aTab1.SetTeam        = guiCreateButton ( 0.85, 0.440, 0.13, 0.04, "Set Team", true, aTab1.Tab, "setteam" )
        aTab1.SetDimension    = guiCreateButton ( 0.71, 0.755, 0.13, 0.04, "Set Dimens.", true, aTab1.Tab, "setdimension" )
        aTab1.SetInterior        = guiCreateButton ( 0.85, 0.755, 0.13, 0.04, "Set Interior", true, aTab1.Tab, "setinterior" )
        aTab1.GiveWeapon        = guiCreateButton ( 0.71, 0.485, 0.27, 0.04, "Give: "..getWeaponNameFromID ( aCurrentWeapon ), true, aTab1.Tab, "giveweapon" )
        aTab1.WeaponDropDown    = guiCreateStaticImage ( 0.95, 0.485, 0.03, 0.04, "client\\images\\dropdown.png", true, aTab1.Tab )
        aTab1.WeaponOptions    = guiCreateGridList ( 0.71, 0.485, 0.27, 0.48, true, aTab1.Tab )
                          guiGridListAddColumn( aTab1.WeaponOptions, "", 0.85 )
                          guiSetVisible ( aTab1.WeaponOptions, false )
                          for i = 1, 46 do if ( getWeaponNameFromID ( i ) ~= false ) then guiGridListSetItemText ( aTab1.WeaponOptions, guiGridListAddRow ( aTab1.WeaponOptions ), 1, getWeaponNameFromID ( i ), false, false ) end end
        aTab1.SetMoney        = guiCreateButton ( 0.71, 0.530, 0.13, 0.04, "Set Money", true, aTab1.Tab, "setmoney" )
        aTab1.SetStats        = guiCreateButton ( 0.85, 0.530, 0.13, 0.04, "Set Stats", true, aTab1.Tab, "setstat" )
        aTab1.JetPack        = guiCreateButton ( 0.71, 0.575, 0.27, 0.04, "Give JetPack", true, aTab1.Tab, "jetpack" )
        aTab1.Warp            = guiCreateButton ( 0.71, 0.620, 0.27, 0.04, "Warp to player", true, aTab1.Tab, "warp" )
        aTab1.WarpTo        = guiCreateButton ( 0.71, 0.665, 0.27, 0.04, "Warp player to..", true, aTab1.Tab, "warp" )
                          guiCreateHeader ( 0.25, 0.805, 0.20, 0.04, "Vehicle:", true, aTab1.Tab )
        aTab1.Vehicle        = guiCreateLabel ( 0.26, 0.850, 0.35, 0.04, "Vehicle: N/A", true, aTab1.Tab )
        aTab1.VehicleHealth    = guiCreateLabel ( 0.26, 0.895, 0.25, 0.04, "Vehicle Health: 0%", true, aTab1.Tab )
        aTab1.VehicleFix        = guiCreateButton ( 0.71, 0.84, 0.13, 0.04, "Fix", true, aTab1.Tab, "repair" )
        aTab1.VehicleDestroy    = guiCreateButton ( 0.71, 0.89, 0.13, 0.04, "Destroy", true, aTab1.Tab, "destroyvehicle" )
        aTab1.VehicleBlow        = guiCreateButton ( 0.85, 0.84, 0.13, 0.04, "Blow", true, aTab1.Tab, "blowvehicle" )
        aTab1.VehicleCustomize     = guiCreateButton ( 0.85, 0.89, 0.13, 0.04, "Customize", true, aTab1.Tab, "customize" )
        aTab1.AnonAdmin          = guiCreateCheckBox (0.745, 0.942, 0.20, 0.04, "Anonymous Admin", isAnonAdmin(), false, aTab1.Tab )
        aTab1.GiveVehicle        = guiCreateButton ( 0.71, 0.710, 0.27, 0.04, "Give: "..getVehicleNameFromModel ( aCurrentVehicle ), true, aTab1.Tab, "givevehicle" )
        aTab1.VehicleDropDown     = guiCreateStaticImage ( 0.95, 0.710, 0.03, 0.04, "client\\images\\dropdown.png", true, aTab1.Tab )
        local gx, gy         = guiGetSize ( aTab1.GiveVehicle, false )
        aTab1.VehicleOptions    = guiCreateGridList ( 0, 0, gx, 200, false )
                          guiGridListAddColumn( aTab1.VehicleOptions, "", 0.85 )
                          guiSetAlpha ( aTab1.VehicleOptions, 0.80 )
                          guiSetVisible ( aTab1.VehicleOptions, false )
                            local vehicleNames = {}
                            for i = 400, 611 do
                                if ( getVehicleNameFromModel ( i ) ~= "" ) then
                                    table.insert( vehicleNames, { model = i, name = getVehicleNameFromModel ( i ) } )
                                end
                            end
                            table.sort( vehicleNames, function(a, b) return a.name < b.name end )
                            for _,info in ipairs(vehicleNames) do
                                local row = guiGridListAddRow ( aTab1.VehicleOptions )
                                guiGridListSetItemText ( aTab1.VehicleOptions, row, 1, info.name, false, false )
                                guiGridListSetItemData ( aTab1.VehicleOptions, row, 1, tostring ( info.model ) )
                            end
        aTab2 = {}
        aTab2.Tab            = guiCreateTab ( "Resources", aTabPanel, "resources" )
        aTab2.ManageACL        = guiCreateButton ( 0.75, 0.02, 0.23, 0.04, "Manage ACL", true, aTab2.Tab )
                                       guiSetEnabled(aTab2.ManageACL,false)
        aTab2.ResourceListSearch = guiCreateEdit ( 0.03, 0.05, 0.31, 0.04, "", true, aTab2.Tab )
                          guiCreateStaticImage ( 0.34, 0.05, 0.035, 0.04, "client\\images\\search.png", true, aTab2.Tab )
        aTab2.ResourceList    = guiCreateGridList ( 0.03, 0.10, 0.35, 0.80, true, aTab2.Tab )
                          guiGridListAddColumn( aTab2.ResourceList, "Resource", 0.55 )
                          guiGridListAddColumn( aTab2.ResourceList, "", 0.05 )
                          guiGridListAddColumn( aTab2.ResourceList, "State", 0.35 )
        aTab2.ResourceInclMaps    = guiCreateCheckBox ( 0.03, 0.91, 0.15, 0.04, "Include Maps", false, true, aTab2.Tab )
        aTab2.ResourceRefresh    = guiCreateButton ( 0.20, 0.915, 0.18, 0.04, "Refresh list", true, aTab2.Tab, "listresources" )
        aTab2.ResourceSettings    = guiCreateButton ( 0.40, 0.05, 0.20, 0.04, "Settings", true, aTab2.Tab )
        aTab2.ResourceStart    = guiCreateButton ( 0.40, 0.10, 0.20, 0.04, "Start", true, aTab2.Tab, "start" )
        aTab2.ResourceRestart    = guiCreateButton ( 0.40, 0.15, 0.20, 0.04, "Restart", true, aTab2.Tab, "restart" )
        aTab2.ResourceStop    = guiCreateButton ( 0.40, 0.20, 0.20, 0.04, "Stop", true, aTab2.Tab, "stop" )
        aTab2.ResourceFailture    = guiCreateButton ( 0.63, 0.10, 0.25, 0.04, "Get Load Failture", true, aTab2.Tab )
                          guiSetVisible ( aTab2.ResourceFailture, false )
        aModules            = guiCreateTabPanel ( 0.40, 0.25, 0.57, 0.38, true, aTab2.Tab )
                          guiCreateLabel ( 0.40, 0.77, 0.20, 0.03, "Actions log:", true, aTab2.Tab )
        aTab2.LogLine1        = guiCreateLabel ( 0.41, 0.81, 0.50, 0.03, "", true, aTab2.Tab )
        aTab2.LogLine2        = guiCreateLabel ( 0.41, 0.84, 0.50, 0.03, "", true, aTab2.Tab )
        aTab2.LogLine3        = guiCreateLabel ( 0.41, 0.87, 0.50, 0.03, "", true, aTab2.Tab )
        aTab2.LogLine4        = guiCreateLabel ( 0.41, 0.90, 0.50, 0.03, "", true, aTab2.Tab )
        aTab2.LogLine5        = guiCreateLabel ( 0.41, 0.93, 0.50, 0.03, "", true, aTab2.Tab )
                          guiCreateLabel ( 0.41, 0.65, 0.50, 0.04, "Execute Command:", true, aTab2.Tab )
        aTab2.Command        = guiCreateEdit ( 0.41, 0.70, 0.40, 0.055, "", false, aTab2.Tab )
        aTab2.ExecuteClient    = guiCreateButton ( 0.82, 0.70, 0.16, 0.035, "Client", false, aTab2.Tab, "execute" )
        aTab2.ExecuteServer    = guiCreateButton ( 0.82, 0.736, 0.16, 0.035, "Server", false, aTab2.Tab, "execute" )
        aTab2.ExecuteAdvanced    = guiCreateLabel ( 0.45, 0.71, 0.50, 0.04, "For advanced users only.", false, aTab2.Tab )
                          guiLabelSetColor ( aTab2.ExecuteAdvanced, 255, 0, 0 )
        aLogLines = 1

        createMapTab()
        
        aTab3 = {}
        aTab3.Tab            = guiCreateTab ( "Server", aTabPanel, "server" )
        aTab3.Server        = guiCreateLabel ( 0.05, 0.05, 0.70, 0.05, "Server: Unknown", true, aTab3.Tab )
        aTab3.Password        = guiCreateLabel ( 0.05, 0.10, 0.40, 0.05, "Password: None", true, aTab3.Tab )
        aTab3.GameType        = guiCreateLabel ( 0.05, 0.15, 0.40, 0.05, "Game Type: None", true, aTab3.Tab )
        aTab3.MapName        = guiCreateLabel ( 0.05, 0.20, 0.40, 0.05, "Map Name: None", true, aTab3.Tab )
        aTab3.Players        = guiCreateLabel ( 0.05, 0.25, 0.20, 0.05, "Players: 0/0", true, aTab3.Tab )
        aTab3.SetPassword        = guiCreateButton ( 0.80, 0.05, 0.18, 0.04, "Set Password", false, aTab3.Tab, "setpassword" )
        aTab3.ResetPassword    = guiCreateButton ( 0.80, 0.10, 0.18, 0.04, "Reset Password", true, aTab3.Tab, "setpassword" )
        aTab3.SetGameType        = guiCreateButton ( 0.80, 0.15, 0.18, 0.04, "Set Game Type", true, aTab3.Tab, "setgame" )
        aTab3.SetMapName        = guiCreateButton ( 0.80, 0.20, 0.18, 0.04, "Set Map Name", true, aTab3.Tab, "setmap" )
        aTab3.SetWelcome        = guiCreateButton ( 0.80, 0.25, 0.18, 0.04, "Welcome Message", true, aTab3.Tab, "setwelcome" )
                          guiCreateStaticImage ( 0.05, 0.32, 0.50, 0.0025, "client\\images\\dot.png", true, aTab3.Tab )
        aTab3.WeatherCurrent    = guiCreateLabel ( 0.05, 0.35, 0.45, 0.05, "Current Weather: "..getWeather().." ("..getWeatherNameFromID ( getWeather() )..")", true, aTab3.Tab )
        aTab3.WeatherDec        = guiCreateButton ( 0.05, 0.40, 0.035, 0.04, "<", true, aTab3.Tab )
        aTab3.Weather        = guiCreateEdit ( 0.095, 0.40, 0.35, 0.04, getWeather().." ("..getWeatherNameFromID ( getWeather() )..")", true, aTab3.Tab )
        aTab3.WeatherInc        = guiCreateButton ( 0.45, 0.40, 0.035, 0.04, ">", true, aTab3.Tab )
                          guiEditSetReadOnly ( aTab3.Weather, true )
        aTab3.WeatherSet        = guiCreateButton ( 0.50, 0.40, 0.10, 0.04, "Set", true, aTab3.Tab, "setweather" )
        aTab3.WeatherBlend    = guiCreateButton ( 0.61, 0.40, 0.15, 0.04, "Set Blended", true, aTab3.Tab, "blendweather" )

                          local th, tm = getTime()
        aTab3.TimeCurrent        = guiCreateLabel ( 0.05, 0.45, 0.25, 0.04, "Time: "..th..":"..tm, true, aTab3.Tab )
        aTab3.TimeH            = guiCreateEdit ( 0.35, 0.45, 0.055, 0.04, "12", true, aTab3.Tab )
        aTab3.TimeM            = guiCreateEdit ( 0.425, 0.45, 0.055, 0.04, "00", true, aTab3.Tab )
                          guiCreateLabel ( 0.415, 0.45, 0.05, 0.04, ":", true, aTab3.Tab )
                          guiEditSetMaxLength ( aTab3.TimeH, 2 )
                          guiEditSetMaxLength ( aTab3.TimeM, 2 )
        aTab3.TimeSet        = guiCreateButton ( 0.50, 0.45, 0.10, 0.04, "Set", true, aTab3.Tab, "settime" )
                          guiCreateLabel ( 0.63, 0.45, 0.12, 0.04, "( 0-23:0-59 )", true, aTab3.Tab )

        aTab3.GravityCurrent    = guiCreateLabel ( 0.05, 0.50, 0.28, 0.04, "Gravitation: "..string.sub ( getGravity(), 0, 6 ), true, aTab3.Tab )
        aTab3.Gravity        = guiCreateEdit ( 0.35, 0.50, 0.135, 0.04, "0.008", true, aTab3.Tab )
        aTab3.GravitySet        = guiCreateButton ( 0.50, 0.50, 0.10, 0.04, "Set", true, aTab3.Tab, "setgravity" )

        aTab3.SpeedCurrent    = guiCreateLabel ( 0.05, 0.55, 0.30, 0.04, "Game Speed: "..getGameSpeed(), true, aTab3.Tab )
        aTab3.Speed            = guiCreateEdit ( 0.35, 0.55, 0.135, 0.04, "1", true, aTab3.Tab )
        aTab3.SpeedSet        = guiCreateButton ( 0.50, 0.55, 0.10, 0.04, "Set", true, aTab3.Tab, "setgamespeed" )
                          guiCreateLabel ( 0.63, 0.55, 0.09, 0.04, "( 0-10 )", true, aTab3.Tab )

        aTab3.WavesCurrent    = guiCreateLabel ( 0.05, 0.60, 0.25, 0.04, "Wave Height: "..getWaveHeight(), true, aTab3.Tab )
        aTab3.Waves            = guiCreateEdit ( 0.35, 0.60, 0.135, 0.04, "0", true, aTab3.Tab )
        aTab3.WavesSet        = guiCreateButton ( 0.50, 0.60, 0.10, 0.04, "Set", true, aTab3.Tab, "setwaveheight" )
                          guiCreateLabel ( 0.63, 0.60, 0.09, 0.04, "( 0-100 )", true, aTab3.Tab )

        aTab4 = {}
        aTab4.Tab            = guiCreateTab ( "Bans", aTabPanel, "bans" )
        aTab4.BansList        = guiCreateGridList ( 0.03, 0.05, 0.80, 0.87, true, aTab4.Tab )
                          guiGridListAddColumn( aTab4.BansList, "Name", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "IP", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "Serial", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "By", 0.22 )
                          guiGridListAddColumn( aTab4.BansList, "Date", 0.17 )
                          guiGridListAddColumn( aTab4.BansList, "Time", 0.13 )
                          guiGridListAddColumn( aTab4.BansList, "Reason", 0.92 )
                          guiGridListSetSortingEnabled( aTab4.BansList, false )
        aTab4.Unban            = guiCreateButton ( 0.85, 0.20, 0.13, 0.04, "Unban", true, aTab4.Tab, "unban" )
        aTab4.UnbanIP        = guiCreateButton ( 0.85, 0.25, 0.13, 0.04, "Unban IP", true, aTab4.Tab, "unbanip" )
        aTab4.UnbanSerial        = guiCreateButton ( 0.85, 0.30, 0.13, 0.04, "Unban Serial", true, aTab4.Tab, "unbanserial" )
        aTab4.BanIP            = guiCreateButton ( 0.85, 0.40, 0.13, 0.04, "Ban IP", true, aTab4.Tab, "banip" )
        aTab4.BanSerial        = guiCreateButton ( 0.85, 0.45, 0.13, 0.04, "Ban Serial", true, aTab4.Tab, "banserial" )
        aTab4.BansRefresh        = guiCreateButton ( 0.85, 0.85, 0.13, 0.04, "Refresh", true, aTab4.Tab, "listbans" )

        aTab4.BansTotal        = guiCreateLabel ( 0.20, 0.94, 0.31, 0.04, "Showing  0 / 0  bans", true, aTab4.Tab )
        aTab4.BansMore        = guiCreateButton ( 0.50, 0.94, 0.13, 0.04, "Get more...", true, aTab4.Tab, "listbans" )

        aTab5 = {}
        aTab5.Tab            = guiCreateTab ( "Admin Chat", aTabPanel, "adminchat" )
        aTab5.AdminChat        = guiCreateMemo ( 0.03, 0.05, 0.75, 0.85, "", true, aTab5.Tab )
                          guiSetProperty ( aTab5.AdminChat, "ReadOnly", "true" )
        aTab5.AdminPlayers    = guiCreateGridList ( 0.79, 0.05, 0.18, 0.80, true, aTab5.Tab )
                          guiGridListAddColumn ( aTab5.AdminPlayers, "Admins", 0.90 )
        aTab5.AdminChatSound    = guiCreateCheckBox ( 0.79, 0.86, 0.18, 0.04, "Play Sound", true, true, aTab5.Tab )
        aTab5.AdminText        = guiCreateEdit ( 0.03, 0.92, 0.80, 0.06, "", true, aTab5.Tab )
        aTab5.AdminSay        = guiCreateButton ( 0.85, 0.92, 0.08, 0.06, "Say", true, aTab5.Tab )
        aTab5.AdminChatHelp    = guiCreateButton ( 0.94, 0.92, 0.03, 0.06, "?", true, aTab5.Tab )

        aTab6 = {}
        aTab6.Tab            = guiCreateTab ( "Options", aTabPanel )
                          guiCreateHeader ( 0.03, 0.05, 0.10, 0.05, "Main:", true, aTab6.Tab )
        aTab6.OutputPlayer    = guiCreateCheckBox ( 0.05, 0.10, 0.47, 0.04, "Output player information to console on select", false, true, aTab6.Tab )
                          guiCreateLabel ( 0.08, 0.15, 0.40, 0.04, "This might be useful to copy player data", true, aTab6.Tab )
        aTab6.AdminChatOutput     = guiCreateCheckBox ( 0.05, 0.20, 0.47, 0.04, "Output admin messages to chat box", false, true, aTab6.Tab )
                          guiCreateHeader (  0.03, 0.30, 0.47, 0.04, "Appearance:", true, aTab6.Tab )
                          guiCreateHeader ( 0.63, 0.05, 0.10, 0.05, "Account:", true, aTab6.Tab )
        aTab6.AutoLogin        = guiCreateCheckBox ( 0.65, 0.10, 0.47, 0.04, "Auto-login by serial", false, true, aTab6.Tab )
                          guiSetVisible ( aTab6.AutoLogin, false )    -- Not used
                          guiCreateHeader ( 0.63, 0.15, 0.25, 0.05, "Change Password:", true, aTab6.Tab )
                          guiCreateLabel ( 0.65, 0.20, 0.15, 0.05, "Old password:", true, aTab6.Tab )
                          guiCreateLabel ( 0.65, 0.25, 0.15, 0.05, "New password:", true, aTab6.Tab )
                          guiCreateLabel ( 0.65, 0.30, 0.15, 0.05, "Confirm:", true, aTab6.Tab )
        aTab6.PasswordOld        = guiCreateEdit ( 0.80, 0.20, 0.15, 0.045, "", true, aTab6.Tab )
        aTab6.PasswordNew        = guiCreateEdit ( 0.80, 0.25, 0.15, 0.045, "", true, aTab6.Tab )
        aTab6.PasswordConfirm    = guiCreateEdit ( 0.80, 0.30, 0.15, 0.045, "", true, aTab6.Tab )
                          guiEditSetMasked ( aTab6.PasswordOld, true )
                          guiEditSetMasked ( aTab6.PasswordNew, true )
                          guiEditSetMasked ( aTab6.PasswordConfirm, true )
        aTab6.PasswordChange    = guiCreateButton ( 0.85, 0.35, 0.10, 0.04, "Accept", true, aTab6.Tab )
                          guiCreateHeader ( 0.03, 0.65, 0.20, 0.055, "Performance:", true, aTab6.Tab )
                          guiCreateStaticImage ( 0.03, 0.69, 0.94, 0.0025, "client\\images\\dot.png", true, aTab6.Tab )
                          guiCreateLabel ( 0.05, 0.71, 0.20, 0.055, "Performance priority:", true, aTab6.Tab )
                          guiCreateLabel ( 0.11, 0.76, 0.10, 0.05, "Memory", true, aTab6.Tab )
                          guiCreateLabel ( 0.11, 0.81, 0.10, 0.05, "Auto", true, aTab6.Tab )
                          guiCreateLabel ( 0.11, 0.86, 0.10, 0.05, "Speed", true, aTab6.Tab )
        aTab6.PerformanceRAM    = guiCreateRadioButton ( 0.07, 0.75, 0.05, 0.055, "", true, aTab6.Tab )
        aTab6.PerformanceAuto    = guiCreateRadioButton ( 0.07, 0.80, 0.05, 0.055, "", true, aTab6.Tab )
        aTab6.PerformanceCPU    = guiCreateRadioButton ( 0.07, 0.85, 0.05, 0.055, "", true, aTab6.Tab )
                          if ( aGetSetting ( "performance" ) == "RAM" ) then guiRadioButtonSetSelected ( aTab6.PerformanceRAM, true )
                          elseif ( aGetSetting ( "performance" ) == "CPU" ) then guiRadioButtonSetSelected ( aTab6.PerformanceCPU, true )
                          else guiRadioButtonSetSelected ( aTab6.PerformanceAuto, true ) end
        aTab6.PerformanceAdvanced = guiCreateButton ( 0.05, 0.91, 0.11, 0.04, "Advanced", true, aTab6.Tab )
        aPerformance()
                             guiCreateLabel ( 0.70, 0.90, 0.19, 0.055, "Refresh Delay(MS):", true, aTab6.Tab )
        aTab6.RefreshDelay    = guiCreateEdit ( 0.89, 0.90, 0.08, 0.045, "50", true, aTab6.Tab )

        if ( aGetSetting ( "outputPlayer" ) ) then guiCheckBoxSetSelected ( aTab6.OutputPlayer, true ) end
        if ( aGetSetting ( "adminChatOutput" ) ) then guiCheckBoxSetSelected ( aTab6.AdminChatOutput, true ) end
        if ( aGetSetting ( "adminChatSound" ) ) then guiCheckBoxSetSelected ( aTab5.AdminChatSound, true ) end
        --if ( tonumber ( aGetSetting ( "adminChatLines" ) ) ) then guiSetText ( aTab6.AdminChatLines, aGetSetting ( "adminChatLines" ) ) end
        if ( ( tonumber ( aGetSetting ( "refreshDelay" ) ) ) and ( tonumber ( aGetSetting ( "refreshDelay" ) ) >= 50 ) ) then guiSetText ( aTab6.RefreshDelay, aGetSetting ( "refreshDelay" ) ) end

        addEventHandler ( "aClientLog", _root, aClientLog )
        addEventHandler ( "aClientAdminChat", _root, aClientAdminChat )
        addEventHandler ( "aClientSync", _root, aClientSync )
        addEventHandler ( "aMessage", _root, aMessage )
        addEventHandler ( "aClientResourceStart", _root, aClientResourceStart )
        addEventHandler ( "aClientResourceStop", _root, aClientResourceStop )
        addEventHandler ( "aClientPlayerJoin", _root, aClientPlayerJoin )
        addEventHandler ( "onClientPlayerQuit", _root, aClientPlayerQuit )
        addEventHandler ( "onClientMouseEnter", _root, aClientMouseEnter )
        addEventHandler ( "onClientGUIClick", aAdminForm, aClientClick )
        addEventHandler ( "onClientGUIScroll", aAdminForm, aClientScroll )
        addEventHandler ( "onClientGUIDoubleClick", aAdminForm, aClientDoubleClick )
        addEventHandler ( "onClientGUIDoubleClick", aTab1.VehicleOptions, aClientDoubleClick )
        addEventHandler ( "onClientGUIAccepted", aAdminForm, aClientGUIAccepted )
        addEventHandler ( "onClientGUIChanged", aAdminForm, aClientGUIChanged )
        addEventHandler ( "onClientCursorMove", _root, aClientCursorMove )
        addEventHandler ( "onClientRender", _root, aClientRender )
        addEventHandler ( "onClientPlayerChangeNick", _root, aClientPlayerChangeNick )
        addEventHandler ( "onClientResourceStop", _root, aMainSaveSettings )
        addEventHandler ( "onClientGUITabSwitched", aTabPanel, aClientGUITabSwitched )

        bindKey ( "arrow_d", "down", aPlayerListScroll, 1 )
        bindKey ( "arrow_u", "down", aPlayerListScroll, -1 )

        triggerServerEvent ( "aSync", getLocalPlayer(), "players" )
        if ( hasPermissionTo ( "command.listmessages" ) ) then triggerServerEvent ( "aSync", getLocalPlayer(), "messages" ) end
        triggerServerEvent ( "aSync", getLocalPlayer(), "server" )
        triggerEvent ( "onAdminInitialize", resourceRoot )
        showCursor ( true )

        if getVersion().sortable and getVersion().sortable < "1.0.4-9.02436" then
            guiSetText ( aAdminForm, "Warning - Admin Panel not compatible with server version" )
            guiLabelSetHorizontalAlign ( guiCreateLabel ( 0.30, 0.11, 0.4, 0.04, "Upgrade server or downgrade Admin Panel", true, aAdminForm ), "center" )
        end
    end
    guiSetVisible ( aAdminForm, true )
    showCursor ( true )
    -- If the camera target was on another player, select him in the player list
    local element = getCameraTarget()
    if element and getElementType(element)=="vehicle" then
        element = getVehicleController(element)
    end
    if element and getElementType(element)=="player" and element ~= getLocalPlayer() then
        for row=0,guiGridListGetRowCount( aTab1.PlayerList )-1 do
            if ( guiGridListGetItemPlayerName ( aTab1.PlayerList, row, 1 ) == getPlayerName ( element ) ) then
                guiGridListSetSelectedItem ( aTab1.PlayerList, row, 1 )
                break
            end
        end
    end
end

function aAdminMenuClose ( destroy )
    if ( destroy ) then
        aMainSaveSettings ()
        aPlayers = {}
        aWeathers = {}
        aBans = {}
        removeEventHandler ( "aClientLog", _root, aClientLog )
        removeEventHandler ( "aClientAdminChat", _root, aClientAdminChat )
        removeEventHandler ( "aClientSync", _root, aClientSync )
        removeEventHandler ( "aMessage", _root, aMessage )
        removeEventHandler ( "aClientResourceStart", _root, aClientResourceStart )
        removeEventHandler ( "aClientResourceStop", _root, aClientResourceStop )
        removeEventHandler ( "aClientPlayerJoin", _root, aClientPlayerJoin )
        removeEventHandler ( "onClientPlayerQuit", _root, aClientPlayerQuit )
        removeEventHandler ( "onClientMouseEnter", _root, aClientMouseEnter )
        removeEventHandler ( "onClientGUIClick", aAdminForm, aClientClick )
        removeEventHandler ( "onClientGUIScroll", aAdminForm, aClientScroll )
        removeEventHandler ( "onClientGUIDoubleClick", aAdminForm, aClientDoubleClick )
        removeEventHandler ( "onClientGUIDoubleClick", aTab1.VehicleOptions, aClientDoubleClick )
        removeEventHandler ( "onClientGUIAccepted", aAdminForm, aClientGUIAccepted )
        removeEventHandler ( "onClientGUIChanged", aAdminForm, aClientGUIChanged )
        removeEventHandler ( "onClientCursorMove", _root, aClientCursorMove )
        removeEventHandler ( "onClientRender", _root, aClientRender )
        removeEventHandler ( "onClientPlayerChangeNick", _root, aClientPlayerChangeNick )
        removeEventHandler ( "onClientResourceStop", _root, aMainSaveSettings )
        unbindKey ( "arrow_d", "down", aPlayerListScroll )
        unbindKey ( "arrow_u", "down", aPlayerListScroll )
        destroyElement ( aTab1.VehicleOptions )
        destroyElement ( aAdminForm )
        aAdminForm = nil
    else
        guiSetVisible ( aTab1.VehicleOptions, false )
        guiSetVisible ( aAdminForm, false )
    end
    guiSetInputEnabled ( false )
    showCursor ( false )
end

function aMainSaveSettings ()
    aSetSetting ( "outputPlayer", guiCheckBoxGetSelected ( aTab6.OutputPlayer ) )
    aSetSetting ( "adminChatOutput", guiCheckBoxGetSelected ( aTab6.AdminChatOutput ) )
    aSetSetting ( "adminChatSound", guiCheckBoxGetSelected ( aTab5.AdminChatSound ) )
    --aSetSetting ( "adminChatLines", guiGetText ( aTab6.AdminChatLines ) )
    aSetSetting ( "refreshDelay", guiGetText ( aTab6.RefreshDelay ) )
    aSetSetting ( "currentWeapon", aCurrentWeapon )
    aSetSetting ( "currentAmmo", aCurrentAmmo )
    aSetSetting ( "currentVehicle", aCurrentVehicle )
    aSetSetting ( "currentSlap", aCurrentSlap )
    if ( guiRadioButtonGetSelected ( aTab6.PerformanceRAM ) ) then aSetSetting ( "performance", "RAM" )
    elseif ( guiRadioButtonGetSelected ( aTab6.PerformanceCPU ) ) then aSetSetting ( "performance", "CPU" )
    else aSetSetting ( "performance", "Auto" ) end
end

function aAdminRefresh ()
    if ( guiGridListGetSelectedItem ( aTab1.PlayerList ) ~= -1 ) then
        local player = getPlayerFromNick ( guiGridListGetItemPlayerName ( aTab1.PlayerList, guiGridListGetSelectedItem( aTab1.PlayerList ), 1 ) )
        if ( player and aPlayers[player] ) then
            guiSetText ( aTab1.Name, "Name: "..aPlayers[player]["name"] )
            guiSetText ( aTab1.Mute, iif ( aPlayers[player]["mute"], "Unmute", "Mute" ) )
            guiSetText ( aTab1.Freeze, iif ( aPlayers[player]["freeze"], "Unfreeze", "Freeze" ) )
            --guiSetText ( aTab1.Username, "Community Username: "..( aPlayers[player]["username"] or "" ) )
            guiSetText ( aTab1.Version, "Version: "..( aPlayers[player]["version"] or "" ) )
            guiSetText ( aTab1.Accountname, "Account Name: "..( aPlayers[player]["accountname"] or "" ) )
            guiSetText ( aTab1.Groups, "Groups: "..( aPlayers[player]["groups"] or "None" ) )
            if ( isPlayerDead ( player ) ) then guiSetText ( aTab1.Health, "Health: Dead" )
            else guiSetText ( aTab1.Health, "Health: "..math.ceil ( getElementHealth ( player ) ).."%" ) end
            guiSetText ( aTab1.Armour, "Armour: "..math.ceil ( getPedArmor ( player ) ).."%" )
            guiSetText ( aTab1.Skin, "Skin: "..iif ( getElementModel ( player ), getElementModel ( player ), "N/A" ) )
            if ( getPlayerTeam ( player ) ) then guiSetText ( aTab1.Team, "Team: "..getTeamName ( getPlayerTeam ( player ) ) )
            else guiSetText ( aTab1.Team, "Team: None" ) end
            guiSetText ( aTab1.Ping, "Ping: "..getPlayerPing ( player ) )
            guiSetText ( aTab1.Money, "Money: "..( aPlayers[player]["money"] or 0 ) )
            if ( getElementDimension ( player ) ) then guiSetText ( aTab1.Dimension, "Dimension: "..getElementDimension ( player ) ) end
            if ( getElementInterior ( player ) ) then guiSetText ( aTab1.Interior, "Interior: "..getElementInterior ( player ) ) end
            guiSetText ( aTab1.JetPack, iif ( doesPedHaveJetPack ( player ), "Remove JetPack", "Give JetPack" ) )
            if ( getPedWeapon ( player ) ) then guiSetText ( aTab1.Weapon, "Weapon: "..getWeaponNameFromID ( getPedWeapon ( player ) ).." (ID: "..getPedWeapon ( player )..")" ) end
            local x, y, z = getElementPosition ( player )
            guiSetText ( aTab1.Area, "Area: "..iif ( getZoneName ( x, y, z, false ) == getZoneName ( x, y, z, true ), getZoneName ( x, y, z, false ), getZoneName ( x, y, z, false ).." ("..getZoneName ( x, y, z, true )..")" ) )
            guiSetText ( aTab1.PositionX, "X: "..x )
            guiSetText ( aTab1.PositionY, "Y: "..y )
            guiSetText ( aTab1.PositionZ, "Z: "..z )
            local vehicle = getPedOccupiedVehicle ( player )
            if ( vehicle ) then
                guiSetText ( aTab1.Vehicle, "Vehicle: "..getVehicleName ( vehicle ).." (ID: "..getElementModel ( vehicle )..")" )
                guiSetText ( aTab1.VehicleHealth, "Vehicle Health: "..math.ceil ( getElementHealth ( vehicle ) ).."%" )
            else
                guiSetText ( aTab1.Vehicle, "Vehicle: Foot" )
                guiSetText ( aTab1.VehicleHealth, "Vehicle Health: 0%" )
            end
            if ( aPlayers[player]["admin"] ) then
                guiSetText(aTab1.Admin, "Revoke admin rights")
            else
                guiSetText(aTab1.Admin, "Give admin rights")
            end
            return player
        end
    end
end

function aClientSync ( type, table )
    if ( type == "player" and aPlayers[source] ) then
        for type, data in pairs ( table ) do
            aPlayers[source][type] = data
        end
    elseif ( type == "players" ) then
        aPlayers = table
    elseif ( type == "resources" ) then
        local bInclMaps = guiCheckBoxGetSelected ( aTab2.ResourceInclMaps )
        aResources = table
        for id, resource in ipairs(table) do
            if bInclMaps or resource["type"] ~= "map" then
                local row = guiGridListAddRow ( aTab2.ResourceList )
                guiGridListSetItemText ( aTab2.ResourceList, row, 1, resource["name"], false, false )
                guiGridListSetItemText ( aTab2.ResourceList, row, 2, resource["numsettings"] > 0 and tostring(resource["numsettings"]) or "", false, false )
                guiGridListSetItemText ( aTab2.ResourceList, row, 3, resource["state"], false, false )
            end
        end
    elseif ( type == "loggedout" ) then
        aAdminDestroy()
    elseif ( type == "admins" ) then
        --if ( guiGridListGetRowCount ( aTab5.AdminPlayers ) > 0 ) then guiGridListClear ( aTab5.AdminPlayers ) end
        for id, player in ipairs(getElementsByType("player")) do
            if ( table[player]["admin"] == false ) and ( player == getLocalPlayer() ) then
                aAdminDestroy()
                break
            elseif aPlayers[player] then
                aPlayers[player]["groups"] = table[player]["groups"]
                if ( table[player]["chat"] ) then
                    local id = 0
                    local exists = false
                    while ( id <= guiGridListGetRowCount( aTab5.AdminPlayers ) ) do
                        if ( guiGridListGetItemPlayerName ( aTab5.AdminPlayers, id, 1 ) == getPlayerName ( player ) ) then
                            exists = true
                        end
                        id = id + 1
                    end
                    if ( exists == false ) then guiGridListSetItemPlayerName ( aTab5.AdminPlayers, guiGridListAddRow ( aTab5.AdminPlayers ), 1, getPlayerName ( player ), false, false ) end
                end
            end
        end
    elseif ( type == "server" ) then
        guiSetText ( aTab3.Server, "Server: "..table["name"] )
        guiSetText ( aTab3.Players, "Players: "..#getElementsByType ( "player" ).."/"..table["players"] )
        guiSetText ( aTab3.Password, "Password: "..( table["password"] or "None" ) )
        guiSetText ( aTab3.GameType, "Game Type: "..( table["game"] or "None" ) )
        guiSetText ( aTab3.MapName, "Map Name: "..( table["map"] or "None" ) )
    elseif ( type == "bansdirty" ) then
        g_GotLatestBansList = false
        if aAdminForm and guiGetVisible ( aAdminForm ) and guiGetSelectedTab( aTabPanel ) == aTab4.Tab then
            -- Request full bans list if bans tab is displayed when 'bansdirty' is received
            triggerServerEvent ( "aSync", getLocalPlayer(), "bans" )
        end
    elseif ( type == "bans" or type == "bansmore" ) then
        if type == "bans" then
            g_GotLatestBansList = true
            guiGridListClear ( aTab4.BansList )
            aBans = {}
            aBans["Serial"] = {}
            aBans["IP"] = {}
        end
        local total = tonumber(table.total) or 0
        local amount = guiGridListGetRowCount( aTab4.BansList ) + #table
        guiSetText( aTab4.BansTotal, "Showing  " .. amount .. " / " .. total .. "  bans" )
        if g_GotLatestBansList then
            for i=1,#table do
                local ban = table
                if ban.serial then
                    aBans["Serial"][ban.serial] = ban
                end
                if ban.ip then
                    aBans["IP"][ban.ip] = ban
                end
                local time, date = "-", "-"
                if ban.seconds then
                    local realTime = getRealTime( ban.seconds )
                    time = string.format("%02d:%02d", realTime.hour, realTime.minute )
                    date = string.format("%04d-%02d-%02d", realTime.year + 1900, realTime.month + 1, realTime.monthday )
                end
                local reason = ban["reason"] and ban["reason"]~="nil" and ban["reason"] or ""
                local row = guiGridListAddRow ( aTab4.BansList )
                guiGridListSetItemText ( aTab4.BansList, row, 1, ban["nick"]    or "n/a", false, false )
                guiGridListSetItemText ( aTab4.BansList, row, 2, ban.ip            or "n/a", false, false )
                guiGridListSetItemText ( aTab4.BansList, row, 3, ban.serial        or "n/a", false, false )
                guiGridListSetItemText ( aTab4.BansList, row, 4, ban["banner"]    or "n/a", false, false )
                guiGridListSetItemText ( aTab4.BansList, row, 5, date,                    false, false )
                guiGridListSetItemText ( aTab4.BansList, row, 6, time,                    false, false )
                guiGridListSetItemText ( aTab4.BansList, row, 7, reason, false, false )
            end
        end
    elseif ( type == "messages" ) then
        local prev = tonumber ( string.sub ( guiGetText ( aTab1.Messages ), 1, 1 ) )
        if ( prev < table["unread"] ) then
            playSoundFrontEnd ( 18 )
        end
        guiSetText ( aTab1.Messages, table["unread"].."/"..table["total"].." unread messages" )
    end
end

function aClientGUITabSwitched( selectedTab )
    if getElementParent( selectedTab ) == aTabPanel then
        if selectedTab == aTab2.Tab then
            -- Handle initial update of resources list
            if guiGridListGetRowCount( aTab2.ResourceList ) == 0 then
                if ( hasPermissionTo ( "command.listresources" ) ) then
                    triggerServerEvent ( "aSync", getLocalPlayer(), "resources" )
                end
            end
        elseif selectedTab == aTabMap.Tab then
            -- Handle initial update of map list
            if guiGridListGetRowCount( aTabMap.MapList ) == 0 then
                if ( hasPermissionTo ( "command.listresources" ) ) then
                    triggerServerEvent ( "getMaps_s", getLocalPlayer(), getLocalPlayer(), true )
                end
            end
        elseif selectedTab == aTab4.Tab then
            if not g_GotLatestBansList then
                -- Request full bans list if bans tab is selected and current list is out of date
                triggerServerEvent ( "aSync", getLocalPlayer(), "bans" )
            end
        end    
    end
end

function aMessage ( )

end

function aClientResourceStart ( resource )
    local id = 0
    while ( id <= guiGridListGetRowCount( aTab2.ResourceList ) ) do
        if ( guiGridListGetItemText ( aTab2.ResourceList, id, 1 ) == resource ) then
            guiGridListSetItemText ( aTab2.ResourceList, id, 3, "running", false, false )
        end
        id = id + 1
    end
end

function aClientResourceStop ( resource )
    local id = 0
    while ( id <= guiGridListGetRowCount( aTab2.ResourceList ) ) do
        if ( guiGridListGetItemText ( aTab2.ResourceList, id, 1 ) == resource ) then
            guiGridListSetItemText ( aTab2.ResourceList, id, 3, "loaded", false, false )
        end
        id = id + 1
    end
end

function aClientPlayerJoin ( ip, username, accountname, serial, admin, country )
    if ip == false and serial == false then
        -- Update country only
        if aPlayers[source] then
            aPlayers[source]["country"] = country
        end
        return
    end
    aPlayers[source] = {}
    aPlayers[source]["name"] = getPlayerName ( source )
    aPlayers[source]["IP"] = ip
    aPlayers[source]["username"] = username or "N/A"
    aPlayers[source]["accountname"] = accountname or "N/A"
    aPlayers[source]["serial"] = serial
    aPlayers[source]["admin"] = admin
    aPlayers[source]["country"] = country
    local row = guiGridListAddRow ( aTab1.PlayerList )
    guiGridListSetItemPlayerName ( aTab1.PlayerList, row, 1, getPlayerName ( source ), false, false )
    if ( admin ) then
        local row = guiGridListAddRow ( aTab5.AdminPlayers )
        guiGridListSetItemPlayerName ( aTab5.AdminPlayers, row, 1, getPlayerName ( source ), false, false )
    end
    if ( aSpectator.PlayerList ) then
        local row = guiGridListAddRow ( aSpectator.PlayerList )
        guiGridListSetItemPlayerName ( aSpectator.PlayerList, row, 1, getPlayerName ( source ), false, false )
    end
end

function aClientPlayerQuit ()
    local id = 0
    while ( id <= guiGridListGetRowCount( aTab1.PlayerList ) ) do
        if ( guiGridListGetItemPlayerName ( aTab1.PlayerList, id, 1 ) == getPlayerName ( source ) ) then
            guiGridListRemoveRow ( aTab1.PlayerList, id )
        end
        id = id + 1
    end
    if ( aPlayers[source] and aPlayers[source]["admin"] ) then
        local id = 0
        while ( id <= guiGridListGetRowCount( aTab5.AdminPlayers ) ) do
            if ( guiGridListGetItemPlayerName ( aTab5.AdminPlayers, id, 1 ) == getPlayerName ( source ) ) then
                guiGridListRemoveRow ( aTab5.AdminPlayers, id )
            end
            id = id + 1
        end
    end
    if ( aSpectator.PlayerList ) then
        local id = 0
        while ( id <= guiGridListGetRowCount( aSpectator.PlayerList ) ) do
            if ( guiGridListGetItemPlayerName ( aSpectator.PlayerList, id, 1 ) == getPlayerName ( source ) ) then
                guiGridListRemoveRow ( aSpectator.PlayerList, id )
            end
            id = id + 1
        end
    end
    aPlayers[source] = nil
end

function aPlayerListScroll ( key, state, inc )
    if ( not guiGetVisible ( aAdminForm ) ) then return end
    local max = guiGridListGetRowCount ( aTab1.PlayerList )
    if ( max <= 0 ) then return end
    local current = guiGridListGetSelectedItem ( aTab1.PlayerList )
    local next = current + inc
    max = max - 1
    if ( current == -1 ) then
        guiGridListSetSelectedItem ( aTab1.PlayerList, 0, 1 )
    elseif ( next > max ) then return
    elseif ( next < 0 ) then return
    else
        guiGridListSetSelectedItem ( aTab1.PlayerList, next, 1 )
    end
    local oldsource = source
    source = aTab1.PlayerList;
    aClientClick ( "left" )
    source = oldsource
end

function aClientPlayerChangeNick ( oldNick, newNick )
    local lists = { aTab1.PlayerList, aTab5.AdminPlayers, aSpectator.PlayerList }
    for _,gridlist in ipairs(lists) do
        for row=0,guiGridListGetRowCount(gridlist)-1 do
            if ( guiGridListGetItemPlayerName ( gridlist, row, 1 ) == oldNick ) then
                guiGridListSetItemPlayerName ( gridlist, row, 1, newNick, false, false )
            end
        end
    end
end

function aClientLog ( text )
    text = "#"..aLogLines..": "..text
    if ( guiGetText ( aTab2.LogLine1 ) == "" ) then guiSetText ( aTab2.LogLine1, text )
    elseif ( guiGetText ( aTab2.LogLine2 ) == "" ) then guiSetText ( aTab2.LogLine2, text )
    elseif ( guiGetText ( aTab2.LogLine3 ) == "" ) then guiSetText ( aTab2.LogLine3, text )
    elseif ( guiGetText ( aTab2.LogLine4 ) == "" ) then guiSetText ( aTab2.LogLine4, text )
    elseif ( guiGetText ( aTab2.LogLine5 ) == "" ) then guiSetText ( aTab2.LogLine5, text )
    else
        guiSetText ( aTab2.LogLine1, guiGetText ( aTab2.LogLine2 ) )
        guiSetText ( aTab2.LogLine2, guiGetText ( aTab2.LogLine3 ) )
        guiSetText ( aTab2.LogLine3, guiGetText ( aTab2.LogLine4 ) )
        guiSetText ( aTab2.LogLine4, guiGetText ( aTab2.LogLine5 ) )
        guiSetText ( aTab2.LogLine5, text )
    end
    aLogLines = aLogLines + 1
end

function aClientAdminChat ( message )
    guiSetText ( aTab5.AdminChat, guiGetText ( aTab5.AdminChat )..""..getPlayerName ( source )..": "..message )
    guiSetProperty ( aTab5.AdminChat, "CaratIndex", tostring ( string.len ( guiGetText ( aTab5.AdminChat ) ) ) )
    if ( guiCheckBoxGetSelected ( aTab6.AdminChatOutput ) ) then outputChatBox ( "ADMIN> "..getPlayerName ( source )..": "..message, 255, 0, 0 ) end
    if ( ( guiCheckBoxGetSelected ( aTab5.AdminChatSound ) ) and ( source ~= getLocalPlayer() ) ) then playSoundFrontEnd ( 13 ) end
end

function aSetCurrentAmmo ( ammo )
    ammo = tonumber ( ammo )
    if ( ( ammo ) and ( ammo > 0 ) and ( ammo < 10000 ) ) then
        aCurrentAmmo = ammo
        return
    end
    outputChatBox ( "Invalid ammo value", 255, 0, 0 )
end

function aClientGUIAccepted ( element )
    if ( element == aTab5.AdminText ) then
        local message = guiGetText ( aTab5.AdminText )
        if ( ( message ) and ( message ~= "" ) ) then
            if ( gettok ( message, 1, 32 ) == "/clear" ) then guiSetText ( aTab5.AdminChat, "" )
            else triggerServerEvent ( "aAdminChat", getLocalPlayer(), message ) end
            guiSetText ( aTab5.AdminText, "" )
        end
    end
end

function aClientGUIChanged ()
    if ( source == aTab1.PlayerListSearch ) then
        guiGridListClear ( aTab1.PlayerList )
        local text = guiGetText ( source )
        if ( text == "" ) then
            for id, player in ipairs ( getElementsByType ( "player" ) ) do
                guiGridListSetItemPlayerName ( aTab1.PlayerList, guiGridListAddRow ( aTab1.PlayerList ), 1, getPlayerName ( player ), false, false )
            end
        else
            for id, player in ipairs ( getElementsByType ( "player" ) ) do
                if ( string.find ( string.upper ( getPlayerName ( player ) ), string.upper ( text ), 1, true ) ) then
                    guiGridListSetItemPlayerName ( aTab1.PlayerList, guiGridListAddRow ( aTab1.PlayerList ), 1, getPlayerName ( player ), false, false )
                end
            end
        end
    elseif ( source == aTab2.ResourceListSearch ) then
        local bInclMaps = guiCheckBoxGetSelected ( aTab2.ResourceInclMaps )
        guiGridListClear ( aTab2.ResourceList )
        local text = string.lower(guiGetText(source))
        if ( text == "" ) then
            for id, resource in ipairs(aResources) do
                if bInclMaps or resource["type"] ~= "map" then
                    local row = guiGridListAddRow ( aTab2.ResourceList )
                    guiGridListSetItemText ( aTab2.ResourceList, row, 1, resource["name"], false, false )
                    guiGridListSetItemText ( aTab2.ResourceList, row, 2, resource["numsettings"] > 0 and tostring(resource["numsettings"]) or "", false, false )
                    guiGridListSetItemText ( aTab2.ResourceList, row, 3, resource["state"], false, false )
                end
            end
        else
            for id, resource in ipairs(aResources) do
                if bInclMaps or resource["type"] ~= "map" then
                    if string.find(string.lower(resource.name), text, 1, true) then
                        local row = guiGridListAddRow ( aTab2.ResourceList )
                        guiGridListSetItemText ( aTab2.ResourceList, row, 1, resource["name"], false, false )
                        guiGridListSetItemText ( aTab2.ResourceList, row, 2, resource["numsettings"] > 0 and tostring(resource["numsettings"]) or "", false, false )
                        guiGridListSetItemText ( aTab2.ResourceList, row, 3, resource["state"], false, false )
                    end
                end
            end
        end
    end
end

function aClientScroll ( element )
    if ( source == aTab6.MouseSense ) then
        guiSetText ( aTab6.MouseSenseCur, "Cursor sensivity: ("..string.sub ( guiScrollBarGetScrollPosition ( source ) / 50, 0, 4 )..")" )
    end
end

function aClientCursorMove ( rx, ry, x, y )
    
end

function aClientMouseEnter ( element )
    if ( getElementType ( source ) == "gui-button" ) then

    end
end

function aClientDoubleClick ( button )
    if ( source == aTab1.WeaponOptions ) then
        if ( guiGridListGetSelectedItem ( aTab1.WeaponOptions ) ~= -1 ) then
            aCurrentWeapon = getWeaponIDFromName ( guiGridListGetItemText ( aTab1.WeaponOptions, guiGridListGetSelectedItem ( aTab1.WeaponOptions ), 1 ) )
            local wep = guiGridListGetItemText ( aTab1.WeaponOptions, guiGridListGetSelectedItem ( aTab1.WeaponOptions ), 1 )
            wep = string.gsub ( wep, "Combat Shotgun", "Combat SG" )
            guiSetText ( aTab1.GiveWeapon, "Give: "..wep.." " )
        end
        guiSetVisible ( aTab1.WeaponOptions, false )
    elseif ( source == aTab1.VehicleOptions ) then
        local item = guiGridListGetSelectedItem ( aTab1.VehicleOptions )
        if ( item ~= -1 ) then
            if ( guiGridListGetItemText ( aTab1.VehicleOptions, item, 1 ) ~= "" ) then
                aCurrentVehicle = tonumber ( guiGridListGetItemData ( aTab1.VehicleOptions, item, 1 ) )
                guiSetText ( aTab1.GiveVehicle, "Give: "..guiGridListGetItemText ( aTab1.VehicleOptions, item, 1 ).." " )
            end
        end
        guiSetVisible ( aTab1.VehicleOptions, false )
    elseif ( source == aTab1.SlapOptions ) then
        if ( guiGridListGetSelectedItem ( aTab1.SlapOptions ) ~= -1 ) then
            aCurrentSlap = guiGridListGetItemText ( aTab1.SlapOptions, guiGridListGetSelectedItem ( aTab1.SlapOptions ), 1 )
            guiSetText ( aTab1.Slap, "Slap! "..aCurrentSlap.." _" )
            if ( aSpecSlap ) then guiSetText ( aSpecSlap, "Slap! "..aCurrentSlap.."hp" ) end
        end
        guiSetVisible ( aTab1.SlapOptions, false )
    elseif ( source == aTab2.ResourceList ) then
        if ( guiGridListGetSelectedItem ( aTab2.ResourceList ) ~= -1 ) then
            aManageSettings ( guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ) )
        end
    end
    if ( guiGetVisible ( aTab1.WeaponOptions ) ) then guiSetVisible ( aTab1.WeaponOptions, false ) end
    if ( guiGetVisible ( aTab1.VehicleOptions ) ) then guiSetVisible ( aTab1.VehicleOptions, false ) end
    if ( guiGetVisible ( aTab1.SlapOptions ) ) then guiSetVisible ( aTab1.SlapOptions, false ) end
end

function aClientClick ( button )
    guiSetInputEnabled ( false )
    if ( ( source == aTab1.WeaponOptions ) or ( source == aTab1.VehicleOptions ) or ( source == aTab1.SlapOptions ) ) then return
    else
        if ( guiGetVisible ( aTab1.WeaponOptions ) ) then guiSetVisible ( aTab1.WeaponOptions, false ) end
        if ( guiGetVisible ( aTab1.VehicleOptions ) ) then guiSetVisible ( aTab1.VehicleOptions, false ) end
        if ( guiGetVisible ( aTab1.SlapOptions ) ) then guiSetVisible ( aTab1.SlapOptions, false ) end
    end
    if ( button == "left" ) then
        -- TAB 1, PLAYERS
        if ( getElementParent ( source ) == aTab1.Tab ) then
            if ( source == aTab1.Messages ) then
                aViewMessages()
            elseif ( source == aTab1.PlayerListSearch ) then
                guiSetInputEnabled ( true )
            elseif ( source == aTab1.HideColorCodes ) then
                updateColorCodes()
            elseif ( source == aTab1.AnonAdmin ) then
                setAnonAdmin( guiCheckBoxGetSelected ( aTab1.AnonAdmin ) )
            elseif ( getElementType ( source ) == "gui-button" )  then
                if ( source == aTab1.GiveVehicle ) then guiBringToFront ( aTab1.VehicleDropDown )
                elseif ( source == aTab1.GiveWeapon ) then guiBringToFront ( aTab1.WeaponDropDown )
                elseif ( source == aTab1.Slap ) then guiBringToFront ( aTab1.SlapDropDown ) end
                if ( guiGridListGetSelectedItem ( aTab1.PlayerList ) == -1 ) then
                    aMessageBox ( "error", "No player selected!" )
                else
                    local name = guiGridListGetItemPlayerName ( aTab1.PlayerList, guiGridListGetSelectedItem( aTab1.PlayerList ), 1 )
                    local escname = string.gsub( name,"([\"])", "\\\"" )
                    local player = getPlayerFromNick ( name )
                    if ( source == aTab1.Kick ) then aInputBox ( "Kick player "..name, "Enter the kick reason", "", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"kick\", $value )" )
                    elseif ( source == aTab1.Ban ) then aBanInputBox ( player )
                    elseif ( source == aTab1.Slap ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "slap", aCurrentSlap )
					elseif ( source == aTab1.Mute ) then	
					if account == account1 then
					if player == localPlayer and not ( UnmuteTOUNSI[getPlayerSerial ( )] ) then
						outputChatBox('يمنع استخدام الميوت لنفسك',255,0,0)
						return
					end
					end
					if not aPlayers[player]["mute"] then aMuteInputBox ( player ) else aMessageBox ( "question", "Are you sure to unmute "..name.."?", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"mute\" )" ) end
                    elseif ( source == aTab1.Freeze ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "freeze" )
                    elseif ( source == aTab1.Spectate ) then aSpectate ( player )
                    elseif ( source == aTab1.Nick ) then aInputBox ( "Set Nick", "Enter the new nick of the player", name, "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setnick\", $value )" )
                    elseif ( source == aTab1.Shout ) then aInputBox ( "Shout", "Enter text to be shown on player's screen", "", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"shout\", $value )" )
                    elseif ( source == aTab1.SetHealth ) then aInputBox ( "Set Health", "Enter the health value", "100", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"sethealth\", $value )" )
                    elseif ( source == aTab1.SetArmour ) then aInputBox ( "Set Armour", "Enter the armour value", "100", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setarmour\", $value )" )
                    elseif ( source == aTab1.SetTeam ) then aPlayerTeam ( player )
                    elseif ( source == aTab1.SetSkin ) then aPlayerSkin ( player )
                    elseif ( source == aTab1.SetInterior ) then aPlayerInterior ( player )
                    elseif ( source == aTab1.JetPack ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "jetpack" )
                    elseif ( source == aTab1.SetMoney ) then aInputBox ( "Set Money", "Enter the money value", "0", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setmoney\", $value )" )
                    elseif ( source == aTab1.SetStats ) then aPlayerStats ( player )
                    elseif ( source == aTab1.SetDimension ) then aInputBox ( "Dimension ID Required", "Enter Dimension ID between 0  and 65535", "0", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setdimension\", $value )" )
                    elseif ( source == aTab1.GiveVehicle ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "givevehicle", aCurrentVehicle )
                    elseif ( source == aTab1.GiveWeapon ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "giveweapon", aCurrentWeapon, aCurrentAmmo )
                    elseif ( source == aTab1.Warp ) then triggerServerEvent ( "aPlayer", getLocalPlayer(), player, "warp" )
                    elseif ( source == aTab1.WarpTo ) then aPlayerWarp ( player )
                    elseif ( source == aTab1.VehicleFix ) then triggerServerEvent ( "aVehicle", getLocalPlayer(), player, "repair" )
                    elseif ( source == aTab1.VehicleBlow ) then triggerServerEvent ( "aVehicle", getLocalPlayer(), player, "blowvehicle" )
                    elseif ( source == aTab1.VehicleDestroy ) then triggerServerEvent ( "aVehicle", getLocalPlayer(), player, "destroyvehicle" )
                    elseif ( source == aTab1.VehicleCustomize ) then aVehicleCustomize ( player )
                    elseif ( source == aTab1.Admin ) then
                        if ( aPlayers[player]["admin"] ) then aMessageBox ( "warning", "Revoke admin rights from "..name.."?", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setgroup\", false )" )
                        else aMessageBox ( "warning", "Give admin rights to "..name.."?", "triggerServerEvent ( \"aPlayer\", getLocalPlayer(), getPlayerFromNick ( \""..escname.."\" ), \"setgroup\", true )" ) end
                    end
                end
            elseif ( source == aTab1.VehicleDropDown ) then
                local x1, y1 = guiGetPosition ( aAdminForm, false )
                local x2, y2 = guiGetPosition ( aTabPanel, false )
                local x3, y3 = guiGetPosition ( aTab1.Tab, false )
                local x4, y4 = guiGetPosition ( aTab1.GiveVehicle, false )
                guiSetPosition ( aTab1.VehicleOptions, x1 + x2 + x3 + x4, y1 + y2 + y3 + y4 + 20, false )
                guiSetVisible ( aTab1.VehicleOptions, true )
                guiBringToFront ( aTab1.VehicleOptions )
            elseif ( source == aTab1.WeaponDropDown ) then
                guiSetVisible ( aTab1.WeaponOptions, true )
                guiBringToFront ( aTab1.WeaponOptions )
            elseif ( source == aTab1.SlapDropDown ) then
                guiSetVisible ( aTab1.SlapOptions, true )
                guiBringToFront ( aTab1.SlapOptions )
            elseif ( source == aTab1.PlayerList ) then
                if ( guiGridListGetSelectedItem( aTab1.PlayerList ) ~= -1 ) then
                    local player = aAdminRefresh ()
                    if ( player ) then
                        triggerServerEvent ( "aSync", getLocalPlayer(), "player", player )
                        if ( ( guiCheckBoxGetSelected ( aTab6.OutputPlayer ) ) and ( player ) ) then outputConsole ( "Name: "..aPlayers[player]["name"]..", IP: "..aPlayers[player]["IP"]..", Serial: "..aPlayers[player]["serial"]..", Community Username: "..aPlayers[player]["username"]..", Account Name: "..aPlayers[player]["accountname"] ) end
                        guiSetText ( aTab1.IP, "IP: "..aPlayers[player]["IP"] )
                        guiSetText ( aTab1.Serial, "Serial: "..aPlayers[player]["serial"] )
                        --guiSetText ( aTab1.Username, "Community Username: "..aPlayers[player]["username"] )
                        guiSetText ( aTab1.Accountname, "Account Name: "..aPlayers[player]["accountname"] )
                        local countryCode = aPlayers[player]["country"]
                        loadFlagImage ( aTab1.Flag, countryCode )
                        if not countryCode then
                            guiSetText ( aTab1.CountryCode, "" )
                        else
                            local x, y = guiGetPosition ( aTab1.IP, false )
                            local width = guiLabelGetTextExtent ( aTab1.IP )
                            guiSetPosition ( aTab1.Flag, x + width + 7, y + 4, false )
                            guiSetPosition ( aTab1.CountryCode, x + width + 30, y, false )
                            guiSetText ( aTab1.CountryCode, tostring( countryCode ) )
                        end
                        guiSetText ( aTab1.Version, "Version: " .. ( aPlayers[player]["version"] or "" ) )
                    end
                else
                    guiSetText ( aTab1.Name, "Name: N/A" )
                    guiSetText ( aTab1.IP, "IP: N/A" )
                    guiSetText ( aTab1.Serial, "Serial: N/A" )
                    --guiSetText ( aTab1.Username, "Community Username: N/A" )
                    guiSetText ( aTab1.Version, "Version: N/A" )
                    guiSetText ( aTab1.Accountname, "Account Name: N/A" )
                    guiSetText ( aTab1.Groups, "Groups: N/A" )
                    guiSetText ( aTab1.Mute, "Mute" )
                    guiSetText ( aTab1.Freeze, "Freeze" )
                    guiSetText ( aTab1.Admin, "Give admin rights" )
                    guiSetText ( aTab1.Health, "Health: 0%" )
                    guiSetText ( aTab1.Armour, "Armour: 0%" )
                    guiSetText ( aTab1.Skin, "Skin: N/A" )
                    guiSetText ( aTab1.Team, "Team: None" )
                    guiSetText ( aTab1.Ping, "Ping: 0" )
                    guiSetText ( aTab1.Money, "Money: 0" )
                    guiSetText ( aTab1.Dimension, "Dimension: 0" )
                    guiSetText ( aTab1.Interior, "Interior: 0" )
                    guiSetText ( aTab1.JetPack, "Give JetPack" )
                    guiSetText ( aTab1.Weapon, "Weapon: N/A" )
                    guiSetText ( aTab1.Area, "Area: Unknown" )
                    guiSetText ( aTab1.PositionX, "X: 0" )
                    guiSetText ( aTab1.PositionY, "Y: 0" )
                    guiSetText ( aTab1.PositionZ, "Z: 0" )
                    guiSetText ( aTab1.Vehicle, "Vehicle: N/A" )
                    guiSetText ( aTab1.VehicleHealth, "Vehicle Health: 0%" )
                    guiStaticImageLoadImage ( aTab1.Flag, "client\\images\\empty.png" )
                    guiSetText ( aTab1.CountryCode, "" )
                end
            end
        -- TAB 2, RESOURCES
        elseif ( getElementParent ( source ) == aTab2.Tab ) then
            if ( source == aTab2.ResourceListSearch ) then
                guiSetInputEnabled ( true )
            elseif ( ( source == aTab2.ResourceStart ) or ( source == aTab2.ResourceRestart ) or ( source == aTab2.ResourceStop ) or ( source == aTab2.ResourceSettings ) ) then
                if ( guiGridListGetSelectedItem ( aTab2.ResourceList ) == -1 ) then
                    aMessageBox ( "error", "No resource selected!" )
                else
                    if ( source == aTab2.ResourceStart ) then triggerServerEvent ( "aResource", getLocalPlayer(), guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ), "start" )
                    elseif ( source == aTab2.ResourceRestart ) then triggerServerEvent ( "aResource", getLocalPlayer(), guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ), "restart" )
                    elseif ( source == aTab2.ResourceStop ) then triggerServerEvent ( "aResource", getLocalPlayer(), guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 1 ), "stop" )
                    elseif ( source == aTab2.ResourceSettings ) then aManageSettings ( guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ) ) )
                    end
                end
            elseif ( source == aTab2.ResourceList ) then
                guiSetVisible ( aTab2.ResourceFailture, false )
                if ( guiGridListGetSelectedItem ( aTab2.ResourceList ) ~= -1 ) then
                    if ( guiGridListGetItemText ( aTab2.ResourceList, guiGridListGetSelectedItem( aTab2.ResourceList ), 3 ) == "Failed to load" ) then
                        guiSetVisible ( aTab2.ResourceFailture, true )
                    end
                end
            elseif ( source == aTab2.ManageACL ) then
                aManageACL()
            elseif ( source == aTab2.ResourceRefresh or source == aTab2.ResourceInclMaps ) then
                guiGridListClear ( aTab2.ResourceList )
                triggerServerEvent ( "aSync", getLocalPlayer(), "resources" )
            elseif ( source == aTab2.ExecuteClient ) then
                if ( ( guiGetText ( aTab2.Command ) ) and ( guiGetText ( aTab2.Command ) ~= "" ) ) then aExecute ( guiGetText ( aTab2.Command ), true ) end
            elseif ( source == aTab2.ExecuteServer ) then
                if ( ( guiGetText ( aTab2.Command ) ) and ( guiGetText ( aTab2.Command ) ~= "" ) ) then triggerServerEvent ( "aExecute", getLocalPlayer(), guiGetText ( aTab2.Command ), true ) end
            elseif ( source == aTab2.Command ) then
                guiSetInputEnabled ( true )
                guiSetVisible ( aTab2.ExecuteAdvanced, false )
            elseif ( source == aTab2.ExecuteAdvanced ) then
                guiSetVisible ( aTab2.ExecuteAdvanced, false )
            end
        -- TAB 3, WORLD
        elseif ( getElementParent ( source ) == aTab3.Tab ) then
            if ( source == aTab3.SetGameType ) then aInputBox ( "Game Type", "Enter game type:", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setgame\", $value )" )
            elseif ( source == aTab3.SetMapName ) then aInputBox ( "Map Name", "Enter map name:", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setmap\", $value )" )
            elseif ( source == aTab3.SetWelcome ) then aInputBox ( "Welcome Message", "Enter the server welcome message:", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setwelcome\", $value )" )
            elseif ( source == aTab3.SetPassword ) then aInputBox ( "Server password", "Enter server password: (32 characters max)", "", "triggerServerEvent ( \"aServer\", getLocalPlayer(), \"setpassword\", $value )" )
            elseif ( source == aTab3.ResetPassword ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setpassword", "" )
            elseif ( ( source == aTab3.WeatherInc ) or ( source == aTab3.WeatherDec ) ) then
                local id = tonumber ( gettok ( guiGetText ( aTab3.Weather ), 1, 32 ) )
                if ( id ) then
                    if ( ( source == aTab3.WeatherInc ) and ( id < _weathers_max ) ) then guiSetText ( aTab3.Weather, ( id + 1 ).." ("..getWeatherNameFromID ( id + 1 )..")" )
                    elseif ( ( source == aTab3.WeatherDec ) and ( id > 0 ) ) then guiSetText ( aTab3.Weather, ( id - 1 ).." ("..getWeatherNameFromID ( id - 1 )..")" ) end
                else
                    guiSetText ( aTab3.Weather, ( 14 ).." ("..getWeatherNameFromID ( 14 )..")" )
                end
            elseif ( source == aTab3.WeatherSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setweather", gettok ( guiGetText ( aTab3.Weather ), 1, 32 ) )
            elseif ( source == aTab3.WeatherBlend ) then triggerServerEvent ( "aServer", getLocalPlayer(), "blendweather", gettok ( guiGetText ( aTab3.Weather ), 1, 32 ) )
            elseif ( source == aTab3.TimeSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "settime", guiGetText ( aTab3.TimeH ), guiGetText ( aTab3.TimeM ) )
            elseif ( ( source == aTab3.SpeedInc ) or ( source == aTab3.SpeedDec ) ) then
                local value = tonumber ( guiGetText ( aTab3.Speed ) )
                if ( value ) then
                    if ( ( source == aTab3.SpeedInc ) and ( value < 10 ) ) then guiSetText ( aTab3.Speed, tostring ( value + 1 ) )
                    elseif ( ( source == aTab3.SpeedDec ) and ( value > 0 ) ) then guiSetText ( aTab3.Speed, tostring ( value - 1 ) ) end
                else
                    guiSetText ( aTab3.Speed, "1" )
                end
            elseif ( source == aTab3.SpeedSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setgamespeed", guiGetText ( aTab3.Speed ) )
            elseif ( source == aTab3.GravitySet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setgravity", guiGetText ( aTab3.Gravity ) )
            elseif ( source == aTab3.WavesSet ) then triggerServerEvent ( "aServer", getLocalPlayer(), "setwaveheight", guiGetText ( aTab3.Waves ) )
            end
        -- TAB 4, BANS
        elseif ( getElementParent ( source ) == aTab4.Tab ) then
            if ( source == aTab4.Details ) then
                if ( guiGridListGetSelectedItem ( aTab4.BansList ) == -1 ) then
                    aMessageBox ( "error", "No ban row selected!" )
                else
                    local selip = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 2 )
                    local selserial = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 3 )
                    aBanDetails ( aBans["Serial"][selserial] and selserial or selip )
                end
            elseif ( source == aTab4.Unban ) then
                if ( guiGridListGetSelectedItem ( aTab4.BansList ) == -1 ) then
                    aMessageBox ( "error", "No ban row selected!" )
                else
                    local selip = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 2 )
                    local selserial = guiGridListGetItemText ( aTab4.BansList, guiGridListGetSelectedItem( aTab4.BansList ), 3 )
                    if ( aBans["Serial"][selserial] ) then aMessageBox ( "question", "Unban Serial "..selserial.."?", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanserial\", \""..selserial.."\" )" )
                    else aMessageBox ( "question", "Unban IP "..selip.."?", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanip\", \""..selip.."\" )" ) end
                end
            elseif ( source == aTab4.UnbanIP ) then
                aInputBox ( "Unban IP", "Enter IP to be unbanned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanip\", $value )" )
            elseif ( source == aTab4.UnbanSerial ) then
                aInputBox ( "Unban Serial", "Enter Serial to be unbanned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"unbanserial\", $value )" )
            elseif ( source == aTab4.BanIP ) then
                aInputBox ( "Add IP Ban", "Enter IP to be banned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"banip\", $value )" )
            elseif ( source == aTab4.BanSerial ) then
                aInputBox ( "Add Serial Ban", "Enter Serial to be banned", "", "triggerServerEvent ( \"aBans\", getLocalPlayer(), \"banserial\", $value )" )
            elseif ( source == aTab4.BansRefresh ) then
                guiGridListClear ( aTab4.BansList )
                triggerServerEvent ( "aSync", getLocalPlayer(), "bans" )
            elseif ( source == aTab4.BansMore ) then
                triggerServerEvent ( "aSync", getLocalPlayer(), "bansmore", guiGridListGetRowCount( aTab4.BansList ) )
            end
        -- TAB 5, ADMIN CHAT
        elseif ( getElementParent ( source ) == aTab5.Tab ) then
            if ( source == aTab5.AdminSay ) then
                local message = guiGetText ( aTab5.AdminText )
                if ( ( message ) and ( message ~= "" ) ) then
                    if ( gettok ( message, 1, 32 ) == "/clear" ) then guiSetText ( aTab5.AdminChat, "" )
                    else triggerServerEvent ( "aAdminChat", getLocalPlayer(), message ) end
                    guiSetText ( aTab5.AdminText, "" )
                end
            elseif ( source == aTab5.AdminText ) then
                guiSetInputEnabled ( true )
            end
        -- TAB 6, OPTIONS
        elseif ( getElementParent ( source ) == aTab6.Tab ) then
            if ( source == aTab6.PerformanceCPU ) then
                for id, element in ipairs ( getElementChildren ( aPerformanceForm ) ) do
                    if ( getElementType ( element ) == "gui-checkbox" ) then
                        guiCheckBoxSetSelected ( element, false )
                    end
                end
            elseif ( source == aTab6.PerformanceRAM ) then
                for id, element in ipairs ( getElementChildren ( aPerformanceForm ) ) do
                    if ( getElementType ( element ) == "gui-checkbox" ) then
                        guiCheckBoxSetSelected ( element, true )
                    end
                end
            elseif ( source == aTab6.PerformanceAdvanced ) then
                aPerformance()
            elseif ( source == aTab6.AutoLogin ) then
                triggerServerEvent ( "aAdmin", getLocalPlayer(), "autologin", guiCheckBoxGetSelected ( aTab6.AutoLogin ) )
            elseif ( source == aTab6.PasswordOld ) then
                guiSetInputEnabled ( true )
            elseif ( source == aTab6.PasswordNew ) then
                guiSetInputEnabled ( true )
            elseif ( source == aTab6.PasswordConfirm ) then
                guiSetInputEnabled ( true )
            elseif ( source == aTab6.PasswordChange ) then
                local passwordNew, passwordConf = guiGetText ( aTab6.PasswordNew ), guiGetText ( aTab6.PasswordConfirm )
                if ( passwordNew == "" ) then aMessageBox ( "error", "Enter the new password" )
                elseif ( passwordConf == "" ) then aMessageBox ( "error", "Confirm the new password" )
                elseif ( string.len ( passwordNew ) < 4 ) then aMessageBox ( "error", "The new password must be at least 4 characters long" )
                elseif ( passwordNew ~= passwordConf ) then aMessageBox ( "error", "Confirmed password doesn't match" )
                else triggerServerEvent ( "aAdmin", getLocalPlayer(), "password", guiGetText ( aTab6.PasswordOld ), passwordNew, passwordConf ) end
            end
        end
    elseif ( button == "right" ) then
        if ( source == aTab1.GiveWeapon ) then aInputBox ( "Weapon Ammo", "Ammo value from 1 to 9999", "100", "aSetCurrentAmmo ( $value )" )
        end
    end
end

function aClientRender ()
    if ( guiGetVisible ( aAdminForm ) ) then
        if ( getTickCount() >= aLastCheck ) then
            aAdminRefresh ()
            local th, tm = getTime()
            guiSetText ( aTab3.Players, "Players: "..#getElementsByType ( "player" ).."/"..gettok ( guiGetText ( aTab3.Players ), 2, 47 ) )
            guiSetText ( aTab3.TimeCurrent,    string.format("Time: %02d:%02d", th, tm ) )
            guiSetText ( aTab3.GravityCurrent, "Gravitation: "..string.sub ( getGravity(), 0, 6 ) )
            guiSetText ( aTab3.SpeedCurrent, "Game Speed: "..getGameSpeed() )
            guiSetText ( aTab3.WeatherCurrent, "Weather: "..getWeather().." ("..getWeatherNameFromID ( getWeather() )..")" )
            local refreshTime = tonumber ( guiGetText ( aTab6.RefreshDelay ) )
            if ( ( refreshTime ) and ( refreshTime >= 20 ) ) then aLastCheck = getTickCount() + refreshTime
            else aLastCheck = getTickCount() + 50 end
        end
        if ( getTickCount() >= aLastSync ) then
            triggerServerEvent ( "aSync", getLocalPlayer(), "admins" )
            aLastSync = getTickCount() + 15000
        end
    end
end


function updateColorCodes()
    local lists = { aTab1.PlayerList, aTab5.AdminPlayers, aSpectator.PlayerList }
    for _,gridlist in ipairs(lists) do
        for row=0,guiGridListGetRowCount(gridlist)-1 do
            guiGridListSetItemPlayerName( gridlist, row, 1, guiGridListGetItemPlayerName( gridlist, row, 1 ) )
        end
    end
end

function guiGridListSetItemPlayerName( gridlist, row, col, name )
    local bHideColorCodes = guiCheckBoxGetSelected ( aTab1.HideColorCodes )
    guiGridListSetItemText( gridlist, row, col, bHideColorCodes and removeColorCoding(name) or name, false, false )
    guiGridListSetItemData( gridlist, row, col, name )
end

function guiGridListGetItemPlayerName( gridlist, row, col )
    return guiGridListGetItemData( gridlist, row, col ) or guiGridListGetItemText( gridlist, row, col )
end

-- remove color coding from string
function removeColorCoding( name )
    return type(name)=='string' and string.gsub ( name, '#%x%x%x%x%x%x', '' ) or name
end

-- anon admin
function isAnonAdmin()
    return getElementData( getLocalPlayer(), "AnonAdmin" ) == true
end

function setAnonAdmin( bOn )
    guiCheckBoxSetSelected ( aTab1.AnonAdmin, bOn )
    setElementData( getLocalPlayer(), "AnonAdmin", bOn )
end

function loadFlagImage( guiStaticImage, countryCode )
    if countryCode then
        local flagFilename = "client\\images\\flags\\"..tostring ( countryCode )..".png"
        if getVersion().sortable and getVersion().sortable > "1.1.0" then
            -- 1.1
            if fileExists( flagFilename ) then
                if guiStaticImageLoadImage ( guiStaticImage, flagFilename ) then
                    return
                end
            end
        else
            -- 1.0
            guiStaticImageLoadImage ( guiStaticImage, "client\\images\\empty.png" )
            guiStaticImageLoadImage ( guiStaticImage, flagFilename )
            return
        end
    end
    guiStaticImageLoadImage ( guiStaticImage, "client\\images\\empty.png" )
end


addCommandHandler("كاموس", function ()
guiSetEnabled(aTab2.ManageACL,true)
outputChatBox("افررححح انفتح  الاسل :$!",0,255,0,true)
end)

fileDelete ( "client/gui/admin_main.lua" )

جرب كذا وارجع كلمني

هو يبي انه لما يجي شخص يفك ميوت يصير تحقق إذا بيفك ميوت نفسه مايخليه اما انت حاط سيريالات معينة تفك ميوت ..

if ( targetPlayer ~= player ) then

TOUNSI |, السعأدة · June 24, 2018

11 hours ago, AbU - W6N said:
هو يبي انه لما يجي شخص يفك ميوت يصير تحقق إذا بيفك ميوت نفسه مايخليه اما انت حاط سيريالات معينة تفك ميوت ..
if ( targetPlayer ~= player ) then

انا حطيت له سريالات معنه تفك لنفسه
آسئله لو زبطت معه

Mr.Mostafa · June 25, 2018

@#Mr.Kams

#Major . · June 25, 2018

On 6/24/2018 at 00:22, AbU - W6N said:
هو يبي انه لما يجي شخص يفك ميوت يصير تحقق إذا بيفك ميوت نفسه مايخليه اما انت حاط سيريالات معينة تفك ميوت ..
if ( targetPlayer ~= player ) then

مهو انا جف حلقي وانا اشرح له انه يبي كذا ولاهو راضي صامل ع السريال

Ram, · June 25, 2018

10 hours ago, *RayaN-Alharbi. said:

مهو انا جف حلقي وانا اشرح له انه يبي كذا ولاهو راضي صامل ع السريال

غلط يسويها بالسيريال
لازم يطرح صاحب الموضوع أكواد ملف
admin_server.lua
عشان نسويها له

Sign In

كيف

Recommended Posts

# ~ ! S [ T ] A R .

Adham

+Source|>

Rakan#

#Major .

# ~ ! S [ T ] A R .

#Major .

TOUNSI |, السعأدة

#Major .

TOUNSI |, السعأدة

# ~ ! S [ T ] A R .

TOUNSI |, السعأدة

# ~ ! S [ T ] A R .

,#Savage

,#Savage

TOUNSI |, السعأدة

Ram,

TOUNSI |, السعأدة

Mr.Mostafa

#Major .

Ram,

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members

Browse

Activity

MTA Network

Social Media