HelpGuys Posted February 2, 2018 Share Posted February 2, 2018 Serials_nowarp = { -- admin_server.lua هذا سريلات لاعبين من حمايه من سحب يجي فوق في ملف ["123456789"] = true, -- سريال } elseif ( action == "warp" ) or ( action == "warpto" ) then if ( nowarp[getPlayerSerial(player)] ~= true ) then setTimer ( warpto, 100, 1, vehicle ) else local vehicle = getPedOccupiedVehicle ( source ) if ( vehicle ) then setTimer ( warpto, 100, 1, vehicle ) outputChatBox("!..لا تستطيع سحب هذا الاعب",source,0,255,255,true) else outputChatBox("!..لا تستطيع سحب هذا الاعب",source,0,255,255,true) if ( getElementHealth ( source ) > 0 ) and ( not isPedDead ( source ) ) then local slap = 100 if ( slap >= 0 ) then if ( slap > 0 ) then if ( slap > getElementHealth ( source ) ) then setTimer ( killPed, 50, 1, source ) else setElementHealth ( source, getElementHealth ( source ) - 100 ) end end function warpPlayer ( p, to ) function warp ( p, to ) local x, y, z = getElementPosition ( to ) local r = getPedRotation ( to ) x = x - math.sin ( math.rad ( r ) ) * 2 y = y + math.cos ( math.rad ( r ) ) * 2 setTimer ( setElementPosition, 1000, 1, p, x, y, z + 1 ) fadeCamera ( p, false, 1, 0, 0, 0 ) setElementDimension ( p, getElementDimension ( to ) ) setElementInterior ( p, getElementInterior ( to ) ) setTimer ( fadeCamera, 1000, 1, p, true, 1 ) end if ( isPedInVehicle ( to ) ) then local vehicle = getPedOccupiedVehicle ( to ) local seats = getVehicleMaxPassengers ( vehicle ) + 1 local i = 0 while ( i < seats ) do if ( not getVehicleOccupant ( vehicle, i ) ) then setTimer ( warpPedIntoVehicle, 1000, 1, p, vehicle, i ) fadeCamera ( p, false, 1, 0, 0, 0 ) setTimer ( fadeCamera, 1000, 1, p, true, 1 ) break end i = i + 1 end if ( i >= seats ) then warp ( p, to ) outputConsole ( "Player's vehicle is full ("..getVehicleName ( vehicle ).." - Seats: "..seats..")", p ) end else warp ( p, to ) end end if ( action == "warp" ) then warpPlayer ( source, player ) else warpPlayer ( player, data ) mdata = getPlayerName ( data ) end else action = nil end if ( action ~= nil ) then aAction ( "player", action, admin, player, mdata, more ) end return true end outputChatBox ( "Access denied for '"..tostring ( action ).."'", source, 255, 168, 0 ) return false end ) رجاء حد يخش يساعد مرح تخسر شيء Link to comment
HelpGuys Posted February 2, 2018 Author Share Posted February 2, 2018 مافي رد ولا ايش 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