111 lines
3.5 KiB
Lua
111 lines
3.5 KiB
Lua
-- dfstatus 1.04 - a quick access status screen.
|
|
-- written by enjia2000@gmail.com
|
|
|
|
local gui = require 'gui'
|
|
|
|
function draw()
|
|
screen2 = gui.FramedScreen{
|
|
frame_style = gui.GREY_LINE_FRAME,
|
|
frame_title = 'dfstatus',
|
|
frame_width = 16,
|
|
frame_height = 17,
|
|
frame_inset = 1,
|
|
}
|
|
end
|
|
|
|
if (not shown) then
|
|
draw()
|
|
screen2:show()
|
|
shown = true
|
|
else
|
|
shown = nil
|
|
screen2:dismiss()
|
|
end
|
|
|
|
function screen2:onRenderBody(dc)
|
|
local drink = 0
|
|
local wood = 0
|
|
--local meat = 0
|
|
--local raw_fish = 0
|
|
--local plants = 0
|
|
local prepared_meals = 0
|
|
|
|
local fuel = 0
|
|
local pigiron = 0
|
|
local iron = 0
|
|
local steel = 0
|
|
|
|
local silver = 0
|
|
local copper = 0
|
|
local gold = 0
|
|
|
|
local tannedhides = 0
|
|
local cloth = 0
|
|
|
|
for _,item in ipairs(df.global.world.items.all) do
|
|
if(not item.flags.rotten and not item.flags.dump and not item.flags.forbid and not item.flags.in_building and not item.flags.trader) then
|
|
if (item:getType() == 5) then wood = wood + item:getStackSize()
|
|
elseif (item:getType() == 68) then drink = drink + item:getStackSize()
|
|
elseif (item:getType() == 54) then tannedhides = tannedhides + item:getStackSize()
|
|
elseif (item:getType() == 57) then cloth = cloth + item:getStackSize()
|
|
--elseif (item:getType() == 47) then meat = meat + item:getStackSize()
|
|
--elseif (item:getType() == 49) then raw_fish = raw_fish + item:getStackSize()
|
|
--elseif (item:getType() == 53) then plants = plants + item:getStackSize()
|
|
elseif (item:getType() == 71) then prepared_meals = prepared_meals + item:getStackSize()
|
|
elseif (item:getType() == 0) then
|
|
for token in string.gmatch(dfhack.items.getDescription(item,0),"[^%s]+") do
|
|
if (token == "silver") then silver = silver + item:getStackSize()
|
|
elseif (token == "charcoal" or token == "coke") then fuel = fuel + item:getStackSize()
|
|
elseif (token == "iron") then iron = iron + item:getStackSize()
|
|
elseif (token == "pig") then pigiron = pigiron + item:getStackSize()
|
|
elseif (token == "copper") then copper = copper + item:getStackSize()
|
|
elseif (token == "gold") then gold = gold + item:getStackSize()
|
|
elseif (token == "steel") then steel = steel + item:getStackSize()
|
|
end
|
|
break -- only need to look at the 1st token of each item.
|
|
end
|
|
end
|
|
end
|
|
end
|
|
dc:string("Drinks: ".. drink, COLOR_LIGHTGREEN)
|
|
dc:newline(0)
|
|
dc:string("Meals: ".. prepared_meals, COLOR_LIGHTGREEN)
|
|
dc:newline(0)
|
|
dc:newline(0)
|
|
dc:string("Wood: ".. wood, COLOR_LIGHTGREEN)
|
|
dc:newline(0)
|
|
dc:newline(0)
|
|
dc:string("Hides: ".. tannedhides, COLOR_LIGHTGREEN)
|
|
dc:newline(0)
|
|
dc:string("Cloth: ".. cloth, COLOR_LIGHTGREEN)
|
|
dc:newline(0)
|
|
--dc:string("Raw Fish: ".. raw_fish, COLOR_LIGHTGREEN)
|
|
--dc:newline(0)
|
|
--dc:string("Plants: ".. plants, COLOR_LIGHTGREEN)
|
|
--dc:newline(0)
|
|
dc:newline(0)
|
|
dc:string("Bars:", COLOR_LIGHTGREEN)
|
|
dc:newline(1)
|
|
dc:string("Fuel: ".. fuel, COLOR_LIGHTGREEN)
|
|
dc:newline(1)
|
|
dc:string("Pig Iron: ".. pigiron, COLOR_LIGHTGREEN)
|
|
dc:newline(1)
|
|
dc:string("Steel: ".. steel, COLOR_LIGHTGREEN)
|
|
dc:newline(1)
|
|
dc:string("Iron: ".. iron, COLOR_LIGHTGREEN)
|
|
dc:newline(1)
|
|
dc:newline(1)
|
|
dc:string("Copper: ".. copper, COLOR_LIGHTGREEN)
|
|
dc:newline(1)
|
|
dc:string("Silver: ".. silver, COLOR_LIGHTGREEN)
|
|
dc:newline(1)
|
|
dc:string("Gold: ".. gold, COLOR_LIGHTGREEN)
|
|
end
|
|
|
|
function screen2:onInput(keys)
|
|
if keys.LEAVESCREEN or keys.SELECT then
|
|
shown = nil
|
|
self:dismiss()
|
|
end
|
|
end
|