diff options
Diffstat (limited to 'gamemode/client/qpanels/inventory.lua')
| -rw-r--r-- | gamemode/client/qpanels/inventory.lua | 179 |
1 files changed, 179 insertions, 0 deletions
diff --git a/gamemode/client/qpanels/inventory.lua b/gamemode/client/qpanels/inventory.lua new file mode 100644 index 0000000..f4adad6 --- /dev/null +++ b/gamemode/client/qpanels/inventory.lua @@ -0,0 +1,179 @@ +local invfuncs +invfuncs = ART.invfuncs +--invfuncs = include("../gamemodes/artery/gamemode/shared/inventory_common.lua") +--invfuncs = include("../shared/inventory_common.lua") +assert(invfuncs ~= nil, "Dependency failed") + +local function DrawBackpackOnDPanel(dp, backpack, backpacknum, tent) + local width = ScrW() + local height = ScrH() + local slotsize = math.Round(width / 32) + local backgrid = vgui.Create( "DGrid", dp ) + backgrid:SetPos( 10, 30 ) + backgrid:SetCols( backpack[2][1] ) + backgrid:SetColWide( backpack[2][2] ) + backgrid:Dock(FILL) + for i = 1,#(backpack[1]) do + for j = 1,#(backpack[1][i]) do + local item = backpack[1][j][i] + if type(backpack[1][j][i]) == "table" then + local itemwidth = 0 + for _,l in pairs(item.Shape) do + itemwidth = math.Max(itemwidth,#l) + end + local itemheight = #item.Shape + local invicon = vgui.Create( "DImageButton", dp ) + invicon:SetSize(slotsize * itemwidth, slotsize * itemheight) + invicon:SetPos(slotsize * (i - 1), slotsize * (j - 1)) + invicon:SetText(item.Name) + if item.Tooltip then + invicon:SetTooltip(item.Tooltip) + end + if item.Paint then + invicon.Paint = item.Paint + end + if item.DoOnPanel then + item.DoOnPanel(invicon) + end + --invicon.Paint = function(self, w, h) draw.RoundedBox(4, 0,0,w,h,Color(0,100,0)) end + invicon.DoClick = function() + if not item.GetOptions then return end + local menu = vgui.Create("DMenu") + createMenuFor(menu,item:GetOptions()) + menu:Open() + end + invicon.Item = item + invicon.invpos = {j,i} + invicon.ent = tent + invicon.backpacknum = backpacknum + invicon:Droppable("Inventory") + elseif not backpack[1][j][i] then + local emptyslot = vgui.Create("DPanel", dp) + emptyslot:SetSize(slotsize,slotsize) + emptyslot:SetPos(slotsize * (i - 1), slotsize * (j - 1)) + --emptyslot.Paint = function(self, w, h) draw.RoundedBox(4, 0,0,w,h,Color(0,0,100)) end + emptyslot:Receiver( "Inventory", function( receiver, tableOfDroppedPanels, isDropped, menuIndex, mouseX, mouseY ) + if not isDropped then return end + local icon = tableOfDroppedPanels[1] + local item = icon.Item + local curpos = icon.invpos + --Set the shape it was at to false + if not icon.wasequiped and icon.ent == tent then + assert(curpos ~= nil, "print curpos was nil when not equiped") + for k = 1,#item.Shape do + for l = 1,#(item.Shape[k]) do + if k == 1 and l == 1 then continue end + backpack[1][curpos[1] + k - 1][curpos[2] + l - 1] = false + end + end + backpack[1][curpos[1]][curpos[2]] = false + end + if invfuncs.CanFitInBackpack(backpack,j,i,item) then + local fromtbl = icon.invpos + local wasequiped = icon.wasequiped + if wasequiped then + net.Start("unequipitem") + net.WriteString(wasequiped) + net.WriteUInt(backpacknum,16) + net.WriteUInt(i,16) + net.WriteUInt(j,16) + net.SendToServer() + else + net.Start("moveitem") + net.WriteEntity(icon.ent) -- from ent + net.WriteEntity(tent) -- to ent + net.WriteUInt(icon.backpacknum,16) -- from backpack number + net.WriteUInt(backpacknum,16) -- to backpack number + net.WriteUInt(fromtbl[1],16) -- From position + net.WriteUInt(fromtbl[2],16) + net.WriteUInt(j,16) -- To position + net.WriteUInt(i,16) + net.SendToServer() + if item.onEquip ~= nil then + item:onEquip(LocalPlayer()) + end + end + end + end, {} ) + end + end + end +end + +local invsheetfunc = function() + local width = ScrW() + local height = ScrH() + + + local invsheet = vgui.Create( "DPanel" ) + + invsheet.Paint = function( self, w, h ) end + + --Display gear + local slotsize = math.Round(width / 32) + local displaypos = { + ["Head"] = {(width / 8) - slotsize, 25}, + ["Body"] = {(width / 8) - slotsize, slotsize + 26}, + ["Legs"] = {(width / 8) - slotsize, (slotsize * 2) + 27}, + ["Boots"] = {(width / 8) - slotsize, (slotsize * 3) + 28}, + ["Gloves"] = {(width / 8) + (slotsize), (slotsize * 2) + 27}, + ["Left"] = {(width / 8) - (1.5 * slotsize), (slotsize * 4) + 29}, + ["Right"] = {(width / 8) - (0.5 * slotsize), (slotsize * 4) + 29} + } + for k,v in pairs (LocalPlayer().Inventory.Equiped) do + if v == false then + local eqslot = vgui.Create( "DPanel", invsheet ) + eqslot:SetSize( slotsize, slotsize ) + eqslot:SetPos(displaypos[k][1],displaypos[k][2]) + eqslot:Receiver( "Inventory", function( receiver, tableOfDroppedPanels, isDropped, menuIndex, mouseX, mouseY ) + if not isDropped then return end + print("Attempting to equip") + local icon = tableOfDroppedPanels[1] + local item = icon.Item + if item.Equipable == k then + net.Start("equipitem") + net.WriteUInt(icon.backpacknum,16) -- Backpack number + local fromtbl = icon.invpos + net.WriteUInt(fromtbl[1],16) -- From position + net.WriteUInt(fromtbl[2],16) + net.WriteString(k) + net.SendToServer() + end + end, {} ) + else + local eqslot = vgui.Create("DImageButton",invsheet) + eqslot:SetSize(slotsize,slotsize) + eqslot:SetPos(displaypos[k][1],displaypos[k][2]) + if v.PaintEquiped then + eqslot.Paint = v.PaintEquiped + end + if v.DoOnEqupPanel then + v.DoOnEqupPanel(eqslot) + end + eqslot:Droppable("Inventory") + eqslot.Item = v + eqslot.wasequiped = k + end + end + local moneylabel = vgui.Create("DLabel",invsheet) + moneylabel:SetPos(0,0) + moneylabel:SetSize(width/5,18) + moneylabel:SetText(string.format("Credits:%7d", ART.Credits or 0)) + print("Displaying credits:" .. string.format("Credits:%7d", ART.Credits or 0)) + + local backpacksheet = vgui.Create( "DPropertySheet", invsheet ) + backpacksheet:SetPos(0,slotsize * 6) + backpacksheet:SetSize((width / 4) - 26, height - (slotsize * 6) - 70) + for k,v in pairs(LocalPlayer().Inventory.Backpacks) do + local tbacksheet = vgui.Create( "DPanel", backpacksheet ) + tbacksheet.Paint = function( self, w, h ) draw.RoundedBox( 4, 0, 0, w, h, Color( 157, 160, 167 ) ) end + backpacksheet:AddSheet( v[3], tbacksheet, "icon16/cross.png" ) + + DrawBackpackOnDPanel(tbacksheet,v,k,LocalPlayer()) + end + + return "Inventory", invsheet, "icon16/cross.png" +end + + +ART.RegisterInventorySheet(invsheetfunc) |