تعديل كود

[Dr.Xen]

السلام عليكم ورحمة الله وبركاته

كيف حالكم ي عيال .. كلنا بخير ان شاء الله

ي عيال معي كود بس ما يشتغل لقروب حق العقرب ابيه يشتغل في قروب سيستم العقرب

addEvent("warningSound", true) 
  
local sx, sy = guiGetScreenSize() 
  
mainWindow = guiCreateWindow((sx-438)/2, (sy-487)/2, 438, 487, "(RWS)Vehicles", false) 
guiWindowSetSizable(mainWindow, false) 
guiSetAlpha(mainWindow, 1.00) 
guiSetVisible(mainWindow, false) 
  
mainTab = guiCreateTabPanel(0.02, 0.04, 0.96, 0.90, true, mainWindow) 
  
local vehicles = { 
    cars = { 
        tab = guiCreateTab("Cars", mainTab), 
        list = { 
            {"Cheetah", 415}, 
            {"Bullet", 541}, 
            {"Infernus", 411}, 
            {"Sultan", 560}, 
            {"Turismo", 451}, 
            {"Comet", 480}, 
            {"Huntley", 579}, 
            {"Flash", 565}, 
            {"Bandito", 568} 
        } 
    }, 
    bikes = { 
        tab = guiCreateTab("Bikes", mainTab), 
        list = { 
            {"BF-400", 581}, 
            {"FCR-900", 521}, 
            {"NRG-511", 522}, 
            {"PCJ-600", 461}, 
            {"Sanchez", 468} 
        } 
    }, 
    planes = { 
        tab = guiCreateTab("Planes", mainTab), 
        list = { 
            {"Sparrow", 469}, 
            {"Maverick", 487} 
        } 
    } 
} 
vehicles.cars.gridlist = guiCreateGridList(0.05, 0.02, 0.89, 0.95, true, vehicles.cars.tab) 
table.insert(vehicles.cars, guiGridListAddColumn(vehicles.cars.gridlist, "Cars", 0.9)) 
vehicles.bikes.gridlist = guiCreateGridList(0.05, 0.02, 0.89, 0.95, true, vehicles.bikes.tab) 
table.insert(vehicles.bikes, guiGridListAddColumn(vehicles.bikes.gridlist, "Bikes", 0.9)) 
vehicles.planes.gridlist = guiCreateGridList(0.05, 0.02, 0.89, 0.95, true, vehicles.planes.tab) 
table.insert(vehicles.planes, guiGridListAddColumn(vehicles.planes.gridlist, "Planes", 0.9)) 
  
notice = guiCreateLabel(0.02, 0.94, 0.96, 0.03, "Press (Enter) to select your vehicle", true, mainWindow) 
guiLabelSetColor(notice, 255, 255, 0) 
guiLabelSetHorizontalAlign(notice, "center", false) 
guiLabelSetVerticalAlign(notice, "center") 
  
for i,v in pairs(vehicles) do 
    for _,k in ipairs(v.list) do 
        local row = guiGridListAddRow(v.gridlist) 
        guiGridListSetItemText(v.gridlist, row, v[1], k[1], false, false) 
    end 
end 
  
local vehiclesMarker = createColSphere(2676.5754394531, 501.72253417969, 38.639434814453, 1) 
  
addEventHandler("onClientColShapeHit", vehiclesMarker, 
    function(hitElement) 
        if hitElement == localPlayer and getElementData(hitElement, "Group") == "(RWS)" and not isPedInVehicle(hitElement) then 
            guiSetVisible(mainWindow, true) 
            showCursor(true) 
            bindKey("enter", "down", selectVehicle) 
        end 
    end,false 
) 
  
addEventHandler("onClientColShapeLeave", vehiclesMarker, 
    function(leaveElement) 
        if leaveElement == localPlayer and getElementData(leaveElement, "Group") == "(RWS)" and not isPedInVehicle(leaveElement) then 
            guiSetVisible(mainWindow, false) 
            showCursor(false) 
            unbindKey("enter", "down", selectVehicle) 
        end 
    end, false 
) 
  
function selectVehicle() 
    for i,v in pairs(vehicles) do 
        local tab = v.tab 
        if guiGetSelectedTab(mainTab) == tab then 
            local gridlist = v.gridlist 
            if guiGridListGetSelectedItem(gridlist) ~= -1 then 
                local row = guiGridListGetSelectedItem(gridlist) 
                local vehName = guiGridListGetItemText(gridlist, row, v[1]) 
                for _,k in ipairs(v.list) do 
                    if k[1] == vehName then 
                        if i == "planes" then 
                            triggerServerEvent("spawningVehicle", localPlayer, k[2], true) 
                        else 
                            triggerServerEvent("spawningVehicle", localPlayer, k[2], false) 
                        end 
                        unbindKey("enter", "down", selectVehicle) 
                        break 
                    end 
                end 
                guiSetVisible(mainWindow, false) 
                showCursor(false) 
                break 
            end 
        end 
    end 
end 
  
addEventHandler("warningSound", localPlayer, 
    function() 
        if isElement(warningSound) then stopSound(warningSound) end 
        warningSound = playSound("warning.mp3") 
    end 
) 
  
addEventHandler("onClientRender", root, 
    function() 
        local x, y, z = getElementPosition(localPlayer) 
        local scX, scY = getScreenFromWorldPosition(1295.4978027344, 1300.7651367188, 10.8203125) 
        local distance = getDistanceBetweenPoints2D(x, y, 1295.4978027344, 1300.7651367188) 
        if distance <= 45 then 
            distance = 44.773872375488 
        elseif distance >= 70 then  
            return  
        end 
        if scX and scY then 
            dxDrawText("SeySey", scX, scY+2, scX, scY, tocolor(0, 0, 0), distance/10) 
            dxDrawText("SeySey", scX, scY-2, scX, scY, tocolor(0, 0, 0), distance/10) 
            dxDrawText("SeySey", scX, scY, scX, scY, tocolor(255, 255, 0), distance/10) 
        end 
    end 
) 

addEvent("spawningVehicle", true) 
  
local warpingMarkers = { 
    {createColSphere(2645.828125, 514.10321044922, 39.452819824219, 0.90), {2637.6328125, 530.11633300781, 1309.5328369141}, 358.17636108398}, 
    {createColSphere(2637.5400390625, 527.49749755859, 1309.5328369141-0.50, 0.90), {2645.8791503906, 516.2900390625, 39.452819824219}, 0}, 
    {createColSphere(2657.4792480469, 537.72381591797+0.45, 1309.7515869141, 0.90), {2617.2275390625, 568.4462890625, 38.639434814453}, 174.67860412598}, 
    {createColSphere(2618.4020996094, 567.37719726563, 44.61971282959, 0.90), {2644.2993164063, 542.98999023438, 38.639434814453}, 358.53848266602}, 
    {createColSphere(2644.1857910156, 541.24450683594, 38.639434814453, 0.90), {2616.7600097656, 569.69165039063, 44.61971282959}, 180.58679199219}, 
    {createColSphere(2619.87890625, 622.59600830078, 8.5071468353271, 1), {2642.0905761719, 517.64105224609, 39.452819824219}, 0} 
} 
  
local healthMarkers = { 
    createMarker(2657.6000976562, 532.09997558594, 1308.8000488281, "cylinder", 1, 0, 255, 0), 
    createMarker(2645.8732910156, 522.28820800781, 37.639434814453, "cylinder", 1.50, 0, 255, 0) 
} 
  
local fixingMarkers = { 
    createMarker(2616.8203125, 496.33172607422, 38.639434814453-1, "cylinder", 2, 255, 255, 0), 
    createMarker(2611.0817871094, 692.97985839844, 10.671875-1, "cylinder", 3, 255, 255, 0) 
} 
  
local activeVehicles = {} 
local playersVehicles = {} 
local occupiedVehicles = {} 
local activeTimers = {} 
local Intruders = {} 
  
local jumpingOutMarker = createMarker(2611.4643554688, 557.24761962891, 38.639434814453-1, "cylinder", 2, 255, 0, 0) 
local jumpingInMarker = createMarker(2619.8454589844, 622.66082763672, 8.50852394104-1, "cylinder", 2, 255, 0, 0) 
  
local joiners = createColCuboid(2607.4125976563-1, 569.38812255859-90, 36.889434814453, 83, 102, 50) 
  
createBlip(2645.3168945313, 528.1728515625, 38.639434814453, 23) 
  
local function warpPlayer(player, x, y, z, rotation) 
    fadeCamera(player, false, 0.50) 
    setElementFrozen(player, true) 
    setTimer( 
        function(thePlayer) 
            setElementPosition(thePlayer, x, y, z) 
            setTimer(setElementFrozen, 1500, 1, thePlayer, false) 
            setElementRotation(thePlayer, 0, 0, rotation) 
            fadeCamera(thePlayer, true) 
            setCameraTarget(thePlayer, thePlayer) 
        end, 500, 1, player 
    ) 
end 
  
addEventHandler("onColShapeHit", root, 
    function(hitElement) 
        if getElementType(hitElement) == "player" and getElementData(hitElement, "Group") == "(RWS)" or getElementData(hitElement, "RWS(TESTMODE)") and not isPedInVehicle(hitElement) then 
            for i,v in ipairs(warpingMarkers) do 
                if source == v[1] then 
                    if i == 3 then 
                        local positions = { 
                            {2623.9467773438, 566.87329101563, 49.586158752441}, 
                            {2675.2319335938, 570.12432861328, 49.108772277832}, 
                            {2659.3525390625, 570.4853515625, 49.055759429932}, 
                            {2646.0637207031, 555.52850341797, 51.252040863037} 
                        } 
                        local x, y, z = unpack(positions[math.random(#positions)]) 
                        warpPlayer(hitElement, x, y, z, 178.61454772949) 
                        return 
                    elseif i == 4 then  
                        removeElementData(hitElement, "Group") 
                        setElementData(hitElement, "RWS(TESTMODE)", true) 
                    elseif i == 5 then  
                        setElementData(hitElement, "Group", "(RWS)") 
                        removeElementData(hitElement, "RWS(TESTMODE)") 
                    end 
                    local x, y, z = unpack(v[2]) 
                    warpPlayer(hitElement, x, y, z, v[3]) 
                    break 
                end 
            end 
        end 
    end 
) 
  
addEventHandler("onMarkerHit", root, 
    function(hitElement) 
        if getElementType(hitElement) == "player" and getElementData(hitElement, "Group") == "(RWS)" then 
            for i,v in ipairs(healthMarkers) do 
                if v == source then 
                    setElementHealth(hitElement, 100) 
                    setPedArmor(hitElement, 100) 
                    break 
                end 
            end 
        elseif getElementType(hitElement) == "vehicle" then 
            for i,v in ipairs(fixingMarkers) do 
                if v == source then 
                    local player = getVehicleOccupant(hitElement, 0) 
                    if player and getElementData(player, "Group") == "(RWS)" then 
                        setElementVelocity(hitElement, 0, 0, 0) 
                        fixVehicle(hitElement) 
                        exports.guimessages:outputServer(player, "(RWS): Your vehicle has been fixed!", 0, 255, 0) 
                    end 
                    break 
                end 
            end 
        end 
    end 
) 
  
addEventHandler("onMarkerHit", jumpingOutMarker, 
    function(hitElement) 
        if getElementType(hitElement) == "vehicle" then 
            setElementVelocity(hitElement, 0, 0, 0) 
            local player = getVehicleOccupant(hitElement, 0) 
            if player and getElementData(player, "Group") == "(RWS)" then 
                local x, y, z = getElementVelocity(hitElement) 
                setElementVelocity(hitElement, x, y+0.45, z+1.30) 
            end 
        end 
    end, false 
) 
  
addEventHandler("onMarkerHit", jumpingInMarker, 
    function(hitElement) 
        if getElementType(hitElement) == "vehicle" then 
            setElementVelocity(hitElement, 0, 0, 0) 
            setElementRotation(hitElement, 359.10729980469, 359.91583251953, 177.91674804688) 
            local player = getVehicleOccupant(hitElement, 0) 
            if player and getElementData(player, "Group") == "(RWS)" then 
                local x, y, z = getElementVelocity(hitElement) 
                setElementVelocity(hitElement, x, y-0.50, z+1.30) 
            end 
        end 
    end, false 
) 
  
local function addVehicleToDestroyList(vehicleNumber) 
    activeTimers[vehicleNumber] = setTimer( 
        function(vehicleNumber) 
            destroyElement(activeVehicles[vehicleNumber]) 
            activeVehicles[vehicleNumber] = nil 
            activeTimers[vehicleNumber] = nil 
            for i,v in pairs(playersVehicles) do 
                if v == vehicleNumber then 
                    playersVehicles[i] = nil 
                    break 
                end 
            end 
        end, 30000, 1, vehicleNumber 
    ) 
end 
  
local function removeVehicleFromDestroyList(vehicleNumber) 
    if isTimer(activeTimers[vehicleNumber]) then 
        killTimer(activeTimers[vehicleNumber]) 
        activeTimers[vehicleNumber] = nil 
    end 
end 
  
addEventHandler("spawningVehicle", root, 
    function(model, planes) 
        local x, y, z = 0, 0, 0 
        local rx, ry, rz = 0, 0, 0 
        if planes then 
            x, y, z = 1499,747,43 
            rx, ry, rz = 0.3275146484375, 359.78839111328, 271.46984863281 
        else 
            x, y, z = 2676.2900390625, 505.43634033203, 38.298274993896 
            rx, ry, rz = 359.54382324219, 359.99975585938, 3.48193359375 
        end 
        if playersVehicles[client] then  
            destroyElement(activeVehicles[playersVehicles[client]]) 
            removeVehicleFromDestroyList(playersVehicles[client]) 
            playersVehicles[client] = nil 
        end 
        local vehicle = #activeVehicles + 1 
        activeVehicles[vehicle] = createVehicle(model, x, y, z, rx, ry, rz) 
        setVehicleColor(activeVehicles[vehicle], 255, 255, 255) 
        warpPedIntoVehicle(client, activeVehicles[vehicle]) 
        addVehicleUpgrade(activeVehicles[vehicle], 1010) 
        playersVehicles[client] = vehicle 
        occupiedVehicles[vehicle] = nil 
    end 
) 
  
addEventHandler("onVehicleExit", root, 
    function(player, seat) 
        if seat == 0 then 
            if playersVehicles[player] then 
                addVehicleToDestroyList(playersVehicles[player]) 
                occupiedVehicles[playersVehicles[player]] = nil 
            else 
                for i,v in pairs(activeVehicles) do 
                    if v == source then 
                        addVehicleToDestroyList(i) 
                        occupiedVehicles[i] = nil 
                    end 
                end 
            end 
        end 
    end 
) 
  
addEventHandler("onVehicleEnter", root, 
    function(player, seat) 
        if seat == 0 then 
            if playersVehicles[player] then 
                removeVehicleFromDestroyList(playersVehicles[player]) 
                occupiedVehicles[playersVehicles[player]] = true 
            else 
                for i,v in pairs(activeVehicles) do 
                    if v == source then 
                        removeVehicleFromDestroyList(i) 
                        occupiedVehicles[i] = true 
                        break 
                    end 
                end 
            end 
        end 
    end 
) 
  
addEventHandler("onVehicleStartEnter", root, 
    function(player, seat) 
        for i,v in pairs(activeVehicles) do 
            if v == source then 
                if getElementData(player, "Group") ~= "(RWS)" then 
                    outputChatBox("This vehicle is only for (RWS) group!", player, 255, 0, 0) 
                    cancelEvent() 
                else 
                    if seat == 0 and occupiedVehicles[i] then 
                        outputChatBox("You cannot take this vehicle as someone in it already!", player, 255, 0, 0) 
                        cancelEvent() 
                    end 
                end 
                break 
            end 
        end 
    end 
) 
  
addEventHandler("onPlayerSpawn", root, 
    function(x, y, z, spawnRotation, team) 
        if team == getTeamFromName("No Team") then 
            if getElementData(source, "Stats") == 0 then 
                if getElementData(source, "RWS(TESTMODE)") then 
                    setElementData(source, "Group", "(RWS)") 
                    removeElementData(source, "RWS(TESTMODE)") 
                end 
                if getElementData(source, "Group") == "(RWS)" then 
                    local positions = { 
                        {2651.0847167969, 550.11267089844, 1309.5400390625}, 
                        {2644.0856933594, 549.88635253906, 1309.5328369141}, 
                        {2637.5554199219, 549.92211914063, 1309.5328369141}, 
                        {2631.4636230469, 550.81976318359, 1309.5328369141}, 
                        

[AboShanab]

addEvent("warningSound", true) 
  
local sx, sy = guiGetScreenSize() 
  
mainWindow = guiCreateWindow((sx-438)/2, (sy-487)/2, 438, 487, "(RWS)Vehicles", false) 
guiWindowSetSizable(mainWindow, false) 
guiSetAlpha(mainWindow, 1.00) 
guiSetVisible(mainWindow, false) 
  
mainTab = guiCreateTabPanel(0.02, 0.04, 0.96, 0.90, true, mainWindow) 
  
local vehicles = { 
    cars = { 
        tab = guiCreateTab("Cars", mainTab), 
        list = { 
            {"Cheetah", 415}, 
            {"Bullet", 541}, 
            {"Infernus", 411}, 
            {"Sultan", 560}, 
            {"Turismo", 451}, 
            {"Comet", 480}, 
            {"Huntley", 579}, 
            {"Flash", 565}, 
            {"Bandito", 568} 
        } 
    }, 
    bikes = { 
        tab = guiCreateTab("Bikes", mainTab), 
        list = { 
            {"BF-400", 581}, 
            {"FCR-900", 521}, 
            {"NRG-511", 522}, 
            {"PCJ-600", 461}, 
            {"Sanchez", 468} 
        } 
    }, 
    planes = { 
        tab = guiCreateTab("Planes", mainTab), 
        list = { 
            {"Sparrow", 469}, 
            {"Maverick", 487} 
        } 
    } 
} 
vehicles.cars.gridlist = guiCreateGridList(0.05, 0.02, 0.89, 0.95, true, vehicles.cars.tab) 
table.insert(vehicles.cars, guiGridListAddColumn(vehicles.cars.gridlist, "Cars", 0.9)) 
vehicles.bikes.gridlist = guiCreateGridList(0.05, 0.02, 0.89, 0.95, true, vehicles.bikes.tab) 
table.insert(vehicles.bikes, guiGridListAddColumn(vehicles.bikes.gridlist, "Bikes", 0.9)) 
vehicles.planes.gridlist = guiCreateGridList(0.05, 0.02, 0.89, 0.95, true, vehicles.planes.tab) 
table.insert(vehicles.planes, guiGridListAddColumn(vehicles.planes.gridlist, "Planes", 0.9)) 
  
notice = guiCreateLabel(0.02, 0.94, 0.96, 0.03, "Press (Enter) to select your vehicle", true, mainWindow) 
guiLabelSetColor(notice, 255, 255, 0) 
guiLabelSetHorizontalAlign(notice, "center", false) 
guiLabelSetVerticalAlign(notice, "center") 
  
for i,v in pairs(vehicles) do 
    for _,k in ipairs(v.list) do 
        local row = guiGridListAddRow(v.gridlist) 
        guiGridListSetItemText(v.gridlist, row, v[1], k[1], false, false) 
    end 
end 
  
local vehiclesMarker = createColSphere(2676.5754394531, 501.72253417969, 38.639434814453, 1) 
  
addEventHandler("onClientColShapeHit", vehiclesMarker, 
    function(hitElement) 
        if hitElement == localPlayer and not isPedInVehicle(hitElement) then 
         if ( getElementData(hitElement,"Group") ~= "RWS" ) then return outputChatBox("* This Panel For Group RWS Only",255,0,0,true) end 
            guiSetVisible(mainWindow, true) 
            showCursor(true) 
            bindKey("enter", "down", selectVehicle) 
        end 
    end,false 
) 
  
addEventHandler("onClientColShapeLeave", vehiclesMarker, 
    function(leaveElement) 
        if leaveElement == localPlayer then 
            guiSetVisible(mainWindow, false) 
            showCursor(false) 
            unbindKey("enter", "down", selectVehicle) 
        end 
    end, false 
) 
  
function selectVehicle() 
    for i,v in pairs(vehicles) do 
        local tab = v.tab 
        if guiGetSelectedTab(mainTab) == tab then 
            local gridlist = v.gridlist 
            if guiGridListGetSelectedItem(gridlist) ~= -1 then 
                local row = guiGridListGetSelectedItem(gridlist) 
                local vehName = guiGridListGetItemText(gridlist, row, v[1]) 
                for _,k in ipairs(v.list) do 
                    if k[1] == vehName then 
                        if i == "planes" then 
                            triggerServerEvent("spawningVehicle", localPlayer, k[2], true) 
                        else 
                            triggerServerEvent("spawningVehicle", localPlayer, k[2], false) 
                        end 
                        unbindKey("enter", "down", selectVehicle) 
                        break 
                    end 
                end 
                guiSetVisible(mainWindow, false) 
                showCursor(false) 
                break 
            end 
        end 
    end 
end 
  
addEventHandler("warningSound", localPlayer, 
    function() 
        if isElement(warningSound) then stopSound(warningSound) end 
        warningSound = playSound("warning.mp3") 
    end 
) 
  
addEventHandler("onClientRender", root, 
    function() 
        local x, y, z = getElementPosition(localPlayer) 
        local scX, scY = getScreenFromWorldPosition(1295.4978027344, 1300.7651367188, 10.8203125) 
        local distance = getDistanceBetweenPoints2D(x, y, 1295.4978027344, 1300.7651367188) 
        if distance <= 45 then 
            distance = 44.773872375488 
        elseif distance >= 70 then 
            return 
        end 
        if scX and scY then 
            dxDrawText("SeySey", scX, scY+2, scX, scY, tocolor(0, 0, 0), distance/10) 
            dxDrawText("SeySey", scX, scY-2, scX, scY, tocolor(0, 0, 0), distance/10) 
            dxDrawText("SeySey", scX, scY, scX, scY, tocolor(255, 255, 0), distance/10) 
        end 
    end 
) 
  

[Dr.Xen]

مشكور ي ابو شنب ..!

Edited January 1, 2014 by Guest

[Strider]

debugscript 3 ?