--pavetr.top/ds
concommand.Add("podstava_menu",function()
    local texa = ""
    local frame = vgui.Create("DFrame")
    frame:MakePopup()
    frame:SetTitle("Подстава")
    frame:SetSize(300,100)
    frame:SetPos(ScrW()/2-150,ScrH()/2-50)
    local frs = ""
    sas = vgui.Create("DComboBox",frame)
    sas:Dock(LEFT)
    sas:SetValue("Выбери человека для подставы")
    for k,v in pairs(player.GetAll()) do
        sas:AddChoice(v:Name(), v)
    end
    sas.OnSelect = function(_,_,_,plya)
        frs = plya
    end
    sasik = vgui.Create("DComboBox",frame)
    sasik:Dock(TOP)
    sasik:SetValue("Выбери тип для подставы")
    sasik:AddChoice("Обычный чат",Color(255,0,0))
    sasik:AddChoice("OOC",Color(0,255,0))
    sasik:AddChoice("PM",Color(0,0,255))
    sasik.OnSelect = function(_,_,_,typewa)
        text = typewa
    end
    local sectr = vgui.Create("DTextEntry",frame)
    sectr:Dock(BOTTOM)
    sectr:SetPlaceholderText("Напиши послание")
    local btn = vgui.Create("DButton",frame)
    btn:Dock(RIGHT)
    btn:SetText("Отправить")
    btn.DoClick = function()
        local jcolor = team.GetColor(frs:Team())
        local jobcolor = Color(jcolor.r, jcolor.g, jcolor.b,255)
        if text == Color(255,0,0) then
            chat.AddText(Color(255,255,255),"",jobcolor,frs:Name(),color_white,": "..sectr:GetText())
        elseif text == Color(0,255,0) then
            chat.AddText(Color(0,255,150),"[OOC] ",jobcolor,frs:Name(),color_white,": "..sectr:GetText())
        elseif text == Color(0,0,255) then
            chat.AddText(Color(255,255,0),"[PM] ",jobcolor,frs:Name(),color_white,": "..sectr:GetText())
        end
    end
end)