Ram,

NssoR & MR.GRAND & MR.WiFi ..

L = Lock ( أنظر ) R

أههنيك , بس الصصور مو ظاهره , خخربانة , بالتوفيق لك =)

رح بعطيك اكواد اسهل , =) addCommandHandler("Command", -- الكوماند الي تبيها حقت اف8 function (cmd) if isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(cmd)),aclGetGroup("Group")) then -- القروبات , -- هنا حط الاكواد الي تبيها outputChatBox("الشي الي يطلع بللشات #",cmd,255,255,0,true) else outputChatBox( 'غير مصرح لك', cmd, 255, 0, 0, true ) -- الشي الي يطلع لو م معاه القروب , end end ) حطها ب ملف سيرفر , اتمنى اني افدتك ,

X = Xbox ( كونسل العاب ) الحرف المطلوب Q

W = Wrong ( خطأ ) الحرف المطلوب Y

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

جهنم تحرق انت وياه ههههههههههههههههههههههههههههههههههههه M = Map ( خريطة ) الحرف المطلوب Q

G : Good ( جيد ) الحرف المطلوب H يلآ يععوآل تففآعل .

واصل يخوي .. مابي اححطمك لكن المود منششور ..

السسسسلآم عليكم ورحمة الله وبركاته اليوم حبيت اقدم لكم موضوع بسيط وصغير .. وهو كيف تحمي نفسسسك من سحب الرتبة , اول شي , تروح لـ الاف تي بي , وتروح للمودات تروح لملف [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 ) وهكذا نكون وصلنا لنهاية الشرح .. اتمنى ان الموضوع قد اعجبكم , واتمنى انكم استفدتم .. في امان الله

X = Xbox ( كونسل العاب ) الحرف المطلوب Z

R - Race ( سباق ) الحرف المطلوب :- S

شششكرآ يخخوي الحمدالله ضبطتت

سسلآم عليكم ورحمة الله وبركآته , ابي اسستفسسر عن مشكلة في كود , ععندي كود لمهمه , يوم اشغله يجيني ب debugscript ككذآ سسلام عليكم , اخخوي عندي مشكلة بمود سباق القوارب .. يجيني كذا ب ال debugscript ERROR: Loading script failed: Boats_Race\server.lua:217:'end' expected (to colse 'function' at line 91) near '<eof>' وهذا هو فنكشن سطر 91 function checkEnd() c = 0 for i,p in pairs(getElementsByType("player"))do if checkExistPlrOnDuel(p) then c = c+1 winner = p end end طبعا هذا ب ملف سسيرفر .. و سسطر 217 هو الاند end end -- سطر 216 end -- سطر 217 ولاحد يقلي حط قوس بعد الاند , جربتها م نفعت .. وششكرا ..

شششششكرا لكم جميعا , الحمدالله سسويتت الكود والمود وكل شي =) , اشكركمم

سسسلام عليكم .. ابي كود , وهو كود منع كومند ب عالمم انا مخصصه مثلا , العالم رقم "9625" م ينفع يطلع فيه لوحة الادمن يعني يكتب ب اف 8 "admin" م تطلع له , معي كود منع الازرار بالعالم الوهمي , ابي كود منع الكوماند ب عالم وهمي , وششكرا ..

أبدعت ..