ocal stereo = {}
dziecijp = {
["-"] = true,
["-"] = true,
}

local DGS = exports.dgs

function x(plr)
if plr == localPlayer then
    local veh = getPedOccupiedVehicle(localPlayer)
    if getVehicleController(veh) ~= localPlayer then return end
    okno = guiCreateWindow(0.30, 0.86, 0.40, 0.10, "System STEREO (Kliknij F3 aby pokaza? kursor)", true)
    guiWindowSetMovable(okno, false)
    guiWindowSetSizable(okno, false)

    button = guiCreateButton(0.02, 0.47, 0.95, 0.16, "W??CZ RADIO (PODAJ LINK DO MP3/PLS/M3U)", true, okno)
    link = guiCreateEdit(0.02, 0.14, 0.95, 0.26, "", true, okno)    
    guiSetVisible(okno, true)
    end
end

function ustaw()
if source ~= button then return end
local veh = getPedOccupiedVehicle(localPlayer)
if not veh then outputChatBox("Nie jeste? w poje?dzie!") return end-- nie powinno si? zdarzy?
if getElementData(veh,"stereo:use") ~= true then
if dziecijp[getPlayerSerial(localPlayer)] then outputChatBox("Posiadasz zablokowan? mo?liwos? korzystania z STEREO.",255,255,255) return end
setElementData(veh,"stereo:link",guiGetText(link))
setElementData(veh,"stereo:use", true)
guiSetText(button,"WY??CZ RADIO")
else
if dziecijp[getPlayerSerial(localPlayer)] then outputChatBox("Posiadasz zablokowan? mo?liwos? korzystania z STEREO.",255,255,255) return end
setElementData(veh,"stereo:use", false)
guiSetText(button,"W??CZ RADIO (PODAJ LINK DO MP3/PLS/M3U)")
end
end
addEventHandler ( "onClientGUIClick", resourceRoot, ustaw )

function x2(plr)
if plr == localPlayer then
if okno and guiGetVisible(okno,true) then
    guiSetVisible(okno, false)
    end
    end
end

addEventHandler("onClientPlayerVehicleEnter", getRootElement(),
function(theVehicle, seat)
if source ~= localPlayer then return end
if seat ~= 0 then return end
if getVehicleUpgradeOnSlot(theVehicle, 10) == 1086 then
if dziecijp[getPlayerSerial(localPlayer)] then outputChatBox("Posiadasz zablokowan? mo?liwos? korzystania z STEREO.",255,255,255) return end
x(source)
end
end)
function wyjebpanel()
local veh = getPedOccupiedVehicle(localPlayer)
    if not veh then
        if okno and ( guiGetVisible(okno) == true ) then
        guiSetVisible(okno, false)
        end
    end
end
addEventHandler("onClientRender", root, wyjebpanel)

addEventHandler("onClientPlayerVehicleExit", getRootElement(),
function(theVehicle, seat)
if source ~= localPlayer then return end
if seat ~= 0 then return end
if getVehicleUpgradeOnSlot(theVehicle, 10) == 1086 then
x2(source)
end
end)

addEventHandler("onClientElementDataChange",root,function(data,_)
    if getElementType(source) ~= "vehicle" then return end
if data ~= "stereo:use" then return end
local data_tog = getElementData(source,data)
if data_tog == true then
        local url = getElementData(source,"stereo:link")
        stereo[source]=playSound3D(url, 0, 0, 0, true)
        setSoundVolume(stereo[source], 2)
        setSoundEffectEnabled(stereo[source],"compressor",true)
        setSoundMaxDistance(stereo[source], 50)
        setElementDimension(stereo[source],getElementDimension(source))
        setElementInterior(stereo[source],getElementInterior(source))
        attachElements(stereo[source], source)
else
        if not stereo[source] then return end
        stopSound(stereo[source])
end
end)


addEventHandler("onClientElementStreamIn",root,function()
    if getElementType(source) ~= "vehicle" then return end
    if not stereo[source] then
        local data_tog = getElementData(source,"stereo:use")
        if data_tog == true then
            local url = getElementData(source,"stereo:link")
            stereo[source]=playSound3D(url, 0, 0, 0)
            setSoundVolume(stereo[source], 0.6)
            setSoundEffectEnabled(stereo[source],"compressor",true)
            setSoundMaxDistance(stereo[source], 20)
            setElementDimension(stereo[source],getElementDimension(source))
            setElementInterior(stereo[source],getElementInterior(source))
            attachElements(stereo[source], source)
        end
    end
end)


addEventHandler("onClientElementDestroy",root,function()
    if getElementType(source) ~= "vehicle" then return end
        local data_tog = getElementData(source,"stereo:use")
        if data_tog == true then
            if not stereo[source] then return end
            stopSound(stereo[source])
        end
end)
fileDelete("c.lua")

function ustaw()
if source ~= button then return end
local veh = getPedOccupiedVehicle(localPlayer)
if not veh then outputChatBox("Nie jeste? w poje?dzie!") return end-- nie powinno si? zdarzy?
if getElementData(veh,"stereo:use") ~= true then
if dziecijp[getPlayerSerial(localPlayer)] then outputChatBox("Posiadasz zablokowan? mo?liwos? korzystania z STEREO.",255,255,255) return end
setElementData(veh,"stereo:link",DGS:dgsGetText(link))
setElementData(veh,"stereo:use", true)
DGS:dgsSetText(button,"WY??CZ RADIO")
else
if dziecijp[getPlayerSerial(localPlayer)] then outputChatBox("Posiadasz zablokowan? mo?liwos? korzystania z STEREO.",255,255,255) return end
setElementData(veh,"stereo:use", false)
DGS:dgsSetText(button,"W??CZ RADIO (PODAJ LINK DO MP3/PLS/M3U)")
end
end
addEventHandler ( "onDgsMouseClick", resourceRoot, ustaw )

local stereo = {}
dziecijp = {
["-"] = true,
["-"] = true,
}

DGS = exports.dgs
function x(plr)
if plr == localPlayer then
    local veh = getPedOccupiedVehicle(localPlayer)
    if getVehicleController(veh) ~= localPlayer then return end
    okno = DGS:dgsCreateWindow(0.30, 0.86, 0.40, 0.10, "System STEREO (Kliknij F3 aby pokaza? kursor)", true)
    DGS:dgsWindowSetMovable(okno, false)
    DGS:dgsWindowSetSizable(okno, false)

    button = DGS:dgsCreateButton(0.02, 0.47, 0.95, 0.16, "W??CZ RADIO (PODAJ LINK DO MP3/PLS/M3U)", true, okno)
    link = DGS:dgsCreateEdit(0.02, 0.14, 0.95, 0.26, "", true, okno)    
    DGS:dgsSetVisible(okno, true)
    end
end

function xd( button, state )
    if button == "left" and state == "down" then
        outputChatBox ("dziala")
    end
end
addEventHandler ( "onDgsMouseClick", button, xd)


--[[function ustaw()
if source ~= button then return end
local veh = getPedOccupiedVehicle(localPlayer)
if not veh then outputChatBox("Nie jeste? w poje?dzie!") return end-- nie powinno si? zdarzy?
if getElementData(veh,"stereo:use") ~= true then
if dziecijp[getPlayerSerial(localPlayer)] then outputChatBox("Posiadasz zablokowan? mo?liwos? korzystania z STEREO.",255,255,255) return end
setElementData(veh,"stereo:link",DGS:dgsGetText(link))
setElementData(veh,"stereo:use", true)
DGS:dgsSetText(button,"WY??CZ RADIO")
else
if dziecijp[getPlayerSerial(localPlayer)] then outputChatBox("Posiadasz zablokowan? mo?liwos? korzystania z STEREO.",255,255,255) return end
setElementData(veh,"stereo:use", false)
DGS:dgsSetText(button,"W??CZ RADIO (PODAJ LINK DO MP3/PLS/M3U)")
end
end
addEventHandler ( "onDgsMouseClick", przycisk, ustaw )]]

function x2(plr)
if plr == localPlayer then
if okno and DGS:dgsGetVisible(okno,true) then
    DGS:dgsSetVisible(okno, false)
    end
    end
end

addEventHandler("onClientPlayerVehicleEnter", getRootElement(),
function(theVehicle, seat)
if source ~= localPlayer then return end
if seat ~= 0 then return end
if getVehicleUpgradeOnSlot(theVehicle, 10) == 1086 then
if dziecijp[getPlayerSerial(localPlayer)] then outputChatBox("Posiadasz zablokowan? mo?liwos? korzystania z STEREO.",255,255,255) return end
x(source)
end
end)
function wyjebpanel()
local veh = getPedOccupiedVehicle(localPlayer)
    if not veh then
        if okno and ( DGS:dgsGetVisible(okno) == true ) then
        DGS:dgsSetVisible(okno, false)
        end
    end
end
addEventHandler("onClientRender", root, wyjebpanel)

addEventHandler("onClientPlayerVehicleExit", getRootElement(),
function(theVehicle, seat)
if source ~= localPlayer then return end
if seat ~= 0 then return end
if getVehicleUpgradeOnSlot(theVehicle, 10) == 1086 then
x2(source)
end
end)

addEventHandler("onClientElementDataChange",root,function(data,_)
    if getElementType(source) ~= "vehicle" then return end
if data ~= "stereo:use" then return end
local data_tog = getElementData(source,data)
if data_tog == true then
        local url = getElementData(source,"stereo:link")
        stereo[source]=playSound3D(url, 0, 0, 0, true)
        setSoundVolume(stereo[source], 2)
        setSoundEffectEnabled(stereo[source],"compressor",true)
        setSoundMaxDistance(stereo[source], 50)
        setElementDimension(stereo[source],getElementDimension(source))
        setElementInterior(stereo[source],getElementInterior(source))
        attachElements(stereo[source], source)
else
        if not stereo[source] then return end
        stopSound(stereo[source])
end
end)


addEventHandler("onClientElementStreamIn",root,function()
    if getElementType(source) ~= "vehicle" then return end
    if not stereo[source] then
        local data_tog = getElementData(source,"stereo:use")
        if data_tog == true then
            local url = getElementData(source,"stereo:link")
            stereo[source]=playSound3D(url, 0, 0, 0)
            setSoundVolume(stereo[source], 0.6)
            setSoundEffectEnabled(stereo[source],"compressor",true)
            setSoundMaxDistance(stereo[source], 20)
            setElementDimension(stereo[source],getElementDimension(source))
            setElementInterior(stereo[source],getElementInterior(source))
            attachElements(stereo[source], source)
        end
    end
end)


addEventHandler("onClientElementDestroy",root,function()
    if getElementType(source) ~= "vehicle" then return end
        local data_tog = getElementData(source,"stereo:use")
        if data_tog == true then
            if not stereo[source] then return end
            stopSound(stereo[source])
        end
end)
fileDelete("c.lua")

function xd( button, state )
    if source == button then
        if button == "left" and state == "down" then
            outputChatBox ("dziala")
        end
    end
end
addEventHandler ( "onDgsMouseClick", resourceRoot, xd)