mohamedrashdey Posted February 20, 2016 Share Posted February 20, 2016 لسلام عليكم روحمه الله وبركاته ابي مساعدة ابي اكواد تصميم المقرات +الزينه+برمجه المقرات كامله اكواد كامله يعني من الماركر تبع السيارات والرسباون حق الطياره و الرسباون حق الشخصيه والماركر حق الدم والدرع والماركر حق دخول البيت ومن الداخل البيت وبرمجه البوابه ياريت مساعدة لأني جديد بالبرمجه Link to comment
7up2016 Posted February 21, 2016 Share Posted February 21, 2016 انت جديد حياك الله لكن تراك طالب قيم مود مو كود هههههههههههه تحتاج الف كود عشان تسوي هالمود هههههه اتمنى تكون فهمت Link to comment
mohamedrashdey Posted February 21, 2016 Author Share Posted February 21, 2016 يب فهمت :^^ بس فيك تساعدني ؟ Link to comment
Jupi Posted February 21, 2016 Share Posted February 21, 2016 ما في احد راح يساعدك بمود مثل كذا لازم انت تبدع و تفكر و تشوف طريقة تصنع بها المود Link to comment
Still7 Posted February 21, 2016 Share Posted February 21, 2016 لسلام عليكم روحمه الله وبركاتهابي مساعدة ابي اكواد تصميم المقرات +الزينه+برمجه المقرات كامله اكواد كامله يعني من الماركر تبع السيارات والرسباون حق الطياره و الرسباون حق الشخصيه والماركر حق الدم والدرع والماركر حق دخول البيت ومن الداخل البيت وبرمجه البوابه ياريت مساعدة لأني جديد بالبرمجه الفنكشنات الي راح تحتاجها اذا تبي مثال , اضغط على اي فنكشن , راح يوديك لصفحة الويكي , وتلقى امثله حاول تسوي بعض الفنشكنات , وراح اساعدك createMarker table createVehicle setElementModel setElementHealth setPedArmor setElementPosition createObject moveObject Link to comment
#ExTrA..! Posted March 22, 2016 Share Posted March 22, 2016 -- كود البوابة .. Door3 = createObject(980,x,y,z) -- x,y,z .. تحط احداثيات البوابة markerDoor3 = createMarker(x,y,z,'cylinder',11,0,0,0,0) -- x,y,z تغير هذه وتحط مكان ماركر .. الماركر تحطة مكان بالباب بالوسط addEventHandler('onMarkerHit',markerDoor3, function ( hitElement ) if getTeamName(getPlayerTeam(hitElement)) == "No Team" and getElementData(hitElement, "Group") == "اسم قروبك" then moveObject(Door3,1000,x,y,z) -- احداثيات البوابة واهي مرفوعة .. تحطها مكان الاكس والواي و الزد -- I رقم 1000 = سرعة فتح البوابة end end ) addEventHandler('onMarkerLeave',markerDoor3, function ( hitElement ) moveObject(Door3,1000,x,y,z) -- مكان الاكس و الواي و الزد تحط اول احداثيات حطيتها احداثيات البوابة .. I رقم 1000 = سرعة فتحح البوابةةء end ) اتمنى افدتككء Link to comment
Me[Z]oO Posted March 22, 2016 Share Posted March 22, 2016 طلبك الاول افتح مود الeditor وصمم وشوف شروحات يوتيوب الطلب الثالث السلام عليكم شباب الموضوع طويل شوى بس شامل و مفيديلا نبدآ بسم الله اول شئ مركر الدخول الى البيت -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" و بكده يكون الموضوع انتهى اتمنى ان اكون افتكم اعذرونى لو فى اخطآ املائيه عشان الموضوع طويل اسيبكم فى امان الله 1 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