-----------------------
-- ** 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_)
هاذي الاكواد مرتبه + والله ماعرف ولا لي بالبرمجه كثير بس اعدل وكذا اذا ماتقدر تسويه مو مشكله