diff options
Diffstat (limited to 'gamemode/client/qpanels')
| -rw-r--r-- | gamemode/client/qpanels/inventory.lua | 179 | ||||
| -rw-r--r-- | gamemode/client/qpanels/prayers.lua | 170 | ||||
| -rw-r--r-- | gamemode/client/qpanels/quests.lua | 31 | ||||
| -rw-r--r-- | gamemode/client/qpanels/skills.lua | 10 |
4 files changed, 390 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) diff --git a/gamemode/client/qpanels/prayers.lua b/gamemode/client/qpanels/prayers.lua new file mode 100644 index 0000000..bc955ce --- /dev/null +++ b/gamemode/client/qpanels/prayers.lua @@ -0,0 +1,170 @@ + +local refreshboundprayers +local infopart +local prayersheet + +local function displaydefaulthelp(panel) + local ll = vgui.Create("DLabel",panel) + ll:Dock(FILL) + ll:SetWrap(true) + ll:SetDark(true) + ll:SetText("Oh no! It looks like this dosen't have any help text yet!") +end + +local function createprayericon(parrent,prayer,equiped,place) + + local width = ScrW() + local height = ScrH() + + local ret = vgui.Create("DButton",parrent) + ret:SetText(prayer) + ret:SetWrap(true) + ret:SetSize(64,64) + local prayertbl = ART.GetPrayerByName(prayer) + assert(prayertbl ~= nil, "Could not find an appropriate prayer!") + if prayertbl.Paint then + ret.Paint = prayertbl.Paint + end + if prayertbl.DoOnPanel then + prayertbl.DoOnPanel(ret) + end + if equiped then + ret.DoClick = function(self) + self:Remove() + ART.PrayerEquiped[place] = false + refreshboundprayers() + infopart:Remove() + infopart = vgui.Create("DPanel") + infopart:SetSize( (width / 4) - 10, height / 3) + infopart:SetPos(0, height * 2 / 3) + prayersheet:Add(infopart) + end + else + ret:Droppable("PrayerBind") + ret.PrayerName = prayer + ret:SetSize(64,64) + ret.DoClick = function(self) + infopart:Remove() + infopart = vgui.Create("DPanel") + infopart:SetSize( (width / 4) - 10, height / 3) + prayersheet:Add(infopart) + local rettbl = ART.GetPrayerByName(prayer) + if rettbl.DisplayHelp ~= nil then + rettbl.DisplayHelp(infopart) + else + displaydefaulthelp(infopart) + end + end + end + return ret +end + +local function createreceiver(parrent,num) + local prayerbut = vgui.Create( "DPanel", parrent ) + local prayerlabel = vgui.Create("DLabel",prayerbut) + prayerlabel:SetText( "F" .. num ) + prayerlabel.Paint = function( self, w, h ) end + prayerlabel:SetWrap(true) + prayerlabel:SetDark(true) + prayerlabel:Dock(FILL) + prayerbut:Dock(FILL) + prayerbut:Receiver( "PrayerBind", function( self, tableOfDroppedPanels, isDropped, menuIndex, mouseX, mouseY ) + if not isDropped then return end + local pname = tableOfDroppedPanels[1].PrayerName + print("Prayer name:") + print(pname) + ART.PrayerEquiped[num] = pname + print("Prayer bound to " .. num) + prayerbut:Remove() + createprayericon(parrent,pname,true,num) + end) +end + +local function displayboundprayers(panel) + + local width = ScrW() + local height = ScrH() + + local prayerbindgrid = nil + + refreshboundprayers = function() + + if prayerbindgrid ~= nil then prayerbindgrid:Remove() end + + prayerbindgrid = vgui.Create("DGrid") + prayerbindgrid:SetPos(height * (2 / 3),5) + prayerbindgrid:SetSize((width / 4) - 20, height / 3) + prayerbindgrid:SetColWide(64) + prayerbindgrid:SetRowHeight(64) + function prayerbindgrid:Paint(w,h) + draw.RoundedBox( 8, 0, 0, w, h, Color( 0, 255, 0 ) ) + end + + for k,v in pairs(ART.PrayerEquiped) do + local but = vgui.Create( "DPanel", prayerbindgrid ) + but:SetSize(64, 64) + if v ~= false then + createprayericon(but,v,true,k) + else + createreceiver(but,k) + end + prayerbindgrid:AddItem(but) + end + panel:Add(prayerbindgrid) + end + refreshboundprayers() +end + +ART.RegisterInventorySheet(function() + + local width = ScrW() + local height = ScrH() + + prayersheet = vgui.Create( "DListLayout") + + local prayergridscroll = vgui.Create("DScrollPanel") + prayergridscroll:SetSize( (width / 4) - 20, height / 3 ) + prayergridscroll:SetPos( 5, 5 ) + prayersheet:Add(prayergridscroll) + local prayergrid = vgui.Create( "DGrid", prayergridscroll ) + prayergrid:SetPos( 5 , 5 ) + prayergrid:Dock(FILL) + + prayergrid:SetCols( (width / 4) / 64 ) + prayergrid:SetColWide( 64 ) + prayergrid:SetRowHeight(64) + prayergridscroll:AddItem(prayergrid) + + for k,v in pairs(ART.MyPrayer) do + print("Displaying prayer:" .. k) + print("Type:" .. type(k)) + if k == "" then + ART.MyPrayer[k] = nil + end + local but = createprayericon(prayergrid,k,false,nil) + prayergrid:AddItem(but) + end + + displayboundprayers(prayersheet) + + infopart = vgui.Create("DPanel") + infopart:SetSize( (width / 4) - 10, height / 3) + infopart:SetPos(0, height * 2 / 3) + prayersheet:Add(infopart) + + return "Prayers", prayersheet, "icon16/tick.png" +end) + +hook.Add("Think","art_prayer_keybinds",function() + local mapping = { + KEY_F1, + KEY_F2, + KEY_F3, + KEY_F4, + } + for k,v in pairs(mapping) do + if input.IsKeyDown(v) and ART.PrayerEquiped[k] then + ART.GetPrayerByName(ART.PrayerEquiped[k]).Pray() + end + end +end) diff --git a/gamemode/client/qpanels/quests.lua b/gamemode/client/qpanels/quests.lua new file mode 100644 index 0000000..1ca723b --- /dev/null +++ b/gamemode/client/qpanels/quests.lua @@ -0,0 +1,31 @@ + + +ART.RegisterInventorySheet(function() + + local width = ScrW() + local height = ScrH() + + local questsheet = vgui.Create( "DPanel") + questsheet.Paint = function(self,w,h) end + + --Display quests + local questselector = vgui.Create( "DScrollPanel", questsheet ) + questselector:SetSize((width / 4) - 20, (height / 2) - 40) + questselector:SetPos(0,0) + local questinfo = vgui.Create("DScrollPanel", questsheet) + questinfo:SetSize(width / 4, height / 2) + questinfo:SetPos(0,height / 2) + for k,v in pairs(LocalPlayer().Quests or {}) do + print("Displaying quest:" .. k) + local questbutton = vgui.Create( "DButton" , questselector ) + questbutton:Dock(TOP) + questbutton:SetText(k) + questbutton.DoClick = function() + print("At point of clicking, art is:") + PrintTable(ART) + ART.GetQuest(k).DrawQuestInfo(questinfo,v) + end + end + + return "Quests", questsheet, "icon16/house.png" +end) diff --git a/gamemode/client/qpanels/skills.lua b/gamemode/client/qpanels/skills.lua new file mode 100644 index 0000000..4693032 --- /dev/null +++ b/gamemode/client/qpanels/skills.lua @@ -0,0 +1,10 @@ + + + +ART.RegisterInventorySheet(function() + + local skillsheet = vgui.Create( "DPanel" ) + skillsheet.Paint = function( self, w, h ) end + + return "Skills", skillsheet, "icon16/tick.png" +end) |