Jump to content

mohameed223

Members
  • Posts

    6
  • Joined

  • Last visited

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

mohameed223's Achievements

Vic

Vic (3/54)

0

Reputation

  1. سلام عليكم ورحمة الله وبركاته لو سمحتو ابي مود لوحة توب لفل
  2. ----------------------- -- ** Buy Admin's Script -- Created By Mr.Pres[T]ege -- Ver 1.0.0 -- Mail : [email protected] -- www.gta-arabs.com ---------------------- local Admin = { {"level-1","2"}, {"KingServer","5"}, {"lvl-1","10"}, {"lvl-2","20"}, {"lvl-3","30"}, {"lvl-4","40"}, {"lvl-5","50"}, {"V.I.P","55"}, {"Moderator","65"}, {"SuperModerator","80"}, {"Admin","100"}, {"Head.Admin","130"}, {"Big.Admin","160"}, {"AdminDiymond","180"}, {"AdminPro","220"}, {"AdminKing","250"}, {"VoteManager","300"}, } xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("انت لم تسجل بالسيرفر",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("لا يمكنك اختيار الرتبه لانه فعلا معك",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin-EX")) then return outputChatBox("انت مخآلف لايمكنك الحصول على رتبه",source,238,158,73,true); end local sValue = getElementData( source,'PlayLevel' ) if not sValue then sValue = '0:0:0' end local data = split(sValue,':') local level = tonumber( data[1] ) if level == nil or not tonumber(level) then level = 0 end if ( level >= tonumber(Price)) then for _,rn in ipairs(Ranks) do if ( aclGetGroup(rn[1]) ) then if ( isObjectInACLGroup("user."..account.."",aclGetGroup(rn[1])) ) then if ( rn[1] ~= "Console" and rn[1] ~= "Managers" and rn[1] ~= "Maps" ) then aclGroupRemoveObject(aclGetGroup(rn[1]),"user."..account) end end end end aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("مبروك لقد حصلت على الرتبه "..Name,source,238,158,73,true); else outputChatBox("-_____-",source,238,158,73,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_) هاذي الاكواد مرتبه + والله ماعرف ولا لي بالبرمجه كثير بس اعدل وكذا اذا ماتقدر تسويه مو مشكله
  3. ها يالطيب متى تسويه
  4. xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("انت لم تسجل بالسيرفر",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("لا يمكنك اختيار الرتبه لانه فعلا معك",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin-EX")) then return outputChatBox("انت مخآلف لايمكنك الحصول على رتبه",source,238,158,73,true); end local sValue = getElementData( source,'PlayTime' ) if not sValue then sValue = '0:0:0' end local data = split(sValue,':') local hour = tonumber( data[1] ) if hour == nil or not tonumber(hour) then hour = 0 end if ( hour >= tonumber(Price)) then for _,rn in ipairs(Ranks) do if ( aclGetGroup(rn[1]) ) then if ( isObjectInACLGroup("user."..account.."",aclGetGroup(rn[1])) ) then if ( rn[1] ~= "Console" and rn[1] ~= "Managers" and rn[1] ~= "Maps" ) then aclGroupRemoveObject(aclGetGroup(rn[1]),"user."..account) end end end end aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("مبروك لقد حصلت على الرتبه "..Name,source,238,158,73,true); else outputChatBox("-_____-",source,238,158,73,true); endendaddEvent("Accept:the:request",true)addEventHandler("Accept:the:request",root,xAddToGroupFunction_) السلام عليكم ورحمة الله وبركاته ابغى احول الكود ذا من داتا ساعات الى داتا لفل
×
×
  • Create New...