Jump to content

MeZo999

Members
  • Posts

    213
  • Joined

  • Last visited

Everything posted by MeZo999

  1. طيب كيف يسير بعد ؟
  2. شباب عندي ماركر سيارت لعصابة حلو الحين لو حطيت ماركر ثاني في اي مكان تيجيني اللوحة ضض السيارات اي ماركر موجود تيجي عليه اللوحه ضض هي الكود اللوحه والماركر شوفولي حل وحكولي شو الخطئ اللوحة addEvent("open", true) local Swat = { ["FBI rancher"] = 490, ["NRG-500"] = 522, ["FBI Truck"] = 528, ["S.W.A.T"] = 601, ["Cheetah"] = 415, ["Infernus"] = 411, ["Slamvan"] = 535, ["Sandking"] = 495, } Wind = guiCreateWindow(478, 201, 296, 372, "Swat Vehicles", false) guiWindowSetSizable(Wind, false) guiSetVisible(Wind, false) GRID = guiCreateGridList(9, 21, 278, 243, false, Wind) guiGridListAddColumn(GRID, "Vehicle :", 0.9) for i = 1, 15 do guiGridListAddRow(GRID) end guiGridListSetItemText(GRID, 1, 1, "FBI rancher", false, false) guiGridListSetItemText(GRID, 2, 1, "NRG-500", false, false) guiGridListSetItemText(GRID, 3, 1, "FBI Truck", false, false) guiGridListSetItemText(GRID, 4, 1, "S.W.A.T", false, false) guiGridListSetItemText(GRID, 5, 1, "Cheetah", false, false) guiGridListSetItemText(GRID, 6, 1, "Infernus", false, false) guiGridListSetItemText(GRID, 7, 1, "Slamvan", false, false) guiGridListSetItemText(GRID, 8, 1, "Sandking", false, false) Select = guiCreateButton(9, 270, 278, 38, "Select", false, Wind) guiSetProperty(Select, "NormalTextColour", "FFAAAAAA") Close = guiCreateButton(10, 318, 277, 38, "Close", false, Wind) guiSetProperty(Close, "NormalTextColour", "FFAAAAAA") addEventHandler("onClientGUIClick", root, function() if(source == Select)then local row, col = guiGridListGetSelectedItem(GRID) local Veh = guiGridListGetItemText(GRID, row, col) if(Veh and Swat[Veh])then guiSetVisible(Wind, false) guiSetInputEnabled(false) if(Veh == "FBI rancher")then triggerServerEvent("Vehiclee", localPlayer, Swat[Veh], "Cars") end triggerServerEvent("Vehiclee", localPlayer, Swat[Veh], "[swat]") end elseif(source == Close)then guiSetVisible(Wind, false) guiSetInputEnabled(false) end end ) addEventHandler("open", root, function(state) if(state == "true")then guiSetVisible(Wind, true) guiSetInputEnabled(true) elseif(state == "false")then guiSetVisible(Wind, false) guiSetInputEnabled(false) end end ) الماركر # addEvent("Vehiclee", true) Markers = { [1] = { 1223.8000488281,-1651.1999511719,12 }, -- احداثيات الماركر } addEventHandler ( "onResourceStart", resourceRoot, function ( ) for _, TheMarkers in ipairs ( Markers ) do TheMarker = createMarker ( TheMarkers[1], TheMarkers[2], TheMarkers[3] - 1, "cylinder", 1.8, 149, 0, 0, 255 ) end end ) addEventHandler("onMarkerHit", resourceRoot, function(hitElem) if(getElementType(hitElem) == "player")then if getElementData ( hitElem,'Group' ) ~= 'Swat' then outputChatBox("#FF0000* #FFF000Only For #FF0000 .:[swat]:. #FFF000Group ", hitElem, 255, 255, 0, true) else if not(isPedInVehicle(hitElem))then triggerClientEvent(hitElem, "open", hitElem, "true") end end end end ) local vehicles = {} addEventHandler("Vehiclee", root, function(model, state) if(state == "Cars")then if(isElement(vehicles[ client ]))then destroyElement(vehicles[ client ]) vehicles[ client ] = nil vehicles[ client ] = createVehicle(model, getElementPosition(client)) end warpPedIntoVehicle(client, vehicles[ client ]) elseif(state == "[swat]")then if(isElement(vehicles[ client ]))then destroyElement(vehicles[ client ]) vehicles[ client ] = nil end vehicles[ client ] = createVehicle(model, getElementPosition(client)) warpPedIntoVehicle(client, vehicles[ client ]) setVehicleColor(vehicles[ client ], 0, 0, 255 ) -- هنا تلون السياره end end ) addEventHandler("onPlayerQuit", root, function() if(vehicles[ source ])then destroyElement(vehicles[ source ]) vehicles[ source ] = nil end end )
  3. --WANTED LEVEL IF A PLAYER IS MURDERED BY A NON-COP, OR IF AN INNOCENT PERSON IS MURDERED BY A COP function aplayerdied( ammo, attacker, weapon, bodypart ) local glevel = getPlayerWantedLevel ( source ) if isElement(attacker) then local wlevel = getPlayerWantedLevel( source ) if wlevel > 0 then if getElementParent(attacker) == kingCOP then setPlayerWantedLevel( source, 0 ) end end if ( getElementType( attacker ) == "player" ) then local wlevel = getPlayerWantedLevel( attacker ) if wlevel < 6 then setPlayerWantedLevel( attacker, wlevel+1 ) end elseif ( getElementType( attacker ) == "vehicle" ) then thekiller = getVehicleController( attacker ) if isElement(thekiller) then local wlevel = getPlayerWantedLevel ( thekiller ) if wlevel < 6 then setPlayerWantedLevel( thekiller, wlevel+1 ) end end end end -- setPlayerWantedLevel( source, 0 ) end addEventHandler ( "onPlayerWasted",root, aplayerdied ) addEventHandler ( "onPlayerWasted",root,function (ammo,attacker,weapon,bodypart ) if getPlayerTeam(attacker) ~= getTeamFromName("Police") and getPlayerTeam(source) == getTeamFromName("Police") then if getPlayerWantedLevel(attacker) <= 3 then setPlayerWantedLevel(attacker,getPlayerWantedLevel(attacker)+3 ) end else if getPlayerWantedLevel(attacker) >= 1 then setPlayerWantedLevel(attacker,0) end end end ) --WANTED LEVEL IF A POLICE OFFICER IS ATTACKED function assaultinganofficer ( attacker, weapon, bodypart, loss ) if getElementParent(source) == kingCOP then if isElement(attacker) then if ( getElementType( attacker ) == "player" ) then if getElementParent(attacker) == kingCOP then return end elseif ( getElementType( attacker ) == "vehicle" ) then thedriver = getVehicleController( attacker ) if isElement(thedriver) then if getElementParent(thedriver) == kingCOP then return end end end if (getElementData ( source, "justdamaged" ) ~= "yes") and (source ~= attacker) then setElementData ( source, "justdamaged", "yes" ) local damagereset = setTimer ( resethurt, 20000, 1, source ) if ( getElementType( attacker ) == "player" ) then local wlevel = getPlayerWantedLevel( attacker ) if wlevel < 1 then setPlayerWantedLevel( attacker, wlevel+1 ) end elseif ( getElementType( attacker ) == "vehicle" ) then local thekiller = getVehicleController( attacker ) if isElement(thekiller) then local wlevel = getPlayerWantedLevel ( thekiller ) if wlevel < 1 then setPlayerWantedLevel( thekiller, wlevel+1 ) end end end end end end end addEventHandler ( "onPlayerDamage", getRootElement(), assaultinganofficer ) function resethurt(source) if isElement(source) then setElementData ( source, "justdamaged", "none" ) end end --WANTED LEVEL IF SOMEONE OTHER THAN A COP JACKS SOMEONE function carjackcheck(theVehicle, seat, jacker) if isElement(jacker) then if getElementParent(jacker) == kingCOP then return end local wlevel = getPlayerWantedLevel( jacker ) if wlevel < 4 then setPlayerWantedLevel( jacker, wlevel+1 ) end end end addEventHandler ( "onPlayerVehicleExit", getRootElement(), carjackcheck ) --WANTED LEVEL IF NON-COP TRIES TO USE A COP CAR function copcarcheck(theVehicle, seat, jacked) if getElementParent(source) == kingCOP then return else local carid = getElementModel( theVehicle ) if carid == 598 or carid == 596 or carid == 597 or carid == 427 or carid == 490 or carid == 599 then if (getElementData ( source, "currentstatus" ) ~= "underarrest" ) then local wlevel = getPlayerWantedLevel( source ) if wlevel < 4 then setPlayerWantedLevel( source, wlevel+1 ) end end end end end addEventHandler ( "onPlayerVehicleEnter", getRootElement(), copcarcheck ) -- WANTED LEVEL IF A COP SEES SOMEONE DOING SOMETHING ILLEGAL -- TO MAKE THIS WORK WITH YOUR SCRIPT, SET A PLAYERS ELEMENT DATA "legalstatus" TO "illegal" WHILE DOING SOMETHING ILLEGAL -- DONT FORGET TO CHANGE IT TO SOMETHING ELSE AFTERWARDS THOUGH!! function inspection ( element ) if isElement(element) then if getPlayerTeam(player) and getTeamName(getPlayerTeam(player)) == 'Police' then return end local wlevel = getPlayerWantedLevel( source ) if wlevel == 0 then if (getElementData ( element, "legalstatus" ) == "illegal" ) then local cx, cy, cz = getElementPosition ( source ) local px, py, pz = getElementPosition ( element ) if ( getDistanceBetweenPoints3D ( cx, cy, cz, px, py, pz ) < 15 ) then setPlayerWantedLevel ( element, 1 ) end end end end end addEventHandler ( "onPlayerTarget", getRootElement(), inspection ) --STUFF TO MAKE BRIBE PICKUPS WORK function pickedUpWantedCheck ( player ) if ( getElementType(source) == "pickup" ) then if getPickupType ( source ) == 3 then if (getElementData ( source, "model" ) == "1247" ) then local level = getPlayerWantedLevel(player) if ( level > 0 ) then setPlayerWantedLevel ( player, level-1 ) end end end end end addEventHandler ( "onPickupHit", getRootElement(), pickedUpWantedCheck ) الكود مش تبعي
  4. شباب هاذا كود تبع انو الشرطي ما تجيه نجوم ويعطي الهاجم على الشرطي نجوم ؟ --WANTED LEVEL IF A PLAYER IS MURDERED BY A NON-COP, OR IF AN INNOCENT PERSON IS MURDERED BY A COP function aplayerdied( ammo, attacker, weapon, bodypart ) local glevel = getPlayerWantedLevel ( source ) if isElement(attacker) then local wlevel = getPlayerWantedLevel( source ) if wlevel > 0 then if getElementParent(attacker) == kingCOP then setPlayerWantedLevel( source, 0 ) end end if ( getElementType( attacker ) == "player" ) then local wlevel = getPlayerWantedLevel( attacker ) if wlevel < 6 then setPlayerWantedLevel( attacker, wlevel+1 ) end elseif ( getElementType( attacker ) == "vehicle" ) then thekiller = getVehicleController( attacker ) if isElement(thekiller) then local wlevel = getPlayerWantedLevel ( thekiller ) if wlevel < 6 then setPlayerWantedLevel( thekiller, wlevel+1 ) end end end end -- setPlayerWantedLevel( source, 0 ) end addEventHandler ( "onPlayerWasted",root, aplayerdied ) addEventHandler ( "onPlayerWasted",root,function (ammo,attacker,weapon,bodypart ) if getPlayerTeam(attacker) ~= getTeamFromName("Police") and getPlayerTeam(source) == getTeamFromName("Police") then if getPlayerWantedLevel(attacker) <= 3 then setPlayerWantedLevel(attacker,getPlayerWantedLevel(attacker)+3 ) end else if getPlayerWantedLevel(attacker) >= 1 then setPlayerWantedLevel(attacker,0) end end end ) --WANTED LEVEL IF A POLICE OFFICER IS ATTACKED function assaultinganofficer ( attacker, weapon, bodypart, loss ) if getElementParent(source) == kingCOP then if isElement(attacker) then if ( getElementType( attacker ) == "player" ) then if getElementParent(attacker) == kingCOP then return end elseif ( getElementType( attacker ) == "vehicle" ) then thedriver = getVehicleController( attacker ) if isElement(thedriver) then if getElementParent(thedriver) == kingCOP then return end end end if (getElementData ( source, "justdamaged" ) ~= "yes") and (source ~= attacker) then setElementData ( source, "justdamaged", "yes" ) local damagereset = setTimer ( resethurt, 20000, 1, source ) if ( getElementType( attacker ) == "player" ) then local wlevel = getPlayerWantedLevel( attacker ) if wlevel < 1 then setPlayerWantedLevel( attacker, wlevel+1 ) end elseif ( getElementType( attacker ) == "vehicle" ) then local thekiller = getVehicleController( attacker ) if isElement(thekiller) then local wlevel = getPlayerWantedLevel ( thekiller ) if wlevel < 1 then setPlayerWantedLevel( thekiller, wlevel+1 ) end end end end end end end addEventHandler ( "onPlayerDamage", getRootElement(), assaultinganofficer ) function resethurt(source) if isElement(source) then setElementData ( source, "justdamaged", "none" ) end end --WANTED LEVEL IF SOMEONE OTHER THAN A COP JACKS SOMEONE function carjackcheck(theVehicle, seat, jacker) if isElement(jacker) then if getElementParent(jacker) == kingCOP then return end local wlevel = getPlayerWantedLevel( jacker ) if wlevel < 4 then setPlayerWantedLevel( jacker, wlevel+1 ) end end end addEventHandler ( "onPlayerVehicleExit", getRootElement(), carjackcheck ) --WANTED LEVEL IF NON-COP TRIES TO USE A COP CAR function copcarcheck(theVehicle, seat, jacked) if getElementParent(source) == kingCOP then return else local carid = getElementModel( theVehicle ) if carid == 598 or carid == 596 or carid == 597 or carid == 427 or carid == 490 or carid == 599 then if (getElementData ( source, "currentstatus" ) ~= "underarrest" ) then local wlevel = getPlayerWantedLevel( source ) if wlevel < 4 then setPlayerWantedLevel( source, wlevel+1 ) end end end end end addEventHandler ( "onPlayerVehicleEnter", getRootElement(), copcarcheck ) -- WANTED LEVEL IF A COP SEES SOMEONE DOING SOMETHING ILLEGAL -- TO MAKE THIS WORK WITH YOUR SCRIPT, SET A PLAYERS ELEMENT DATA "legalstatus" TO "illegal" WHILE DOING SOMETHING ILLEGAL -- DONT FORGET TO CHANGE IT TO SOMETHING ELSE AFTERWARDS THOUGH!! function inspection ( element ) if isElement(element) then if getPlayerTeam(player) and getTeamName(getPlayerTeam(player)) == 'Police' then return end local wlevel = getPlayerWantedLevel( source ) if wlevel == 0 then if (getElementData ( element, "legalstatus" ) == "illegal" ) then local cx, cy, cz = getElementPosition ( source ) local px, py, pz = getElementPosition ( element ) if ( getDistanceBetweenPoints3D ( cx, cy, cz, px, py, pz ) < 15 ) then setPlayerWantedLevel ( element, 1 ) end end end end end addEventHandler ( "onPlayerTarget", getRootElement(), inspection ) --STUFF TO MAKE BRIBE PICKUPS WORK function pickedUpWantedCheck ( player ) if ( getElementType(source) == "pickup" ) then if getPickupType ( source ) == 3 then if (getElementData ( source, "model" ) == "1247" ) then local level = getPlayerWantedLevel(player) if ( level > 0 ) then setPlayerWantedLevel ( player, level-1 ) end end end end end addEventHandler ( "onPickupHit", getRootElement(), pickedUpWantedCheck ) شكرأأأأأ
  5. اعتقد هذا افضل رد ومثال بنفس الوقت ممكن الكود
  6. ضيف هاذا # guiSetVisible (GUIEditor_Window[1], false) function OpenWin() if guiGetVisible ( GUIEditor_Window[1] ) then guiSetVisible ( GUIEditor_Window[1], false ) showCursor(false) guiSetInputEnabled(false) else guiSetVisible ( GUIEditor_Window[1], true ) showCursor(true) guiSetInputEnabled(true) end end bindKey("حط الزر هنا", "down", OpenWin) السطر الاخير في حط الزر هنا عدلها للزر وحطه هاذا اخر كودك
  7. تيتي منور الموضوع هسا انتبهت انو انتا
  8. الشرطي ما تجيه نجووم
  9. يا شباب مشااااااااااااان الله ساعدوني اعطوني الكود ربي يخليكم
  10. getPedSkin getElementModel ممكن كامل يا حبيبي راح اتعبك معي ولله معرف اجمعهم
  11. كل ماطلبت شيء تتعبهم ويجيبون الفنكشنات واخر شيء تقول تبيه كامل ! ومو كل شيء جاهز ساعدوك مره مرتين ثلاث اربعه خلاص كفايه ابدأ تعلم اخوي اخر كود بدي اشغل السيرفر وابدأ تعلم
  12. local Manstermarker = createMarker(129.52078,-89.13388,1.42969, "cylinder", 1, 255, 0, 0, 153) addEventHandler("onMarkerHit", Manstermarker, function (player) if getElementType(player) == "player" then setElementInterior(player, 0) setElementPosition(player, 201.79, 1909.8, 17.64) end end ) بدي اياه لجروب معين على مود القروبات العقرب
  13. ابدي كود بسيط جدأ جدأ هوو اذا احد ما عليه نجوم تيم الشرطه او شخصيات الشرطه ما تقدر تقتلهم و كود ثاني ربي يخليكم هو الشرطي ما تجي عليه نجوم على اسم التيم الي في تاب الي هو Police او على ارقام شخصيات الشرطه ربي يخليكم بس الكود هاذا يا ريت يا ريت يا ريت يكون كامل ارجوكم اخر طلب ♥
  14. ياخي ما في شيئ عربي لشرح البرمجه lua من 0
  15. addEventHandler('onPlayerDamage',root,function(attacker,attackerWeapon) if ( attacker ) and ( getElementType(if ( attacker ) and ( getElementType(attacker) == 'player' ) and ( getPlayerTeam(attacker) ) and ( getTeamName(getPlayerTeam(attacker)) ) == 'No Tame' and attackerWeapon == id then if ( getPlayerTeam(source) ) and ( getTeamName(getPlayerTeam(source)) ) == 'Police' then setPlayerWantedLevel(attacker,5) if ( getPlayerTeam(source) ) and ( getTeamName(getPlayerTeam(source)) ) ~= 'No Tame' then getDistanceBetweenPoints3D end end ) المحاوله في اخطاء على ما اعتقد يمكن في بعد الاعب عن الشرطي عن طريق getDistanceBetweenPoints3D لا تضحكو هههههههههههههه
  16. اها وش اسوي اعدل عليهم ؟
  17. الحين اجمعهم وخلص ؟
  18. و كمان كلامك حكيم ههههههههههههه هات سكايبك اعطيك مود جاهز عملته لك mezo06669
  19. etPlayerTeam دخلت هنا etPlayerTeam ورحت على تحت لقيت كود حطيته و ما اشتغل
  20. ولله العضيم جربت اقصم ب الله العضيم جربت
  21. شباب ممكن برمجهه كامله لشرطه يعني ابي اذا احد ضرب شرطي من تيم الشرطه تجيه 5 نجوم اذا ضربه برصاص اذا ضرب احد امامه يجيه 3 نجوم يا ريت السكربت كامل ربي يخليكم تكون ساعتني و جزاك الله خير
  22. وربي دخل وجرت بس معرف اجمعهم مع بعض او ارتبهم ربي يخليك اجل ليه رايح تسوي النظام ذا وانت ماتعرف شي منه ؟ .. رح تعلم كيف تسوي الأشياء البسيطة وبعدين حبة حبة لين تصير تعرف زين بالبرمجة وقتها سوهـ اخوي اعطوني الكود ربي يخليكم ساعدوني
  23. وربي دخل وجرت بس معرف اجمعهم مع بعض او ارتبهم ربي يخليك
×
×
  • Create New...