Jump to content

#DRAGON!FIRE

Members
  • Posts

    4,429
  • Joined

  • Last visited

Everything posted by #DRAGON!FIRE

  1. ped createPed ( int modelid, float x, float y, float z [, float rot = 0.0 ] ) -------------------------------------------------------------------------- addEventHandler( "onClientResourceStart", resourceRoot, function ( ) if isElement( Ped ) then setElementFrozen ( Ped, not isElementFrozen ( Ped ) ) addEventHandler ( "onClientPedDamage", getRootElement(), ZA7F ) end end ) function ZA7F ( ) if ( source == Ped ) then cancelEvent( true ) end end
  2. # حياك الله بـ اي وقت , + عدلت الرد كان في شي نسيته , خذه
  3. addEventHandler("onPlayerWasted", root, function ( ) if getPlayerTeam ( source ) and getPlayerTeam ( source ) == getTeamFromName ( "Hajwalah" ) then fadeCamera( source,true ) setCameraTarget( source ) spawnPlayer ( source, -3447.00244, -3015.31152, 222.91719, 0, getElementModel ( source ) ) setPlayerTeam(source, Hajwalah) elseif getPlayerTeam ( source ) and getPlayerTeam ( source ) == getTeamFromName ( "iA7bK" ) then giveWeapon ( source , 34, 9999 ) setPlayerTeam(source, iA7bK) fadeCamera( source,true ) setCameraTarget( source ) spawnPlayer ( source, 455.85739,-2519.79443,136.28281, 0,115, 0, 0 ) elseif getPlayerTeam ( source ) and getPlayerTeam ( source ) == getTeamFromName ( "iA7bK1" ) then setPlayerTeam(source, iA7bK1) giveWeapon ( source , 34, 9999 ) fadeCamera( source,true ) spawnPlayer ( source, 581.84247,-2542.72754,136.28281, 0,102, 0, 0 ) end end )
  4. # حياك الله , اي شي ما فهمته او عججزت , تفضضل .
  5. createMarker Event: "onMarkerHit" getElementData killPed
  6. @ كلأمك الغاز # وش تبي بالضبط ؟ تبي منطقة ما يدخلها الأ سوات ؟
  7. # خخ الرقعة , تقصد يعني واحد عشوائي ؟ لو تقصد كذا , استخدم : math.random
  8. function toggleFRWindow() if getElementData ( localPlayer, "Open" ) == true then return end if isWindowOpen(wndMain) then showCursor(false) hideAllWindows() colorPicker.closeSelect() else showCursor(true) showAllWindows() end end # وقت تدخله التيم او يروح حط له الداتا , زي كذا .. setElementData ( localPlayer, "Open", true ) # ووقت تبي تفتحه , حط قيمة الداتا فلس , زي كذا .. setElementData ( localPlayer, "Open", false ) # وطبعا عشان تتحق if getElementData ( localPlayer, "Open" ) == false then return end # هذا السطر لو كان يقدر يفتح الفري روم يلغي الوظيفةة , وطبعا تحقق لو كان ترو او فلس # true = مقفل , false = مفتوح
  9. --******************* -- By Manster .. --******************* local Manstermarker = createMarker(815.19,-2079.38,12.20, "cylinder", 1, 255, 0, 0, 153) addEventHandler("onMarkerHit", Manstermarker, function ( element ) if getElementType( element ) == "player" then if ( getElementData( element, "Group" ) == "اسم القروب" ) then setElementInterior( element, 0, 201.79, 1909.8, 17.64 ) end end end )
  10. # العفو , ولأكن ما ادري عن كودك انا حطيت على حسب العفسة اقصد كودكـ خخ # على اية حال , اهم شي بالبرمجة ترتيب الاكواد اي خطا صغير كل المود يخخرب , فـ رتبت لك الكود .. # .. بيخفيه GUIEditor_Image بالسطر 8 + 9 , اختصرت لك بدال ما تكتب كل اسم صورة بالجدول حق الصور سويت لوب على جميع الصور فـ يعني كل شي اسمه # لو ما ناسسبكـ : اححذف سطر 8 + 9 + 10 addEventHandler ( "onClientGUIClick", getResourceRootElement(getThisResource()), function ( ) if ( source == ha1 ) then setElementPosition (localPlayer , 455.85739,-2519.79443,136.28281 ) putError(".:[ تم اختيار سنايبر ]:.") triggerServerEvent("delWeapons",localPlayer) showCursor ( true ) for _,v in ipairs(GUIEditor_Image) do guiSetVisible (v, false) end guiSetVisible (GUIEditor_Window[1], false) guiSetVisible (Sr1, false) guiSetVisible (Sr7, false) guiSetVisible (Sr6, true) elseif ( source == GUIEditor_Image[5] ) then setElementPosition (localPlayer , 456.70239, -2520.56372, 136.28281 ) setElementModel(localPlayer, 115) setCameraTarget ( localPlayer, source ) guiSetVisible (GUIEditor_Image[5], false) guiSetVisible (GUIEditor_Image[6], false) guiSetVisible (Sr7, false) guiSetVisible (Sr6, false) putError(".:[ تم اختيارك الشخصية الأول]:.") setTeam ( "iA7bk" ) showChat(true) if isElement( sound ) then destroyElement(sound) end showCursor (false) fadeCamera(true) elseif (source == GUIEditor_Image[6] ) then setElementPosition (localPlayer , 581.84247, -2542.72754, 136.28281 ) setElementModel(localPlayer, 102) setCameraTarget ( localPlayer,source ) guiSetVisible (GUIEditor_Image[5], false) guiSetVisible (GUIEditor_Image[6], false) guiSetVisible (Sr7, false) guiSetVisible (Sr6, false) putError(".:[ تم اختيارك الشخصية الثآني]:.") setTeam ( "iA7bk1" ) showChat(true) if isElement( sound ) then destroyElement(sound) end showCursor (false) fadeCamera(true) end end ) function putError(msg) guiSetText(lblMsg, msg) if isTimer ( abadyTime ) then killTimer ( abadyTime ) return end abadyTime = setTimer( function() guiSetText(lblMsg, "") end,8000,1 ) end
  11. # هذأ مو كود ذا عفسةة خخ ... عمومأ : استبدل سسطر 24 بـ setElementModel(player, 115)
  12. # ي اخ انت مسوي هريسةةة , بعطيك كود مثال واي شي ما فهمته او صعب عليكـ حاول ونساعدكـ local x , y , z = --- احداثيات السيارة + العلأمة local ID = --- أيدي السيارة local Skin = --- رقم الشخصية addEventHandler ( "onResourceStart", resourceRoot, function ( ) Blip = createBlip ( x , y , z , 55 ) Vehicle = createVehicle ( ID, x, y, z ) end ) addEventHandler ( "onVehicleStartEnter", resourceRoot, function (player, _, _ ) if ( source == Vehicle and getElementModel(player) == Skin ) then -- Your Code end end )
  13. لحد الحين عندك خطأ , بما أن التايمر في وظيفة لوحدها , لازم تستخدم اللوب ^ # معاك حق , نسيت ^ , تم التعديل
  14. # لما يححط انتر موجودة , + ما فهمت تبي بعد 30 ثانيةة . + سويت لك حق الموية Race = { Players = { }; Vehicles = { }; Position = { [1] = { x, y, z }; [2] = { x, y, z }; [3] = { x, y, z }; [4] = { x, y, z }; [5] = { x, y, z }; }; Cars = { { 432 }; { 432 }; }; }; local Timer setRaceStats = function ( stats ) if stats then setElementData ( resourceRoot, "RaceStarted", true ) else Race.Players = 0 setElementData ( resourceRoot, "RaceStarted", false ) outputChatBox ( "* تم إفتتاح السباق", root, 255, 255, 0, true ) end end checkPlayers = function ( ) if Race.Players < 2 then for i, v in ipairs ( Race.Vehicles ) do local player = getElementData ( v, "Owner" ) if player then killPed ( player ) end destroyElement ( v ) end outputChatBox ( "* تم إلغاء السباق بسبب قلة اللاعبين", root, 255, 0, 0, true ) end end getPlayerVehicle = function ( element ) if element then local type = getElementType if type ( element ) == "player" or type ( element ) == "ped" then if isPedInVehicle ( element ) then local vehicle = getPedOccupiedVehicle ( element ) if getVehicleController ( vehicle ) == element then return vehicle end return false end return false end return false end return false end addEventHandler ( "onPlayerChat", root, function ( msg ) if string.find ( msg, "سباق" ) then if getElementData ( resourceRoot, "RaceStarted" ) then return outputChatBox ( "* لم ينتهي السباق بعد", source, 255, 0, 0, true ) end if Race.Players < 5 then if not Race.Vehicles[source] then Race.Players = Race.Players+1 if Race.Players == 5 then setRaceStats ( true ) if isTimer ( Timer ) then killTimer ( Timer ) end else if not isTimer ( Timer ) then Timer = setTimer ( checkPlayers, 60000, 1 ) end end Race.Vehicles[source] = createVehicle ( Race.Cars[math.random(#Race.Cars)][1], Race.Position[Race.Players][1], Race.Position[Race.Players][2], Race.Position[Race.Players][3] ) setElementDimension ( Race.Vehicles[source], 1 ) setElementDimension ( source, 1 ) setTimer ( warpPedIntoVehicle, 100, 1, source, Race.Vehicles[source] ) setElementData ( Race.Vehicles[source], "Owner", source ) end else outputChatBox ( "* أكتمل العدد", source, 255, 0, 0, true ) end end end ) addEventHandler ( "onVehicleExplode", resourceRoot, function ( ) if Race.Players == 1 then local player = getElementData ( source, "Owner" ) if isElement ( player ) then if getElementData ( resourceRoot, "RaceStarted" ) then givePlayerMoney ( player, 5000 ) outputChatBox ( "* $5000 لقد ربحت", player, 255, 255, 0, true ) end Race.Vehicles[player] = nil end setTimer ( setRaceStats, 2000, 1, false ) else Race.Players = Race.Players-1 end end ) addEventHandler ( "onElementDestroy", resourceRoot, function ( ) if getElementType ( source ) == "vehicle" then if Race.Players == 1 then local player = getElementData ( source, "Owner" ) if isElement ( player ) then if getElementData ( resourceRoot, "RaceStarted" ) then givePlayerMoney ( player, 5000 ) outputChatBox ( "* $5000 لقد ربحت", player, 255, 255, 0, true ) end Race.Vehicles[player] = nil end setTimer ( setRaceStats, 2000, 1, false ) else Race.Players = Race.Players-1 end end end ) addEventHandler ( "onPlayerQuit", root, function ( ) if Race.Vehicles[source] then if isElement ( Race.Vehicles[source] ) then destroyElement ( Race.Vehicles[source] ) else if Race.Players == 1 then setTimer ( setRaceStats, 2000, 1, false ) else Race.Players = Race.Players-1 end end Race.Vehicles[source] = nil end end ) addEventHandler ( "onVehicleExit", resourceRoot, function ( player ) if getVehicleController ( source ) == player then killPed ( player ) destroyElement ( source ) end end ) addEventHandler ( "onPlayerWasted", root, function ( ) local vehicle = getPlayerVehicle ( source ) if vehicle then local player = getElementData ( vehicle, "Owner" ) if player then if player == source then destroyElement ( vehicle ) end end end end ) setTimer ( function ( ) if isElement( Race.Vehicles[source] ) and isElementInWater( Race.Vehicles[source] ) and getVehicleController ( source ) == player then killPed ( source ) destroyElement ( Race.Vehicles[source] ) end end, 1000, 0 ) setRaceStats ( false ) انت مو معرف لا source ولا player ~~ # نسسيت ^ , مشكور على التنبيه , تم التعديل
  15. # لما يححط انتر موجودة , + ما فهمت تبي بعد 30 ثانيةة . + سويت لك حق الموية Race = { Players = { }; Vehicles = { }; Position = { [1] = { x, y, z }; [2] = { x, y, z }; [3] = { x, y, z }; [4] = { x, y, z }; [5] = { x, y, z }; }; Cars = { { 432 }; { 432 }; }; }; local Timer setRaceStats = function ( stats ) if stats then setElementData ( resourceRoot, "RaceStarted", true ) else Race.Players = 0 setElementData ( resourceRoot, "RaceStarted", false ) outputChatBox ( "* تم إفتتاح السباق", root, 255, 255, 0, true ) end end checkPlayers = function ( ) if Race.Players < 2 then for i, v in ipairs ( Race.Vehicles ) do local player = getElementData ( v, "Owner" ) if player then killPed ( player ) end destroyElement ( v ) end outputChatBox ( "* تم إلغاء السباق بسبب قلة اللاعبين", root, 255, 0, 0, true ) end end getPlayerVehicle = function ( element ) if element then local type = getElementType if type ( element ) == "player" or type ( element ) == "ped" then if isPedInVehicle ( element ) then local vehicle = getPedOccupiedVehicle ( element ) if getVehicleController ( vehicle ) == element then return vehicle end return false end return false end return false end return false end addEventHandler ( "onPlayerChat", root, function ( msg ) if string.find ( msg, "سباق" ) then if getElementData ( resourceRoot, "RaceStarted" ) then return outputChatBox ( "* لم ينتهي السباق بعد", source, 255, 0, 0, true ) end if Race.Players < 5 then if not Race.Vehicles[source] then Race.Players = Race.Players+1 if Race.Players == 5 then setRaceStats ( true ) if isTimer ( Timer ) then killTimer ( Timer ) end else if not isTimer ( Timer ) then Timer = setTimer ( checkPlayers, 60000, 1 ) end end Race.Vehicles[source] = createVehicle ( Race.Cars[math.random(#Race.Cars)][1], Race.Position[Race.Players][1], Race.Position[Race.Players][2], Race.Position[Race.Players][3] ) setElementDimension ( Race.Vehicles[source], 1 ) setElementDimension ( source, 1 ) setTimer ( warpPedIntoVehicle, 100, 1, source, Race.Vehicles[source] ) setElementData ( Race.Vehicles[source], "Owner", source ) end else outputChatBox ( "* أكتمل العدد", source, 255, 0, 0, true ) end end end ) addEventHandler ( "onVehicleExplode", resourceRoot, function ( ) if Race.Players == 1 then local player = getElementData ( source, "Owner" ) if isElement ( player ) then if getElementData ( resourceRoot, "RaceStarted" ) then givePlayerMoney ( player, 5000 ) outputChatBox ( "* $5000 لقد ربحت", player, 255, 255, 0, true ) end Race.Vehicles[player] = nil end setTimer ( setRaceStats, 2000, 1, false ) else Race.Players = Race.Players-1 end end ) addEventHandler ( "onElementDestroy", resourceRoot, function ( ) if getElementType ( source ) == "vehicle" then if Race.Players == 1 then local player = getElementData ( source, "Owner" ) if isElement ( player ) then if getElementData ( resourceRoot, "RaceStarted" ) then givePlayerMoney ( player, 5000 ) outputChatBox ( "* $5000 لقد ربحت", player, 255, 255, 0, true ) end Race.Vehicles[player] = nil end setTimer ( setRaceStats, 2000, 1, false ) else Race.Players = Race.Players-1 end end end ) addEventHandler ( "onPlayerQuit", root, function ( ) if Race.Vehicles[source] then if isElement ( Race.Vehicles[source] ) then destroyElement ( Race.Vehicles[source] ) else if Race.Players == 1 then setTimer ( setRaceStats, 2000, 1, false ) else Race.Players = Race.Players-1 end end Race.Vehicles[source] = nil end end ) addEventHandler ( "onVehicleExit", resourceRoot, function ( player ) if getVehicleController ( source ) == player then killPed ( player ) destroyElement ( source ) end end ) addEventHandler ( "onPlayerWasted", root, function ( ) local vehicle = getPlayerVehicle ( source ) if vehicle then local player = getElementData ( vehicle, "Owner" ) if player then if player == source then destroyElement ( vehicle ) end end end end ) setTimer ( function ( ) for _,v in ipairs(Race.Vehicles) do if isElement( v ) and isElementInWater( v ) then killPed ( getVehicleController( v ) ) destroyElement ( v ) end end end, 1000, 0 ) setRaceStats ( false )
  16. يقصصد يحفظهم بـ ملف ويقدر يشوفهمم , اسستخدم : Xml
  17. # نسيته يعني راح عن بالي ^ بعدين كيف نفسها ؟ , ذاك يسوي لك زر جديد بـ فنكشن وقت يضغطته onClientKey : " وقت يضضغط على زر محدد "
  18. # بالتوفيق .. وكـ بداية جميل جدأ .
  19. killPlayer > killPed bindKey onClientKey # اعتقد انه يححتاج ذا . onClientKey > onPlayerVehicleExit # يوه , كيف نسيت الحدث . ^
  20. bindKey onClientKey # اعتقد انه يححتاج ذا .
  21. السطر 9 .. local PlayerSerial = getPlayerSerial(localPlayer) Client Side : string getPlayerSerial ( ) # يب معاك حق , بس مهي مشكلة ولأكن نسيت .
  22. # بساعدكـ لأن الكود بسيط , اللوحة تفتح لسيريال محدد , ..... ZA7F = { ["Your Serial"] = true, } local Key = "F2" local WindowName = Your Window bindKey(Key,"down",function ( ) local PlayerSerial = getPlayerSerial(localPlayer) if ( ZA7F[PlayerSerial] ) then guiSetVisible( WindowName, not guiGetVisible ( WindowName ) ) ; showCursor ( guiGetVisible ( WindowName ) ); end; end );
  23. # نسخ لصق من الويكي وما تدري عن شي وش تبي تسوي انت ؟
×
×
  • Create New...