weapons.lua

ply = LocalPlayer()
local PANEL = { }
function PANEL:Init( )
    self.Label = vgui.Create( "DLabel", self )
    self.Label:SetText( "Weapons" )
    self.Label:SetTextColor( Color( 255, 255, 255, 255 ) )
    self.Label:SizeToContents( )

    self.ListList = vgui.Create( "DPanelList", self )

    self.IconList = {}
    self.IconListCollapse = {}
    for k,v in pairs (MODELGROUPS) do
    self.IconList[k] = vgui.Create( "DPanelList", self )
    self.IconList[k]:EnableVerticalScrollbar( true )
    self.IconList[k]:EnableHorizontal( true )
    self.IconList[k]:SetPadding( 4 )
    self.IconList[k]:SetVisible( true )

    self.IconListCollapse[k] = vgui.Create( "DCollapsibleCategory", self )
    self.IconListCollapse[k]:SetSize( 610,20 )
    self.IconListCollapse[k]:SetLabel( v )
    self.IconListCollapse[k]:SetVisible( true )
    self.IconListCollapse[k]:SetContents(self.IconList[k])
    self.ListList:AddItem( self.IconListCollapse[k] )
    end

    for k,v in pairs( MODELS ) do
        ents.CreateClientProp("prop_physics") -- lol ailias filthy hack
        local ico = vgui.Create( "DModelPanel", self )
        ico:SetModel(k)
        ico.Skin = math.random(0,util.GetModelInfo(k).SkinCount-1)
        ico.Entity:SetSkin(ico.Skin)
        ico.DoClick = function( ico )
        LocalPlayer():ConCommand("giveplayeritem "..v.NAME.." "..v.PRICE.."\n")
        surface.PlaySound( "ui/buttonclick.wav" )
        end
    end
end

function PANEL:PerformLayout( )
    self:StretchToParent( 2, 24, 2, 2 )
    self.Label:SetPos( 2, 2 )
    self.ListList:StretchToParent( 4, 26, 4, 4 )
    self.ListList:InvalidateLayout()
    for k,v in pairs (self.IconList) do
    --v:StretchToParent( 4, 26, 4, 4 )
    v:SizeToContents( )
    v:InvalidateLayout()
    end
end


function PANEL:OnVScroll( iOffset )
    self.pnlCanvas:SetPos( 25, 25 + iOffset )
end

function PANEL:OnMouseWheeled( dlta )
    if ( self.VBar ) then
        return self.VBar:OnMouseWheeled( dlta )
    end
end

vgui.Register( "gofish_weapons_menu", PANEL, "DPanel" )