2012-09-06 02:37:29 -06:00
|
|
|
-- Interface front-end for power-meter plugin.
|
2015-10-23 08:37:39 -06:00
|
|
|
--[[=begin
|
2012-09-06 02:37:29 -06:00
|
|
|
|
2015-10-23 08:37:39 -06:00
|
|
|
gui/power-meter
|
|
|
|
===============
|
|
|
|
An in-game interface for `power-meter`.
|
|
|
|
|
|
|
|
=end]]
|
2012-09-06 02:37:29 -06:00
|
|
|
local utils = require 'utils'
|
|
|
|
local gui = require 'gui'
|
|
|
|
local guidm = require 'gui.dwarfmode'
|
|
|
|
local dlg = require 'gui.dialogs'
|
|
|
|
|
|
|
|
local plugin = require('plugins.power-meter')
|
|
|
|
local bselector = df.global.ui_build_selector
|
|
|
|
|
|
|
|
PowerMeter = defclass(PowerMeter, guidm.MenuOverlay)
|
|
|
|
|
|
|
|
PowerMeter.focus_path = 'power-meter'
|
|
|
|
|
2012-10-15 10:03:18 -06:00
|
|
|
PowerMeter.ATTRS {
|
|
|
|
frame_background = false
|
|
|
|
}
|
|
|
|
|
2012-09-06 02:37:29 -06:00
|
|
|
function PowerMeter:init()
|
2012-09-18 10:30:25 -06:00
|
|
|
self:assign{
|
2012-09-06 02:37:29 -06:00
|
|
|
min_power = 0, max_power = -1, invert = false,
|
|
|
|
}
|
|
|
|
end
|
|
|
|
|
|
|
|
function PowerMeter:onShow()
|
2012-09-18 10:30:25 -06:00
|
|
|
PowerMeter.super.onShow(self)
|
2012-09-06 02:37:29 -06:00
|
|
|
|
|
|
|
-- Send an event to update the errors
|
|
|
|
bselector.plate_info.flags.whole = 0
|
|
|
|
self:sendInputToParent('BUILDING_TRIGGER_ENABLE_WATER')
|
|
|
|
end
|
|
|
|
|
|
|
|
function PowerMeter:onRenderBody(dc)
|
|
|
|
dc:fill(0,0,dc.width-1,13,gui.CLEAR_PEN)
|
|
|
|
dc:seek(1,1):pen(COLOR_WHITE)
|
|
|
|
dc:string("Power Meter"):newline():newline(1)
|
|
|
|
dc:string("Placement"):newline():newline(1)
|
|
|
|
|
|
|
|
dc:string("Excess power range:")
|
|
|
|
|
2012-10-02 05:25:59 -06:00
|
|
|
dc:newline(3):key('BUILDING_TRIGGER_MIN_WATER_DOWN')
|
|
|
|
dc:key('BUILDING_TRIGGER_MIN_WATER_UP')
|
2012-09-06 02:37:29 -06:00
|
|
|
dc:string(": Min ")
|
|
|
|
if self.min_power <= 0 then
|
|
|
|
dc:string("(any)")
|
|
|
|
else
|
|
|
|
dc:string(''..self.min_power)
|
|
|
|
end
|
|
|
|
|
2012-10-02 05:25:59 -06:00
|
|
|
dc:newline(3):key('BUILDING_TRIGGER_MAX_WATER_DOWN')
|
|
|
|
dc:key('BUILDING_TRIGGER_MAX_WATER_UP')
|
2012-09-06 02:37:29 -06:00
|
|
|
dc:string(": Max ")
|
|
|
|
if self.max_power < 0 then
|
|
|
|
dc:string("(any)")
|
|
|
|
else
|
|
|
|
dc:string(''..self.max_power)
|
|
|
|
end
|
|
|
|
dc:newline():newline(1)
|
|
|
|
|
2012-10-02 05:25:59 -06:00
|
|
|
dc:key('CUSTOM_I'):string(": ")
|
2012-09-06 02:37:29 -06:00
|
|
|
if self.invert then
|
|
|
|
dc:string("Inverted")
|
|
|
|
else
|
|
|
|
dc:string("Not inverted")
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
function PowerMeter:onInput(keys)
|
|
|
|
if keys.CUSTOM_I then
|
|
|
|
self.invert = not self.invert
|
|
|
|
elseif keys.BUILDING_TRIGGER_MIN_WATER_UP then
|
|
|
|
self.min_power = self.min_power + 10
|
|
|
|
elseif keys.BUILDING_TRIGGER_MIN_WATER_DOWN then
|
|
|
|
self.min_power = math.max(0, self.min_power - 10)
|
|
|
|
elseif keys.BUILDING_TRIGGER_MAX_WATER_UP then
|
|
|
|
if self.max_power < 0 then
|
|
|
|
self.max_power = 0
|
|
|
|
else
|
|
|
|
self.max_power = self.max_power + 10
|
|
|
|
end
|
|
|
|
elseif keys.BUILDING_TRIGGER_MAX_WATER_DOWN then
|
|
|
|
self.max_power = math.max(-1, self.max_power - 10)
|
|
|
|
elseif keys.LEAVESCREEN then
|
|
|
|
self:dismiss()
|
|
|
|
self:sendInputToParent('LEAVESCREEN')
|
|
|
|
elseif keys.SELECT then
|
|
|
|
if #bselector.errors == 0 then
|
|
|
|
if not plugin.makePowerMeter(
|
|
|
|
bselector.plate_info,
|
|
|
|
self.min_power, self.max_power, self.invert
|
|
|
|
)
|
|
|
|
then
|
|
|
|
dlg.showMessage(
|
|
|
|
'Power Meter',
|
|
|
|
'Could not initialize.', COLOR_LIGHTRED
|
|
|
|
)
|
|
|
|
|
|
|
|
self:dismiss()
|
|
|
|
self:sendInputToParent('LEAVESCREEN')
|
|
|
|
return
|
|
|
|
end
|
|
|
|
|
|
|
|
self:sendInputToParent('SELECT')
|
|
|
|
if bselector.stage ~= 1 then
|
|
|
|
self:dismiss()
|
|
|
|
end
|
|
|
|
end
|
|
|
|
elseif self:propagateMoveKeys(keys) then
|
|
|
|
return
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
if dfhack.gui.getCurFocus() ~= 'dwarfmode/Build/Position/Trap'
|
|
|
|
or bselector.building_subtype ~= df.trap_type.PressurePlate
|
|
|
|
then
|
|
|
|
qerror("This script requires the main dwarfmode view in build pressure plate mode")
|
|
|
|
end
|
|
|
|
|
2012-09-18 10:30:25 -06:00
|
|
|
local list = PowerMeter()
|
2012-09-06 02:37:29 -06:00
|
|
|
list:show()
|