function markerCreate(plr,cmd,nazwa)
if not nazwa then return end
    x,y,z=getElementPosition(plr)
    pojazd1=createVehicle(411,x,y+2,z)
    setData=setElementData(pojazd1, nazwa, true)
end
addCommandHandler("cv", markerCreate)

function pojazdAlpha(plr,cmd,alpha,nazwa)
if not alpha or not nazwa then return end
    gdata=getElementData(pojazd1, nazwa)
        setElementAlpha(gdata, alpha)
end
addCommandHandler("valpha", pojazdAlpha)

function markerCreate(plr,cmd,nazwa)
if not nazwa then return end
    x,y,z=getElementPosition(plr)
    pojazd1=createVehicle(411,x,y+2,z)
    setElementData(pojazd1, "nazwa", nazwa)
end
addCommandHandler("cv", markerCreate)

function pojazdAlpha(plr,cmd,alpha,nazwa)
if not alpha or not nazwa then return end
    for i,v in ipairs(getElementsByType("vehicle")) do
        if getElementData(v,"nazwa")==nazwa then
        setElementAlpha(v,alpha)
        end
    end
end
addCommandHandler("valpha", pojazdAlpha)