Jump to content

طلب كود


Recommended Posts

Posted

سلام عليكم انا عامل مود

وفيه button'

اسمه

Copy

ابي اعمله لما يضعط عليه

ينسخ الكتبو وش الفكشن؟

Posted
سلام عليكم انا عامل مود

وفيه button'

اسمه

Copy

ابي اعمله لما يضعط عليه

ينسخ الكتبو وش الفكشن؟

setClipboard 
Posted

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

يمسح الشات بالقريد لست

انا ابي يتخفي الbutton

للقروبات الغير ممتححده

والمتحدد يفتح

addEventHandler ("onClientGUIClick",resourceRoot, 
function () 
if ( source == GUIEditor.button[3] ) then 
triggerServerEvent ("Clear",localPlayer,getPlayerName(localPlayer)) 
end 
--sendMessage code 
end) 
  
addEvent ("CLEAR",true) 
addEventHandler ("CLEAR",root, 
function (name) 
guiGridListClear (GUIEditor.gridlist[1]) 
rw = guiGridListAddRow (GUIEditor.gridlist[1]) 
guiGridListSetItemText (GUIEditor.gridlist[1],rw,1," "..name:gsub("#%x%x%x%x%x%x", "").. " - Cleard Chat",false,false) 
end) 
  

Posted
groupAdmins = {"Consoles","Admin"} -- حط القروبات اللي تمسح و يكون البوتون عندها مفتوح 
  
function isPlayerAdmin(  player  ) 
    local aPlayerAccount = getPlayerAccount( player ) 
    if ( not aPlayerAccount or isGuestAccount( aPlayerAccount ) ) then return false end 
    local aPlayerAccountName=getAccountName(aPlayerAccount) 
    for _ , Group in ipairs (   groupAdmins   ) do 
        if isObjectInACLGroup("user."..aPlayerAccountName, aclGetGroup(Group)) then 
            return true 
        end 
    end 
end 
  
  
addEvent ("Clear",true) 
addEventHandler ("Clear",root, 
function (name) 
if not isPlayerAdmin( source ) then return triggerClientEvent(source,"GoOut",source) end 
for i,k in ipairs (getElementsByType("player")) do 
triggerClientEvent (k,"CLEAR",k,name) 
end 
end) 

Posted
addEventHandler ("onClientResourceStart",resourceRoot, 
function () 
guiSetEnabled (GUIEditor.button[3],false) 
triggerServerEvent ("eCheck",localPlayer) 
end) 
  
addEvent ("eCDone",true) 
addEventHandler ("eCDone",root, 
function () 
guiSetEnabled (GUIEditor.button[3],true) 
end) 
groupAdmins = {"Consoles","Admin"} -- حط القروبات اللي تمسح و يكون البوتون عندها مفتوح 
function isPlayerAdmin(  player  ) 
    local aPlayerAccount = getPlayerAccount( player ) 
    if ( not aPlayerAccount or isGuestAccount( aPlayerAccount ) ) then return false end 
    local aPlayerAccountName=getAccountName(aPlayerAccount) 
    for _ , Group in ipairs (   groupAdmins   ) do 
        if isObjectInACLGroup("user."..aPlayerAccountName, aclGetGroup(Group)) then 
            return true 
        end 
    end 
end 
addEvent ("eCheck",true) 
addEventHandler ("eCheck",root, 
function () 
if isPlayerAdmin(source) then 
triggerClientEvent(source,"eCDone",source) 
else return end 
end) 
  
addEvent ("Clear",true) 
addEventHandler ("Clear",root, 
function (name) 
if not isPlayerAdmin( source ) then return triggerClientEvent(source,"GoOut",source) end 
for i,k in ipairs (getElementsByType("player")) do 
triggerClientEvent (k,"CLEAR",k,name) 
end 
end) 

Posted

انا لما ادخل بحساب زار افتح الوحة البيتون مخفي

ولما اسجل ومعي الرتبه المتحدده في القروب

لسا مختفي برده

لازم ارستر المود

انا ما ابي كدا

انا ابي لما يكون مع الرتبه عطول

Posted (edited)
groupAdmins = {"Consoles","Admin"} -- حط القروبات اللي تمسح و يكون البوتون عندها مفتوح 
function isPlayerAdmin(  player  ) 
    local aPlayerAccount = getPlayerAccount( player ) 
    if ( not aPlayerAccount or isGuestAccount( aPlayerAccount ) ) then return false end 
    local aPlayerAccountName=getAccountName(aPlayerAccount) 
    for _ , Group in ipairs (   groupAdmins   ) do 
        if isObjectInACLGroup("user."..aPlayerAccountName, aclGetGroup(Group)) then 
            return true 
        end 
    end 
end 
  
function dtc() 
if isPlayerAdmin(source) then 
triggerClientEvent(source,"eCDone",source) 
else return end 
end 
addEvent ("eCheck",true) 
addEventHandler ("eCheck",root,dtc) 
addEventHandler ("onPlayerLogin",root,dtc) 
  
addEvent ("Clear",true) 
addEventHandler ("Clear",root, 
function (name) 
if not isPlayerAdmin( source ) then return triggerClientEvent(source,"GoOut",source) end 
for i,k in ipairs (getElementsByType("player")) do 
triggerClientEvent (k,"CLEAR",k,name) 
end 
end) 

Edited by Guest
Posted

^ افرض ان اللاعب اخذ رتبه الكونسل مثلاَ, كيف بينفتح له الزر!!

وسطر 16 ماله داعي ابداَ ماعدا الاند طبعاَ.

Posted (edited)

كنت اقصد افرض ان رتبتي مشرف والزر مقفل, طيب مثلاَ رقوني وحطوني مدير الزر كيف يفتح؟ انت حاط يفتح اذا اشتغل المود واذا سجل الدخول!

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

وفيه شي ما انتبهت له,

function dtc() 
if isPlayerAdmin(source) then 
triggerClientEvent(source,"eCDone",source) 
else return end 
end) 
addEvent ("eCheck",true) 
addEventHandler ("eCheck",root,dtc) 
addEventHandler ("onPlayerLogin",root,dtc) 

عندك قوس زايد بعد الاند.

Edited by Guest
Posted

شكراً علي النتبيه

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

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

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

مش عندي فكرلة اعتقد لازم تعديل علي الادمن بانل

Posted

بدال م تبلش نفسك بتايمرات وقرف

شوف هذي طريقة افضل واسهل

client

-- MTA Forum / Ar -- 
-- Mr.CoR -- 
-- 24 / 5 / 2016 -- 
  
  
addEventHandler("onClientResourceStart", resourceRoot, 
    function() 
local screenW, screenH = guiGetScreenSize() 
        window = guiCreateWindow((screenW - 492) / 2, (screenH - 343) / 2, 492, 343, ":: [ #_Mr,[C]oR Panel ] ::", false) 
        guiWindowSetSizable(window, false) 
        guiSetAlpha(window, 0.97) 
  
        Gridlist = guiCreateGridList(10, 24, 214, 309, false, window) 
        guiGridListAddColumn(Gridlist, "CoR", 0.9) 
        for i = 1, 3 do 
            guiGridListAddRow(Gridlist) 
        end 
        guiGridListSetItemText(Gridlist, 0, 1, "هلا والله", false, false) 
        guiGridListSetItemText(Gridlist, 1, 1, "خخخخ", false, false) 
        guiGridListSetItemText(Gridlist, 2, 1, "تست", false, false) 
        ClearButton = guiCreateButton(279, 155, 148, 46, "Clear", false, window) 
        guiSetFont(ClearButton, "sa-header") 
        guiSetProperty(ClearButton, "NormalTextColour", "FFAAAAAA")     
    end 
) 
  
addEventHandler("onClientGUIClick" ,root , 
    function () 
        if ( source == ClearButton ) then 
         triggerServerEvent ("CoR",localPlayer ) 
        end 
    end 
) 
  
addEvent ("ClearNow",true) 
addEventHandler ("ClearNow",root, 
    function () 
     guiGridListClear ( Gridlist ) 
    end 
) 
  
  

Server

-- MTA Forum / Ar -- 
-- Mr.CoR -- 
-- 24 / 5 / 2016 -- 
  
local Groups = { 
{'Console'}, 
--{'ToAddGroup'}, 
} 
  
addEvent ("CoR",true) 
addEventHandler ("CoR",root, 
    function () 
        for k,v in ipairs ( Groups ) do 
            if ( isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup(v[1])) ) then 
             triggerClientEvent ("ClearNow",source) 
            else 
             outputChatBox ( " You Dont have permission ") 
            end 
        end 
    end 
) 
  

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