Jump to content

مشكلة في مود


Recommended Posts

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

انا جبت مود سيارات وعدلته وطورته

المشكلة الان اللوحة ما تفتح عند الضغط على زر

الاكواد

setTimer ( function () 
 
local theCol = getElementData(root, "BlockExportCol")
   
function isInColExport ()
    if isElement(theCol) and isElementWithinColShape(localPlayer,theCol) then
        return true else return false
    end
end
 
function ClientExplosionCFunction()
 if isInColExport ()  then
  cancelEvent ()
 end
end
addEventHandler("onClientExplosion", root, ClientExplosionCFunction)
 
end , 1000, 1 )
 
local screX, screY = guiGetScreenSize()
 
Window_VS = guiCreateWindow(205, 51, 417, 465, "Car Panel | لوحة السيارات", false)
guiWindowSetSizable(Window_VS, false)
guiSetAlpha(Window_VS, 1.00)
guiSetVisible(Window_VS,false)
Grid_VS = guiCreateGridList(10, 55, 388, 166, false, Window_VS)
guiGridListAddColumn(Grid_VS, "Vehicle", 0.5)
guiGridListAddColumn(Grid_VS, "Hp", 0.5)
label1 = guiCreateLabel(141, 30, 128, 15, "    سياراتك الخاصة بك :", false, Window_VS)
Button_VS_sn  = guiCreateButton(10, 231, 93, 45, "Crate", false, Window_VS)
guiSetProperty(Button_VS_sn, "NormalTextColour", "FFFFFEFE")
Button_VS_dy = guiCreateButton(113, 231, 93, 45, "Destroyer", false, Window_VS)
guiSetProperty(Button_VS_dy, "NormalTextColour", "FFFFFEFE")
Button_VS_Fix  = guiCreateButton(216, 231, 93, 45, "reapir", false, Window_VS)  
guiSetProperty(Button_VS_Fix, "NormalTextColour", "FFFFFEFE")
 Button_VS_Warp =  guiCreateButton(314, 231, 93, 45, "Spawn", false, Window_VS)  
guiSetProperty(Button_VS_Warp, "NormalTextColour", "FFFFFEFE")
Button_VS_lk = guiCreateButton(146, 287, 119, 44, "Lock\open Car", false, Window_VS)
guiSetProperty(Button_VS_lk, "NormalTextColour", "FFFFFEFE")
label2 = guiCreateLabel(1, 331, 413, 21, "_______________________________________________________________", false, GUIEditor.window[1])
label3 = guiCreateLabel(146, 362, 142, 17, "سيارات السيرفر :", false, Window_VS)
GUIEditor.button[b1] = guiCreateButton(9, 387, 112, 49, "NRG-500", false, Window_VS)
guiSetProperty(GUIEditor.button[b1], "NormalTextColour", "FFC3E830")
GUIEditor.button[b2] = guiCreateButton(151, 387, 112, 49, "Maverick", false, Window_VS)
guiSetProperty(GUIEditor.button[b2], "NormalTextColour", "FFFF0000")
GUIEditor.button[b3] = guiCreateButton(294, 387, 112, 49, "Polcie Ranger", false, Window_VS)
guiSetProperty(GUIEditor.button[b3], "NormalTextColour", "FF30E01E")
label4 = guiCreateLabel(210, 493, 135, 15, "Edit By : Ja[b]er[X]Pro", false, Window_VS)
 
 
function updateGridList()
    local data = getElementData(localPlayer, "VehicleInfo")
    if data then
        local rw, cl = guiGridListGetSelectedItem(Grid_VS)
        guiGridListClear(Grid_VS)
        for i, data in ipairs (data) do
            local carName = getVehicleNameFromModel(data["Model"])
            local ID = data["ID"]
            local Cost = data["Cost"]
            local HP = math.floor(data["HP"])
            local PreCost = math.ceil(Cost*.9*HP/100/10)
            local row = guiGridListAddRow(Grid_VS)
            guiGridListSetItemText(Grid_VS, row, 1, carName, false, true)
            guiGridListSetItemData(Grid_VS, row, 1, ID)
            guiGridListSetItemText(Grid_VS, row, 2, HP.." HP", false, true)
        end
        guiGridListSetSelectedItem(Grid_VS, rw, cl)
    end
end
 
outputChatBox("Vehicle System Edit By Jaber&Hmo-Goda", 255, 125, 0)
 
bindKey("F1", "down",
function()
    guiSetVisible(Window_VS,true)
    guiSetVisible (Window_CHK, false)
    showCursor(guiGetVisible(Window_VS))
end)
 
triggerServerEvent("onOpenGui", localPlayer)
 
addEventHandler("onClientElementDataChange", root,
function(dd)
    if getElementType(source) == "player" and source == localPlayer and dd == "VehicleInfo" then
        local data = getElementData(source, dd)
        if data then
            updateGridList()
        end
    end
end)
 
function WINDOW_CLICK_VEHICLE (button, state, absoluteX, absoluteY)
    local id = guiGridListGetSelectedItem(Grid_VS)
    local ID = guiGridListGetItemData(Grid_VS, id, 1)
    if source == Button_VS_close then
        guiSetVisible(Window_VS, false)
        showCursor(false)
    end
    if (source == Grid_VS) then
        if id == -1 and idd then
            guiGridListSetSelectedItem(Grid_VS, idd, 1)
            return false
        else
            idd = guiGridListGetSelectedItem(Grid_VS)
        end
    elseif id == -1 then
    elseif (source == Button_VS_sn) then
    if not isInColExport () then
        triggerServerEvent("SpawnMyVehicle", localPlayer, ID)
                end
    elseif (source == Button_VS_dy) then
        triggerServerEvent("DestroyMyVehicle", localPlayer, ID)
    elseif (source == Button_VS_lt) then
        triggerServerEvent("LightsMyVehicle", localPlayer, ID)
    elseif (source == Button_VS_bp) then
        triggerServerEvent("BlipMyVehicle", localPlayer, ID)
    elseif (source == Button_VS_lk) then
        triggerServerEvent("LockMyVehicle", localPlayer, ID)
    elseif (source == Button_VS_sl) then
        guiSetVisible(Window_CHK, true)
        local carName = guiGridListGetItemText(Grid_VS, guiGridListGetSelectedItem(Grid_VS), 1)
        local carprice = guiGridListGetItemText(Grid_VS, guiGridListGetSelectedItem(Grid_VS), 2)
        guiSetText(Label_CHK, 'Are you sure you want to sell this Vehicle "'..carName..'" for $'..carprice)
    elseif source == Button_VS_Spc then
      if getElementInterior(localPlayer) == 0 then
if getElementData(localPlayer,"Stats") < 0 then
        SpecVehicle(ID)
end
end
    elseif source == Button_VS_Fix then
        triggerServerEvent("FixMyVehicle", localPlayer, ID)
    elseif source == Button_VS_Warp then
           if not isInColExport () then
        triggerServerEvent("WarpMyVehicle", localPlayer, ID)
                      end
    end
end
addEventHandler("onClientGUIClick", resourceRoot, WINDOW_CLICK_VEHICLE)
 
function SpecVehicle(id)
 
    if spc then
        removeEventHandler("onClientPreRender", root, Sp)
        setCameraTarget(localPlayer)
        if isTimer(freezTimer) then killTimer(freezTimer) end
        freezTimer = setTimer(function() setElementFrozen(localPlayer, false) end, 2500, 1)
        spc = false
    return end
    for i, vehicle in ipairs(getElementsByType("vehicle")) do
        if getElementData(vehicle, "Owner") == localPlayer and getElementData(vehicle, "ID") == id then
            cVeh = vehicle
            spc = true
            addEventHandler("onClientPreRender", root, Sp)
            guiSetVisible(Window_VS, false)
            showCursor(false)
            break
          end
                       
    end
end
 
function Sp()
    if isElement(cVeh) then
        local x, y, z = getElementPosition(cVeh)
        setElementFrozen(localPlayer, true)
        setCameraMatrix(x, y-1, z+15, x, y, z)
 
    else
        removeEventHandler("onClientPreRender", root, Sp)
        setCameraTarget(localPlayer)
        if isTimer(freezTimer) then killTimer(freezTimer) end
        freezTimer = setTimer(function() setElementFrozen(localPlayer, false) end, 2500, 1)
        spc = false
      end
end
 
ShopMarkersTable = {}   
 
local ShopTable = {
    [1] = {ID = {{491, 1441400}
        ,{540, 1436800}
        ,{401, 1430000}
        ,{546, 1527700}
        ,{505, 1414000}
        ,{500, 1402600}
        ,{463, 1659300}
        ,{492, 1459300}
        ,{547, 1429600}
        ,{586, 1629600}
        ,{467, 1354300}
        ,{479, 1244800}
        ,{404, 1059900}
        ,{410, 946200}
        ,{471, 593600}
        ,{418, 300000}
        }, vPosX = 2134, vPosY = -1170, vPosZ = 28.15, PosX = 2133, PosY = -1149, PosZ = 23.4, CamX = 2134.1, CamY = -1160, CamZ = 35, lookAtX = 2133.3, lookAtY = -1168, lookAtZ = 28},
    [2] = {ID = {{516, 1819800}
        ,{458, 1815300}
        ,{580, 1801600}
        ,{421, 1801600}
        ,{527, 1667300}
        ,{581, 2151400}
        ,{409, 1744500}
        ,{585, 1696600}
        ,{474, 1573800}
        ,{419, 1539500}
        ,{436, 1539500}
        ,{545, 1530400}
        ,{466, 1616700}
        ,{529, 1580200}
        ,{550, 1473400}
        ,{468, 1966500}
        }, vPosX = 552, vPosY = -1288, vPosZ = 18, PosX = 562, PosY = -1270, PosZ = 16, CamX = 552, CamY = -1275.82, CamZ = 21.61, lookAtX = 552, lookAtY = -1276.77, lookAtZ = 21.29},
    [3] = {ID = {{533, 1973100}
        ,{555, 1943400}
        ,{507, 2041200}
        ,{521, 2427500}
        ,{461, 2427500}
        ,{566, 1995500}
        ,{551, 1972700}
        ,{400, 1970400}
        ,{558, 1863600}
        ,{549, 1824800}
        ,{579, 1902000}
        ,{576, 1797400}
        ,{526, 1781400}
        ,{517, 1772300}
        ,{575, 1763200}
        ,{561, 1822100}
        }, vPosX = 1942.5, vPosY = 2052, vPosZ = 11, PosX = 1946, PosY = 2068, PosZ = 10, CamX = 1930.36, CamY = 2052.78, CamZ = 14.71, lookAtX = 1931.36, lookAtY = 2052.78, lookAtZ = 14.43},
    [4] = {ID = {{536, 2201300}
        ,{567, 2258000}
        ,{602, 2135100}
        ,{534, 2128300}
        ,{426, 2214600}
        ,{439, 2114600}
        ,{412, 2114600}
        ,{587, 2087200}
        ,{565, 2084900}
        ,{589, 2082600}
        ,{542, 2071200}
        ,{496, 2043900}
        ,{535, 2043900}
        ,{405, 2127900}
        ,{445, 2107300}
        ,{518, 1980000}
        }, vPosX = -1950, vPosY = 266, vPosZ = 36.2, PosX = -1954, PosY = 299, PosZ = 34, CamX = -1960.18, CamY = 266.06, CamZ = 37.94, lookAtX = -1959.2, lookAtY = 266.06, lookAtZ = 37.73},
    [5] = {ID = {{411, 3000000}
        ,{429, 2765000}
        ,{541, 2746700}
        ,{451, 2739900}
        ,
Link to comment

setTimer ( function () 
 
local theCol = getElementData(root, "BlockExportCol")
   
function isInColExport ()
    if isElement(theCol) and isElementWithinColShape(localPlayer,theCol) then
        return true else return false
    end
end
 
function ClientExplosionCFunction()
 if isInColExport ()  then
  cancelEvent ()
 end
end
addEventHandler("onClientExplosion", root, ClientExplosionCFunction)
 
end , 1000, 1 )
 
local screX, screY = guiGetScreenSize()
 
Window_VS = guiCreateWindow(205, 51, 417, 465, "Car Panel | لوحة السيارات", false)
guiWindowSetSizable(Window_VS, false)
guiSetAlpha(Window_VS, 1.00)
guiSetVisible(Window_VS,false)
Grid_VS = guiCreateGridList(10, 55, 388, 166, false, Window_VS)
guiGridListAddColumn(Grid_VS, "Vehicle", 0.5)
guiGridListAddColumn(Grid_VS, "Hp", 0.5)
label1 = guiCreateLabel(141, 30, 128, 15, "    سياراتك الخاصة بك :", false, Window_VS)
Button_VS_sn  = guiCreateButton(10, 231, 93, 45, "Crate", false, Window_VS)
guiSetProperty(Button_VS_sn, "NormalTextColour", "FFFFFEFE")
Button_VS_dy = guiCreateButton(113, 231, 93, 45, "Destroyer", false, Window_VS)
guiSetProperty(Button_VS_dy, "NormalTextColour", "FFFFFEFE")
Button_VS_Fix  = guiCreateButton(216, 231, 93, 45, "reapir", false, Window_VS)  
guiSetProperty(Button_VS_Fix, "NormalTextColour", "FFFFFEFE")
 Button_VS_Warp =  guiCreateButton(314, 231, 93, 45, "Spawn", false, Window_VS)  
guiSetProperty(Button_VS_Warp, "NormalTextColour", "FFFFFEFE")
Button_VS_lk = guiCreateButton(146, 287, 119, 44, "Lock\open Car", false, Window_VS)
guiSetProperty(Button_VS_lk, "NormalTextColour", "FFFFFEFE")
label2 = guiCreateLabel(1, 331, 413, 21, "_______________________________________________________________", false, Window_VS)
label3 = guiCreateLabel(146, 362, 142, 17, "سيارات السيرفر :", false, Window_VS)
GUIEditor.button[b1] = guiCreateButton(9, 387, 112, 49, "NRG-500", false, Window_VS)
guiSetProperty(GUIEditor.button[b1], "NormalTextColour", "FFC3E830")
GUIEditor.button[b2] = guiCreateButton(151, 387, 112, 49, "Maverick", false, Window_VS)
guiSetProperty(GUIEditor.button[b2], "NormalTextColour", "FFFF0000")
GUIEditor.button[b3] = guiCreateButton(294, 387, 112, 49, "Polcie Ranger", false, Window_VS)
guiSetProperty(GUIEditor.button[b3], "NormalTextColour", "FF30E01E")
label4 = guiCreateLabel(210, 493, 135, 15, "Edit By : Ja[b]er[X]Pro", false, Window_VS)
 
 
function updateGridList()
    local data = getElementData(localPlayer, "VehicleInfo")
    if data then
        local rw, cl = guiGridListGetSelectedItem(Grid_VS)
        guiGridListClear(Grid_VS)
        for i, data in ipairs (data) do
            local carName = getVehicleNameFromModel(data["Model"])
            local ID = data["ID"]
            local Cost = data["Cost"]
            local HP = math.floor(data["HP"])
            local PreCost = math.ceil(Cost*.9*HP/100/10)
            local row = guiGridListAddRow(Grid_VS)
            guiGridListSetItemText(Grid_VS, row, 1, carName, false, true)
            guiGridListSetItemData(Grid_VS, row, 1, ID)
            guiGridListSetItemText(Grid_VS, row, 2, HP.." HP", false, true)
        end
        guiGridListSetSelectedItem(Grid_VS, rw, cl)
    end
end
 
outputChatBox("Vehicle System Edit By Jaber&Hmo-Goda", 255, 125, 0)
 
bindKey("F1", "down",
function()
    guiSetVisible(Window_VS,true)
    guiSetVisible (Window_CHK, false)
    showCursor(guiGetVisible(Window_VS))
end)
 
triggerServerEvent("onOpenGui", localPlayer)
 
addEventHandler("onClientElementDataChange", root,
function(dd)
    if getElementType(source) == "player" and source == localPlayer and dd == "VehicleInfo" then
        local data = getElementData(source, dd)
        if data then
            updateGridList()
        end
    end
end)
 
function WINDOW_CLICK_VEHICLE (button, state, absoluteX, absoluteY)
    local id = guiGridListGetSelectedItem(Grid_VS)
    local ID = guiGridListGetItemData(Grid_VS, id, 1)
    if source == Button_VS_close then
        guiSetVisible(Window_VS, false)
        showCursor(false)
    end
    if (source == Grid_VS) then
        if id == -1 and idd then
            guiGridListSetSelectedItem(Grid_VS, idd, 1)
            return false
        else
            idd = guiGridListGetSelectedItem(Grid_VS)
        end
    elseif id == -1 then
    elseif (source == Button_VS_sn) then
    if not isInColExport () then
        triggerServerEvent("SpawnMyVehicle", localPlayer, ID)
                end
    elseif (source == Button_VS_dy) then
        triggerServerEvent("DestroyMyVehicle", localPlayer, ID)
    elseif (source == Button_VS_lt) then
        triggerServerEvent("LightsMyVehicle", localPlayer, ID)
    elseif (source == Button_VS_bp) then
        triggerServerEvent("BlipMyVehicle", localPlayer, ID)
    elseif (source == Button_VS_lk) then
        triggerServerEvent("LockMyVehicle", localPlayer, ID)
    elseif (source == Button_VS_sl) then
        guiSetVisible(Window_CHK, true)
        local carName = guiGridListGetItemText(Grid_VS, guiGridListGetSelectedItem(Grid_VS), 1)
        local carprice = guiGridListGetItemText(Grid_VS, guiGridListGetSelectedItem(Grid_VS), 2)
        guiSetText(Label_CHK, 'Are you sure you want to sell this Vehicle "'..carName..'" for $'..carprice)
    elseif source == Button_VS_Spc then
      if getElementInterior(localPlayer) == 0 then
if getElementData(localPlayer,"Stats") < 0 then
        SpecVehicle(ID)
end
end
    elseif source == Button_VS_Fix then
        triggerServerEvent("FixMyVehicle", localPlayer, ID)
    elseif source == Button_VS_Warp then
           if not isInColExport () then
        triggerServerEvent("WarpMyVehicle", localPlayer, ID)
                      end
    end
end
addEventHandler("onClientGUIClick", resourceRoot, WINDOW_CLICK_VEHICLE)
 
function SpecVehicle(id)
 
    if spc then
        removeEventHandler("onClientPreRender", root, Sp)
        setCameraTarget(localPlayer)
        if isTimer(freezTimer) then killTimer(freezTimer) end
        freezTimer = setTimer(function() setElementFrozen(localPlayer, false) end, 2500, 1)
        spc = false
    return end
    for i, vehicle in ipairs(getElementsByType("vehicle")) do
        if getElementData(vehicle, "Owner") == localPlayer and getElementData(vehicle, "ID") == id then
            cVeh = vehicle
            spc = true
            addEventHandler("onClientPreRender", root, Sp)
            guiSetVisible(Window_VS, false)
            showCursor(false)
            break
          end
                       
    end
end
 
function Sp()
    if isElement(cVeh) then
        local x, y, z = getElementPosition(cVeh)
        setElementFrozen(localPlayer, true)
        setCameraMatrix(x, y-1, z+15, x, y, z)
 
    else
        removeEventHandler("onClientPreRender", root, Sp)
        setCameraTarget(localPlayer)
        if isTimer(freezTimer) then killTimer(freezTimer) end
        freezTimer = setTimer(function() setElementFrozen(localPlayer, false) end, 2500, 1)
        spc = false
      end
end
 
ShopMarkersTable = {}  
 
local ShopTable = {
    [1] = {ID = {{491, 1441400}
        ,{540, 1436800}
        ,{401, 1430000}
        ,{546, 1527700}
        ,{505, 1414000}
        ,{500, 1402600}
        ,{463, 1659300}
        ,{492, 1459300}
        ,{547, 1429600}
        ,{586, 1629600}
        ,{467, 1354300}
        ,{479, 1244800}
        ,{404, 1059900}
        ,{410, 946200}
        ,{471, 593600}
        ,{418, 300000}
        }, vPosX = 2134, vPosY = -1170, vPosZ = 28.15, PosX = 2133, PosY = -1149, PosZ = 23.4, CamX = 2134.1, CamY = -1160, CamZ = 35, lookAtX = 2133.3, lookAtY = -1168, lookAtZ = 28},
    [2] = {ID = {{516, 1819800}
        ,{458, 1815300}
        ,{580, 1801600}
        ,{421, 1801600}
        ,{527, 1667300}
        ,{581, 2151400}
        ,{409, 1744500}
        ,{585, 1696600}
        ,{474, 1573800}
        ,{419, 1539500}
        ,{436, 1539500}
        ,{545, 1530400}
        ,{466, 1616700}
        ,{529, 1580200}
        ,{550, 1473400}
        ,{468, 1966500}
        }, vPosX = 552, vPosY = -1288, vPosZ = 18, PosX = 562, PosY = -1270, PosZ = 16, CamX = 552, CamY = -1275.82, CamZ = 21.61, lookAtX = 552, lookAtY = -1276.77, lookAtZ = 21.29},
    [3] = {ID = {{533, 1973100}
        ,{555, 1943400}
        ,{507, 2041200}
        ,{521, 2427500}
        ,{461, 2427500}
        ,{566, 1995500}
        ,{551, 1972700}
        ,{400, 1970400}
        ,{558, 1863600}
        ,{549, 1824800}
        ,{579, 1902000}
        ,{576, 1797400}
        ,{526, 1781400}
        ,{517, 1772300}
        ,{575, 1763200}
        ,{561, 1822100}
        }, vPosX = 1942.5, vPosY = 2052, vPosZ = 11, PosX = 1946, PosY = 2068, PosZ = 10, CamX = 1930.36, CamY = 2052.78, CamZ = 14.71, lookAtX = 1931.36, lookAtY = 2052.78, lookAtZ = 14.43},
    [4] = {ID = {{536, 2201300}
        ,{567, 2258000}
        ,{602, 2135100}
        ,{534, 2128300}
        ,{426, 2214600}
        ,{439, 2114600}
        ,{412, 2114600}
        ,{587, 2087200}
        ,{565, 2084900}
        ,{589, 2082600}
        ,{542, 2071200}
        ,{496, 2043900}
        ,{535, 2043900}
        ,{405, 2127900}
        ,{445, 2107300}
        ,{518, 1980000}
        }, vPosX = -1950, vPosY = 266, vPosZ = 36.2, PosX = -1954, PosY = 299, PosZ = 34, CamX = -1960.18, CamY = 266.06, CamZ = 37.94, lookAtX = -1959.2, lookAtY = 266.06, lookAtZ = 37.73},
    [5] = {ID = {{411, 3000000}
        ,{429, 2765000}
        ,{541, 2746700}
        ,{451, 2739900}
        ,
Link to comment

عندك السطر 40 فيه خطأ

الخطأ هذا

label2 = guiCreateLabel(1, 331, 413, 21, "_______________________________________________________________", false, GUIEditor.window[1]) 

التصحيح هذا

label2 = guiCreateLabel(1, 331, 413, 21, "_______________________________________________________________", false, Window_VS) 

Link to comment
عندك السطر 40 فيه خطأ

الخطأ هذا

label2 = guiCreateLabel(1, 331, 413, 21, "_______________________________________________________________", false, GUIEditor.window[1]) 

التصحيح هذا

label2 = guiCreateLabel(1, 331, 413, 21, "_______________________________________________________________", false, Window_VS) 

شكراً لكن هذا المضوع متكرر بسبب الاق ضغط ارسال مرتان واجا مرتان وحد ساعدني الاخر

Link to comment

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...