Jump to content

|M.r|LooFe|

Members
  • Posts

    249
  • Joined

  • Last visited

Everything posted by |M.r|LooFe|

  1. شكرا حب بس ممكن تساعدني انا فتحت موضوع ابي مساعده في الاكواد
  2. السلام وعليكم شباب انا محتاج 2كود الاول وهو عند سحب رتبة في لها edit تضع مدت سحب الرتبة بالساعات وكود سبب سحب الرتبة يوم يكتب في الedit السبب يصل للكونسل للوحة خاصة يكون مكتوب سبب سحب الرتبة الرجاء اعطائي الكود كامل
  3. شكرا اخواني شكر جزيل لكم على المساعده بس كيف بخليها تطلع في ساحة القتال
  4. اخي سوي المود كذا يعني ضيف عليه حط ازرار لتشغيل مهمات حط زر يشغل الديربي والديربي يشتغل نفس ما هو بس هذا تقدر تشغله قبل ما تبدا المهمة الاصلية وموفق اخي عل المود رائع
  5. شكرا يا اخوان على المساعده
  6. لا يخوي ابيه فقط ما يخرجها في العالم 0 واخليه يخرجها بمكان محدد واحد الي هو ساحة القتال والباقي عن طريق العالم الوهمي مثلا عالم رقم 30 بتاع الديربي يمكننه اخرجاها
  7. local Admin = { {"KinG aL HaJaWlaH","20"}, {"LeGenD oF ServeR","30"}, {"PoLiCe","50"}, {"MoDeRaToR","70"}, {"MoDeRaToR PLuS","100"}, {"PRo MoDeRaToR","150"}, {"GeNeRaL MoDeRaToR","200"}, {"iDeL MoDeRaToR","215"}, {"KinG MoDeRaToR","230"}, {"BesT MoDeRaToR","250"}, {"MaNaGeR MoDeRaToR","260"}, {"BoSs MoDeRaToR","280"}, {"SuPeR MoDeRaToR","300"}, {"SuPeR MoDeRaToR PLuS","330"}, {"PRo SuPeR MoDeRaToR PLuS","350"}, {"GeNeRaL SuPeR MoDeRaToR","370"}, {"iDeL SuPeR MoDeRaToR","400"}, {"KinG SuPeR MoDeRaToR","420"}, {"BesT SuPeR MoDeRaToR","450"}, {"MaNaGeR SuPeR MoDeRaToR","470"}, {"BoSs SuPeR MoDeRaToR","500"}, {"AdmiN","550"}, {"AdmiN PLuS","600"}, {"PRo AdmiN","650"}, {"GeNeRaL AdmiN","700"}, {"KinG AdmiN","750"}, {"LeDeL AdmiN","780"}, {"BesT AdmiN","800"}, {"MaNaGeR AdmiN","850"}, {"BoSs AdmiN","900"}, {"SuPeRviSoR","1000"}, {"Supervisor PLuS","1020"}, {"PRo SupeRVisoR PLuS","1080"}, {"GeNeRaL SuPeRVisoR","2000"}, {"iDeL SuPeRVisoR","2100"}, {"KinG SuPeRVisoR","2200"}, {"BesT SuPeRVisoR","2300"}, {"MaNaGeR SuPeRVisoR","2400"}, {"BoSs SuPeRVisoR","2500"}, } xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#F7FF01 انت لم تسجل دخولك",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#F7FF01 ان هذه الرتبة معك بالفعل",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin-X")) then return outputChatBox("#F7FF01 انت مخالف لا يمكنك شراء رتبة كلم اصحاب السيرفر لاسترجاع الرتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Console")) then return outputChatBox("#F7FF01 انت كونسل لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("gold")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin")) then return outputChatBox("#F7FF01 انت كونسل لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("gold")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("AdmiN oFFicaLL")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("DePiTy CoNsoLe")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("ADmiNiStRaTive")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("DePiTy OwNeR")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("msol.beot")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Cinm")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("clan")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Developer")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("ful.admin")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",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] ~= "gold" and rn[1] ~= "Maps" ) then aclGroupRemoveObject(aclGetGroup(rn[1]),"user."..account) end end end end aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("#F7FF01 مبروك لقد حصلت على الرتبة !"..Name,source,238,158,73,true); else outputChatBox("#F7FF01 ساعاتك غير كافية لشراء هذه الرتبة !",source,238,158,73,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_) local Admin = { {"KinG aL HaJaWlaH","20"}, {"LeGenD oF ServeR","30"}, {"PoLiCe","50"}, {"MoDeRaToR","70"}, {"MoDeRaToR PLuS","100"}, {"PRo MoDeRaToR","150"}, {"GeNeRaL MoDeRaToR","200"}, {"iDeL MoDeRaToR","215"}, {"KinG MoDeRaToR","230"}, {"BesT MoDeRaToR","250"}, {"MaNaGeR MoDeRaToR","260"}, {"BoSs MoDeRaToR","280"}, {"SuPeR MoDeRaToR","300"}, {"SuPeR MoDeRaToR PLuS","330"}, {"PRo SuPeR MoDeRaToR PLuS","350"}, {"GeNeRaL SuPeR MoDeRaToR","370"}, {"iDeL SuPeR MoDeRaToR","400"}, {"KinG SuPeR MoDeRaToR","420"}, {"BesT SuPeR MoDeRaToR","450"}, {"MaNaGeR SuPeR MoDeRaToR","470"}, {"BoSs SuPeR MoDeRaToR","500"}, {"AdmiN","550"}, {"AdmiN PLuS","600"}, {"PRo AdmiN","650"}, {"GeNeRaL AdmiN","700"}, {"KinG AdmiN","750"}, {"LeDeL AdmiN","780"}, {"BesT AdmiN","800"}, {"MaNaGeR AdmiN","850"}, {"BoSs AdmiN","900"}, {"SuPeRviSoR","1000"}, {"Supervisor PLuS","1020"}, {"PRo SupeRVisoR PLuS","1080"}, {"GeNeRaL SuPeRVisoR","2000"}, {"iDeL SuPeRVisoR","2100"}, {"KinG SuPeRVisoR","2200"}, {"BesT SuPeRVisoR","2300"}, {"MaNaGeR SuPeRVisoR","2400"}, {"BoSs SuPeRVisoR","2500"}, } xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#F7FF01 انت لم تسجل دخولك",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#F7FF01 ان هذه الرتبة معك بالفعل",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin-X")) then return outputChatBox("#F7FF01 انت مخالف لا يمكنك شراء رتبة كلم اصحاب السيرفر لاسترجاع الرتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Console")) then return outputChatBox("#F7FF01 انت كونسل لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("gold")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin")) then return outputChatBox("#F7FF01 انت كونسل لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("gold")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("AdmiN oFFicaLL")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("DePiTy CoNsoLe")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("ADmiNiStRaTive")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("DePiTy OwNeR")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("msol.beot")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Cinm")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("clan")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Developer")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("ful.admin")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",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] ~= "gold" and rn[1] ~= "Maps" ) then aclGroupRemoveObject(aclGetGroup(rn[1]),"user."..account) end end end end aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("#F7FF01 مبروك لقد حصلت على الرتبة !"..Name,source,238,158,73,true); else outputChatBox("#F7FF01 ساعاتك غير كافية لشراء هذه الرتبة !",source,238,158,73,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_)
  8. السلام وعليكم شباب كيفكم ممكن طلب انا محتاج مود عدم اخراج الاسلحة الى في مكان محدد انا احط احداثياته وابي يخرجها في العالم الوهمي فقط وشكرا
  9. x, y, size = 970.03174, -1134.88831 , 100, 55 local greenzone = createColRectangle (970.03174, -1134.88831 , 100, 55 ) local greenzonemaparea = createRadarArea ( 970.03174, -1134.88831 , 100, 55,0, 255, 0, 120) function greenzoneEnter ( thePlayer, matchingDimension ) if getElementType( thePlayer ) ~= "player" then return end triggerClientEvent("Safe",localPlayer) هذا ملف سيرفر تم جرب وردلي خبر
  10. السلام وعليكم شباب انا عدلت علة مود شراء الرتب خليته لما تسحب رتبت لاعب ما يقدر يشتري وما يكرر رتب طيب المود ما يشتري رتب ليه ؟؟؟ كتبت في اف8 debugscript 3 قالي انها المشكلة في السطر رقم 68 في ملف سيرفر روحت لملف سيرفر طيب الكود مفيه شيء ممكن حل السطر رقم 68 for _,rn in ipairs(Ranks) do
  11. شباب انا صممت مود شراء رتب المود شغال وعدلت عليه خليته لما تسحب رتبت لاعب ما يقدر يشتري تاني لكن في مشكلة وهي انه ما يشتري رتب لما كتبت في اف8 debugscript 3 قالي انها المشكلة في ملف سيرفر السطر 68 روحت للسطر 68 مفيه اي خلل ممكن حل كود سيرفر local Admin = { {"KinG aL HaJaWlaH","20"}, {"LeGenD oF ServeR","30"}, {"PoLiCe","50"}, {"MoDeRaToR","70"}, {"MoDeRaToR PLuS","100"}, {"PRo MoDeRaToR","150"}, {"GeNeRaL MoDeRaToR","200"}, {"iDeL MoDeRaToR","215"}, {"KinG MoDeRaToR","230"}, {"BesT MoDeRaToR","250"}, {"MaNaGeR MoDeRaToR","260"}, {"BoSs MoDeRaToR","280"}, {"SuPeR MoDeRaToR","300"}, {"SuPeR MoDeRaToR PLuS","330"}, {"PRo SuPeR MoDeRaToR PLuS","350"}, {"GeNeRaL SuPeR MoDeRaToR","370"}, {"iDeL SuPeR MoDeRaToR","400"}, {"KinG SuPeR MoDeRaToR","420"}, {"BesT SuPeR MoDeRaToR","450"}, {"MaNaGeR SuPeR MoDeRaToR","470"}, {"BoSs SuPeR MoDeRaToR","500"}, {"AdmiN","550"}, {"AdmiN PLuS","600"}, {"PRo AdmiN","650"}, {"GeNeRaL AdmiN","700"}, {"KinG AdmiN","750"}, {"LeDeL AdmiN","780"}, {"BesT AdmiN","800"}, {"MaNaGeR AdmiN","850"}, {"BoSs AdmiN","900"}, {"SuPeRviSoR","1000"}, {"Supervisor PLuS","1020"}, {"PRo SupeRVisoR PLuS","1080"}, {"GeNeRaL SuPeRVisoR","2000"}, {"iDeL SuPeRVisoR","2100"}, {"KinG SuPeRVisoR","2200"}, {"BesT SuPeRVisoR","2300"}, {"MaNaGeR SuPeRVisoR","2400"}, {"BoSs SuPeRVisoR","2500"}, } xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#F7FF01 انت لم تسجل دخولك",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#F7FF01 ان هذه الرتبة معك بالفعل",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin-X")) then return outputChatBox("#F7FF01 انت مخالف لا يمكنك شراء رتبة كلم اصحاب السيرفر لاسترجاع الرتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Console")) then return outputChatBox("#F7FF01 انت كونسل لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("gold")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin")) then return outputChatBox("#F7FF01 انت كونسل لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("gold")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("AdmiN oFFicaLL")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("DePiTy CoNsoLe")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("ADmiNiStRaTive")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("DePiTy OwNeR")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("msol.beot")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Cinm")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("clan")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Developer")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",source,238,158,73,true); end if isObjectInACLGroup("user."..account, aclGetGroup("ful.admin")) then return outputChatBox("#F7FF01 انت ادارة لا يمكنك شراء رتبة",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] ~= "gold" and rn[1] ~= "Maps" ) then aclGroupRemoveObject(aclGetGroup(rn[1]),"user."..account) end end end end aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("#F7FF01 مبروك لقد حصلت على الرتبة !"..Name,source,238,158,73,true); else outputChatBox("#F7FF01 ساعاتك غير كافية لشراء هذه الرتبة !",source,238,158,73,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_)
  12. اه كل شيء انا برمجت سيرفري لحالي كله حصريات ومهمات
  13. حبي انا مبرمج يعني ابرمج كل شيء بس ضايلي الوظائف
  14. السلام وعليكم شباب انا صممت مود شراء رتب لسيرفري لكن فيه مشكلة وهي انه يكرر الرتب انا ابيه بس مجرد ما اشترا رتبت بوليس تضل معاه وبالباقي يتبدلو ما يتكررو + ابيه لما اسحب رتبت لاعب تجي رتبت مخالف وما يقدر يشتري رتبة ممكن مساعده شباب كلينت : ---------------------- -- Setting ---------------------- local Key = "F7" local Admin = { {"","KinG aL HaJaWlaH","20"}, {"","LeGenD oF ServeR","30"}, {"","PoLiCe","50"}, {"","MoDeRaToR","70"}, {"","MoDeRaToR PLuS","100"}, {"","PRo MoDeRaToR","150"}, {"","GeNeRaL MoDeRaToR","200"}, {"","iDeL MoDeRaToR","215"}, {"","KinG MoDeRaToR","230"}, {"","BesT MoDeRaToR","250"}, {"","MaNaGeR MoDeRaToR","260"}, {"","BoSs MoDeRaToR","280"}, {"","SuPeR MoDeRaToR","300"}, {"","SuPeR MoDeRaToR PLuS","330"}, {"","PRo SuPeR MoDeRaToR PLuS","350"}, {"","GeNeRaL SuPeR MoDeRaToR","370"}, {"","iDeL SuPeR MoDeRaToR","400"}, {"","KinG SuPeR MoDeRaToR","420"}, {"","BesT SuPeR MoDeRaToR","450"}, {"","MaNaGeR SuPeR MoDeRaToR","470"}, {"","BoSs SuPeR MoDeRaToR","500"}, {"","AdmiN","550"}, {"","AdmiN PLuS","600"}, {"","PRo AdmiN","650"}, {"","GeNeRaL AdmiN","700"}, {"","KinG AdmiN","750"}, {"","LeDeL AdmiN","780"}, {"","BesT AdmiN","800"}, {"","MaNaGeR AdmiN","850"}, {"","BoSs AdmiN","900"}, {"","SuPeRviSoR","1000"}, {"","Supervisor PLuS","1020"}, {"","PRo SupeRVisoR PLuS","1080"}, {"","GeNeRaL SuPeRVisoR","2000"}, {"","iDeL SuPeRVisoR","2100"}, {"","KinG SuPeRVisoR","2200"}, {"","BesT SuPeRVisoR","2300"}, {"","MaNaGeR SuPeRVisoR","2400"}, {"","BoSs SuPeRVisoR","2500"}, } ---------------------- -- Setting ---------------------- GiveAdmin = { Window = {}, gridlist = {}, button = {}, label = {}, } FontLabel = guiCreateFont( "Font.ttf", 13 ) FontButton = guiCreateFont( "Font.ttf", 13 ) FontGridList = guiCreateFont( "Font.ttf", 10 ) function guiCreateWindow( x2, y2, width2, height2, titleBarText2, relative2 ) local mainBackground = guiCreateStaticImage ( x2, y2, width2, height2, "Back.png", relative2 ) local mainBackgroundLabel = guiCreateLabel ( 160, 0, 950, 950, titleBarText2, false, mainBackground ) guiSetFont ( mainBackgroundLabel, newFont2 ) guiSetEnabled ( mainBackgroundLabel, false ) return mainBackground end GiveAdmin.Window[1] = guiCreateWindow(16, 149, 338, 386, "", false); guiSetVisible(GiveAdmin.Window[1],false); guiWindowSetSizable(GiveAdmin.Window[1], false); guiSetAlpha(GiveAdmin.Window[1], 1.00); GiveAdmin.label[1] = guiCreateLabel(15, 5, 322, 46, "[ لوحة شراء رتب By |M.r|LooFe ]", false, GiveAdmin.Window[1]); guiSetFont(GiveAdmin.label[1], FontLabel) GiveAdmin.gridlist[1] = guiCreateGridList(11, 61, 316, 255, false, GiveAdmin.Window[1]); guiGridListAddColumn(GiveAdmin.gridlist[1], "#", 0.2) guiGridListAddColumn(GiveAdmin.gridlist[1], "الرتبة", 0.2); guiGridListAddColumn(GiveAdmin.gridlist[1], "القروب", 0.3); guiGridListAddColumn(GiveAdmin.gridlist[1], "الساعات", 0.2); GiveAdmin.button[1] = guiCreateButton(108, 332, 123, 39, "شراء رتبة", false, GiveAdmin.Window[1]); guiSetFont(GiveAdmin.button[1], FontButton) guiSetProperty(GiveAdmin.button[1], "NormalTextColour", "FFF5FF00"); for k,v in ipairs ( Admin ) do row = guiGridListAddRow(GiveAdmin.gridlist[1]); guiGridListSetItemText(GiveAdmin.gridlist[1],row,1,''..k..'-',false,false); guiGridListSetItemText(GiveAdmin.gridlist[1],row,2,v[1],false,false); guiGridListSetItemText(GiveAdmin.gridlist[1],row,3,v[2],false,false); guiGridListSetItemText(GiveAdmin.gridlist[1],row,4,v[3],false,false); guiGridListSetItemColor(GiveAdmin.gridlist[1],row,1,math.random(0,255),math.random(0,255),math.random(0,255)) guiGridListSetItemColor(GiveAdmin.gridlist[1],row,2,math.random(0,255),math.random(0,255),math.random(0,255)) guiGridListSetItemColor(GiveAdmin.gridlist[1],row,3,math.random(0,255),math.random(0,255),math.random(0,255)) guiGridListSetItemColor(GiveAdmin.gridlist[1],row,4,math.random(0,255),math.random(0,255),math.random(0,255)) guiSetFont(GiveAdmin.gridlist[1], FontGridList) end xMainFunctions_ = function ( ) local row, col = guiGridListGetSelectedItem ( GiveAdmin.gridlist[1] ) local Group = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,3 )); local Price = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,4 )); local Name = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,2 )); if ( row and col and row ~= -1 and col ~= -1 ) then triggerServerEvent("Accept:the:request",localPlayer,Group,Price,Name); else outputChatBox(" الرجاء اختيار رتبة ",255,0,0,true); end end addEventHandler("onClientGUIClick",GiveAdmin.button[1],xMainFunctions_,false); xBindFunction_ = function () guiSetVisible(GiveAdmin.Window[1],not guiGetVisible(GiveAdmin.Window[1])); showCursor(guiGetVisible(GiveAdmin.Window[1])); end bindKey(Key,"down",xBindFunction_); fileDelete("Admin_Client.lua") سيرفر : xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("يجب عليك التسجيل اولا !",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("لديك هذه الرتبة فعلا !",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 aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("تم اضافة التربة بنجاح"..Name,source,0,255,0,true); else outputChatBox("ليس لديك ساعات كافية !",source,255,0,0,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_) اسم رتبت ادمن مخالف عندي في الاسل Admin-X
  15. شباب ممكن مساعده انه كيف بسوي وظيفة مثل راعي الغنم او سارق اللاعبين
  16. السلام وعليكم شباب كيفكم انا زائر جديد طبعا مبرمج مبتدأ اقدم لكم مود عدم الموت من صنعي طبعا المود مششفر لحفظ الحقوق طيب نشوف المود طيب رابط التحميل اسفل الفيديو الرابط : http://www.mediafire.com/file/r1dgrl4hjcdxb19/adm-mot.zip لو عجبكم الفيديو لاتنسو لايك + اشتراك
×
×
  • Create New...