Jump to content

M[ROYAL]R

Members
  • Posts

    161
  • Joined

  • Last visited

Everything posted by M[ROYAL]R

  1. ممكن حد يجيبلى فيديو او شرح موجود
  2. تسلم على المعلومه + لا مو مسوى نافذه و ما بعرف اسف شباب اول مره اتعامل مع dx استحملونى
  3. طب الكود ده صحيح الى انا حاطه
  4. الكود addEventHandler("onClientRender", root, function() dxDrawRectangle(134, 127, 528, 379, tocolor(0, 15, 53, 199), true) dxDrawRectangle(133, 505, 529, 44, tocolor(0, 0, 219, 199), true) dxDrawRectangle(133, 83, 529, 44, tocolor(0, 0, 219, 199), true) dxDrawText("X", 610, 87, 663, 128, tocolor(0, 0, 0, 255), 1.00, "beckett", "center", "center", false, true, true, true, false) dxDrawText("X", 610, 85, 663, 126, tocolor(0, 0, 0, 255), 1.00, "beckett", "center", "center", false, true, true, true, false) dxDrawText("X", 608, 87, 661, 128, tocolor(0, 0, 0, 255), 1.00, "beckett", "center", "center", false, true, true, true, false) dxDrawText("X", 608, 85, 661, 126, tocolor(0, 0, 0, 255), 1.00, "beckett", "center", "center", false, true, true, true, false) dxDrawText("X", 609, 86, 662, 127, tocolor(0, 188, 235, 199), 1.00, "beckett", "center", "center", false, true, true, true, false) dxDrawText("Panel Royls BY : M[ROYAL]R", 247, 84, 507, 128, tocolor(0, 0, 0, 255), 1.00, "diploma", "center", "center", true, true, true, true, false) dxDrawText("Panel Royls BY : M[ROYAL]R", 247, 82, 507, 126, tocolor(0, 0, 0, 255), 1.00, "diploma", "center", "center", true, true, true, true, false) dxDrawText("Panel Royls BY : M[ROYAL]R", 245, 84, 505, 128, tocolor(0, 0, 0, 255), 1.00, "diploma", "center", "center", true, true, true, true, false) dxDrawText("Panel Royls BY : M[ROYAL]R", 245, 82, 505, 126, tocolor(0, 0, 0, 255), 1.00, "diploma", "center", "center", true, true, true, true, false) dxDrawText("Panel Royls BY : M[ROYAL]R", 246, 83, 506, 127, tocolor(0, 188, 235, 199), 1.00, "diploma", "center", "center", true, true, true, true, false) dxDrawText("عدم السب -1", 135, 128, 328, 229, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("عدم السب -1", 135, 126, 328, 227, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("عدم السب -1", 133, 128, 326, 229, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("عدم السب -1", 133, 126, 326, 227, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("عدم السب -1", 134, 127, 327, 228, tocolor(33, 235, 0, 254), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("1-Not to insult", 470, 128, 663, 229, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("1-Not to insult", 470, 126, 663, 227, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("1-Not to insult", 468, 128, 661, 229, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("1-Not to insult", 468, 126, 661, 227, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("1-Not to insult", 469, 127, 662, 228, tocolor(229, 249, 5, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("عدم استخدام اكواد الهاك-2", 135, 203, 328, 304, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("عدم استخدام اكواد الهاك-2", 135, 201, 328, 302, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("عدم استخدام اكواد الهاك-2", 133, 203, 326, 304, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("عدم استخدام اكواد الهاك-2", 133, 201, 326, 302, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("عدم استخدام اكواد الهاك-2", 134, 202, 327, 303, tocolor(33, 235, 0, 254), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("2- Do not use the codes", 375, 203, 568, 304, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("2- Do not use the codes", 375, 201, 568, 302, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("2- Do not use the codes", 373, 203, 566, 304, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("2- Do not use the codes", 373, 201, 566, 302, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("2- Do not use the codes", 374, 202, 567, 303, tocolor(229, 249, 5, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("عدم طلب الرتبة -3", 135, 285, 328, 386, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("عدم طلب الرتبة -3", 135, 283, 328, 384, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("عدم طلب الرتبة -3", 133, 285, 326, 386, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("عدم طلب الرتبة -3", 133, 283, 326, 384, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("عدم طلب الرتبة -3", 134, 284, 327, 385, tocolor(33, 235, 0, 254), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("3-Not to request ranks", 385, 285, 578, 386, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("3-Not to request ranks", 385, 283, 578, 384, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("3-Not to request ranks", 383, 285, 576, 386, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("3-Not to request ranks", 383, 283, 576, 384, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("3-Not to request ranks", 384, 284, 577, 385, tocolor(229, 249, 5, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("This Mod BY :M[ROYAL]R :skype :hossen.elsanose.5 ", 133, 504, 663, 550, tocolor(0, 0, 0, 255), 1.00, "diploma", "center", "center", true, true, true, false, false) dxDrawText("This Mod BY :M[ROYAL]R :skype :hossen.elsanose.5 ", 133, 502, 663, 548, tocolor(0, 0, 0, 255), 1.00, "diploma", "center", "center", true, true, true, false, false) dxDrawText("This Mod BY :M[ROYAL]R :skype :hossen.elsanose.5 ", 131, 504, 661, 550, tocolor(0, 0, 0, 255), 1.00, "diploma", "center", "center", true, true, true, false, false) dxDrawText("This Mod BY :M[ROYAL]R :skype :hossen.elsanose.5 ", 131, 502, 661, 548, tocolor(0, 0, 0, 255), 1.00, "diploma", "center", "center", true, true, true, false, false) dxDrawText("This Mod BY :M[ROYAL]R :skype :hossen.elsanose.5 ", 132, 503, 662, 549, tocolor(253, 0, 0, 255), 1.00, "diploma", "center", "center", true, true, true, false, false) dxDrawText("4-Hear orders Aladinm", 385, 376, 578, 477, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("4-Hear orders Aladinm", 385, 374, 578, 475, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("4-Hear orders Aladinm", 383, 376, 576, 477, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("4-Hear orders Aladinm", 383, 374, 576, 475, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("4-Hear orders Aladinm", 384, 375, 577, 476, tocolor(229, 249, 5, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("سماع اوامر الأدمن-4", 135, 376, 328, 477, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("سماع اوامر الأدمن-4", 135, 374, 328, 475, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("سماع اوامر الأدمن-4", 133, 376, 326, 477, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("سماع اوامر الأدمن-4", 133, 374, 326, 475, tocolor(0, 0, 0, 255), 2.00, "default-bold", "left", "center", true, true, true, true, false) dxDrawText("سماع اوامر الأدمن-4", 134, 375, 327, 476, tocolor(33, 235, 0, 254), 2.00, "default-bold", "left", "center", true, true, true, true, false) end )
  5. شباب انا عملت لوحه و دى اول ولحة ليا و مش عارف اخليها تفتح ب زر او اعملها لو ضغط على زر يقفل الوحة كنى اول مره ابرمج ف انا احتاجبكم عشان اعرف الأكواد +تركبولى الكود عشان وربى مو فاهم حاجه و عندى سؤال اخير ليه السطور متكرر كتيررر
  6. حبيبى انا مبرمج كذا مقر على هادى البرمجه و لو عاوزنى اعطيق مقر الأن اوك + مشكور حبى على تقيمك وتعليقك
  7. انا نفسى يكون فى مود فى mta و هو الباركور و هو موجود فى gta لو حد عنده المود او يعرف يعمله يكون جامد جدآ ويكون الكل شاكر ليه
  8. السلام عليكم شباب الموضوع طويل شوى بس شامل و مفيد يلا نبدآ بسم الله اول شئ مركر الدخول الى البيت -1 ملف سيرفر local groupName = 'ROYALS' -- أسم العصابه او الجروب eH = createMarker(1456.94214,2773.77466,12.82031"arrow",1.70000004,255,0,0) --احدثيات مركر الدخول addEventHandler('onMarkerHit',eH,function(entered) if getElementType(entered) == 'player' and not isPedInVehicle(entered) and getElementData(entered,'gang') == groupName then --التاكد ان الاعب فى الفريق setElementPosition( entered,1264.21545,-783.05164,1091.90625) --احدثيات عند الدخول setElementInterior ( entered, 5 ) -- انترو حق البيتق setElementDimension ( entered, 103050 ) --العالم الوهمى حالبيت end end ) local groupName = 'ROYALS' -- اسم العصابه oH = createMarker(1261.07483,-785.47241,1093.90625,"arrow",2,255,0,0) -- مركر الخروج من البيت setElementInterior ( oH, 5 ) -- انترو مركر الخروج من البيت setElementDimension ( oH, 103050 ) -- العالم الوهمى حق مركر الخروج من البيت addEventHandler('onMarkerHit',oH,function(entered) if getElementType(entered) == 'player' and not isPedInVehicle(entered) and getElementData(entered,'gang') == groupName then --التاكد ان الاعب فى الفريق setElementPosition( entered,1461.08044,2774.06177,10.82031) -- احدثيات عند الخروج setElementInterior ( entered, 0 ) -- انترو عند الخروج setElementDimension ( entered, 0 ) -- عالم الوهمى عند الخروج end end ) اثنان هو مركر السيارات و هو عباره عن ثلاث ملفات -2 اول ملف كلينت GUIEditor_Grid = {} GUIEditor_Button = {} -- لوحه حق اخذ السيارات-- Vehicle = guiCreateWindow(453,218,302,379,".:[ Panel Vehicle For ROYALS ]:.",false) -- عوان الوحه guiSetVisible(Vehicle,false) guiSetAlpha (Vehicle, 1) GUIEditor_Button[5] = guiCreateButton (0.0795,0.8575,0.4007,0.1135,"x[ oK ]x",true,Vehicle) GUIEditor_Button[4] = guiCreateButton (0.5166,0.8602,0.4007,0.1135,"x[ close ]x",true,Vehicle) GUIEditor_Grid[1] = guiCreateGridList(0.106,0.1214,0.7583,0.6887,true,Vehicle) guiGridListSetSelectionMode(GUIEditor_Grid[1],2) local col = guiGridListAddColumn(GUIEditor_Grid[1],"Vehicle ",0.9) guiSetAlpha(GUIEditor_Grid[1],0.89999997615814) ---لوحة السيارات ---- CarsTable = { { "Infernus" }, { "NRG-500" }, { "Elegy" }, { "Cheetah" }, { "Turismo" }, { "Maverick" }, { "BF Injection" }, { "Merit" }, } --- لوحة السيارات ملاحظه لأدخال سياره ب الأسم و ليس ID---- ------ينصح بعدم تغير شئ -------- for i, v in ipairs ( CarsTable ) do local row = guiGridListAddRow ( GUIEditor_Grid[1] ) guiGridListSetItemText ( GUIEditor_Grid[1], row, 1, v[1], false, true ) end function onWaste() guiSetVisible(Vehicle, false) showCursor(false) end addEventHandler("onClientPlayerWasted", getLocalPlayer(), onWaste) function OpenWindowsCar () guiSetVisible(Vehicle, true) showCursor(true) end addEvent("OpenWindowsW7h1", true) addEventHandler("OpenWindowsW7h1", getLocalPlayer(), OpenWindowsCar ) function createTheChoosenCar () local row = guiGridListGetSelectedItem(GUIEditor_Grid[1]) if row and row >= 0 then guiSetVisible(Vehicle, false) showCursor(false) triggerServerEvent("CreateCarW7h1", localPlayer, guiGridListGetItemText(GUIEditor_Grid[1], row, col)) end end addEventHandler("onClientGUIClick", GUIEditor_Button[5], createTheChoosenCar , false) addEventHandler("onClientGUIClick",GUIEditor_Button[4], function () guiSetVisible(Vehicle,false) showCursor(false) end,false) addEvent("NssoR1",true) addEventHandler("NssoR1",root, function() setPedCanBeKnockedOffBike ( getLocalPlayer(), false ) end) addEvent("d5wl1",true) addEventHandler("d5wl1",root, function() setPedCanBeKnockedOffBike ( getLocalPlayer(), true ) end) addEvent("Tool1",true) addEventHandler("Tool1",root, function() setPedCanBeKnockedOffBike ( getLocalPlayer(), false ) end) addEvent("oooo1",true) addEventHandler("oooo1",root, function() setPedCanBeKnockedOffBike ( getLocalPlayer(), true ) end) ------ينصح بعدم تغير شئ -------- ثانى ملف سيرفر ---اظن الكود واضح لوحده هوضح الحجات المهمه local upgrades = {} upgrades[560] = {1138,1031,1033,1029,1170,1140} upgrades[559] = {1162,1072,1068,1066,1173,1161} upgrades[562] = {1147,1041,1038,1037,1172,1148} upgrades[575] = {1099,1044,1175,1177} upgrades[565] = {1050,1052,1054,1046,1153,1151} upgrades[561] = {1058,1063,1061,1064,1157,1156} upgrades[558] = {1164,1095,1091,1092,1166,1167} upgrades[534] = {1124,1127,1185,1180,1125} upgrades[567] = {1133,1132,1189,1187} upgrades[536] = {1108,1128,1105,1182,1184} upgrades[535] = {1121,1116,1114,1117} upgrades[576] = {1137,1136,1191,1193} upgrades[576] = {1137,1136,1191,1193,} MarkerCreateXX = 0 MarkerCreateYY = 6 MxXx1 = createMarker(2838.1005859375,1900.7998046875,27.799999237061, "cylinder", 1.8, 200,200,0, 255 ) -- مكان مركر السياره رقم واحد local x,y,z = getElementPosition ( MxXx1 ) MxXx2 = createMarker(2823.7001953125,1900.599609375,27.799999237061, "cylinder", 1.8, 200,200,0, 255 ) -- مكان مركر السياره رقم اثنان local x,y,z = getElementPosition ( MxXx2 ) MxXx3 = createMarker(2823.7001953125,1900.599609375,27.799999237061, "cylinder", 1.8, 200,200,0, 255 ) -- مكان مركر السياره رقم ثلاثة local x,y,z = getElementPosition ( MxXx3 ) MxXx4 = createMarker(2823.7001953125,1900.599609375,27.799999237061, "cylinder", 1.8, 200,200,0, 255 ) -- مكان مركر السياره رقم اربعه local x,y,z = getElementPosition ( MxXx4 ) addEventHandler("onMarkerHit", getResourceRootElement(), function(player) if( getElementData ( player, "gang" ) == "ROYALS" ) then -- التأكد ان اللاعب فى العصابة if source == MxXx1 or source == MxXx2 or source == MxXx3 or source == MxXx4 or source == MxXx5 or source == MxXx6 or source == MxXx11 or source == MxXx22 or source == MxXx33 or source == MxXx44 or source == MxXx55 or source == MxXx66 then setTimer( function(player,source) local x, y, z = getElementPosition(source) local xx, yy, zz = getElementPosition(player) setElementPosition(player, xx, yy, z+0.5) triggerClientEvent ( player, "OpenWindowsW7h1", player) end,150,1,player,source) end end end) function upgradeCar ( car ) addVehicleUpgrade ( car, 1010 ) addVehicleUpgrade ( car, 1098 ) local model = getElementModel(car) if ( upgrades[model] ) then for id, v in ipairs ( upgrades[model] ) do addVehicleUpgrade ( car, v ) end end end ----------------------------------- cars = {} carsTimer = {} function onExplorerW7h () setTimer( function(car) if (isElement(car)) then destroyElement(car) end end,5000, 1, source) end function onEnterCarW7h(player,seat) if (seat >= 0 ) and ( getElementData ( player , "Group" ) ~= "SFS" ) then cancelEvent() outputChatBox("This Only For Group SFS",player, 255, 0, 0, true) end end function xxxcrete (carName) local id = getVehicleModelFromName(carName) if (id) then if (isElement(cars[source])) then destroyElement(cars[source]) end if ( getVehicleType ( id ) == "Helicopter" ) then local place = getElementByID( "AirW7h"..tostring(math.random(1,6)) ) local x,y,z = getElementPosition ( place ) local rx,ry,rz = getElementRotation ( place ) cars[source] = createVehicle(id, 2815.5,1991.5,31.299999237061, xz) -- مكان ريسوان الطائرات else local x, y, z = getElementPosition(source) cars[source] = createVehicle(id, x-5,y ,z , 0, 0, 276) upgradeCar ( cars[source] ) end setVehicleColor( cars[source], 255,0,0 ) setVehiclePaintjob ( cars[source], 2 ) warpPedIntoVehicle(source, cars[source]) addEventHandler("onVehicleExplode", cars[source], onExplorerW7h1 ) addEventHandler ("onVehicleStartEnter", cars[source], onEnterCarW7h1 ) end end addEvent("CreateCarW7h1", true) addEventHandler("CreateCarW7h1", root, xxxcrete ) function isVehicleEmpty(veh) local cc = false local occupants = getVehicleOccupants(veh) local seats = getVehicleMaxPassengers(veh) for seat = 0, seats do if occupants[seat] then cc = true end end return end الملف الثالث سيرفر بردو بس لا تعدلو فى شئ افضل addEvent("carx",true) addEventHandler("carx",root, function (carxx) if getElementData ( source, "destroy" ) then destroyElement ( getElementData ( source, "destroy")) end local carname = getVehicleIDFromName(carxx) local x, y, z = getElementPosition ( source ) Vehicle = createVehicle (carname, x+2, y, z ) warpPedIntoVehicle ( source, Vehicle) setElementData ( source, "destroy", Vehicle ) end ) تمام كده مركر السيارت خلصو الأن مركر الدم و الدرع -3 ملف سيرفر marker1 = createMarker (2092.6000976563,2859.3999023438,34.700000762939, "cylinder", 1.7, 75 , 243, 1, 255 ) --مكان المركر حق الدم و الدرع addEventHandler ( "onMarkerHit", marker1, function ( player ) if getElementType ( player ) == "player" then if getElementData( player ,'gang') == 'ROYALS' then -- التحقق ان اللاعب فى العصابة setElementHealth ( player, 200 ) -- عند لمس المركر اعطاء اللاعب 200 دم setPedArmor ( player, 100 ) -- عند لمس اللاعب المركر اعطائه 100 درع setPedSkin ( player, 230 ) -- عند لمس اللاعب المركر اعطائه شخصيه رقم 230 else outputChatBox ( "هادا لعصابه الملوك فقط ابتعد ", player, 244 , 87, 10, true ) -- عند لمس المركر من شخص ليس فى العصابه يظهله الكلام ده end end end , false ) مكان الريسوان بعد الموت -4 ملف سيرفر addEventHandler('onPlayerSpawn', root, function() if getTeamName(getPlayerTeam(source)) == "No Team" and getElementData(source, "gang") == "ROYALS" then -- التاكد ان اللاعب فى العصابه setTimer(setElementPosition, 500, 1, source,2092.6000976563,2859.3999023438,34.700000762939) -- مكان الريسوان setPedSkin (source, 230 ) -- اعطائه شخصيه 230 بعد الريسوان setElementHealth ( player, 200 ) -- اعطائه دم 200 بعد الريسوان setPedArmor ( player, 100 ) -- اعطائة درع 100 بعد الريسوان end end ) بوابة المقر-4 ملف سيرفر Door1 = createObject(980,2097.1999511719,1719.9000244141,12.5,0,0,62) -- مكان عمل البوابة markerDoor1 = createMarker(2097.1999511719,1719.9000244141,12.5,'cylinder',15.5,0,0,255,0) -- مكان عمل المركر الذى عن لمسه تفتح البوابة addEventHandler('onMarkerHit',markerDoor1, function ( hitElement ) if getElementData(hitElement,'gang') == 'ROYALS' then -- التأكد ان الاعب فى العصابة moveObject(Door1,1000,2097.1999511719,1719.9000244141,17.10000038147) -- مكان البوابة عندما تكون مفتوحه + 1000= سرعت الفتح end end ) addEventHandler('onMarkerLeave',markerDoor1, function ( hitElement ) if getElementData(hitElement,'gang') == 'ROYALS' then -- التأكد ان الاعب فى العصابة moveObject(Door1,1000,2097.1999511719,1719.9000244141,12.5) -- مكان البوابة عندما تكون مغلفه+ 1000= سرعت الغلق end end ) اخر شئ علامه المقر ملف سيرفر createBlip ( 2127.1000976563,2826.5,36.700000762939 , 23 ) -- مكان علامه المقر + 23 ID العلامه اخر شئ و هو اهم شئ ليشتغل جميع الأكواد هى ان لو مود القروبات 1-حق سيرفر سرك 2-حق حرب الشوارع 3-حق احمد فيف "Group"بدل "gang"تحط و باقى المودات تحط "Group" و بكده يكون الموضوع انتهى اتمنى ان اكون افتكم اعذرونى لو فى اخطآ املائيه عشان الموضوع طويل اسيبكم فى امان الله
  9. السلام عليكم شباب الموضوع طويل شوى بس شامل و مفيد يلا نبدآ بسم الله اول شئ مركر الدخول الى البيت -1 ملف سيرفر local groupName = 'ROYALS' -- أسم العصابه او الجروب eH = createMarker(1456.94214,2773.77466,12.82031"arrow",1.70000004,255,0,0) --احدثيات مركر الدخول addEventHandler('onMarkerHit',eH,function(entered) if getElementType(entered) == 'player' and not isPedInVehicle(entered) and getElementData(entered,'gang') == groupName then --التاكد ان الاعب فى الفريق setElementPosition( entered,1264.21545,-783.05164,1091.90625) --احدثيات عند الدخول setElementInterior ( entered, 5 ) -- انترو حق البيتق setElementDimension ( entered, 103050 ) --العالم الوهمى حالبيت end end ) local groupName = 'ROYALS' -- اسم العصابه oH = createMarker(1261.07483,-785.47241,1093.90625,"arrow",2,255,0,0) -- مركر الخروج من البيت setElementInterior ( oH, 5 ) -- انترو مركر الخروج من البيت setElementDimension ( oH, 103050 ) -- العالم الوهمى حق مركر الخروج من البيت addEventHandler('onMarkerHit',oH,function(entered) if getElementType(entered) == 'player' and not isPedInVehicle(entered) and getElementData(entered,'gang') == groupName then --التاكد ان الاعب فى الفريق setElementPosition( entered,1461.08044,2774.06177,10.82031) -- احدثيات عند الخروج setElementInterior ( entered, 0 ) -- انترو عند الخروج setElementDimension ( entered, 0 ) -- عالم الوهمى عند الخروج end end ) اثنان هو مركر السيارات و هو عباره عن ثلاث ملفات -2 اول ملف كلينت GUIEditor_Grid = {} GUIEditor_Button = {} -- لوحه حق اخذ السيارات-- Vehicle = guiCreateWindow(453,218,302,379,".:[ Panel Vehicle For ROYALS ]:.",false) -- عوان الوحه guiSetVisible(Vehicle,false) guiSetAlpha (Vehicle, 1) GUIEditor_Button[5] = guiCreateButton (0.0795,0.8575,0.4007,0.1135,"x[ oK ]x",true,Vehicle) GUIEditor_Button[4] = guiCreateButton (0.5166,0.8602,0.4007,0.1135,"x[ close ]x",true,Vehicle) GUIEditor_Grid[1] = guiCreateGridList(0.106,0.1214,0.7583,0.6887,true,Vehicle) guiGridListSetSelectionMode(GUIEditor_Grid[1],2) local col = guiGridListAddColumn(GUIEditor_Grid[1],"Vehicle ",0.9) guiSetAlpha(GUIEditor_Grid[1],0.89999997615814) ---لوحة السيارات ---- CarsTable = { { "Infernus" }, { "NRG-500" }, { "Elegy" }, { "Cheetah" }, { "Turismo" }, { "Maverick" }, { "BF Injection" }, { "Merit" }, } --- لوحة السيارات ملاحظه لأدخال سياره ب الأسم و ليس ID---- ------ينصح بعدم تغير شئ -------- for i, v in ipairs ( CarsTable ) do local row = guiGridListAddRow ( GUIEditor_Grid[1] ) guiGridListSetItemText ( GUIEditor_Grid[1], row, 1, v[1], false, true ) end function onWaste() guiSetVisible(Vehicle, false) showCursor(false) end addEventHandler("onClientPlayerWasted", getLocalPlayer(), onWaste) function OpenWindowsCar () guiSetVisible(Vehicle, true) showCursor(true) end addEvent("OpenWindowsW7h1", true) addEventHandler("OpenWindowsW7h1", getLocalPlayer(), OpenWindowsCar ) function createTheChoosenCar () local row = guiGridListGetSelectedItem(GUIEditor_Grid[1]) if row and row >= 0 then guiSetVisible(Vehicle, false) showCursor(false) triggerServerEvent("CreateCarW7h1", localPlayer, guiGridListGetItemText(GUIEditor_Grid[1], row, col)) end end addEventHandler("onClientGUIClick", GUIEditor_Button[5], createTheChoosenCar , false) addEventHandler("onClientGUIClick",GUIEditor_Button[4], function () guiSetVisible(Vehicle,false) showCursor(false) end,false) addEvent("NssoR1",true) addEventHandler("NssoR1",root, function() setPedCanBeKnockedOffBike ( getLocalPlayer(), false ) end) addEvent("d5wl1",true) addEventHandler("d5wl1",root, function() setPedCanBeKnockedOffBike ( getLocalPlayer(), true ) end) addEvent("Tool1",true) addEventHandler("Tool1",root, function() setPedCanBeKnockedOffBike ( getLocalPlayer(), false ) end) addEvent("oooo1",true) addEventHandler("oooo1",root, function() setPedCanBeKnockedOffBike ( getLocalPlayer(), true ) end) ------ينصح بعدم تغير شئ -------- ثانى ملف سيرفر ---اظن الكود واضح لوحده هوضح الحجات المهمه local upgrades = {} upgrades[560] = {1138,1031,1033,1029,1170,1140} upgrades[559] = {1162,1072,1068,1066,1173,1161} upgrades[562] = {1147,1041,1038,1037,1172,1148} upgrades[575] = {1099,1044,1175,1177} upgrades[565] = {1050,1052,1054,1046,1153,1151} upgrades[561] = {1058,1063,1061,1064,1157,1156} upgrades[558] = {1164,1095,1091,1092,1166,1167} upgrades[534] = {1124,1127,1185,1180,1125} upgrades[567] = {1133,1132,1189,1187} upgrades[536] = {1108,1128,1105,1182,1184} upgrades[535] = {1121,1116,1114,1117} upgrades[576] = {1137,1136,1191,1193} upgrades[576] = {1137,1136,1191,1193,} MarkerCreateXX = 0 MarkerCreateYY = 6 MxXx1 = createMarker(2838.1005859375,1900.7998046875,27.799999237061, "cylinder", 1.8, 200,200,0, 255 ) -- مكان مركر السياره رقم واحد local x,y,z = getElementPosition ( MxXx1 ) MxXx2 = createMarker(2823.7001953125,1900.599609375,27.799999237061, "cylinder", 1.8, 200,200,0, 255 ) -- مكان مركر السياره رقم اثنان local x,y,z = getElementPosition ( MxXx2 ) MxXx3 = createMarker(2823.7001953125,1900.599609375,27.799999237061, "cylinder", 1.8, 200,200,0, 255 ) -- مكان مركر السياره رقم ثلاثة local x,y,z = getElementPosition ( MxXx3 ) MxXx4 = createMarker(2823.7001953125,1900.599609375,27.799999237061, "cylinder", 1.8, 200,200,0, 255 ) -- مكان مركر السياره رقم اربعه local x,y,z = getElementPosition ( MxXx4 ) addEventHandler("onMarkerHit", getResourceRootElement(), function(player) if( getElementData ( player, "gang" ) == "ROYALS" ) then -- التأكد ان اللاعب فى العصابة if source == MxXx1 or source == MxXx2 or source == MxXx3 or source == MxXx4 or source == MxXx5 or source == MxXx6 or source == MxXx11 or source == MxXx22 or source == MxXx33 or source == MxXx44 or source == MxXx55 or source == MxXx66 then setTimer( function(player,source) local x, y, z = getElementPosition(source) local xx, yy, zz = getElementPosition(player) setElementPosition(player, xx, yy, z+0.5) triggerClientEvent ( player, "OpenWindowsW7h1", player) end,150,1,player,source) end end end) function upgradeCar ( car ) addVehicleUpgrade ( car, 1010 ) addVehicleUpgrade ( car, 1098 ) local model = getElementModel(car) if ( upgrades[model] ) then for id, v in ipairs ( upgrades[model] ) do addVehicleUpgrade ( car, v ) end end end ----------------------------------- cars = {} carsTimer = {} function onExplorerW7h () setTimer( function(car) if (isElement(car)) then destroyElement(car) end end,5000, 1, source) end function onEnterCarW7h(player,seat) if (seat >= 0 ) and ( getElementData ( player , "Group" ) ~= "SFS" ) then cancelEvent() outputChatBox("This Only For Group SFS",player, 255, 0, 0, true) end end function xxxcrete (carName) local id = getVehicleModelFromName(carName) if (id) then if (isElement(cars[source])) then destroyElement(cars[source]) end if ( getVehicleType ( id ) == "Helicopter" ) then local place = getElementByID( "AirW7h"..tostring(math.random(1,6)) ) local x,y,z = getElementPosition ( place ) local rx,ry,rz = getElementRotation ( place ) cars[source] = createVehicle(id, 2815.5,1991.5,31.299999237061, xz) -- مكان ريسوان الطائرات else local x, y, z = getElementPosition(source) cars[source] = createVehicle(id, x-5,y ,z , 0, 0, 276) upgradeCar ( cars[source] ) end setVehicleColor( cars[source], 255,0,0 ) setVehiclePaintjob ( cars[source], 2 ) warpPedIntoVehicle(source, cars[source]) addEventHandler("onVehicleExplode", cars[source], onExplorerW7h1 ) addEventHandler ("onVehicleStartEnter", cars[source], onEnterCarW7h1 ) end end addEvent("CreateCarW7h1", true) addEventHandler("CreateCarW7h1", root, xxxcrete ) function isVehicleEmpty(veh) local cc = false local occupants = getVehicleOccupants(veh) local seats = getVehicleMaxPassengers(veh) for seat = 0, seats do if occupants[seat] then cc = true end end return end الملف الثالث سيرفر بردو بس لا تعدلو فى شئ افضل addEvent("carx",true) addEventHandler("carx",root, function (carxx) if getElementData ( source, "destroy" ) then destroyElement ( getElementData ( source, "destroy")) end local carname = getVehicleIDFromName(carxx) local x, y, z = getElementPosition ( source ) Vehicle = createVehicle (carname, x+2, y, z ) warpPedIntoVehicle ( source, Vehicle) setElementData ( source, "destroy", Vehicle ) end ) تمام كده مركر السيارت خلصو الأن مركر الدم و الدرع -3 ملف سيرفر marker1 = createMarker (2092.6000976563,2859.3999023438,34.700000762939, "cylinder", 1.7, 75 , 243, 1, 255 ) --مكان المركر حق الدم و الدرع addEventHandler ( "onMarkerHit", marker1, function ( player ) if getElementType ( player ) == "player" then if getElementData( player ,'gang') == 'ROYALS' then -- التحقق ان اللاعب فى العصابة setElementHealth ( player, 200 ) -- عند لمس المركر اعطاء اللاعب 200 دم setPedArmor ( player, 100 ) -- عند لمس اللاعب المركر اعطائه 100 درع setPedSkin ( player, 230 ) -- عند لمس اللاعب المركر اعطائه شخصيه رقم 230 else outputChatBox ( "هادا لعصابه الملوك فقط ابتعد ", player, 244 , 87, 10, true ) -- عند لمس المركر من شخص ليس فى العصابه يظهله الكلام ده end end end , false ) مكان الريسوان بعد الموت -4 ملف سيرفر addEventHandler('onPlayerSpawn', root, function() if getTeamName(getPlayerTeam(source)) == "No Team" and getElementData(source, "gang") == "ROYALS" then -- التاكد ان اللاعب فى العصابه setTimer(setElementPosition, 500, 1, source,2092.6000976563,2859.3999023438,34.700000762939) -- مكان الريسوان setPedSkin (source, 230 ) -- اعطائه شخصيه 230 بعد الريسوان setElementHealth ( player, 200 ) -- اعطائه دم 200 بعد الريسوان setPedArmor ( player, 100 ) -- اعطائة درع 100 بعد الريسوان end end ) بوابة المقر-4 ملف سيرفر Door1 = createObject(980,2097.1999511719,1719.9000244141,12.5,0,0,62) -- مكان عمل البوابة markerDoor1 = createMarker(2097.1999511719,1719.9000244141,12.5,'cylinder',15.5,0,0,255,0) -- مكان عمل المركر الذى عن لمسه تفتح البوابة addEventHandler('onMarkerHit',markerDoor1, function ( hitElement ) if getElementData(hitElement,'gang') == 'ROYALS' then -- التأكد ان الاعب فى العصابة moveObject(Door1,1000,2097.1999511719,1719.9000244141,17.10000038147) -- مكان البوابة عندما تكون مفتوحه + 1000= سرعت الفتح end end ) addEventHandler('onMarkerLeave',markerDoor1, function ( hitElement ) if getElementData(hitElement,'gang') == 'ROYALS' then -- التأكد ان الاعب فى العصابة moveObject(Door1,1000,2097.1999511719,1719.9000244141,12.5) -- مكان البوابة عندما تكون مغلفه+ 1000= سرعت الغلق end end ) اخر شئ علامه المقر ملف سيرفر createBlip ( 2127.1000976563,2826.5,36.700000762939 , 23 ) -- مكان علامه المقر + 23 ID العلامه اخر شئ و هو اهم شئ ليشتغل جميع الأكواد هى ان لو مود القروبات 1-حق سيرفر سرك 2-حق حرب الشوارع 3-حق احمد فيف "Group"بدل "gang"تحط و باقى المودات تحط "Group" و بكده يكون الموضوع انتهى اتمنى ان اكون افتكم اعذرونى لو فى اخطآ املائيه عشان الموضوع طويل اسيبكم فى امان الله
  10. تسللللم حبى وربى كلكم كفوووو و كنت عارف انكم ما راح تخذلونى
  11. فين الردود شباب محتاج الكود ضرورى ولله
  12. ممكن انت تركبهولى فى الكود عشان انا حاولت كثييييير و كلن الكود يبوظ و اكون شاكررر ليك جدآآآآ
  13. لشخص يكون مثلآ ب سيريل او ب اسم ايميل
  14. السلام عليكم شباب انا عندى معرض سيارات عاوز الى يشترى من المعرض الفلوس تنسحب منه و تروح لـ شخص ده اول طلب ليا يا راب ما تخذلونى كلينت--- function putDown(wnd) local sx,sy = guiGetScreenSize() local w,h = guiGetSize(wnd,false) local x,y = 0,(sy - h) guiSetPosition(wnd,x,y,false) end function centerWindow(center_window) local screenW,screenH=guiGetScreenSize() local windowW,windowH=guiGetSize(center_window,false) local x,y = (screenW-windowW)/2,(screenH-windowH)/2 guiSetPosition(center_window,x,y,false) end GUIEditor_Label = {} shop_wnd = guiCreateWindow(0.005,0.26,0.5375,0.5017,"معرض ماكس للسيارات",true) grid = guiCreateGridList(0.0209,0.0797,0.9558,0.598,true,shop_wnd) guiGridListSetSelectionMode(grid,1) guiGridListAddColumn(grid,"Cars",0.6) guiGridListAddColumn(grid,"Prize",0.3) guiSetFont(buy,"default-bold-small") take = guiCreateButton(0.2395,0.691,0.2093,0.1196,"استئجار",true,shop_wnd) guiSetFont(take,"default-bold-small") GUIEditor_Label[1] = guiCreateLabel(0.4512,0.6944,0.5209,0.113,"* الاستئجار لمده 15 دقيقه بـ 200 الف",true,shop_wnd) guiLabelSetColor(GUIEditor_Label[1],255,0,0) guiLabelSetVerticalAlign(GUIEditor_Label[1],"center") guiLabelSetHorizontalAlign(GUIEditor_Label[1],"right",false) guiSetFont(GUIEditor_Label[1],"default-bold-small") ex = guiCreateButton(0.7698,0.8472,0.2093,0.1196,"خروج",true,shop_wnd) guiSetFont(ex,"default-bold-small") guiSetVisible(shop_wnd,false) putDown(shop_wnd) cars = { {"Jester== السعر 70 مليون",602,70000000}, {"بي آآم == السعر 45 مليون",546,45000000}, {"جيب شروكى == السعر 28 مليون",400,28000000}, {"كامرو == السعر 24 مليون",558,24000000}, {"إلنترا == السعر 16 مليون",587,15000000}, } for i,car in ipairs(cars) do local row = guiGridListAddRow(grid) guiGridListSetItemText(grid,row,1,car[1],false,false) guiGridListSetItemText(grid,row,2,car[3],false,false) guiGridListSetItemData(grid,row,1,car[2]) end addEvent("putPlayerInShop",true) addEventHandler("putPlayerInShop",root, function () guiSetVisible(shop_wnd,true) showCursor(true) setElementFrozen(localPlayer,true) setCameraMatrix(-2432.4516601563,1043.5134277344,53.729694366455,-2432.4516601563,1043.5134277344,53.729694366455) veh = createVehicle(cars[1][2],-2444.2944335938,1035.7518310547,49.979347229004) end ) addEventHandler("onClientGUIClick",root, function () if source == ex then guiSetVisible(shop_wnd,false) showCursor(false) destroyElement(veh) setCameraTarget(localPlayer) setElementFrozen(localPlayer,false) end end ) addEventHandler("onClientGUIClick",grid, function () local sel = guiGridListGetSelectedItem(source) if sel ~= -1 then local id = tonumber(guiGridListGetItemData(grid,sel,1)) setElementModel(veh,id) end end ,false) function BACK() setCameraTarget(localPlayer) destroyElement(veh) guiSetVisible(shop_wnd,false) showCursor(false) setElementFrozen(localPlayer,false) end addEventHandler("onClientGUIClick",root, function () local sel = guiGridListGetSelectedItem(grid) if source == buy then if sel ~= -1 then triggerServerEvent("onBuyCar",localPlayer,guiGridListGetItemText(grid,sel,1),guiGridListGetItemText(grid,sel,2),guiGridListGetItemData(grid,sel,1)) else outputChatBox("* Choose A Car To Buy It",255,0,0) end elseif source == take then if sel ~= -1 then if getPlayerMoney(localPlayer) >= 100000 then triggerServerEvent("onTakeCar",localPlayer,guiGridListGetItemData(grid,sel,1)) BACK() else outputChatBox("* You Don't Have Enough Money",255,0,0) end else outputChatBox("* Choose A Car To Take It",255,0,0) end end end ) addEvent("back",true) addEventHandler("back",root, function () BACK() end ) tw = guiCreateWindow(0.3212,0.2683,0.3187,0.19,"هل تريد تجديد الايجار ؟",true) yes = guiCreateButton(0.0353,0.2105,0.9294,0.3246,"نعم",true,tw) guiSetFont(yes,"default-bold-small") no = guiCreateButton(0.0353,0.5702,0.9294,0.3246,"لا",true,tw) guiSetFont(no,"default-bold-small") guiSetVisible(tw,false) centerWindow(tw) addEvent("onCheckCar",true) addEventHandler("onCheckCar",root, function () guiSetVisible(tw,true) showCursor(true) guiSetInputEnabled(true) end ) addEventHandler("onClientGUIClick",root, function () if source == yes then triggerServerEvent("onYes",localPlayer) guiSetVisible(tw,false) showCursor(false) guiSetInputEnabled(false) elseif source == no then triggerServerEvent("onNo",localPlayer) guiSetVisible(tw,false) showCursor(false) guiSetInputEnabled(false) end end ) سيرفر-- Marker = createMarker(-2429.1154785156,1037.6608886719,50.390625,"cylinder",1.5,255,0,0) createBlipAttachedTo(Marker,55) tc = {} tt = {} addEventHandler("onMarkerHit",Marker, function (player) if getElementType(player) == "player" and not isPedInVehicle(player) then triggerClientEvent(player,"putPlayerInShop",player) end end ) if sendPlayerMoney (mido) (localPlayer) addEvent("onBuyCar",true) addEventHandler("onBuyCar",root, function (name,money,id) if not isGuestAccount(getPlayerAccount(source)) then if getPlayerMoney(source) >= tonumber(money) then takePlayerMoney(source,money) givePlayerCar(source,name,id,money) outputChatBox("* You Have Bought " .. name .. " For " .. money,source,0,255,0) triggerClientEvent(source,"back",source) else outputChatBox("* You Don't Have Enough Money",source,255,0,0) end else outputChatBox("* You Are Not Logged In",source,255,0,0) end end ) addEvent("onTakeCar",true) addEventHandler("onTakeCar",root, function (id) if isElement(tc[source]) then destroyElement(tc[source]) end if isTimer(tt[source]) then killTimer(tt[source]) end takePlayerMoney(source,100000) tc[source] = createVehicle(tonumber(id),-2444.2944335938,1035.7518310547,49.979347229004) warpPedIntoVehicle(source,tc[source]) tt[source] = setTimer(TJDED,15 * 60000,1,source) outputChatBox("* You Have 15 Min",source,0,255,0) end ) function TJDED(player) if isElement(player) and isElement(tc[player]) then triggerClientEvent(player,"onCheckCar",player) end end addEvent("onYes",true) addEventHandler("onYes",root, function () fixVehicle(tc[source]) tt[source] = setTimer(TJDED,15 * 60000,1,source) outputChatBox("* You Have Been Renewed Your Rent",source,0,255,0) end ) addEvent("onNo",true) addEventHandler("onNo",root, function () destroyElement(tc[source]) end )
×
×
  • Create New...