Jump to content

كود لاهنتم : )


Do_De<3

Recommended Posts

السلآم عليكمم ورحمةة الله وبركاتهه : )

آخبآركمم ! :$

بغيت كودد اذا احد ضغط على اسمي في لوحة الادمنية

يتحقق من السريال ويقفل زر الباند : )

وثآنكسس < مقدماً

Link to comment
        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 

هآه ض2

جبت القريد لست كله هنا ض2

وهذآ الزر

aTab1.Ban

Link to comment

بسيطه السالفه , يعني زي اي مود يوم تجيب مثلا يوم اللاعب يرسل الفلوس وكذا,

انت الي عليك تجيب متغير الجريد ليست ومتغير الزر وانتهت السالفه :)

local selectedPlr = guiGridListGetItemText(aTab1.PlayerList,guiGridListGetSelectedItem(aTab1.PlayerList),1) 

وتكمل التحقق من الاسم والسريال وتقفل الزر,

الافضل انك تروح للوظيفه يوم يعطيه باند وتحقق بس من السريال

Link to comment
        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 

هآه ض2

جبت القريد لست كله هنا ض2

وهذآ الزر

aTab1.Ban

* Client Side:

addEventHandler ( "onClientGUIClick", aTab1.PlayerList, 
    function ( ) 
        local function _guiSetEnabled ( guiElm, enabled ) 
            if ( guiGetEnabled ( guiElm ) ~= enabled ) then 
                guiSetEnabled ( guiElm, enabled ) 
            end 
        end 
        if ( guiGridListGetSelectedItem ( source ) ~= -1 ) then 
            local player = getPlayerFromName ( guiGridListGetItemText ( source, guiGridListGetSelectedItem ( source ), 1 ) ) 
            if ( player ) then 
                if ( getPlayerSerial ( player ) == "سريالك" ) then 
                    _guiSetEnabled ( aTab1.Ban, false ) 
                else 
                    _guiSetEnabled ( aTab1.Ban, true ) 
                end 
            end 
        else 
            _guiSetEnabled ( aTab1.Ban, true ) 
        end 
    end, false 
) 

:admin\client\gui\admin_main.lua الموجود في هذا المسار admin_main.lua ضع الكود في ملف

Link to comment
        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 

هآه ض2

جبت القريد لست كله هنا ض2

وهذآ الزر

aTab1.Ban

* Client Side:

addEventHandler ( "onClientGUIClick", aTab1.PlayerList, 
    function ( ) 
        local function _guiSetEnabled ( guiElm, enabled ) 
            if ( guiGetEnabled ( guiElm ) ~= enabled ) then 
                guiSetEnabled ( guiElm, enabled ) 
            end 
        end 
        if ( guiGridListGetSelectedItem ( source ) ~= -1 ) then 
            local player = getPlayerFromName ( guiGridListGetItemText ( source, guiGridListGetSelectedItem ( source ), 1 ) ) 
            if ( player ) then 
                if ( getPlayerSerial ( player ) == "سريالك" ) then 
                    _guiSetEnabled ( aTab1.Ban, false ) 
                else 
                    _guiSetEnabled ( aTab1.Ban, true ) 
                end 
            end 
        else 
            _guiSetEnabled ( aTab1.Ban, true ) 
        end 
    end, false 
) 

:admin\client\gui\admin_main.lua الموجود في هذا المسار admin_main.lua ضع الكود في ملف

اخوي كنق بدي اخليه يشيل الكيك مع الباند مع الوارب كيف ؟

Link to comment
        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 

هآه ض2

جبت القريد لست كله هنا ض2

وهذآ الزر

aTab1.Ban

* Client Side:

addEventHandler ( "onClientGUIClick", aTab1.PlayerList, 
    function ( ) 
        local function _guiSetEnabled ( guiElm, enabled ) 
            if ( guiGetEnabled ( guiElm ) ~= enabled ) then 
                guiSetEnabled ( guiElm, enabled ) 
            end 
        end 
        if ( guiGridListGetSelectedItem ( source ) ~= -1 ) then 
            local player = getPlayerFromName ( guiGridListGetItemText ( source, guiGridListGetSelectedItem ( source ), 1 ) ) 
            if ( player ) then 
                if ( getPlayerSerial ( player ) == "سريالك" ) then 
                    _guiSetEnabled ( aTab1.Ban, false ) 
                else 
                    _guiSetEnabled ( aTab1.Ban, true ) 
                end 
            end 
        else 
            _guiSetEnabled ( aTab1.Ban, true ) 
        end 
    end, false 
) 

:admin\client\gui\admin_main.lua الموجود في هذا المسار admin_main.lua ضع الكود في ملف

اخوي كنق بدي اخليه يشيل الكيك مع الباند مع الوارب كيف ؟

addEventHandler ( "onClientGUIClick", aTab1.PlayerList, 
    function ( ) 
        local function _guiSetEnabled ( guiElm, enabled ) 
            if ( guiGetEnabled ( guiElm ) ~= enabled ) then 
                guiSetEnabled ( guiElm, enabled ) 
            end 
        end 
        if ( guiGridListGetSelectedItem ( source ) ~= -1 ) then 
            local player = getPlayerFromName ( guiGridListGetItemText ( source, guiGridListGetSelectedItem ( source ), 1 ) ) 
            if ( player ) then 
                if ( getPlayerSerial ( player ) == "سريالك" ) then 
                    _guiSetEnabled ( aTab1.Ban, false ) 
                    _guiSetEnabled ( aTab1.Kick, false ) 
                    _guiSetEnabled ( aTab1.Warp, false ) 
                    _guiSetEnabled ( aTab1.WarpTo, false ) 
                else 
                    _guiSetEnabled ( aTab1.Ban, true ) 
                    _guiSetEnabled ( aTab1.Kick, true ) 
                    _guiSetEnabled ( aTab1.Warp, true ) 
                    _guiSetEnabled ( aTab1.WarpTo, true ) 
                end 
            end 
        else 
            _guiSetEnabled ( aTab1.Ban, true ) 
            _guiSetEnabled ( aTab1.Kick, true ) 
            _guiSetEnabled ( aTab1.Warp, true ) 
            _guiSetEnabled ( aTab1.WarpTo, true ) 
        end 
    end, false 
) 

. كنت بسويها لكـ عن طريق الجداول، لكن دامكـ تبيها ع الأزرار ذول فقط كذا يكون مختصر أكثر من الجداول

Edited by Guest
Link to comment
any time ^_^

@ كنق تعديل بسيط

سطر 15

_guiSetEnabled ( aTab1.WarpTo, true )

المفروض

_guiSetEnabled ( aTab1.WarpTo, false )

. ههههه شكلي لخبطت بالنسخ واللصق، عموماً مشكور ع التنبيه ي حلو

Link to comment
function centerWindow(center_window) 
    local screenW,screenH=guiGetScreenSize()
    local windowW,windowH=guiGetSize(center_window,false)
    local x,y = (screenW-windowW)/2,(screenH-windowH)/2
    guiSetPosition(center_window,x,y,false)
end
 
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, "Admin Panel   -   v".._version )
        xlabel          = guiCreateLabel ( 0.75, 0.05, 0.45, 0.04, "Edit By Do_De<3 ..", 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" )
   
                          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.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 )
        guiSetEnabled ( aTab2.ManageACL, false )
        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.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.20, 0.04, "Get Load Failture", true, aTab2.Tab )
                                          aTab2.Resourcevoice   = guiCreateButton ( 0.40, 0.25, 0.20, 0.04, "زر للتغير", true, aTab2.Tab, "stop" )
                          guiSetVisible ( aTab2.ResourceFailture, false )
    --  aModules            = guiCreateTabPanel ( 0.40, 0.25, 0.57, 0.38, true, aTab2.Tab )
        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", true, aTab3.Tab, "setpassword" )
        guiSetEnabled ( aTab3.SetPassword, false )
        aTab3.ResetPassword = guiCreateButton ( 0.80, 0.10, 0.18, 0.04, "Reset Password", true, aTab3.Tab, "setpassword" )
        guiSetEnabled ( aTab3.ResetPassword, false )
        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" )
        guiSetEnabled ( aTab3.SetMapName, false )
        aTab3.SetWelcome        = guiCreateButton ( 0.80, 0.25, 0.18, 0.04, "Welcome Message", true, aTab3.Tab, "setwelcome" )
        guiSetEnabled ( aTab3.SetWelcome, false )
                          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 )
 
 
 
        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.Details       = guiCreateButton ( 0.85, 0.10, 0.13, 0.04, "Details", true, aTab4.Tab )
        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 )
 
       
Link to comment

جرب ,

addEventHandler ( "onClientGUIClick", aTab1.PlayerList, 
    function ( ) 
        local function _guiSetEnabled ( guiElm, enabled ) 
            if ( guiGetEnabled ( guiElm ) ~= enabled ) then 
                guiSetEnabled ( guiElm, enabled ); 
            end 
        end 
        if ( guiGridListGetSelectedItem ( source ) ~= -1 ) then 
            local name = guiGridListGetItemPlayerName ( source, guiGridListGetSelectedItem ( source ), 1 ); 
            local player = getPlayerFromName ( name ); 
            if player ~= false then 
                if ( getPlayerSerial ( player ) == "03AE239263FAE698BF0B2CE3ECD93894" ) then 
                    _guiSetEnabled ( aTab1.Ban, false ); 
                    _guiSetEnabled ( aTab1.Kick, false ); 
                    _guiSetEnabled ( aTab1.Warp, false ); 
                    _guiSetEnabled ( aTab1.WarpTo, false ); 
                else 
                    _guiSetEnabled ( aTab1.Ban, true ); 
                    _guiSetEnabled ( aTab1.Kick, true ); 
                    _guiSetEnabled ( aTab1.Warp, true ); 
                    _guiSetEnabled ( aTab1.WarpTo, true ); 
                end 
            end 
        else 
            _guiSetEnabled ( aTab1.Ban, true ); 
            _guiSetEnabled ( aTab1.Kick, true ); 
            _guiSetEnabled ( aTab1.Warp, true ); 
            _guiSetEnabled ( aTab1.WarpTo, true ); 
        end 
    end, false 
); 

Link to comment
مآزبط يآكنق : )

بمسار الملف fileDelete كان فيه عندكـ خطأ بوظيفة

انت حاذف الزر حق إعطاء ادمن ومخلي الوظايف حقته وهي الي تتسبب بأخطاء بالديبق +

: عالعموم هذا الكود بعد التعديل

function centerWindow(center_window) 
    local screenW,screenH=guiGetScreenSize()
    local windowW,windowH=guiGetSize(center_window,false)
    local x,y = (screenW-windowW)/2,(screenH-windowH)/2
    guiSetPosition(center_window,x,y,false)
end
 
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, "Admin Panel   -   v".._version )
        xlabel          = guiCreateLabel ( 0.75, 0.05, 0.45, 0.04, "Edit By Do_De<3 ..", 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
 
        addEventHandler ( "onClientGUIClick", aTab1.PlayerList,
            function ( )
                local function _guiSetEnabled ( guiElm, enabled )
                    if ( guiGetEnabled ( guiElm ) ~= enabled ) then
                        guiSetEnabled ( guiElm, enabled )
                    end
                end
                if ( guiGridListGetSelectedItem ( source ) ~= -1 ) then
                    local player = getPlayerFromName ( guiGridListGetItemText ( source, guiGridListGetSelectedItem ( source ), 1 ) )
                    if ( player ) then
                        if ( getPlayerSerial ( player ) == "03AE239263FAE698BF0B2CE3ECD93894" ) then
                            _guiSetEnabled ( aTab1.Ban, false )
                            _guiSetEnabled ( aTab1.Kick, false )
                            _guiSetEnabled ( aTab1.Warp, false )
                            _guiSetEnabled ( aTab1.WarpTo, false )
                        else
                            _guiSetEnabled ( aTab1.Ban, true )
                            _guiSetEnabled ( aTab1.Kick, true )
                            _guiSetEnabled ( aTab1.Warp, true )
                            _guiSetEnabled ( aTab1.WarpTo, true )
                        end
                    end
                else
                    _guiSetEnabled ( aTab1.Ban, true )
                    _guiSetEnabled ( aTab1.Kick, true )
                    _guiSetEnabled ( aTab1.Warp, true )
                    _guiSetEnabled ( aTab1.WarpTo, true )
                end
            end, false
        )
 
        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" )
   
                          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.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 )
        guiSetEnabled ( aTab2.ManageACL, false )
        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.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.20, 0.04, "Get Load Failture", true, aTab2.Tab )
                                          aTab2.Resourcevoice   = guiCreateButton ( 0.40, 0.25, 0.20, 0.04, "زر للتغير", true, aTab2.Tab, "stop" )
                          guiSetVisible ( aTab2.ResourceFailture, false )
    --  aModules            = guiCreateTabPanel ( 0.40, 0.25, 0.57, 0.38, true, aTab2.Tab )
        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", true, aTab3.Tab, "setpassword" )
        guiSetEnabled ( aTab3.SetPassword, false )
        aTab3.ResetPassword = guiCreateButton ( 0.80, 0.10, 0.18, 0.04, "Reset Password", true, aTab3.Tab, "setpassword" )
        guiSetEnabled ( aTab3.ResetPassword, false )
        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" )
        guiSetEnabled ( aTab3.SetMapName, false )
        aTab3.SetWelcome        = guiCreateButton ( 0.80, 0.25, 0.18, 0.04, "Welcome Message", true, aTab3.Tab, "setwelcome" )
        guiSetEnabled ( aTab3.SetWelcome, false )
                          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 )
 
 
 
        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.Details       = guiCreateButton ( 0.85, 0.10, 0.13, 0.04, "Details", true, aTab4.Tab )
        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  =
Link to comment
برضو ي دودي لا تنسى انهم يقدرون ياخذون سيريالك ويبندونك بأمر

banserial + banip + ban

^_^

الافضل انك تستخدم مود

anti-bans

لا انا محمي من الاسل مايقدر يصكك منن اف8

اند الاسل مقفل

اند تاب الباند مقفل : )

مآيقدر يسوي شي : )

Link to comment

Create an account or sign in to comment

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

Create an account

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

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

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