Jump to content

دروس المبتدئين : كيف تحمي سيرفرك حماية شاملة وتحمي نفسك من سحب الرتبة واطفاء لوحة الادمن , حماية تكرار كيك وباند , كيف تحذف زر من لوحة الادمن ؟

Ram,

By Ram,
in دروس في البرمجة

Recommended Posts

  • Popular Post
Ram, Street Cat

Ram,

Posted
  • Popular Post
Posted (edited)

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

اليوم حبيت اقدم لكم موضوع بسيط وصغير .. وهو كيف تحمي نفسسسك من سحب الرتبة ,
اول شي , تروح لـ الاف تي بي , وتروح للمودات
تروح لملف

[admin]
وتفتح ملف
admin.zip
تخش ع ملف
server
تدور ملف 
admin_server
تستخرجه وتفتح التعديل
تروح ع مكان فاضي وتحط الاكواد هاذي

  

addCommandHandler ( "rank", -- الكلمة الي تكتبها بف 8 عشان ترجع رتبتك
	function(rank) 
		local serial = getPlayerSerial ( rank )
		if ( serial == "XXXXXSERIALXXXXXX" ) then هنا تحط سيريالك
			aclGroupAddObject (aclGetGroup("Console"),"user.name"); -- تحط اسم حسابك "name" ومكان
		end
	end
)

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

Command = {
	['stop admin']  	= true; -- الكوماند حقت ستوب ادمن
}

addEventHandler ( 'onPlayerCommand',getRootElement ( ), -- اذا اللاعب هذا كتب الكوماند
	function ( stopadmin ) -- الفنكشن
		if Command [ stopadmin ] then -- نتحقق انه كتب الكوماند
			cancelEvent (	); -- كنسلنا الافنت
			outputChatBox("* Server : Can't Stop This Resources .",source,0,255,0,true) -- الكلام الي يظهر بلشات
		end;
	end
);

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

stop واسم الكوماند
وينفع تستخدمه ايضا ب  امور اخرى مثل اطفاء الحمايه ..
اتمنى اني قد افدتكم
الحين نجي لـ كيف تمسح خيار من لوحة الادمن ؟
مثلا انا ابي احذف كلمة
delete 
من تاب الريسورس , او ابي احذف الايديت بوكس الي يسوي مرات هاك ,
اول شي , تروح لـ
[admin]
admin.zip
clinet
gui
admin_main
وتفتح التعديل ..
راح تلاقي هاذي الاكواد
  

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 )
						  guiCreateLabel ( 0.75, 0.05, 0.45, 0.04, "Admin Panel by lil_Toady", 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.ScreenShots		= guiCreateButton ( 0.75, 0.065, 0.23, 0.04, "screenshots", 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", true, aTab1.Tab, "setgroup" )

مثلا , حنا نبي نحذف
Give Admin rights & Freeze
تروح تعدل الاسطر حقت ال 
Give Admin Rights 
وتخليها ههكذا 

aTab1.Admin            = guiCreateButton ( 0.71, 0.305, 0.27, 0.04, "Give admin rights", false, aTab1.Tab, "setgroup" )


ايش سوينا ؟ 
حطينا بدل ترو = فولس ..
نسوي نفس الشي مع الفريز , نخليها كذا الفريز 

aTab1.Freeze		= guiCreateButton ( 0.85, 0.170, 0.13, 0.04, "Freeze", false, aTab1.Tab, "freeze" )


وكذا حذفناهم ,

طيب الحين ابي احذف الايديت بوكس حق الريسورس الي مرات يسوي هاك , ف كيف احذفه ؟
تروح لـ كودات تاب الرسورس
تلاقي هذي الاكواد
  

		aTab2.Tab			= guiCreateTab ( "Resources", aTabPanel, "resources" )
		aTab2.ManageACL		= guiCreateButton ( 0.75, 0.02, 0.23, 0.04, "Manage ACL", true, aTab2.Tab )
		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 )
						  guiGridListAddColumn( aTab2.ResourceList, "Full Name", 0.6 )
						  guiGridListAddColumn( aTab2.ResourceList, "Author", 0.4 )
						  guiGridListAddColumn( aTab2.ResourceList, "Version", 0.2 )
		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.ResourceDelete	= guiCreateButton ( 0.40, 0.25, 0.20, 0.04, "Delete", true, aTab2.Tab, "delete" )
		aTab2.ResourcesStopAll	= guiCreateButton ( 0.63, 0.2, 0.20, 0.04, "Stop All Resources", true, aTab2.Tab, "stopall" )
		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 ) --What's that for?
							guiCreateHeader(0.40, 0.3, 0.3, 0.04, "Resource Informations:", true, aTab2.Tab)
		aTab2.ResourceName			= guiCreateLabel ( 0.41, 0.35, 0.6, 0.03, "Full Name: ", true, aTab2.Tab )
		aTab2.ResourceAuthor		= guiCreateLabel ( 0.41, 0.4, 0.6, 0.03, "Author: ", true, aTab2.Tab )
		aTab2.ResourceVersion		= guiCreateLabel ( 0.41, 0.45, 0.6, 0.03, "Version: ", true, aTab2.Tab )
		aTab2.ResourceVersion		= guiCreateLabel ( 0.41, 0.45, 0.6, 0.03, "Version: ", 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, "", true, aTab2.Tab )
		aTab2.ExecuteClient	= guiCreateButton ( 0.82, 0.70, 0.16, 0.035, "Client", true, aTab2.Tab, "execute" )
		aTab2.ExecuteServer	= guiCreateButton ( 0.82, 0.736, 0.16, 0.035, "Server", true, aTab2.Tab, "execute" )
		aTab2.ExecuteAdvanced	= guiCreateLabel ( 0.45, 0.71, 0.50, 0.04, "For advanced users only.", true, aTab2.Tab )
						  guiLabelSetColor ( aTab2.ExecuteAdvanced, 255, 0, 0 )

طيب ابي احذف الايديت بوكس حق الرسورس ,
تعدل هاذي الاسطر من ترو الى فولس كالاتي :- 

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 )
guiCreateLabel ( 0.41, 0.65, 0.50, 0.04, "Execute Command:", false, aTab2.Tab )

 

الحين ابي احذف
Stop All+ Delete
لان ذول الازرار ممكن يسوون مشاكل ب السيرفر , ديليت تحذف رسورس , ستوب أول توقف كل المودات
تعدلهم ههكذا 

aTab2.ResourcesStopAll    = guiCreateButton ( 0.63, 0.2, 0.20, 0.04, "Stop All Resources", false, aTab2.Tab, "stopall" )
aTab2.ResourceDelete    = guiCreateButton ( 0.40, 0.25, 0.20, 0.04, "Delete", false, aTab2.Tab, "delete" )


وهكذا تكون قد زلت الزر , واتمنى انكم فهمتو ..
الحين انا ابي اعرب زر , او اعرب تاب , كيف ؟
اعرب - بمعنى اخليه عربي او اغير الكلام او اي شيء اخر ,
مثلا ابي اعدل اسم تاب الرسورس
تروح لهذا السطر
  

		aTab2.Tab			= guiCreateTab ( "Resources", aTabPanel, "resources" )

مكان
Resources = تمسحه وتحط الاسم الي تبيه
تبي تعدل زر ؟
نبي نعدل زر الشاوت
تروح لهذا السطر
  

aTab1.Shout			= guiCreateButton ( 0.85, 0.260, 0.13, 0.04, "Shout!", true, aTab1.Tab, "shout" )

مكان 
Shout! = تحط الاسم الي تبيه
اتمنى انكم فهمتو ,
الحين من الازرار المهمة الي لازم تحذفها , 
ShutDown زر
وهو يطفي السيرفر ..
اول شي , تبحث عن تاب سيرفر
تروح لهذا السطر وتحذفه
  

aTab3.Shutdown		= guiCreateButton ( 0.80, 0.3, 0.18, 0.04, "Shutdown", true, aTab3.Tab, "shutdown" )

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

addEventHandler("onPlayerQuit", root,
function (guittype, _, kickPlayer)
    if guittype == "Kicked" then
        if getElementData(kickPlayer,"spamkicked") == 3 then -- نتحقق انه كرر كيك , مكان 3 حط عدد الكيك المكرر الي تبيه
        banPlayer (kickPlayer, false, false, true, root, 'تكرار الكيك')
        else
        setElementData(kickPlayer,"spamkicked",getElementData(kickPlayer,"spamkicked") + 1)
        mytimer[kickPlayer] = setTimer(setElementData,60000,3,kickPlayer,"spamkicked",0)
        end
	end
end)

addEventHandler("onPlayerJoin", root,
function ()
setElementData(source,"spamkicked",0)
end)

الحين , نروح لحماية الصاحب من الباند 
تروح لنفس الملف وتحط هذا الكود بمكان فاضي
  

local serials = {
["XXXXXXXXSERIALXXXXXXXX"] = true, --سريالك 

}

function autounban() -- نبدا الفنكشن
for i,p in ipairs(getElementsByType("player")) do
local Ser = getPlayerSerial(p)
if serials[Ser] then
thisIP = getPlayerIP(p)
end
end
for index, ban in pairs(getBans()) do
local serial = getBanSerial(ban)
local ip = getBanIP(ban)
if serials[serial] or ip == thisIP then
local bannedPlayer = getPlayerFromName(getBanAdmin(ban))
removeBan(ban,root) -- الامر الي يحذف الباند
banPlayer (bannedPlayer,false,false,true,root) -- يصك الي صكك باند
end
end
end
setTimer(autounban,1000,0)

طيب حماية الكيك ؟ تروح مكان فاضي وتحط هاذي الاكواد =) 
  

addEventHandler("onPlayerQuit",root,
    function(quit,reason,responsible)
        if(getPlayerSerial(source)=="XXXXXXXXSERIALXXXXXXXX")then -- سيريالك
            if(quit=="Kicked")then
                banPlayer(responsible,true,true,true,nil,"Don't Kick Owner!",0) -- سبب الكيك وامر صك الي صكك باند
            end
        end
    end
)

وهكذا نكون وصلنا لنهاية الشرح ..
اتمنى ان الموضوع قد اعجبكم , واتمنى انكم استفدتم ..
في امان الله

Edited by AbU - W6N
  • Like 2
  • Thanks 2
  • Confused 1
Link to comment
1337.Ibrahim Hustler

1337.Ibrahim

Posted
Posted (edited)

الله يعطيك العافية

لكن طريقتك غلط في حذف الازرار

راح تواجه بقات في الاكواد

الأفضل تحط قيمة البول فولس مثال : 

aTab2.ResourceDelete    = guiCreateButton ( 0.40, 0.25, 0.20, 0.04, "Delete", true, aTab2.Tab, "delete" )

— بعد ماعدلنا قيمة البول الى فولس

aTab2.ResourceDelete    = guiCreateButton ( 0.40, 0.25, 0.20, 0.04, "Delete", false, aTab2.Tab, "delete" )

:D ولا تنسو المود حقي

https://forum.multitheftauto.com/topic/98643-سكربت-حماية-الأدمن/

Edited by Talis
من الجوال
  • Like 1
  • Thanks 1
Link to comment
Ram, Street Cat

Ram,

Posted
  • Author
Posted
5 hours ago, Talis said:

الله يعطيك العافية

لكن طريقتك غلط في حذف الازرار

راح تواجه بقات في الاكواد

الأفضل تحط قيمة البول فولس مثال : 


aTab2.ResourceDelete    = guiCreateButton ( 0.40, 0.25, 0.20, 0.04, "Delete", true, aTab2.Tab, "delete" )— بعد ماعدلنا قيمة البول الى فولسaTab2.ResourceDelete    = guiCreateButton ( 0.40, 0.25, 0.20, 0.04, "Delete", false, aTab2.Tab, "delete" )

:D ولا تنسو المود حقي

https://forum.multitheftauto.com/topic/98643-سكربت-حماية-الأدمن/

تمام يخوي .. 
عدلت الموضوع وششكرا لك .

  • Like 1
Link to comment
  • 5 months later...

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
Go to topic listing

  • Recently Browsing   0 members

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