summaryrefslogtreecommitdiff
path: root/gamemode/cl_spawnmenu.lua
diff options
context:
space:
mode:
Diffstat (limited to 'gamemode/cl_spawnmenu.lua')
-rw-r--r--gamemode/cl_spawnmenu.lua545
1 files changed, 545 insertions, 0 deletions
diff --git a/gamemode/cl_spawnmenu.lua b/gamemode/cl_spawnmenu.lua
new file mode 100644
index 0000000..1515e53
--- /dev/null
+++ b/gamemode/cl_spawnmenu.lua
@@ -0,0 +1,545 @@
+
+GM.Elements = {}
+GM.Cart = {}
+GM.CartItems = {}
+GM.OptionPanels = {}
+
+GM.Categories = {
+{ Name = "Weapons", Icon = "icon16/gun.png", Categories = { ITEM_WPN_COMMON, ITEM_WPN_SPECIAL } },
+{ Name = "Ammunition", Icon = "icon16/package.png", Categories = { ITEM_AMMO } },
+{ Name = "Supplies", Icon = "icon16/pill.png", Categories = { ITEM_SUPPLY, ITEM_SPECIAL } },
+{ Name = "Miscellaneous", Icon = "icon16/bin.png", Categories = { ITEM_MISC, ITEM_BUYABLE } }
+}
+
+function GM:CreateElement( name )
+
+ local element = vgui.Create( name )
+
+ table.insert( GAMEMODE.Elements, element )
+
+ return element
+
+end
+
+function GM:ClearElements()
+
+ for k,v in pairs( GAMEMODE.Elements ) do
+
+ v:Remove()
+
+ end
+
+ GAMEMODE.Elements = {}
+
+end
+
+function GM:AddToCart( tbl, amt )
+
+ for i=1,amt do
+
+ table.insert( GAMEMODE.Cart, tbl.ID )
+
+ local btn = GAMEMODE:CreateElement( "SideButton" )
+ btn:SetPos( 765, 5 + 35 * ( table.Count( GAMEMODE.Cart ) - 1 ) )
+ btn:SetSize( 250, 30 )
+ btn:SetImage( "icon16/cross.png" )
+ btn:SetText( tbl.Name )
+ btn:SetFunction( function() RunConsoleCommand( "inv_refund", tbl.ID ) btn:Remove() GAMEMODE:ClearCartItem( tbl.ID ) end )
+
+ table.insert( GAMEMODE.CartItems, btn )
+
+ end
+
+ GAMEMODE:CheckCartButton()
+
+end
+
+function GM:RefreshCart()
+
+ local cart = GAMEMODE.CartItems
+
+ GAMEMODE.CartItems = {}
+
+ for k,v in pairs( cart ) do
+
+ if IsValid( v ) then
+
+ table.insert( GAMEMODE.CartItems, v )
+
+ v:SetPos( 765, 5 + 35 * ( table.Count( GAMEMODE.CartItems ) - 1 ) )
+
+ end
+
+ end
+
+end
+
+function GM:CheckCartButton()
+
+ if GAMEMODE.CartButton then
+
+ GAMEMODE.CartButton:Remove()
+
+ end
+
+ if table.Count( GAMEMODE.Cart ) < 1 then return end
+
+ local btn = GAMEMODE:CreateElement( "SideButton" )
+ btn:SetPos( 765, 5 + 35 * ( table.Count( GAMEMODE.Cart ) ) )
+ btn:SetSize( 250, 30 )
+ btn:SetImage( "icon16/cart.png" )
+ btn:SetText( "Airdrop Items" )
+ btn:SetFunction( function() RunConsoleCommand( "ordershipment" ) GAMEMODE:ClearCart() btn:Remove() end )
+
+ GAMEMODE.CartButton = btn
+
+end
+
+function GM:ClearCartItem( id )
+
+ for k,v in pairs( GAMEMODE.Cart ) do
+
+ if v == id then
+
+ table.remove( GAMEMODE.Cart, k )
+
+ GAMEMODE:RefreshCart()
+ GAMEMODE:CheckCartButton()
+
+ return
+
+ end
+
+ end
+
+end
+
+function GM:ClearCart()
+
+ GAMEMODE.Cart = {}
+
+ for k,v in pairs( GAMEMODE.CartItems ) do
+
+ if IsValid( v ) then
+
+ v:Remove()
+
+ end
+
+ end
+
+end
+
+function GM:ElementsVisible()
+
+ if GAMEMODE.Elements[1] then return true end
+
+ return false
+
+end
+
+function GM:SetItemToPreview( id, style, scale, count )
+
+ //print( debug.traceback() )
+
+ PreviewTable = item.GetByID( id ) //table.Copy( item.GetByID( id ) )
+
+ if scale and style then
+
+ PreviewStyle = style
+ PreviewPriceScale = scale
+
+ end
+
+ GAMEMODE:RebuildOptions( PreviewTable or {}, style, count or 1 )
+
+end
+
+function GM:GetItemToPreview()
+
+ return PreviewTable, PreviewStyle, PreviewPriceScale
+
+end
+
+function GM:RebuildOptions( tbl, style, count )
+
+ for k,v in pairs( GAMEMODE.OptionPanels ) do
+
+ v:Remove()
+
+ end
+
+ local ypos = 400
+
+ if style == "Buy" then
+
+ for k,v in pairs{ 1, 3, 5, 10 } do
+
+ if v == 1 or not tbl.Weapon then
+
+ local btn = GAMEMODE:CreateElement( "SideButton" )
+ btn:SetPos( 510, ypos )
+ btn:SetSize( 250, 30 )
+ btn:SetImage( "icon16/money.png" )
+
+ if v == 1 then
+ btn:SetText( "Buy" )
+ else
+ btn:SetText( "Buy " .. v )
+ end
+
+ btn:SetFunction( function() if LocalPlayer():GetNWInt( "Cash", 0 ) >= tbl.Price * v then RunConsoleCommand( "inv_buy", tbl.ID, v ) GAMEMODE:AddToCart( tbl, v ) end end )
+
+ table.insert( GAMEMODE.OptionPanels, btn )
+
+ ypos = ypos + 5 + 30
+
+ end
+
+ end
+
+ else
+
+ for k,v in pairs{ 1, 3, 5, 10 } do
+
+ if not tbl.Weapon and count >= v then
+
+ local btn = GAMEMODE:CreateElement( "SideButton" )
+ btn:SetPos( 510, ypos )
+ btn:SetSize( 250, 30 )
+ btn:SetImage( "icon16/arrow_down.png" )
+
+ if v == 1 then
+ btn:SetText( "Drop" )
+ else
+ btn:SetText( "Drop " .. v )
+ end
+
+ btn:SetFunction( function() RunConsoleCommand( "inv_drop", tbl.ID, v ) end )
+
+ table.insert( GAMEMODE.OptionPanels, btn )
+
+ ypos = ypos + 5 + 30
+
+ end
+
+ end
+
+ if count > 1 then
+
+ local btn = GAMEMODE:CreateElement( "SideButton" )
+ btn:SetPos( 510, ypos )
+ btn:SetSize( 250, 30 )
+ btn:SetImage( "icon16/box.png" )
+ btn:SetText( "Drop All" )
+ btn:SetFunction( function() RunConsoleCommand( "inv_drop", tbl.ID, count ) end )
+
+ table.insert( GAMEMODE.OptionPanels, btn )
+
+ ypos = ypos + 5 + 30
+
+ end
+
+ for k,v in pairs( tbl.Functions ) do
+
+ local btn = GAMEMODE:CreateElement( "SideButton" )
+ btn:SetPos( 510, ypos )
+ btn:SetSize( 250, 30 )
+ btn:SetImage( v( 0, 0, 0, true ) )
+ btn:SetText( v( 0, 0, true ) )
+ btn:SetFunction( function() RunConsoleCommand( "inv_action", tbl.ID, k ) end )
+
+ table.insert( GAMEMODE.OptionPanels, btn )
+
+ ypos = ypos + 5 + 30
+
+ end
+
+ end
+
+end
+
+function GM:OnSpawnMenuClose()
+
+ if not LocalPlayer():Alive() or LocalPlayer():Team() != TEAM_ARMY then return end
+
+ if GAMEMODE:ElementsVisible() then
+
+ gui.EnableScreenClicker( false )
+
+ GAMEMODE:ClearElements()
+
+ else
+
+ gui.EnableScreenClicker( true )
+
+ local ypos = 5
+
+ for k,v in pairs( GAMEMODE.Categories ) do
+
+ local toggle = GAMEMODE:CreateElement( "CategoryButton" )
+ toggle:SetPos( 510, ypos )
+ toggle:SetText( v.Name )
+ toggle:SetImage( v.Icon )
+ toggle:SetSize( 250, 30 )
+ toggle:SetSelectedState( true, true )
+ toggle.OnToggle = function( pnl, bool )
+
+ if GAMEMODE.ItemSheet then
+
+ GAMEMODE.ItemSheet:ToggleVisible( v.Categories, bool )
+ GAMEMODE.ItemSheet:RefreshItems( LocalInventory )
+
+ end
+
+ end
+
+ ypos = ypos + 5 + 30
+
+ end
+
+ local inv = GAMEMODE:CreateElement( "ItemSheet" )
+ inv:SetSize( 500, ScrH() - 125 )
+ inv:SetPos( 5, 5 )
+ inv:SetSpacing( 0 )
+ inv:SetPadding( 0 )
+ inv:EnableHorizontal( true )
+ inv:SetStashable( false, "Stash", true )
+ inv:RefreshItems( LocalInventory )
+ //inv:EnableVerticalScrollbar()
+
+ GAMEMODE.ItemSheet = inv
+
+ local disp = GAMEMODE:CreateElement( "ItemDisplay" )
+ disp:SetSize( 250, 250 )
+ disp:SetPos( 510, 145 )
+
+ local scrollup = GAMEMODE:CreateElement( "Scroller" )
+ scrollup:SetSize( 30, 30 )
+ scrollup:SetPos( 475, ScrH() - 115 )
+ scrollup:SetTarget( inv )
+ scrollup:SetImage( "icon16/arrow_up.png" )
+
+ local scrolldown = GAMEMODE:CreateElement( "Scroller" )
+ scrolldown:SetSize( 30, 30 )
+ scrolldown:SetPos( 440, ScrH() - 115 )
+ scrolldown:SetTarget( inv )
+ scrolldown:SetScrollUp( false )
+ scrolldown:SetImage( "icon16/arrow_down.png" )
+
+ end
+
+ --[[if not InventoryScreen:IsVisible() then
+
+ InventoryScreen:SetSize( ScrW() - 10, ScrH() * 0.5 - 10 )
+ InventoryScreen:SetStashable( false, "Stash", true )
+ InventoryScreen:RefreshItems( LocalInventory )
+ InventoryScreen:SetVisible( true )
+ InfoScreen:SetVisible( true )
+ PlayerScreen:SetVisible( true )
+
+ gui.EnableScreenClicker( true )
+
+ else
+
+ InventoryScreen:SetVisible( false )
+ InfoScreen:SetVisible( false )
+ PlayerScreen:SetVisible( false )
+
+ gui.EnableScreenClicker( false )
+
+ end]]
+
+end
+
+function StoreMenu( msg )
+
+ local open = msg:ReadBool()
+ local scale = msg:ReadFloat()
+
+ if GAMEMODE:ElementsVisible() then
+
+ GAMEMODE:ClearElements()
+
+ end
+
+ if open then
+
+ gui.EnableScreenClicker( true )
+
+ local ypos = 5
+
+ for k,v in pairs( GAMEMODE.Categories ) do
+
+ local toggle = GAMEMODE:CreateElement( "CategoryButton" )
+ toggle:SetPos( 510, ypos )
+ toggle:SetText( v.Name )
+ toggle:SetImage( v.Icon )
+ toggle:SetSize( 250, 30 )
+ toggle:SetSelectedState( true, true )
+ toggle.OnToggle = function( pnl, bool )
+
+ if GAMEMODE.ItemSheet then
+
+ GAMEMODE.ItemSheet:ToggleVisible( v.Categories, bool )
+ GAMEMODE.ItemSheet:RefreshItems( LocalStash )
+
+ end
+
+ end
+
+ ypos = ypos + 5 + 30
+
+ end
+
+ local inv = GAMEMODE:CreateElement( "ItemSheet" )
+ inv:SetSize( 500, ScrH() - 125 )
+ inv:SetPos( 5, 5 )
+ inv:SetSpacing( 0 )
+ inv:SetPadding( 0 )
+ inv:EnableHorizontal( true )
+ inv:SetStashable( open, "Buy" )
+ inv:RefreshItems( LocalStash )
+ //inv:EnableVerticalScrollbar()
+
+ GAMEMODE.ItemSheet = inv
+
+ local disp = GAMEMODE:CreateElement( "ItemDisplay" )
+ disp:SetSize( 250, 250 )
+ disp:SetPos( 510, 145 )
+
+ local scrollup = GAMEMODE:CreateElement( "Scroller" )
+ scrollup:SetSize( 30, 30 )
+ scrollup:SetPos( 475, ScrH() - 115 )
+ scrollup:SetTarget( inv )
+ scrollup:SetImage( "icon16/arrow_up.png" )
+
+ local scrolldown = GAMEMODE:CreateElement( "Scroller" )
+ scrolldown:SetSize( 30, 30 )
+ scrolldown:SetPos( 440, ScrH() - 115 )
+ scrolldown:SetTarget( inv )
+ scrolldown:SetScrollUp( false )
+ scrolldown:SetImage( "icon16/arrow_down.png" )
+
+ surface.PlaySound( table.Random( GAMEMODE.RadioBeep ) )
+
+ local cart = GAMEMODE.Cart
+ GAMEMODE.Cart = {}
+
+ for k,v in pairs( cart ) do
+
+ local tbl = item.GetByID( v )
+
+ GAMEMODE:AddToCart( tbl, 1 )
+
+ end
+
+ else
+
+ gui.EnableScreenClicker( false )
+
+ end
+
+ --[[ShopMenu = open
+
+ StashScreen:SetPos( 5, ScrH() * 0.5 + 5 )
+ StashScreen:SetStashable( open, "Buy" )
+ StashScreen:SetVisible( open )
+
+ SaleScreen:SetVisible( open )
+ InfoScreen:SetVisible( open )
+ PlayerScreen:SetVisible( open )
+
+ gui.EnableScreenClicker( open )
+
+ if open then
+
+ StashScreen:RefreshItems( LocalStash )
+
+ surface.PlaySound( table.Random( GAMEMODE.RadioBeep ) )
+
+ end]]
+
+end
+usermessage.Hook( "StoreMenu", StoreMenu )
+
+function GM:InitVGUI() //obsolete
+
+ InventoryScreen = vgui.Create( "ItemSheet" )
+ InventoryScreen:SetSize( ScrW() * 0.5 - 10, ScrH() * 0.5 - 10 )
+ InventoryScreen:SetPos( 5, ScrH() * 0.5 + 5 )
+ InventoryScreen:SetSpacing( 2 )
+ InventoryScreen:SetPadding( 3 )
+ InventoryScreen:EnableHorizontal( true )
+ InventoryScreen:SetVisible( false )
+
+ InfoScreen = vgui.Create( "ItemDisplay" )
+ InfoScreen:SetSize( ScrW() * 0.3 - 10, ScrH() * 0.5 - 5 )
+ InfoScreen:SetPos( 5, 5 )
+ InfoScreen:SetVisible( false )
+
+ PlayerScreen = vgui.Create( "PlayerDisplay" )
+ PlayerScreen:SetSize( ScrW() * 0.3 - 10, ScrH() * 0.5 - 5 )
+ PlayerScreen:SetPos( ScrW() * 0.7 + 5, 5 )
+ PlayerScreen:SetVisible( false )
+ PlayerScreen:SetupCam( Vector(0,96,36), Vector(0,0,36) )
+
+ StashScreen = vgui.Create( "ItemSheet" )
+ StashScreen:SetSize( ScrW() * 0.5 - 10, ScrH() * 0.5 - 10 )
+ StashScreen:SetPos( ScrW() * 0.5 + 5, ScrH() * 0.5 + 5 )
+ StashScreen:SetSpacing( 2 )
+ StashScreen:SetPadding( 3 )
+ StashScreen:EnableHorizontal( true )
+ StashScreen:SetVisible( false )
+ StashScreen:SetStashable( true, "Take" )
+ StashScreen.GetCash = function() return Inv_GetStashCash() end
+
+ SaleScreen = vgui.Create( "ShopMenu" )
+ SaleScreen:SetSize( ScrW() * 0.5 - 10, ScrH() * 0.5 - 10 )
+ SaleScreen:SetPos( ScrW() * 0.5 + 5, ScrH() * 0.5 + 5 )
+ SaleScreen:SetVisible( false )
+
+ local ypos = 5
+
+ for k,v in pairs( GAMEMODE.Categories ) do
+
+ local toggle = vgui.Create( "CategoryButton" )
+ toggle:SetPos( 5, ypos )
+ toggle:SetText( v.Name )
+ toggle:SetImage( v.Icon )
+ toggle:SetSize( 500, 30 )
+
+ ypos = ypos + 5 + 30
+
+ end
+
+end
+
+function StashMenu( msg )
+
+ local open = msg:ReadBool()
+
+ if InventoryScreen:IsVisible() and open then return end
+
+ StashScreen:SetPos( ScrW() * 0.5 + 5, ScrH() * 0.5 + 5 )
+ StashScreen:SetStashable( open, "Take" )
+ StashScreen:SetVisible( open )
+
+ InventoryScreen:SetSize( ScrW() * 0.5 - 10, ScrH() * 0.5 - 10 )
+ InventoryScreen:SetStashable( open, "Stash", true )
+ InventoryScreen:RefreshItems( LocalInventory )
+ InventoryScreen:SetVisible( open )
+ InfoScreen:SetVisible( open )
+ PlayerScreen:SetVisible( open )
+
+ gui.EnableScreenClicker( open )
+
+ if open then
+
+ StashScreen:RefreshItems( LocalStash )
+
+ end
+
+end
+usermessage.Hook( "StashMenu", StashMenu )
+
generated by cgit v1.2.3-70-g09d2 (git 2.46.0) at 2026-01-18 08:09:32 +0000