mirror of
https://github.com/lifestorm/wnsrc.git
synced 2025-12-17 13:53:45 +03:00
Upload
This commit is contained in:
lifestorm
772
lua/lvs_framework/autorun/cl_menu.lua
Normal file
772
lua/lvs_framework/autorun/cl_menu.lua
Normal file
@@ -0,0 +1,772 @@
|
||||
--[[
|
||||
| This file was obtained through the combined efforts
|
||||
| of Madbluntz & Plymouth Antiquarian Society.
|
||||
|
|
||||
| Credits: lifestorm, Gregory Wayne Rossel JR.,
|
||||
| Maloy, DrPepper10 @ RIP, Atle!
|
||||
|
|
||||
| Visit for more: https://plymouth.thetwilightzone.ru/
|
||||
--]]
|
||||
|
||||
|
||||
local icon_load_version = Material("gui/html/refresh")
|
||||
|
||||
local bgMat = Material( "lvs/controlpanel_bg.png" )
|
||||
local adminMat = Material( "icon16/shield.png" )
|
||||
local gradient_mat = Material( "gui/gradient" )
|
||||
local gradient_down = Material( "gui/gradient_down" )
|
||||
|
||||
local FrameSizeX = 600
|
||||
local FrameSizeY = 400
|
||||
|
||||
local function ClientSettings( Canvas )
|
||||
local TopPanel = vgui.Create( "DPanel", Canvas )
|
||||
TopPanel:SetSize( FrameSizeX, FrameSizeY * 0.35 )
|
||||
TopPanel.Paint = function( self, w, h )
|
||||
surface.SetDrawColor( 80, 80, 80, 255 )
|
||||
surface.SetMaterial( gradient_mat )
|
||||
surface.DrawTexturedRect( 1, 0, w, 1 )
|
||||
|
||||
draw.DrawText( "Mouse", "LVS_FONT", 4, 4, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP )
|
||||
end
|
||||
TopPanel:Dock( BOTTOM )
|
||||
|
||||
local RightPanel = vgui.Create( "DPanel", Canvas )
|
||||
RightPanel:SetSize( FrameSizeX * 0.5, FrameSizeY )
|
||||
RightPanel.Paint = function( self, w, h )
|
||||
surface.SetDrawColor( 80, 80, 80, 255 )
|
||||
surface.SetMaterial( gradient_down )
|
||||
surface.DrawTexturedRect( 0, 0, 1, h )
|
||||
draw.DrawText( "Misc/Performance", "LVS_FONT", 4, 4, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP )
|
||||
end
|
||||
RightPanel:Dock( RIGHT )
|
||||
|
||||
local RightPanelRight = vgui.Create( "DPanel", RightPanel )
|
||||
RightPanelRight:SetSize( FrameSizeX * 0.25, FrameSizeY )
|
||||
RightPanelRight.Paint = function() end
|
||||
RightPanelRight:Dock( RIGHT )
|
||||
|
||||
local LeftPanel = vgui.Create( "DPanel", Canvas )
|
||||
LeftPanel:SetSize( FrameSizeX * 0.5, FrameSizeY )
|
||||
LeftPanel.Paint = function( self, w, h )
|
||||
draw.DrawText( "Preferences", "LVS_FONT", 4, 4, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP )
|
||||
end
|
||||
LeftPanel:Dock( LEFT )
|
||||
|
||||
local CheckBoxPanel = vgui.Create( "DPanel", TopPanel )
|
||||
CheckBoxPanel:DockMargin( 0, 0, 0, 0 )
|
||||
CheckBoxPanel:SetSize( FrameSizeX, 55 )
|
||||
CheckBoxPanel.Paint = function() end
|
||||
CheckBoxPanel:Dock( TOP )
|
||||
|
||||
if GetConVar( "lvs_mouseaim_type" ):GetInt() == 1 and not LVS:IsDirectInputForced() then
|
||||
local CheckBoxType = vgui.Create( "DCheckBoxLabel", CheckBoxPanel )
|
||||
CheckBoxType:SetSize( FrameSizeX * 0.5, 55 )
|
||||
CheckBoxType:DockMargin( 16, 36, 0, 0 )
|
||||
CheckBoxType:Dock( LEFT )
|
||||
CheckBoxType:SetText( "Mouse-Aim for:" )
|
||||
CheckBoxType:SetConVar("lvs_mouseaim_type")
|
||||
CheckBoxType.OnChange = function( self, bVal )
|
||||
if not isbool( self.first ) then self.first = true return end
|
||||
timer.Simple(0.1, function() LVS:OpenMenu( true ) end )
|
||||
end
|
||||
|
||||
local DScrollPanel = vgui.Create("DScrollPanel", CheckBoxPanel )
|
||||
DScrollPanel:SetSize( FrameSizeX * 0.25, 55 )
|
||||
DScrollPanel:DockMargin( 8, 0, 8, 0 )
|
||||
DScrollPanel:Dock( LEFT )
|
||||
|
||||
for _, vehicletype in pairs( LVS:GetVehicleTypes() ) do
|
||||
local ScrollOption = vgui.Create( "DCheckBoxLabel", DScrollPanel )
|
||||
ScrollOption:SetText( vehicletype )
|
||||
ScrollOption:Dock( TOP )
|
||||
ScrollOption:DockMargin( 0, 0, 0, 5 )
|
||||
ScrollOption:SetConVar("lvs_mouseaim_type_"..vehicletype)
|
||||
end
|
||||
else
|
||||
local CheckBox = vgui.Create( "DCheckBoxLabel", CheckBoxPanel )
|
||||
CheckBox:SetSize( FrameSizeX * 0.5, 55 )
|
||||
CheckBox:DockMargin( 16, 36, 0, 0 )
|
||||
CheckBox:Dock( LEFT )
|
||||
CheckBox:SetText( "Mouse-Aim Steering" )
|
||||
CheckBox:SetConVar("lvs_mouseaim")
|
||||
CheckBox.OnChange = function( self, bVal )
|
||||
if not isbool( self.first ) then self.first = true return end
|
||||
timer.Simple(0.1, function() LVS:OpenMenu( true ) end )
|
||||
end
|
||||
if LVS:IsDirectInputForced() then
|
||||
CheckBox:SetText( "[DISABLED] Use Mouse-Aim Steering" )
|
||||
CheckBox:SetDisabled( true )
|
||||
end
|
||||
|
||||
if not LVS:IsDirectInputForced() then
|
||||
local CheckBoxType = vgui.Create( "DCheckBoxLabel", CheckBoxPanel )
|
||||
CheckBoxType:SetSize( FrameSizeX * 0.5, 55 )
|
||||
CheckBoxType:DockMargin( 16, 36, 0, 0 )
|
||||
CheckBoxType:Dock( LEFT )
|
||||
CheckBoxType:SetText( "Edit Mouse-Aim per Type" )
|
||||
CheckBoxType:SetConVar("lvs_mouseaim_type")
|
||||
CheckBoxType.OnChange = function( self, bVal )
|
||||
if not isbool( self.first ) then self.first = true return end
|
||||
timer.Simple(0.1, function() LVS:OpenMenu( true ) end )
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
if GetConVar( "lvs_mouseaim" ):GetInt() == 0 or LVS:IsDirectInputForced() then
|
||||
local L = vgui.Create( "DPanel", TopPanel )
|
||||
L:SetSize( FrameSizeX * 0.5, FrameSizeY )
|
||||
L.Paint = function() end
|
||||
L:Dock( LEFT )
|
||||
|
||||
local R = vgui.Create( "DPanel", TopPanel )
|
||||
R:SetSize( FrameSizeX * 0.5, FrameSizeY )
|
||||
R.Paint = function() end
|
||||
R:Dock( RIGHT )
|
||||
|
||||
local slider = vgui.Create( "DNumSlider", R )
|
||||
slider:DockMargin( 16, 4, 16, 4 )
|
||||
slider:Dock( TOP )
|
||||
slider:SetText( "Y Sensitivity" )
|
||||
slider:SetMin( -10 )
|
||||
slider:SetMax( 10 )
|
||||
slider:SetDecimals( 3 )
|
||||
slider:SetConVar( "lvs_sensitivity_y" )
|
||||
|
||||
local slider = vgui.Create( "DNumSlider", L )
|
||||
slider:DockMargin( 16, 4, 16, 4 )
|
||||
slider:Dock( TOP )
|
||||
slider:SetText( "X Sensitivity" )
|
||||
slider:SetMin( 0 )
|
||||
slider:SetMax( 10 )
|
||||
slider:SetDecimals( 3 )
|
||||
slider:SetConVar( "lvs_sensitivity_x" )
|
||||
|
||||
local slider = vgui.Create( "DNumSlider", L )
|
||||
slider:DockMargin( 16, 4, 16, 4 )
|
||||
slider:Dock( TOP )
|
||||
slider:SetText( "Return Delta" )
|
||||
slider:SetMin( 0 )
|
||||
slider:SetMax( 10 )
|
||||
slider:SetDecimals( 3 )
|
||||
slider:SetConVar( "lvs_return_delta" )
|
||||
else
|
||||
local slider = vgui.Create( "DNumSlider", TopPanel )
|
||||
slider:DockMargin( 16, 4, 16, 4 )
|
||||
slider:Dock( TOP )
|
||||
slider:SetText( "Camera Focus" )
|
||||
slider:SetMin( -1 )
|
||||
slider:SetMax( 1 )
|
||||
slider:SetDecimals( 2 )
|
||||
slider:SetConVar( "lvs_camerafocus" )
|
||||
end
|
||||
|
||||
local slider = vgui.Create( "DNumSlider", LeftPanel )
|
||||
slider:DockMargin( 16, 36, 16, 4 )
|
||||
slider:Dock( TOP )
|
||||
slider:SetText( "Engine Volume" )
|
||||
slider:SetMin( 0 )
|
||||
slider:SetMax( 1 )
|
||||
slider:SetDecimals( 2 )
|
||||
slider:SetConVar( "lvs_volume" )
|
||||
|
||||
local CheckBox = vgui.Create( "DCheckBoxLabel", RightPanel )
|
||||
CheckBox:DockMargin( 16, 43, 4, 4 )
|
||||
CheckBox:SetSize( FrameSizeX, 30 )
|
||||
CheckBox:Dock( TOP )
|
||||
CheckBox:SetText( "Show Team Identifier" )
|
||||
CheckBox:SetConVar("lvs_show_identifier")
|
||||
if LVS:IsIndicatorForced() then
|
||||
CheckBox:SetText( "[DISABLED] Team Identifier" )
|
||||
CheckBox:SetDisabled( true )
|
||||
end
|
||||
|
||||
local CheckBox = vgui.Create( "DCheckBoxLabel", RightPanel )
|
||||
CheckBox:DockMargin( 16, 16, 4, 4 )
|
||||
CheckBox:SetSize( FrameSizeX, 30 )
|
||||
CheckBox:Dock( TOP )
|
||||
CheckBox:SetText( "Show Hit/Kill Marker" )
|
||||
CheckBox:SetConVar("lvs_hitmarker")
|
||||
|
||||
local CheckBox = vgui.Create( "DCheckBoxLabel", RightPanel )
|
||||
CheckBox:DockMargin( 16, 16, 4, 4 )
|
||||
CheckBox:SetSize( FrameSizeX, 30 )
|
||||
CheckBox:Dock( TOP )
|
||||
CheckBox:SetText( "Enable HUD Editor" )
|
||||
CheckBox:SetConVar("lvs_edit_hud")
|
||||
|
||||
local CheckBox = vgui.Create( "DCheckBoxLabel", RightPanelRight )
|
||||
CheckBox:DockMargin( 16, 43, 4, 4 )
|
||||
CheckBox:SetSize( FrameSizeX, 30 )
|
||||
CheckBox:Dock( TOP )
|
||||
CheckBox:SetText( "Trail Effects" )
|
||||
CheckBox:SetConVar("lvs_show_traileffects")
|
||||
|
||||
local CheckBox = vgui.Create( "DCheckBoxLabel", RightPanelRight )
|
||||
CheckBox:DockMargin( 16, 16, 4, 4 )
|
||||
CheckBox:SetSize( FrameSizeX, 30 )
|
||||
CheckBox:Dock( TOP )
|
||||
CheckBox:SetText( "Wind/Dust FX/SFX" )
|
||||
CheckBox:SetConVar("lvs_show_effects")
|
||||
|
||||
local CheckBox = vgui.Create( "DCheckBoxLabel", RightPanelRight )
|
||||
CheckBox:DockMargin( 16, 16, 4, 4 )
|
||||
CheckBox:SetSize( FrameSizeX, 30 )
|
||||
CheckBox:Dock( TOP )
|
||||
CheckBox:SetText( "Scrape/Impact FX" )
|
||||
CheckBox:SetConVar("lvs_show_physicseffects")
|
||||
|
||||
local CheckBox = vgui.Create( "DCheckBoxLabel", RightPanelRight )
|
||||
CheckBox:DockMargin( 16, 16, 4, 4 )
|
||||
CheckBox:SetSize( FrameSizeX, 30 )
|
||||
CheckBox:Dock( TOP )
|
||||
CheckBox:SetText( "Bullet near miss SFX" )
|
||||
CheckBox:SetConVar("lvs_bullet_nearmiss")
|
||||
end
|
||||
|
||||
local function ClientControls( Canvas )
|
||||
local TextHint = vgui.Create("DPanel", Canvas)
|
||||
TextHint:DockMargin( 4, 20, 4, 2 )
|
||||
TextHint:SetText("")
|
||||
TextHint:Dock( TOP )
|
||||
TextHint.Paint = function(self, w, h )
|
||||
draw.DrawText( "You need to re-enter the vehicle in order for the changes to take effect!", "LVS_FONT_PANEL", w * 0.5, -1, Color( 255, 50, 50, 255 ), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER )
|
||||
end
|
||||
|
||||
local DScrollPanel = vgui.Create("DScrollPanel", Canvas)
|
||||
DScrollPanel:DockMargin( 0, 0, 0, 24 )
|
||||
DScrollPanel:Dock( FILL )
|
||||
|
||||
for category, _ in pairs( LVS.KEYS_CATEGORIES ) do
|
||||
local Header = vgui.Create("DPanel", DScrollPanel )
|
||||
Header:DockMargin( 0, 4, 4, 2 )
|
||||
Header:SetText("")
|
||||
Header:Dock( TOP )
|
||||
Header.Paint = function(self, w, h )
|
||||
surface.SetMaterial( gradient_mat )
|
||||
surface.SetDrawColor( 80, 80, 80, 255 )
|
||||
surface.DrawTexturedRect( 0, 0, w, 1 )
|
||||
|
||||
draw.DrawText( category, "LVS_FONT", 4, 0, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_CENTER )
|
||||
end
|
||||
|
||||
for _, entry in pairs( LVS.KEYS_REGISTERED ) do
|
||||
if entry.category ~= category then continue end
|
||||
|
||||
local DPanel = vgui.Create( "DPanel", DScrollPanel )
|
||||
DPanel.Paint = function(self, w, h ) end
|
||||
DPanel:DockMargin( 4, 2, 4, 2 )
|
||||
DPanel:SetSize( FrameSizeX, 25 )
|
||||
DPanel:Dock( TOP )
|
||||
|
||||
local ConVar = GetConVar( entry.cmd )
|
||||
|
||||
local DLabel = vgui.Create("DLabel", DPanel)
|
||||
DLabel:DockMargin( 16, 0, 0, 0 )
|
||||
DLabel:SetText( entry.printname )
|
||||
DLabel:SetSize( FrameSizeX * 0.5, 32 )
|
||||
DLabel:Dock( LEFT )
|
||||
|
||||
local DBinder = vgui.Create("DBinder", DPanel)
|
||||
DBinder:DockMargin( 0, 0, 0, 0 )
|
||||
DBinder:SetValue( ConVar:GetInt() )
|
||||
DBinder:SetSize( FrameSizeX * 0.5, 32 )
|
||||
DBinder:Dock( RIGHT )
|
||||
DBinder.ConVar = ConVar
|
||||
DBinder.OnChange = function(self,iNum)
|
||||
self.ConVar:SetInt(iNum)
|
||||
|
||||
LocalPlayer():lvsBuildControls()
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
local Header = vgui.Create("DPanel", DScrollPanel )
|
||||
Header:DockMargin( 0, 16, 0, 0 )
|
||||
Header:SetText("")
|
||||
Header:Dock( TOP )
|
||||
Header.Paint = function(self, w, h )
|
||||
surface.SetMaterial( gradient_mat )
|
||||
surface.SetDrawColor( 80, 80, 80, 255 )
|
||||
surface.DrawTexturedRect( 0, 0, w, 1 )
|
||||
end
|
||||
|
||||
local DButton = vgui.Create("DButton",DScrollPanel)
|
||||
DButton:SetText("Reset")
|
||||
DButton:DockMargin( 4, 0, 4, 4 )
|
||||
DButton:SetSize( FrameSizeX, 32 )
|
||||
DButton:Dock( TOP )
|
||||
DButton.DoClick = function()
|
||||
surface.PlaySound( "buttons/button14.wav" )
|
||||
|
||||
for _, entry in pairs( LVS.KEYS_REGISTERED ) do
|
||||
GetConVar( entry.cmd ):SetInt( entry.default )
|
||||
end
|
||||
|
||||
LocalPlayer():lvsBuildControls()
|
||||
|
||||
LVS:OpenClientControls()
|
||||
end
|
||||
end
|
||||
|
||||
local function ServerSettings( Canvas )
|
||||
local slider = vgui.Create( "DNumSlider", Canvas )
|
||||
slider:DockMargin( 16, 32, 16, 4 )
|
||||
slider:Dock( TOP )
|
||||
slider:SetText( "Player Default AI-Team" )
|
||||
slider:SetMin( 0 )
|
||||
slider:SetMax( 3 )
|
||||
slider:SetDecimals( 0 )
|
||||
slider:SetConVar( "lvs_default_teams" )
|
||||
function slider:OnValueChanged( val )
|
||||
net.Start("lvs_admin_setconvar")
|
||||
net.WriteString("lvs_default_teams")
|
||||
net.WriteString( tostring( math.Round(val,0) ) )
|
||||
net.SendToServer()
|
||||
end
|
||||
|
||||
local CheckBox = vgui.Create( "DCheckBoxLabel", Canvas )
|
||||
CheckBox:DockMargin( 16, 16, 4, 4 )
|
||||
CheckBox:SetSize( FrameSizeX, 30 )
|
||||
CheckBox:Dock( TOP )
|
||||
CheckBox:SetText( "Freeze Player AI-Team" )
|
||||
CheckBox:SetValue( GetConVar( "lvs_freeze_teams" ):GetInt() )
|
||||
CheckBox:SizeToContents()
|
||||
function CheckBox:OnChange( val )
|
||||
net.Start("lvs_admin_setconvar")
|
||||
net.WriteString("lvs_freeze_teams")
|
||||
net.WriteString( tostring( val and 1 or 0 ) )
|
||||
net.SendToServer()
|
||||
end
|
||||
|
||||
local CheckBox = vgui.Create( "DCheckBoxLabel", Canvas )
|
||||
CheckBox:DockMargin( 16, 16, 4, 4 )
|
||||
CheckBox:SetSize( FrameSizeX, 30 )
|
||||
CheckBox:Dock( TOP )
|
||||
CheckBox:SetText( "Only allow Players of matching AI-Team to enter Vehicles" )
|
||||
CheckBox:SetValue( GetConVar( "lvs_teampassenger" ):GetInt() )
|
||||
CheckBox:SizeToContents()
|
||||
function CheckBox:OnChange( val )
|
||||
net.Start("lvs_admin_setconvar")
|
||||
net.WriteString("lvs_teampassenger")
|
||||
net.WriteString( tostring( val and 1 or 0 ) )
|
||||
net.SendToServer()
|
||||
end
|
||||
|
||||
local CheckBox = vgui.Create( "DCheckBoxLabel", Canvas )
|
||||
CheckBox:DockMargin( 16, 16, 4, 4 )
|
||||
CheckBox:SetSize( FrameSizeX, 30 )
|
||||
CheckBox:Dock( TOP )
|
||||
CheckBox:SetText( "LVS-AI ignore NPC's" )
|
||||
CheckBox:SetValue( GetConVar( "lvs_ai_ignorenpcs" ):GetInt() )
|
||||
CheckBox:SizeToContents()
|
||||
function CheckBox:OnChange( val )
|
||||
net.Start("lvs_admin_setconvar")
|
||||
net.WriteString("lvs_ai_ignorenpcs")
|
||||
net.WriteString( tostring( val and 1 or 0 ) )
|
||||
net.SendToServer()
|
||||
end
|
||||
|
||||
local CheckBox = vgui.Create( "DCheckBoxLabel", Canvas )
|
||||
CheckBox:DockMargin( 16, 16, 4, 4 )
|
||||
CheckBox:SetSize( FrameSizeX, 30 )
|
||||
CheckBox:Dock( TOP )
|
||||
CheckBox:SetText( "LVS-AI ignore Players's" )
|
||||
CheckBox:SetValue( GetConVar( "lvs_ai_ignoreplayers" ):GetInt() )
|
||||
CheckBox:SizeToContents()
|
||||
function CheckBox:OnChange( val )
|
||||
net.Start("lvs_admin_setconvar")
|
||||
net.WriteString("lvs_ai_ignoreplayers")
|
||||
net.WriteString( tostring( val and 1 or 0 ) )
|
||||
net.SendToServer()
|
||||
end
|
||||
|
||||
local CheckBox = vgui.Create( "DCheckBoxLabel", Canvas )
|
||||
CheckBox:DockMargin( 16, 16, 4, 4 )
|
||||
CheckBox:SetSize( FrameSizeX, 30 )
|
||||
CheckBox:Dock( TOP )
|
||||
CheckBox:SetText( "Disable Mouse Aim" )
|
||||
CheckBox:SetValue( GetConVar( "lvs_force_directinput" ):GetInt() )
|
||||
CheckBox:SizeToContents()
|
||||
function CheckBox:OnChange( val )
|
||||
net.Start("lvs_admin_setconvar")
|
||||
net.WriteString("lvs_force_directinput")
|
||||
net.WriteString( tostring( val and 1 or 0 ) )
|
||||
net.SendToServer()
|
||||
end
|
||||
|
||||
local CheckBox = vgui.Create( "DCheckBoxLabel", Canvas )
|
||||
CheckBox:DockMargin( 16, 16, 4, 4 )
|
||||
CheckBox:SetSize( FrameSizeX, 30 )
|
||||
CheckBox:Dock( TOP )
|
||||
CheckBox:SetText( "Hide Team Identifier" )
|
||||
CheckBox:SetValue( GetConVar( "lvs_force_forceindicator" ):GetInt() )
|
||||
CheckBox:SizeToContents()
|
||||
function CheckBox:OnChange( val )
|
||||
net.Start("lvs_admin_setconvar")
|
||||
net.WriteString("lvs_force_forceindicator")
|
||||
net.WriteString( tostring( val and 1 or 0 ) )
|
||||
net.SendToServer()
|
||||
end
|
||||
end
|
||||
|
||||
function LVS:OpenClientSettings()
|
||||
if not IsValid( LVS.Frame ) then return end
|
||||
|
||||
local BasePanel = LVS.Frame:CreatePanel()
|
||||
|
||||
local DPanel = vgui.Create( "DPanel", BasePanel )
|
||||
DPanel.Paint = function(self, w, h ) end
|
||||
DPanel:DockMargin( 0, 0, 0, 0 )
|
||||
DPanel:SetSize( FrameSizeX, 25 )
|
||||
DPanel:Dock( TOP )
|
||||
|
||||
local TabPanel = vgui.Create( "DPanel", BasePanel )
|
||||
TabPanel.Paint = function(self, w, h ) end
|
||||
TabPanel:DockMargin( 0, 0, 0, 0 )
|
||||
TabPanel:SetSize( FrameSizeX, 25 )
|
||||
TabPanel:Dock( TOP )
|
||||
|
||||
local SettingsPanel = vgui.Create( "DPanel", TabPanel )
|
||||
SettingsPanel:DockMargin( 0, 0, 0, 0 )
|
||||
SettingsPanel:SetSize( FrameSizeX * 0.5, 32 )
|
||||
SettingsPanel:Dock( LEFT )
|
||||
SettingsPanel.Paint = function(self, w, h )
|
||||
draw.DrawText( "SETTINGS", "LVS_FONT", w * 0.5, 0, Color( 255, 255, 255, 255 ), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER )
|
||||
end
|
||||
|
||||
local DButton = vgui.Create( "DButton", TabPanel )
|
||||
DButton:DockMargin( 0, 0, 0, 0 )
|
||||
DButton:SetText( "" )
|
||||
DButton:SetSize( FrameSizeX * 0.5, 32 )
|
||||
DButton:Dock( RIGHT )
|
||||
DButton.DoClick = function()
|
||||
surface.PlaySound( "buttons/button14.wav" )
|
||||
LVS:OpenClientControls()
|
||||
end
|
||||
DButton.Paint = function(self, w, h )
|
||||
surface.SetDrawColor(0, 0, 0, 255)
|
||||
surface.DrawRect(0, 0, w, h)
|
||||
|
||||
local Hovered = self:IsHovered()
|
||||
|
||||
if Hovered then
|
||||
surface.SetDrawColor( 120, 120, 120, 255 )
|
||||
else
|
||||
surface.SetDrawColor( 80, 80, 80, 255 )
|
||||
end
|
||||
|
||||
surface.DrawRect(1, 0, w-2, h-1)
|
||||
|
||||
local Col = Hovered and Color( 255, 255, 255, 255 ) or Color( 150, 150, 150, 255 )
|
||||
draw.DrawText( "CONTROLS", "LVS_FONT", w * 0.5, 0, Col, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER )
|
||||
end
|
||||
|
||||
local DButton = vgui.Create( "DButton", DPanel )
|
||||
DButton:DockMargin( 0, 0, 0, 0 )
|
||||
DButton:SetText( "" )
|
||||
DButton:SetSize( FrameSizeX * 0.5, 32 )
|
||||
DButton:Dock( RIGHT )
|
||||
DButton.DoClick = function()
|
||||
if LocalPlayer():IsSuperAdmin() then
|
||||
surface.PlaySound( "buttons/button14.wav" )
|
||||
LVS:OpenServerMenu()
|
||||
else
|
||||
surface.PlaySound( "buttons/button11.wav" )
|
||||
end
|
||||
end
|
||||
DButton.Paint = function(self, w, h )
|
||||
surface.SetDrawColor(0, 0, 0, 255)
|
||||
surface.DrawRect(0, 0, w, h)
|
||||
|
||||
local Hovered = self:IsHovered()
|
||||
|
||||
if Hovered then
|
||||
draw.RoundedBox( 4, 1, 1, w-2, h-2, Color( 120, 120, 120, 255 ) )
|
||||
else
|
||||
draw.RoundedBox( 4, 1, 1, w-2, h-2, Color( 80, 80, 80, 255 ) )
|
||||
end
|
||||
|
||||
surface.SetDrawColor( 255, 255, 255, Hovered and 255 or 50 )
|
||||
surface.SetMaterial( adminMat )
|
||||
surface.DrawTexturedRect( 3, 2, 16, 16 )
|
||||
|
||||
local Col = Hovered and Color( 255, 255, 255, 255 ) or Color( 150, 150, 150, 255 )
|
||||
draw.DrawText( "SERVER", "LVS_FONT", w * 0.5, 0, Col, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER )
|
||||
end
|
||||
|
||||
local ClientPanel = vgui.Create( "DPanel", DPanel )
|
||||
ClientPanel.Paint = function(self, w, h ) end
|
||||
ClientPanel:DockMargin( 0, 0, 0, 0 )
|
||||
ClientPanel:SetSize( FrameSizeX * 0.5, 32 )
|
||||
ClientPanel:Dock( LEFT )
|
||||
ClientPanel.Paint = function(self, w, h )
|
||||
draw.DrawText( "CLIENT", "LVS_FONT", w * 0.5, 0, Color( 255, 255, 255, 255 ), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER )
|
||||
end
|
||||
|
||||
local Canvas = vgui.Create( "DPanel", BasePanel )
|
||||
Canvas.Paint = function(self, w, h ) end
|
||||
Canvas:DockMargin( 0, 0, 0, 0 )
|
||||
Canvas:SetSize( FrameSizeX, 25 )
|
||||
Canvas:Dock( FILL )
|
||||
|
||||
ClientSettings( Canvas )
|
||||
end
|
||||
|
||||
function LVS:OpenClientControls()
|
||||
if not IsValid( LVS.Frame ) then return end
|
||||
|
||||
local BasePanel = LVS.Frame:CreatePanel()
|
||||
|
||||
local DPanel = vgui.Create( "DPanel", BasePanel )
|
||||
DPanel.Paint = function(self, w, h ) end
|
||||
DPanel:DockMargin( 0, 0, 0, 0 )
|
||||
DPanel:SetSize( FrameSizeX, 25 )
|
||||
DPanel:Dock( TOP )
|
||||
|
||||
local TabPanel = vgui.Create( "DPanel", BasePanel )
|
||||
TabPanel.Paint = function(self, w, h ) end
|
||||
TabPanel:DockMargin( 0, 0, 0, 0 )
|
||||
TabPanel:SetSize( FrameSizeX, 25 )
|
||||
TabPanel:Dock( TOP )
|
||||
|
||||
local SettingsPanel = vgui.Create( "DPanel", TabPanel )
|
||||
SettingsPanel:DockMargin( 0, 0, 0, 0 )
|
||||
SettingsPanel:SetSize( FrameSizeX * 0.5, 32 )
|
||||
SettingsPanel:Dock( RIGHT )
|
||||
SettingsPanel.Paint = function(self, w, h )
|
||||
draw.DrawText( "CONTROLS", "LVS_FONT", w * 0.5, 0, Color( 255, 255, 255, 255 ), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER )
|
||||
end
|
||||
|
||||
local DButton = vgui.Create( "DButton", TabPanel )
|
||||
DButton:DockMargin( 0, 0, 0, 0 )
|
||||
DButton:SetText( "" )
|
||||
DButton:SetSize( FrameSizeX * 0.5, 32 )
|
||||
DButton:Dock( LEFT )
|
||||
DButton.DoClick = function()
|
||||
surface.PlaySound( "buttons/button14.wav" )
|
||||
LVS:OpenClientSettings()
|
||||
end
|
||||
DButton.Paint = function(self, w, h )
|
||||
surface.SetDrawColor(0, 0, 0, 255)
|
||||
surface.DrawRect(0, 0, w, h)
|
||||
|
||||
local Hovered = self:IsHovered()
|
||||
|
||||
if Hovered then
|
||||
surface.SetDrawColor( 120, 120, 120, 255 )
|
||||
else
|
||||
surface.SetDrawColor( 80, 80, 80, 255 )
|
||||
end
|
||||
|
||||
surface.DrawRect(1, 1, w-2, h-2)
|
||||
|
||||
local Col = Hovered and Color( 255, 255, 255, 255 ) or Color( 150, 150, 150, 255 )
|
||||
draw.DrawText( "SETTINGS", "LVS_FONT", w * 0.5, 0, Col, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER )
|
||||
end
|
||||
|
||||
local DButton = vgui.Create( "DButton", DPanel )
|
||||
DButton:DockMargin( 0, 0, 0, 0 )
|
||||
DButton:SetText( "" )
|
||||
DButton:SetSize( FrameSizeX * 0.5, 32 )
|
||||
DButton:Dock( RIGHT )
|
||||
DButton.DoClick = function()
|
||||
if LocalPlayer():IsSuperAdmin() then
|
||||
surface.PlaySound( "buttons/button14.wav" )
|
||||
LVS:OpenServerMenu()
|
||||
else
|
||||
surface.PlaySound( "buttons/button11.wav" )
|
||||
end
|
||||
end
|
||||
DButton.Paint = function(self, w, h )
|
||||
surface.SetDrawColor(0, 0, 0, 255)
|
||||
surface.DrawRect(0, 0, w, h)
|
||||
|
||||
local Hovered = self:IsHovered()
|
||||
|
||||
if Hovered then
|
||||
draw.RoundedBox( 4, 1, 1, w-2, h-2, Color( 120, 120, 120, 255 ) )
|
||||
else
|
||||
draw.RoundedBox( 4, 1, 1, w-2, h-2, Color( 80, 80, 80, 255 ) )
|
||||
end
|
||||
|
||||
surface.SetDrawColor( 255, 255, 255, Hovered and 255 or 50 )
|
||||
surface.SetMaterial( adminMat )
|
||||
surface.DrawTexturedRect( 3, 2, 16, 16 )
|
||||
|
||||
local Col = Hovered and Color( 255, 255, 255, 255 ) or Color( 150, 150, 150, 255 )
|
||||
draw.DrawText( "SERVER", "LVS_FONT", w * 0.5, 0, Col, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER )
|
||||
end
|
||||
|
||||
local ClientPanel = vgui.Create( "DPanel", DPanel )
|
||||
ClientPanel.Paint = function(self, w, h ) end
|
||||
ClientPanel:DockMargin( 0, 0, 0, 0 )
|
||||
ClientPanel:SetSize( FrameSizeX * 0.5, 32 )
|
||||
ClientPanel:Dock( LEFT )
|
||||
ClientPanel.Paint = function(self, w, h )
|
||||
draw.DrawText( "CLIENT", "LVS_FONT", w * 0.5, 0, Color( 255, 255, 255, 255 ), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER )
|
||||
end
|
||||
|
||||
local Canvas = vgui.Create( "DPanel", BasePanel )
|
||||
Canvas.Paint = function(self, w, h ) end
|
||||
Canvas:DockMargin( 0, 0, 0, 0 )
|
||||
Canvas:SetSize( FrameSizeX, 25 )
|
||||
Canvas:Dock( FILL )
|
||||
|
||||
ClientControls( Canvas )
|
||||
end
|
||||
|
||||
function LVS:OpenServerMenu()
|
||||
if not IsValid( LVS.Frame ) then return end
|
||||
|
||||
local BasePanel = LVS.Frame:CreatePanel()
|
||||
|
||||
local DPanel = vgui.Create( "DPanel", BasePanel )
|
||||
DPanel.Paint = function(self, w, h ) end
|
||||
DPanel:DockMargin( 0, 0, 0, 0 )
|
||||
DPanel:SetSize( FrameSizeX, 25 )
|
||||
DPanel:Dock( TOP )
|
||||
|
||||
local ServerPanel = vgui.Create( "DPanel", DPanel )
|
||||
ServerPanel.Paint = function(self, w, h ) end
|
||||
ServerPanel:DockMargin( 0, 0, 0, 0 )
|
||||
ServerPanel:SetSize( FrameSizeX * 0.5, 32 )
|
||||
ServerPanel:Dock( RIGHT )
|
||||
ServerPanel.Paint = function(self, w, h )
|
||||
surface.SetDrawColor( 255, 255, 255, 255 )
|
||||
surface.SetMaterial( adminMat )
|
||||
surface.DrawTexturedRect( 3, 2, 16, 16 )
|
||||
draw.DrawText( "SERVER", "LVS_FONT", w * 0.5, 0, Color( 255, 255, 255, 255 ), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER )
|
||||
end
|
||||
|
||||
local DButton = vgui.Create( "DButton", DPanel )
|
||||
DButton:DockMargin( 0, 0, 0, 0 )
|
||||
DButton:SetText( "" )
|
||||
DButton:SetSize( FrameSizeX * 0.5, 32 )
|
||||
DButton:Dock( LEFT )
|
||||
DButton.DoClick = function()
|
||||
surface.PlaySound( "buttons/button14.wav" )
|
||||
LVS:OpenClientSettings()
|
||||
end
|
||||
DButton.Paint = function(self, w, h )
|
||||
surface.SetDrawColor(0, 0, 0, 255)
|
||||
surface.DrawRect(0, 0, w, h)
|
||||
|
||||
local Hovered = self:IsHovered()
|
||||
|
||||
if Hovered then
|
||||
draw.RoundedBox( 4, 1, 1, w-2, h-2, Color( 120, 120, 120, 255 ) )
|
||||
else
|
||||
draw.RoundedBox( 4, 1, 1, w-2, h-2, Color( 80, 80, 80, 255 ) )
|
||||
end
|
||||
|
||||
local Col = Hovered and Color( 255, 255, 255, 255 ) or Color( 150, 150, 150, 255 )
|
||||
draw.DrawText( "CLIENT", "LVS_FONT", w * 0.5, 0, Col, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER )
|
||||
end
|
||||
|
||||
local Canvas = vgui.Create( "DPanel", BasePanel )
|
||||
Canvas.Paint = function(self, w, h ) end
|
||||
Canvas:DockMargin( 0, 0, 0, 0 )
|
||||
Canvas:SetSize( FrameSizeX, 25 )
|
||||
Canvas:Dock( FILL )
|
||||
|
||||
ServerSettings( Canvas )
|
||||
end
|
||||
|
||||
function LVS:CloseMenu()
|
||||
if not IsValid( LVS.Frame ) then return end
|
||||
|
||||
LVS.Frame:Close()
|
||||
LVS.Frame = nil
|
||||
end
|
||||
|
||||
function LVS:OpenMenu( keep_position )
|
||||
local xPos
|
||||
local yPos
|
||||
|
||||
if IsValid( LVS.Frame ) then
|
||||
if keep_position then
|
||||
xPos = LVS.Frame:GetX()
|
||||
yPos = LVS.Frame:GetY()
|
||||
end
|
||||
|
||||
LVS:CloseMenu()
|
||||
end
|
||||
|
||||
LVS.Frame = vgui.Create( "DFrame" )
|
||||
LVS.Frame:SetSize( FrameSizeX, FrameSizeY )
|
||||
LVS.Frame:SetTitle( "" )
|
||||
LVS.Frame:SetDraggable( true )
|
||||
LVS.Frame:SetScreenLock( true )
|
||||
LVS.Frame:MakePopup()
|
||||
LVS.Frame:Center()
|
||||
if keep_position and xPos and yPos then
|
||||
LVS.Frame:SetPos( xPos, yPos )
|
||||
end
|
||||
|
||||
LVS.Frame.Paint = function(self, w, h )
|
||||
draw.RoundedBox( 8, 0, 0, w, h, Color( 0, 0, 0, 255 ) )
|
||||
draw.RoundedBoxEx( 8, 1, 26, w-2, h-27, Color( 120, 120, 120, 255 ), false, false, true, true )
|
||||
draw.RoundedBoxEx( 8, 0, 0, w, 25, LVS.ThemeColor, true, true )
|
||||
|
||||
draw.SimpleText( "[LVS] - Control Panel ", "LVS_FONT", 5, 11, Color(255,255,255,255), TEXT_ALIGN_LEFT, TEXT_ALIGN_CENTER )
|
||||
|
||||
surface.SetDrawColor( 255, 255, 255, 50 )
|
||||
surface.SetMaterial( bgMat )
|
||||
surface.DrawTexturedRect( 0, -50, w, w )
|
||||
end
|
||||
LVS.Frame.CreatePanel = function( self )
|
||||
|
||||
if IsValid( self.OldPanel ) then
|
||||
self.OldPanel:Remove()
|
||||
self.OldPanel = nil
|
||||
end
|
||||
|
||||
local DPanel = vgui.Create( "DPanel", LVS.Frame )
|
||||
DPanel:SetPos( 0, 25 )
|
||||
DPanel:SetSize( FrameSizeX, FrameSizeY - 25 )
|
||||
DPanel.Paint = function(self, w, h )
|
||||
local Col = Color( 255, 191, 0, 255 )
|
||||
|
||||
if LVS.VERSION_GITHUB == 0 then
|
||||
surface.SetMaterial( icon_load_version )
|
||||
surface.SetDrawColor( Col )
|
||||
surface.DrawTexturedRectRotated( w - 14, h - 14, 16, 16, -CurTime() * 200 )
|
||||
|
||||
draw.SimpleText( "v"..LVS:GetVersion()..LVS.VERSION_TYPE, "LVS_VERSION", w - 23, h - 14, Col, TEXT_ALIGN_RIGHT, TEXT_ALIGN_CENTER )
|
||||
|
||||
return
|
||||
end
|
||||
|
||||
local Current = LVS:GetVersion()
|
||||
local Latest = LVS.VERSION_GITHUB
|
||||
|
||||
local Pref = "v"
|
||||
|
||||
if Current >= Latest and not LVS.VERSION_ADDONS_OUTDATED then
|
||||
Col = Color(0,255,0,255)
|
||||
else
|
||||
Col = Color(255,0,0,255)
|
||||
Pref = "OUTDATED v"
|
||||
end
|
||||
|
||||
draw.SimpleText( Pref..LVS:GetVersion()..LVS.VERSION_TYPE, "LVS_VERSION", w - 7, h - 14, Col, TEXT_ALIGN_RIGHT, TEXT_ALIGN_CENTER )
|
||||
end
|
||||
|
||||
self.OldPanel = DPanel
|
||||
|
||||
return DPanel
|
||||
end
|
||||
|
||||
LVS:OpenClientSettings()
|
||||
end
|
||||
|
||||
list.Set( "DesktopWindows", "LVSMenu", {
|
||||
title = "[LVS] Settings",
|
||||
icon = "icon64/iconlvs.png",
|
||||
init = function( icon, window )
|
||||
LVS:OpenMenu()
|
||||
end
|
||||
} )
|
||||
|
||||
concommand.Add( "lvs_openmenu", function( ply, cmd, args ) LVS:OpenMenu() end )
|
||||
Reference in New Issue
Block a user