Jump to content

Crocodile

Members
  • Posts

    26
  • Joined

  • Last visited

Recent Profile Visitors

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

Crocodile's Achievements

Advanced Member

Advanced Member (8/54)

0

Reputation

  1. بسم الله الرحمن الرحيم السلام عليكم ورحمه الله وبركاته اليوم جايبلكم بداية من تصميمي ، وساحة قتال تشبه يلي في وزارة بنسبه 98% تقدر تقول صور البداية الحين صور الساحة ملاحظة: البداية لما تركبها يجيك شخصيات عشوائية ، ماعرفت اثبت شخصية ومعطيكم رابط تحميل شوب هدية عشان الساحة الماب لعيون سكندر #مانجرس_في_وزارة صاحب الفكرة #كونان نجي لتحميييييييييييييييل الماب تحمييييييييييييل الشوب إهـداء الى ZA7F The Killer حياكم الله في سيرفر نجوم ليبيا mtasa://185.10.17.81:27029
  2. شكراً لك بالنسبة للمخالف تم واشتغل المود والمخالف ما يقدر يرقي نفسه ، لكن بالنسبة لتبديل الرتبة ما نفع اخذت حق المخالفة وهو الوحيد يلي اشتغل ذا الكوود يلي اشتغل معاي -- ** Buy Admin's Script -- Created By Mr.Pres[T]ege -- Ver 1.0.0 -- Mail : [email protected] -- [url=http://www.gta-arabs.com]www.gta-arabs.com[/url] --زي ما وعدتكم المود غير مشفّر انا عدلت عليه بحيث يكون أجمل من قبل ---------------------- 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 ( "Admin-F" ) ) 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 isObjectInACLGroup (aclGetGroup("AdminTop"),"user."..account) aclGroupRemoveObject (aclGetGroup( tostring(Group)),"user."..account) 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_)
  3. شكراً بالنسبة لأضافة الخط؟ انا نزلت خط لكن ياريت تقولي وشكراً
  4. المود مافيه مشكله , اتوقع المشكله منك انت المود مبرمج على انه يعطي رتبه ويكمل لاكن انت بنفسك تقدر تضيف تحققات for -- نجيب القيم من الجدول isObjectInACLGroup aclGroupRemoveObject aclGroupAddObject نتحقق اذا كان الاعب عنده قروب سابق , من القروبات الموجوده في الجدول نحذف منه الرتب السابقه , ونعطيه الرتبه الجديده لاكن المود مافييه اخطأء , غير الي فوق سويت كذا بس مازال لما ترقى تزيد رتبة ما تتبدل aclGroupRemoveObject (aclGetGroup( tostring(Group)),"user."..account) aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("* تم إضافة الرتبة مبروووك"..Name,source,0,255,0,true);
  5. بالزبط لكن سؤال : كيف اجيب القيم حق الجدول ؟ ووش هو الدوبق عشان اضبط المود وشكراً
  6. سويت كذا قولي لو فيه شي غلط او ناقص ذا بالنسبة لملف الكلنت function CPanelWindow = guiCreateWindow(432, 194, 501, 440, ":: Control Panel Of Rent System ::", false) guiWindowSetSizable(CPanelWindow, false) centerWindow( CPanelWindow, 2, 2 ) guiSetAlpha(CPanelWindow, 1.00) guiSetVisible(CPanelWindow,false) carGridList = guiCreateGridList(10, 21, 260, 406, false, CPanelWindow) guiSetVisible(carGridList,false) Searching = guiCreateEdit(287, 40, 191, 25, "", false, CPanelWindow) guiEditSetMaxLength(Searching, 35) createBTN = guiCreateButton(287, 79, 191, 39, "Create Vehicle", false, CPanelWindow) guiSetProperty(createBTN, "NormalTextColour", "FFAAAAAA") destroyBTN = guiCreateButton(287, 128, 191, 39, "Destroy Vehicle", false, CPanelWindow) guiSetProperty(destroyBTN, "NormalTextColour", "FFAAAAAA") warpMeBTN = guiCreateButton(287, 177, 191, 39, "Warp Me To Vehicle", false, CPanelWindow) guiSetProperty(warpMeBTN, "NormalTextColour", "FFAAAAAA") warpVehicleBTN = guiCreateButton(287, 226, 191, 39, "Warp Vehicle To Me", false, CPanelWindow) guiSetProperty(warpVehicleBTN, "NormalTextColour", "FFAAAAAA") CCBTN = guiCreateButton(287, 276, 191, 39, "X", false, CPanelWindow) showingWindow = guiCreateWindow(190, 29, 775, 595, "", false) guiWindowSetSizable(showingWindow, false) guiSetVisible ( showingWindow, false ) centerWindow( showingWindow, 2, 2 ) guiSetAlpha(showingWindow, 1) img = guiCreateStaticImage(19, 27, 728, 510, "info.png", false, showingWindow) guiSetAlpha(img, 0.5) closeShowing = guiCreateButton(103, 548, 556, 37, "X", false, showingWindow) addEventHandler ( "onClientResourceStart", resourceRoot, function ( ) for i = 400, 600 do if ( getVehicleNameFromModel ( i ) ~= "" ) then if not DisabledCars[i] then table.insert( CAR, { model = i, name = getVehicleNameFromModel ( i ) } ) end end end table.sort( CAR, function(a, b) return a.name < b.name end ) CL1 = guiGridListAddColumn( carGridList, "Vehicle", 0.60 ) CL2 = guiGridListAddColumn( carGridList, "ID", 0.25 ) for i,v in ipairs(CAR) do local row = guiGridListAddRow ( carGridList ) guiGridListSetItemText ( carGridList, row, CL1, v.name, false, true ) guiGridListSetItemText ( carGridList, row, CL2, tostring(v.model), false, true ) end setElementData ( localPlayer, "playerCar", false ) triggerServerEvent('getRentSystem',localPlayer) end ) local Show = false bindKey ( "O", "down", function ( ) if Show == true then guiSetVisible ( CPanelWindow, not guiGetVisible ( CPanelWindow ) ) showCursor ( guiGetVisible ( CPanelWindow ) ) guiSetInputEnabled ( guiGetVisible ( CPanelWindow ) ) end end )
  7. سلام عليكم ورحمه الله عندي صورة لسكربت النظام حق استئجار مركبات ابي وحدة زيها ؟ انا حاولت اسوي وحده خاصة لكن ماعرفت كيف احط المواتر في آمان الله
  8. شكراً للتعديل ضفت الكود الى ملف سيرفر وعرفته في الميتا وشغلت المود في السيرفر لكـن ما يبي يكتب في الشات
  9. بالزبط عشان كذا طالب برمجة للمود ، ولا تنسى المخالف يقدر يرقي نفسه ، المود يبقى خرافي لو تبرمج على هذه الطلب
  10. + dxCreateFont يجيب الخط الي هو يبيه انا سويت يلي قلتولي عليه قولولي فيه خطأ او لا؟ وهل احطه في ملف السيرفر او الكلنت وشكراً addCommandHandler ("msgall"),function() outputChatBox("هذا اللاعب كتب على شاشة الجميع #FF00FF "..getPlayerName(player).."#FF0000", getRootElement(), 255, 0, 0, true) end local accName = getAccountName ( getPlayerAccount ( thePlayer ) ) if isObjectInACLGroup ("user."..accName, aclGetGroup ( "Console" ) ) then local message = table.concat ( { ... }," " ) textDisplay = textCreateDisplay ( ) textItem = textCreateTextItem ( message, 0.5, 0.6, 2, 255, 255, 255, 255, 2.5, "center", "center" ) end setTimer ( function ( ) textDestroyTextItem ( textItem ) textDestroyDisplay ( textDisplay ) end ,5000, 1 ) end end addCommandHandler ( "msgall", shout )
  11. اعرف اسوي نافذة ووكل شي بس ما اعرف كيف ادمج المود مع الاسل والساعات ، مزلت جديد في البرمجة
  12. ركبت مود برستيج القديم قبل التعديل وقبل ما اعدل فيه شي اخذت الكلمات يلي انت كاتبهن في الكود بدون ماننسخها جميعاً عشان الكود معدل وبالسطر اخذت الوامر من حق المخالف الى النهاية وبالترتيب لكن ما زبط المود جرب انت حمل المود وعدل عليه وشوفه وش يصير ووشكراً
  13. لا متأكد معاي ساعات كافية و ماني موجود في القروب المخالف لكن اجرب مود او لوحة ترقية ثانية واكلمك شكراً
×
×
  • Create New...