mohameed223 Posted August 29, 2017 Share Posted August 29, 2017 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_) السلام عليكم ورحمة الله وبركاته ابغى احول الكود ذا من داتا ساعات الى داتا لفل 1 Link to comment
#BrosS Posted August 29, 2017 Share Posted August 29, 2017 ;-; تبي تحفظ داتا اللفل قصدك ؟ لأن الأكواد خارجة عن الموضوع Link to comment
A7M8D Posted August 29, 2017 Share Posted August 29, 2017 @#BrosS دي اكواد سكربت الترقيات بتاع برستيج هو كان بالفلوس بعدين سعد حوله بالساعات هو عايزه بالمنت داتا او اكاونت داتا لــ اللفل Link to comment
#BrosS Posted August 29, 2017 Share Posted August 29, 2017 اها طيب ممكن تحط الأكواد مرتبة عشان نسويلك لأني جوال جربت ارتب طلع اسوء Link to comment
coNolel Posted August 29, 2017 Share Posted August 29, 2017 جرب مو متأكد 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,'Level or اسم الداتا' ) if not sValue then sValue = '0' end local level = tonumber( sValue ) 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_) 5 hours ago, #BrosS said: اها طيب ممكن تحط الأكواد مرتبة عشان نسويلك لأني جوال جربت ارتب طلع اسوء اهنيك ع Signature Link to comment
#BrosS Posted August 29, 2017 Share Posted August 29, 2017 Just now, coNolel said: اهنيك ع Signature شوف انت حاطط Lua progress 70% قربت تختم اللغة وما شفنا منك شي :') . وكودك غلط اصلا Link to comment
mohameed223 Posted August 30, 2017 Author Share Posted August 30, 2017 11 hours ago, #MR.NaiF said: 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,'Level or اسم الداتا' ) if not sValue then sValue = '0' end local level = tonumber( sValue ) 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 hours ago, coNolel said: Link to comment
coNolel Posted August 30, 2017 Share Posted August 30, 2017 (edited) 12 hours ago, #BrosS said: شوف انت حاطط Lua progress 70% قربت تختم اللغة وما شفنا منك شي :') . وكودك غلط اصلا كفو جربته ؟ وش رايك احط 99% ? انا افهم بأشياء أخرى يمكن م تعرفها انت ف لا تسوي الخبير علينا 8 hours ago, mohameed223 said: ? Edited August 30, 2017 by coNolel Link to comment
mohameed223 Posted August 30, 2017 Author Share Posted August 30, 2017 14 hours ago, #BrosS said: شوف انت حاطط Lua progress 70% قربت تختم اللغة وما شفنا منك شي :') . وكودك غلط اصلا ها يالطيب متى تسويه Link to comment
#BrosS Posted August 30, 2017 Share Posted August 30, 2017 Just now, mohameed223 said: ها يالطيب متى تسويه قلت لك هات الأكواد مرتبة وليه ماتحاول انت بالأول سهلة استبدل اسم الداتا فقط وشيل الوظائف حقت الوقت مثل اللي تفصل Link to comment
mohameed223 Posted August 30, 2017 Author Share Posted August 30, 2017 ----------------------- -- ** 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_) هاذي الاكواد مرتبه + والله ماعرف ولا لي بالبرمجه كثير بس اعدل وكذا اذا ماتقدر تسويه مو مشكله Link to comment
^iiEcoo'x_) Posted August 30, 2017 Share Posted August 30, 2017 local uLevelData_ = '' -- إسم داتا الليفل 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 sLevel = getElementData( source , uLevelData_ ) if ( sLevel >= 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 setElementData ( source , uLevelData_ , nil ) 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_) Link to comment
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