Jump to content

مشكلة في لوحة

Ja[B]er[X]Pro

By Ja[B]er[X]Pro
in البرمجة

Recommended Posts

Ja[B]er[X]Pro Homie

Ja[B]er[X]Pro

Posted
Posted

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

انا معي لوحة سيارات عدلتها

وحولتها من فلوس داتا لحرب العصابات

إلى فلوس عادية

لكن عندما اشتري يجيني

ERROR: Client (Jaer[X]Pro) triggered serverside event onBuyNewVehicle, but event is not added serverside

  
--clientside 
  
    elseif (source == carButton) then 
        if guiGridListGetSelectedItem(carGrid) then 
            local carName = guiGridListGetItemText(carGrid, guiGridListGetSelectedItem(carGrid), 1) 
            local carID = getVehicleModelFromName(carName) 
            local carCost = guiGridListGetItemText (carGrid, guiGridListGetSelectedItem(carGrid), 2) 
            local r1, g1, b1, r2, g2, b2 = getVehicleColor(veh, true) 
            triggerServerEvent("onBuyNewVehicle", localPlayer, carID, carCost, r1, g1, b1, r2, g2, b2) 
            guiSetVisible(VehicleShop_Window, false) 
            showCursor(false) 
            setElementFrozen(localPlayer, false) 
            fadeCamera(false, 1.0) 
            setTimer(function() fadeCamera(true, 0.5) setCameraTarget(localPlayer) end, 1000, 1) 
            if isElement(veh) then 
                destroyElement(veh) 
            end 
            if isTimer(timer) then 
                killTimer(timer) 
            end 
        end 


  
--serverside 
  
  
addEvent("onBuyNewVehicle", true) 
addEventHandler("onBuyNewVehicle", root,  
function(Model, cost, r1, g1, b1, r2, g2, b2) 
    abc = false 
    local data = dbPoll(dbQuery(db, "SELECT * FROM VehicleList WHERE Account = ?", getAccountName(getPlayerAccount(source))), -1) 
    for i, data in ipairs (data) do 
        if data["Model"] == Model then 
            abc = true 
            break 
        end 
    end 
    if #data >= 5 then outputChatBox("[Vehicle System] #FF0000Sorry, but Max vehicles is 5 only.", source, 255, 85, 0, true) return end 
    if abc then outputChatBox("[Vehicle System] #FF0000You already bought this vehicle before.", source, 255, 85, 0, true) return end 
    if getPlayerMoney(source) >= tonumber(cost) then 
        removePlayerMoney(source,cost) 
        local x, y, z = getElementPosition(source) 
        local _, _, rz = getElementRotation(source) 
        local color = r1..","..g1..","..b1..","..r2..","..g2..","..b2 
        vehicle = createVehicle(Model, x-5, y+5, z, 0, 0, rz) 
        setVehicleColor(vehicle, r1, g1, b1, r2, g2, b2) 
        setElementData(vehicle, "Owner", source) 
        local NewID = getFreeID() 
        setElementData(vehicle, "ID", NewID) 
        dbExec(db, "INSERT INTO VehicleList VALUES(?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)", NewID, getAccountName(getPlayerAccount(source)), Model, x-5, y+5, z, rz, color, "", 3, cost, 1000) 
        outputChatBox("[Vehicle System] #FFFF00You Bought: #00FFFF"..getVehicleNameFromModel(Model), source, 255, 85, 0, true) 
        outputChatBox("[Vehicle System] #FFFF00Cost: #00FF00$"..cost, source, 255, 85, 0, true) 
        updateVehicleInfo(source) 
        vv[vehicle] = setTimer(function(source) 
            if not isElement(source) then killTimer(vv[source]) vv[source] = nil end 
            if isElement(source) and getElementHealth(source) <= 255 then 
                setElementHealth(source, 255.5) 
                setVehicleDamageProof(source, true) 
                setVehicleEngineState(source, false) 
            end 
        end, 50, 0, vehicle) 
        addEventHandler("onVehicleDamage", vehicle, 
        function(loss) 
            local account = getAccountName(getPlayerAccount(getElementData(source, "Owner"))) 
            setTimer(function(source) if isElement(source) then dbExec(db, "UPDATE VehicleList SET HP = ? WHERE Account = ? AND Model = ?", getElementHealth(source), account, getElementModel(source)) updateVehicleInfo(getElementData(source, "Owner")) end end, 100, 1, source) 
        end) 
        addEventHandler("onVehicleEnter", vehicle, 
        function(player) 
            if getElementHealth(source) <= 255.5 then  
                setVehicleEngineState(source, false) 
            else 
                if isVehicleDamageProof(source) then 
                    setVehicleDamageProof(source, false) 
                end 
            end 
        end) 
    else 
        outputChatBox("[Vehicle System] #FF0000You don't have enough money.", source, 255, 85, 0, true) 
    end 
end)

Link to comment
Ja[B]er[X]Pro Homie

Ja[B]er[X]Pro

Posted
  • Author
Posted

جميع الاكواد بدون اكواد صنع اللوحة

  
--clientside 
  
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, PreCost, false, true) 
            guiGridListSetItemText(Grid_VS, row, 3, HP.." HP", false, true) 
        end 
        guiGridListSetSelectedItem(Grid_VS, rw, cl) 
    end 
end 
  
outputChatBox("Press F3 For [Vehicle System]", 255, 125, 0) 
  
bindKey("F3", "down", 
function() 
     if not isInColExport () then 
        guiSetVisible(Window_VS, not guiGetVisible(Window_VS)) 
    guiSetVisible (Window_CHK, false) 
    showCursor(guiGetVisible(Window_VS)) 
    end 
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_CHK_Y then 
        triggerServerEvent("SellMyVehicle", localPlayer, ID) 
        guiSetVisible(Window_VS, false) 
        guiSetVisible(Window_CHK, false) 
        showCursor(false) 
    elseif source == Button_CHK_N then 
        guiSetVisible (Window_CHK, false) 
    elseif source == Button_VS_Spc then 
      if getElementInterior(localPlayer) == 0 then 
if getElementData(localPlayer,"Stats") < 2 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} 
        ,{415, 2593800} 
        ,{480, 2536800} 
        ,{402, 2525400} 
        ,{477, 2484300} 
        ,{562, 2456900} 
        ,{506, 2365600} 
        ,{522, 2856500} 
        ,{559, 2354200} 
        ,{560, 2358400} 
        ,{603, 2253800} 
        ,{475, 2215000} 
        }, vPosX = -1660, vPosY = 1213, vPosZ = 7, PosX = -1634, PosY = 1199, PosZ = 6, CamX = -1648.9, CamY = 1212.27, CamZ = 10.16, lookAtX = -1649.88, lookAtY = 1212.27, lookAtZ = 9.94} 
} 
  
VehicleShop_Window = guiCreateWindow(screX-467,screY-387, 465, 385, "[CMG] .:[Vehicle Shop]:.", false) 
guiSetVisible(VehicleShop_Window, false) 
guiWindowSetSizable(VehicleShop_Window , false) 
guiSetAlpha(VehicleShop_Window, 0.-- s8) -->
carGrid = guiCreateGridList(23, 26, 271, 339, false, VehicleShop_Window) 
guiGridListSetSelectionMode(carGrid, 0) 
carColumn = guiGridListAddColumn(carGrid, "Vehicle", 0.5) 
costColumn = guiGridListAddColumn(carGrid, "$", 0.3) 
carButton = guiCreateButton(308, 38, 141, 45,"Buy Vehicle", false, VehicleShop_Window) 
closeButton = guiCreateButton(308, 250, 141, 45, "Close Shop", false, VehicleShop_Window) 
CarNameLabel = guiCreateLabel(305, 164, 54, 16, "CarName:", false, VehicleShop_Window) 
carColorButton = guiCreateButton(308, 103, 141, 45,"Choose Vehicle Color", false, VehicleShop_Window) 
guiLabelSetColor(CarNameLabel, 255, 0, 0) 
CarName = guiCreateLabel(363, 165, 82, 16, "Noun", false, VehicleShop_Window) 
guiLabelSetColor(CarName, 0, 255, 0) 
CarPriceLabel = guiCreateLabel(303, 189, 54, 16, "CarPrice:", false, VehicleShop_Window) 
guiLabelSetColor(CarPriceLabel,255,0,0) 
CarPrice = guiCreateLabel(358, 192, 82, 16, "Noun", false, VehicleShop_Window) 
guiLabelSetColor(CarPrice, 0, 255, 0) 
GtaArLabel = guiCreateLabel(308, 223, 149, 32, "By : Ja[b]er[X]Pro", false, VehicleShop_Window) 
guiLabelSetColor(GtaArLabel, 255, 255, 0) 
guiSetFont(GtaArLabel, "clear-normal") 
 
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
Go to topic listing

  • Recently Browsing   0 members

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