mirror of
https://github.com/lifestorm/wnsrc.git
synced 2025-12-16 13:23:46 +03:00
82 lines
1.7 KiB
Lua
82 lines
1.7 KiB
Lua
--[[
|
|
| 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 PANEL = {}
|
|
|
|
local matGradient = Material( "vgui/gradient-u" )
|
|
local matGrid = Material( "gui/alpha_grid.png", "nocull" )
|
|
|
|
AccessorFunc( PANEL, "m_Value", "Value" )
|
|
AccessorFunc( PANEL, "m_BarColor", "BarColor" )
|
|
|
|
function PANEL:Init()
|
|
|
|
self:SetBarColor( color_white )
|
|
self:SetSize( 26, 26 )
|
|
self:SetValue( 1 )
|
|
|
|
end
|
|
|
|
function PANEL:OnCursorMoved( x, y )
|
|
|
|
if ( !input.IsMouseDown( MOUSE_LEFT ) ) then return end
|
|
|
|
local fHeight = y / self:GetTall()
|
|
|
|
fHeight = 1 - math.Clamp( fHeight, 0, 1 )
|
|
|
|
self:SetValue( fHeight )
|
|
self:OnChange( fHeight )
|
|
|
|
end
|
|
|
|
function PANEL:OnMousePressed( mcode )
|
|
|
|
self:MouseCapture( true )
|
|
self:OnCursorMoved( self:CursorPos() )
|
|
|
|
end
|
|
|
|
function PANEL:OnMouseReleased( mcode )
|
|
|
|
self:MouseCapture( false )
|
|
self:OnCursorMoved( self:CursorPos() )
|
|
|
|
end
|
|
|
|
function PANEL:OnChange( fAlpha )
|
|
end
|
|
|
|
function PANEL:Paint( w, h )
|
|
|
|
surface.SetDrawColor( 255, 255, 255, 255 )
|
|
surface.SetMaterial( matGrid )
|
|
local size = 128
|
|
for i = 0, math.ceil( h / size ) do
|
|
surface.DrawTexturedRect( w / 2 - size / 2, i * size, size, size )
|
|
end
|
|
|
|
surface.SetDrawColor( self.m_BarColor )
|
|
surface.SetMaterial( matGradient )
|
|
surface.DrawTexturedRect( 0, 0, w, h )
|
|
surface.DrawTexturedRect( 0, 0, w, h )
|
|
|
|
surface.SetDrawColor( 0, 0, 0, 250 )
|
|
self:DrawOutlinedRect()
|
|
surface.DrawRect( 0, ( 1 - self.m_Value ) * h - 2, w, 3 )
|
|
|
|
surface.SetDrawColor( 255, 255, 255, 250 )
|
|
surface.DrawRect( 0, ( 1 - self.m_Value ) * h - 1, w, 1 )
|
|
|
|
end
|
|
|
|
derma.DefineControl( "DAlphaBar", "", PANEL, "DPanel" )
|