Jump to content

قريد لست


MR.KFO

Recommended Posts

السلام عليكم

عندي قريد لست تضيف اللاعبين لقروب معين بسيرفري

ليه لما اضغط ادد ما يضيفه لكنج سيرفر

او ريموف لما اضعطه ما يسحبه من كنج سيرفر

حلل :(

كلينت

  
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 
) 
  

Link to comment
السلام عليكم

عندي قريد لست تضيف اللاعبين لقروب معين بسيرفري

ليه لما اضغط ادد ما يضيفه لكنج سيرفر

او ريموف لما اضعطه ما يسحبه من كنج سيرفر

حلل :(

كلينت

  
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 
 ) 

Link to comment
استخدم ايفنت 'onPlayerLogin'

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

:roll:

كود احمد ما اشتغل ما يضيفني للقروب

ممكن مساعدة من اي حد

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

ما اقولك انة بيشتغل بس جرب وانا اختصرتها لك بـ زر واحد يضيف ويشيل جربة ورد لي خبر .

** لاتنسى تعطي المود صلاحياتة كاملة **

:roll:

Link to comment
استخدم ايفنت 'onPlayerLogin'

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

:roll:

كود احمد ما اشتغل ما يضيفني للقروب

ممكن مساعدة من اي حد

ضايف كودي لجروب كونسال ؟

Link to comment
اهلاً وسهلاً

ماعندي وقت دائماً للمنتدى والمنتدى مايحتاج تابل موجود حالياً وتيتي ضروف دراسة و اماراتي ماندري وينة :D

بالتوفيق .

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

طيب اسف للازعاج انا ابي لو اللاعب كنج سيرفر يظهر بكولمن Yes والي مو كنج سيرفر يظهر No

Link to comment
اهلاً وسهلاً

ماعندي وقت دائماً للمنتدى والمنتدى مايحتاج تابل موجود حالياً وتيتي ضروف دراسة و اماراتي ماندري وينة :D

بالتوفيق .

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

طيب اسف للازعاج انا ابي لو اللاعب كنج سيرفر يظهر بكولمن Yes والي مو كنج سيرفر يظهر No

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

الفنكشنات :

isObjectInACLGroup 
setElementData 

بعدين تروح للكلينت تسوي كولمن ثاني وتسوي لوب لجميع اللاعبين وتتحقق اذا اللاعب معه الداتا تصير Yes ولا ما معه تصير No

الفنكشنات :

getElementData 
guiGridListSetItemText 

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...