MR_Mahmoud Posted March 11, 2017 Share Posted March 11, 2017 سلام عليكم ابي تعديل مود شراء رتب ابيه لما الشخص يشتري رتبة جديدة تنسحب القديمة منه + حاولت في الدمن مخالف صار بس بس لما يكون معه سعر الرتبة يقله صسابك محظور بس لما مايكون معه سعرها يقله ليس لديك ساعات الكواد ---------------- ملف سيرفر -------- xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا ! ",source,255,0,0,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 if isObjectInACLGroup ("user."..account, aclGetGroup ( "Admin_x" ) ) then -- تأكدت من ان اللاعب مب محظور ------------------------------------------------------------------------------------------------- if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then aclGroupRemoveObject (aclGetGroup( tostring(Group)), "user."..account) aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true); else aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true); end ------------------------------------------------------------------------------------------------- else outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,true); end else outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_) Link to comment
MR_Mahmoud Posted March 11, 2017 Author Share Posted March 11, 2017 مافي حد يرد يخوان Link to comment
Abdul KariM Posted March 11, 2017 Share Posted March 11, 2017 (edited) function removeGroups ( player ) if ( player ) and ( getElementType ( player ) == "player" ) then if isGuestAccount ( getPlayerAccount ( player ) ) then return end local Acc = getAccountName ( getPlayerAccount ( player ) ) if ( #aclGroupList ( ) == 0 ) then return end for _,Groups_ in ipairs( aclGroupList ( ) ) do if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then aclGroupRemoveObject ( Groups_ ,"user."..Acc ) end end end end xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا ! ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 removeGroups ( source ) if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true); end else outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_) سويته لك اذا كان الاعب بقروب ادمن اكس مايقدر يترقى واذا الاعب عنده الساعات المطلوبة يحذف كل القروبات الي عنده قبل ويعطيه رتبة جديدة بالتوفيق ولاتنسانا من الدعاء Edited March 11, 2017 by Abdul KariM 1 Link to comment
MR_Mahmoud Posted March 11, 2017 Author Share Posted March 11, 2017 28 minutes ago, Abdul KariM said: function removeGroups ( player ) if ( player ) and ( getElementType ( player ) == "player" ) then if isGuestAccount ( getPlayerAccount ( player ) ) then return end local Acc = getAccountName ( getPlayerAccount ( player ) ) if ( #aclGroupList ( ) == 0 ) then return end for _,Groups_ in ipairs( aclGroupList ( ) ) do if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then aclGroupRemoveObject ( Groups_ ,"user."..Acc ) end end end end xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا ! ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 removeGroups ( source ) if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true); end else outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_) سويته لك اذا كان الاعب بقروب ادمن اكس مايقدر يترقى واذا الاعب عنده الساعات المطلوبة يحذف كل القروبات الي عنده قبل ويعطيه رتبة جديدة بالتوفيق ولاتنسانا من الدعاء Abdul KariM الله يعطيك الف عافية يارب ونشالله يتحقق حلمك يارب ويرزقك الجنة 1 Link to comment
Abdul KariM Posted March 11, 2017 Share Posted March 11, 2017 الله يعافيك , اجمعين ان شاء الله 1 Link to comment
MR_Mahmoud Posted March 11, 2017 Author Share Posted March 11, 2017 2 hours ago, Abdul KariM said: الله يعافيك , اجمعين ان شاء الله بس يالغالي طيب بلكي انا عطيت لشخص عاجل وشترا رتبة من لوحة ينحزف رتبة العاجل صح ؟ ممكن تعدله يالغالي Link to comment
Abdul KariM Posted March 12, 2017 Share Posted March 12, 2017 local aGroups = { ["Console"] = true , ["Admin"] = true , ["SuperModerator"] = true , }; function removeGroups ( player ) if ( player ) and ( getElementType ( player ) == "player" ) then if isGuestAccount ( getPlayerAccount ( player ) ) then return end local Acc = getAccountName ( getPlayerAccount ( player ) ) if ( #aclGroupList ( ) == 0 ) then return end for _,Groups_ in ipairs( aclGroupList ( ) ) do if not ( aGroups [ aclGroupGetName ( Groups_ ) ] ) then if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then aclGroupRemoveObject ( Groups_ ,"user."..Acc ) end end end end end عدل ع القروبات في اول الاسطر 1 Link to comment
MR_Mahmoud Posted March 12, 2017 Author Share Posted March 12, 2017 19 hours ago, Abdul KariM said: function removeGroups ( player ) if ( player ) and ( getElementType ( player ) == "player" ) then if isGuestAccount ( getPlayerAccount ( player ) ) then return end local Acc = getAccountName ( getPlayerAccount ( player ) ) if ( #aclGroupList ( ) == 0 ) then return end for _,Groups_ in ipairs( aclGroupList ( ) ) do if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then aclGroupRemoveObject ( Groups_ ,"user."..Acc ) end end end end xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا ! ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 removeGroups ( source ) if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true); end else outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_) سويته لك اذا كان الاعب بقروب ادمن اكس مايقدر يترقى واذا الاعب عنده الساعات المطلوبة يحذف كل القروبات الي عنده قبل ويعطيه رتبة جديدة بالتوفيق ولاتنسانا من الدعاء Abdul KariM اخي ركبته بس ماعاد يشتري ولا يقول شيء في شات يعني بس لوحة+ تكفا ممكن توصل الكودات الولا في 2 لاني معرف وانا اغير اسامي الرتب Link to comment
Abu-Solo Posted March 12, 2017 Share Posted March 12, 2017 10 minutes ago, MR_Mahmoud said: Abdul KariM اخي ركبته بس ماعاد يشتري ولا يقول شيء في شات يعني بس لوحة+ تكفا ممكن توصل الكودات الولا في 2 لاني معرف وانا اغير اسامي الرتب اكتب في اف 8 debugscript 3 وشغل المود من جديد وقول وش يطلعلك او صوره Link to comment
MR_Mahmoud Posted March 12, 2017 Author Share Posted March 12, 2017 Just now, Abu-Solo said: اكتب في اف 8 debugscript 3 وشغل المود من جديد وقول وش يطلعلك او صوره ابشر 2 minutes ago, Abu-Solo said: اكتب في اف 8 debugscript 3 وشغل المود من جديد وقول وش يطلعلك او صوره يالغالي العبة ماتفتح ممكن شي ساعة ؟ 1 Link to comment
Abdul KariM Posted March 12, 2017 Share Posted March 12, 2017 اطرحلي الكود كامل بعد تعديلك Link to comment
MR_Mahmoud Posted March 12, 2017 Author Share Posted March 12, 2017 3 minutes ago, Abdul KariM said: اطرحلي الكود كامل بعد تعديلك function removeGroups ( player ) if ( player ) and ( getElementType ( player ) == "player" ) then if isGuestAccount ( getPlayerAccount ( player ) ) then return end local Acc = getAccountName ( getPlayerAccount ( player ) ) if ( #aclGroupList ( ) == 0 ) then return end for _,Groups_ in ipairs( aclGroupList ( ) ) do if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then aclGroupRemoveObject ( Groups_ ,"user."..Acc ) end end end end xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا ! ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 removeGroups ( source ) if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true); end else outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_) --------------- الرتب الي ماتنسحب حين يشتري رتبة من الوحة local aGroups = { ["3GL"] = true , ["FFO"] = true , ["Adminmsg"] = true , }; function removeGroups ( player ) if ( player ) and ( getElementType ( player ) == "player" ) then if isGuestAccount ( getPlayerAccount ( player ) ) then return end local Acc = getAccountName ( getPlayerAccount ( player ) ) if ( #aclGroupList ( ) == 0 ) then return end for _,Groups_ in ipairs( aclGroupList ( ) ) do if not ( aGroups [ aclGroupGetName ( Groups_ ) ] ) then if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then aclGroupRemoveObject ( Groups_ ,"user."..Acc ) end end end end end Link to comment
Abdul KariM Posted March 12, 2017 Share Posted March 12, 2017 local aGroups = { ["3GL"] = true , ["FFO"] = true , ["Adminmsg"] = true , }; function removeGroups ( player ) if ( player ) and ( getElementType ( player ) == "player" ) then if isGuestAccount ( getPlayerAccount ( player ) ) then return end local Acc = getAccountName ( getPlayerAccount ( player ) ) if ( #aclGroupList ( ) == 0 ) then return end for _,Groups_ in ipairs( aclGroupList ( ) ) do if not ( aGroups [ aclGroupGetName ( Groups_ ) ] ) then if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then aclGroupRemoveObject ( Groups_ ,"user."..Acc ) end end end end end xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا ! ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 removeGroups ( source ) if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true); end else outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_) Link to comment
MR_Mahmoud Posted March 12, 2017 Author Share Posted March 12, 2017 59 minutes ago, Abdul KariM said: local aGroups = { ["3GL"] = true , ["FFO"] = true , ["Adminmsg"] = true , }; function removeGroups ( player ) if ( player ) and ( getElementType ( player ) == "player" ) then if isGuestAccount ( getPlayerAccount ( player ) ) then return end local Acc = getAccountName ( getPlayerAccount ( player ) ) if ( #aclGroupList ( ) == 0 ) then return end for _,Groups_ in ipairs( aclGroupList ( ) ) do if not ( aGroups [ aclGroupGetName ( Groups_ ) ] ) then if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then aclGroupRemoveObject ( Groups_ ,"user."..Acc ) end end end end end xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا ! ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 removeGroups ( source ) if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true); end else outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true); endendaddEvent("Accept:the:request",true)addEventHandler("Accept:the:request",root,xAddToGroupFunction_) Link to comment
Abu-Solo Posted March 12, 2017 Share Posted March 12, 2017 1 hour ago, MR_Mahmoud said: ذول مافيهم مشاكل عادي, الاول حق الخط , يمكن انت نسيت تحط اسم الخط بـ شكل صحيح والثانية دليل علي ان الملف منحذف اصلآ , Link to comment
MR_Mahmoud Posted March 12, 2017 Author Share Posted March 12, 2017 13 minutes ago, Abu-Solo said: ذول مافيهم مشاكل عادي, الاول حق الخط , يمكن انت نسيت تحط اسم الخط بـ شكل صحيح والثانية دليل علي ان الملف منحذف اصلآ , اسف غلطت هادي الأصلية Abu-Solo Link to comment
Abu-Solo Posted March 12, 2017 Share Posted March 12, 2017 3 minutes ago, MR_Mahmoud said: اسف غلطت هادي الأصلية Abu-Solo أرسل السطر رقم 14 Link to comment
MR_Mahmoud Posted March 12, 2017 Author Share Posted March 12, 2017 (edited) 2 minutes ago, Abu-Solo said: أرسل السطر رقم 14 if isGuestAccount ( getPlayerAccount ( player ) ) then Edited March 12, 2017 by MR_Mahmoud Link to comment
Abu-Solo Posted March 12, 2017 Share Posted March 12, 2017 Just now, MR_Mahmoud said: if isGuestAccount ( getPlayerAccount ( player ) ) then معليش قصدي رقم 44 اللي فيه الغلط, معليش توني صاحي من النوم خخ Link to comment
MR_Mahmoud Posted March 12, 2017 Author Share Posted March 12, 2017 1 minute ago, Abu-Solo said: معليش قصدي رقم 44 اللي فيه الغلط, معليش توني صاحي من النوم خخ if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,true);; end Link to comment
Abdul KariM Posted March 12, 2017 Share Posted March 12, 2017 local aGroups = { ["3GL"] = true , ["FFO"] = true , ["Adminmsg"] = true , }; function removeGroups ( player ) if ( player ) and ( getElementType ( player ) == "player" ) then if isGuestAccount ( getPlayerAccount ( player ) ) then return end local Acc = getAccountName ( getPlayerAccount ( player ) ) if ( #aclGroupList ( ) == 0 ) then return end for _,Groups_ in ipairs( aclGroupList ( ) ) do if not ( aGroups [ aclGroupGetName ( Groups_ ) ] ) then if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then aclGroupRemoveObject ( Groups_ ,"user."..Acc ) end end end end end xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا ! ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 removeGroups ( source ) if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true); end else outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_) Link to comment
Abu-Solo Posted March 12, 2017 Share Posted March 12, 2017 if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,true); end Link to comment
MR_Mahmoud Posted March 12, 2017 Author Share Posted March 12, 2017 26 minutes ago, Abdul KariM said: local aGroups = { ["3GL"] = true , ["FFO"] = true , ["Adminmsg"] = true , }; function removeGroups ( player ) if ( player ) and ( getElementType ( player ) == "player" ) then if isGuestAccount ( getPlayerAccount ( player ) ) then return end local Acc = getAccountName ( getPlayerAccount ( player ) ) if ( #aclGroupList ( ) == 0 ) then return end for _,Groups_ in ipairs( aclGroupList ( ) ) do if not ( aGroups [ aclGroupGetName ( Groups_ ) ] ) then if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then aclGroupRemoveObject ( Groups_ ,"user."..Acc ) end end end end end xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا ! ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,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 removeGroups ( source ) if isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true); end else outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true); endendaddEvent("Accept:the:request",true)addEventHandler("Accept:the:request",root,xAddToGroupFunction_) عدلته بس لما اشغله واضغط الرتبة بعدين شراء مايشتريها ولا يظهر شيء في الشات 44 minutes ago, Abdul KariM said: 43 minutes ago, Abu-Solo said: عدلته بس لما اشغله واضغط الرتبة بعدين شراء مايشتريها ولا يظهر شيء في الشات 45 minutes ago, Abu-Solo said: if isObjectInACLGroup("user."..account, aclGetGroup("Admin_x")) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** الحساب الخاص بك محظور | "..Name,source,255,0,0,true); end %عدلته بس لما اشغله واضغط الرتبة بعدين شراء مايشتريها ولا يظهر شيء في الشات Link to comment
Abu-Solo Posted March 12, 2017 Share Posted March 12, 2017 28 minutes ago, MR_Mahmoud said: عدلته بس لما اشغله واضغط الرتبة بعدين شراء مايشتريها ولا يظهر شيء في الشات %عدلته بس لما اشغله واضغط الرتبة بعدين شراء مايشتريها ولا يظهر شيء في الشات دي بق ؟ Link to comment
MR_Mahmoud Posted March 12, 2017 Author Share Posted March 12, 2017 1 minute ago, Abu-Solo said: دي بق ؟ ولله مدري بس مايشتري ولا يقول شيء في الشات يعني بس عبارة عن لوحة صار مايفعل شيء 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