MR.KFO Posted December 15, 2015 Posted December 15, 2015 السلام عليكم عندي قريد لست تضيف اللاعبين لقروب معين بسيرفري ليه لما اضغط ادد ما يضيفه لكنج سيرفر او ريموف لما اضعطه ما يسحبه من كنج سيرفر حلل كلينت sa = guiCreateWindow(255, 118, 312, 440, "King Of Server", false) grid = guiCreateGridList(9, 27, 293, 256, false, sa) guiGridListAddColumn(mute_gridlist, "Player", 0.5) add = guiCreateButton(10, 290, 121, 37, "ADD", false, sa) rem = guiCreateButton(10, 120, 121, 37, "REMOVE", false, sa) addEventHandler("onClientGUIClick", root, function () if source == add then for i,player in ipairs(getElementsByType("player")) do triggerServerEvent("sasasa", localPlayer elseif source == rem then for i,player in ipairs(getElementsByType("player")) do triggerServerEvent("sasasa1", localPlayer) end end ) سيرفر addEvent("sasasa", true) addEventHandler("sasasa",root, function (s1) local acc = getAccountName(getPlayerAccount(source)) local player = getPlayerFromName(s1) if isObjectInACLGroup ( "user."..acc, aclGetGroup("Console")) then aclGroupAddObject ( "user."..acc, aclGetGroup("KingServer")) end ) addEvent("sasasa1", true) addEventHandler("sasasa1",root, function (s1) local acc = getAccountName(getPlayerAccount(source)) local player = getPlayerFromName(s1) if isObjectInACLGroup ( "user."..acc, aclGetGroup("Console")) then aclGroupRemoveObject ( "user."..acc, aclGetGroup("KingServer")) end )
SycroX Posted December 15, 2015 Posted December 15, 2015 السلام عليكم عندي قريد لست تضيف اللاعبين لقروب معين بسيرفري ليه لما اضغط ادد ما يضيفه لكنج سيرفر او ريموف لما اضعطه ما يسحبه من كنج سيرفر حلل كلينت sa = guiCreateWindow(255, 118, 312, 440, "King Of Server", false) grid = guiCreateGridList(9, 27, 293, 256, false, sa) guiGridListAddColumn(mute_gridlist, "Player", 0.5) add = guiCreateButton(10, 290, 121, 37, "ADD", false, sa) rem = guiCreateButton(10, 120, 121, 37, "REMOVE", false, sa) addEventHandler("onClientGUIClick", root, function () if source == add then for i,player in ipairs(getElementsByType("player")) do triggerServerEvent("sasasa", localPlayer elseif source == rem then for i,player in ipairs(getElementsByType("player")) do triggerServerEvent("sasasa1", localPlayer) end end ) سيرفر addEvent("sasasa", true) addEventHandler("sasasa",root, function (s1) local acc = getAccountName(getPlayerAccount(source)) local player = getPlayerFromName(s1) if isObjectInACLGroup ( "user."..acc, aclGetGroup("Console")) then aclGroupAddObject ( "user."..acc, aclGetGroup("KingServer")) end ) addEvent("sasasa1", true) addEventHandler("sasasa1",root, function (s1) local acc = getAccountName(getPlayerAccount(source)) local player = getPlayerFromName(s1) if isObjectInACLGroup ( "user."..acc, aclGetGroup("Console")) then aclGroupRemoveObject ( "user."..acc, aclGetGroup("KingServer")) end ) addEventHandler ("onClientGUIClick", add, function ( ) local Player = guiGridListGetItemText(grid, guiGridListGetSelectedItem(grid), 1) triggerServerEvent("Add", localPlayer, getPlayerFromName(Player)) end,false ) addEventHandler ("onClientGUIClick", rem, function ( ) local Player = guiGridListGetItemText(grid, guiGridListGetSelectedItem(grid), 1) triggerServerEvent("Remove", localPlayer, getPlayerFromName(Player)) end,false ) --#Server addEvent( "Add", true ) addEventHandler( "Add", root, function (thePlayer) if (isElement(thePlayer)) then local accountName = getAccountName(getPlayerAccount(thePlayer)) if ( accountName ) then aclGroupAddObject (aclGetGroup("KingServer"), "user."..accountName) end end end ) addEvent( "Remove", true ) addEventHandler( "Remove", root, function (thePlayer) if (isElement(thePlayer)) then local accountName = getAccountName(getPlayerAccount(thePlayer)) if ( accountName ) then aclGroupRemoveObject (aclGetGroup("KingServer"), "user."..accountName) end end end )
MR.KFO Posted December 15, 2015 Author Posted December 15, 2015 مشكور احمد طيب ابي احط كولمن لو هو معه كنج سيرفر يجي Yes ولو لا ييجي No
iPrestege Posted December 15, 2015 Posted December 15, 2015 استخدم ايفنت 'onPlayerLogin' وفنكشنات القريد ليست لو تعرفها لاني من الجوال حالياً وتتحقق من الحساب عندة المجموعة هذي ولالا .
MR.KFO Posted December 15, 2015 Author Posted December 15, 2015 استخدم ايفنت 'onPlayerLogin'وفنكشنات القريد ليست لو تعرفها لاني من الجوال حالياً وتتحقق من الحساب عندة المجموعة هذي ولالا . كود احمد ما اشتغل ما يضيفني للقروب ممكن مساعدة من اي حد
</Mr.Tn6eL> Posted December 15, 2015 Posted December 15, 2015 كوده ماتحقق انه محدد القريد ليست + ماتحقق ان الاعب المحدد مسجل دخوله + لا تنسى تضيف المود بقروب الادمن يعني بالعربي عطيه صلاحيات
iPrestege Posted December 15, 2015 Posted December 15, 2015 -- ClientSide -- sa = guiCreateWindow(255, 118, 312, 440, "King Of Server", false) grid = guiCreateGridList(9, 27, 293, 256, false, sa) c = guiGridListAddColumn(grid, "Player", 0.5) addOrRemove = guiCreateButton(10, 290, 121, 37, "ADD / Remove", false, sa) for i,v in ipairs ( getElementsByType ( "player" ) ) do local row = guiGridListAddRow ( grid ) guiGridListSetItemText ( grid, row,1,getPlayerName ( v ), false, false ) end addEventHandler ( 'onClientGUIClick',root, function ( ) if ( source == addOrRemove ) then local row,col = guiGridListGetSelectedItem ( grid ) if ( row and col and row ~= -1 and col ~= -1 ) then local pName = guiGridListGetItemText ( grid, guiGridListGetSelectedItem ( grid ), 1 ) triggerServerEvent ( 'AddOrRemoveGroupx',localPlayer,pName ) end end end ) -- ServerSide local xGroup = 'KingServer' addEvent ( 'AddOrRemoveGroupx',true ) addEventHandler ( 'AddOrRemoveGroupx',root, function ( xPlayer ) local player = getPlayerFromName ( xPlayer ) local account = getPlayerAccount ( player ) if account and isGuestAccount ( account ) then return false end local accountname = getAccountName ( account ) if ( getAccountData ( account,'inGroupx' ) == false ) then isObjectInACLGroup ( "user."..accountname, aclGetGroup ( 'Console' ) ) aclGroupAddObject ( aclGetGroup( xGroup ),'user.'..accountname ) setAccountData ( account,'inGroupx',true ) outputChatBox ( 'تمت الاضافة بنجاح',player,255,255,0,true ) else aclGroupRemoveObject ( aclGetGroup( xGroup ),'user.'..accountname ) setAccountData ( account,'inGroupx',false ) outputChatBox ( 'تمت الازالة بنجاح',player,255,0,0,true ) end end ) ما اقولك انة بيشتغل بس جرب وانا اختصرتها لك بـ زر واحد يضيف ويشيل جربة ورد لي خبر . ** لاتنسى تعطي المود صلاحياتة كاملة **
SycroX Posted December 15, 2015 Posted December 15, 2015 استخدم ايفنت 'onPlayerLogin'وفنكشنات القريد ليست لو تعرفها لاني من الجوال حالياً وتتحقق من الحساب عندة المجموعة هذي ولالا . كود احمد ما اشتغل ما يضيفني للقروب ممكن مساعدة من اي حد ضايف كودي لجروب كونسال ؟
MR.KFO Posted December 15, 2015 Author Posted December 15, 2015 كفو برستيج والله انك كفوو مدري ليش مو واخذ مشرف بالمنتدي
iPrestege Posted December 15, 2015 Posted December 15, 2015 اهلاً وسهلاً ماعندي وقت دائماً للمنتدى والمنتدى مايحتاج تابل موجود حالياً وتيتي ضروف دراسة و اماراتي ماندري وينة بالتوفيق .
MR.KFO Posted December 15, 2015 Author Posted December 15, 2015 اهلاً وسهلاًماعندي وقت دائماً للمنتدى والمنتدى مايحتاج تابل موجود حالياً وتيتي ضروف دراسة و اماراتي ماندري وينة بالتوفيق . الله يوفقك برستيج طيب اسف للازعاج انا ابي لو اللاعب كنج سيرفر يظهر بكولمن Yes والي مو كنج سيرفر يظهر No
Mr.Ronaldo Posted December 15, 2015 Posted December 15, 2015 اهلاً وسهلاًماعندي وقت دائماً للمنتدى والمنتدى مايحتاج تابل موجود حالياً وتيتي ضروف دراسة و اماراتي ماندري وينة بالتوفيق . الله يوفقك برستيج طيب اسف للازعاج انا ابي لو اللاعب كنج سيرفر يظهر بكولمن Yes والي مو كنج سيرفر يظهر No تقدر تسوي لو اتحقق انه معه الرتبه ينقلو لداتا معينه طبعا كل ذا تسويه بالسيرفر الفنكشنات : isObjectInACLGroup setElementData بعدين تروح للكلينت تسوي كولمن ثاني وتسوي لوب لجميع اللاعبين وتتحقق اذا اللاعب معه الداتا تصير Yes ولا ما معه تصير No الفنكشنات : getElementData guiGridListSetItemText
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now