aboutsummaryrefslogtreecommitdiffstats
path: root/slider2d.lua
diff options
context:
space:
mode:
authorMatthias Richter <vrld@vrld.org>2012-02-07 23:10:29 +0100
committerMatthias Richter <vrld@vrld.org>2012-02-07 23:10:29 +0100
commit40dbc7134bae5cff48c2262d92721a3dd5394f84 (patch)
treede6097abf421b873aa6052928c56fbd578bafa01 /slider2d.lua
downloadQuickie-40dbc7134bae5cff48c2262d92721a3dd5394f84.tar.gz
Quickie-40dbc7134bae5cff48c2262d92721a3dd5394f84.tar.bz2
Quickie-40dbc7134bae5cff48c2262d92721a3dd5394f84.tar.xz
Quickie-40dbc7134bae5cff48c2262d92721a3dd5394f84.zip
Initial commit
Diffstat (limited to 'slider2d.lua')
-rw-r--r--slider2d.lua55
1 files changed, 55 insertions, 0 deletions
diff --git a/slider2d.lua b/slider2d.lua
new file mode 100644
index 0000000..023d16f
--- /dev/null
+++ b/slider2d.lua
@@ -0,0 +1,55 @@
+local core = require((...):match("^(.+)%.[^%.]+") .. '.core')
+
+return function(info, x,y,w,h, draw)
+ assert(type(info) == 'table' and type(info.value) == "table", "Incomplete slider value info")
+ info.min = info.min or {x = 0, y = 0}
+ info.max = info.max or {x = math.max(info.value.x or 0, 1), y = math.max(info.value.y or 0, 1)}
+ info.step = info.step or {x = (info.max.x - info.min.x)/50, y = (info.max.y - info.min.y)/50}
+ local fraction = {
+ x = (info.value.x - info.min.x) / (info.max.x - info.min.x),
+ y = (info.value.y - info.min.y) / (info.max.y - info.min.y),
+ }
+
+ local id = core.generateID()
+ core.mouse.updateState(id, x,y,w,h)
+ core.makeTabable(id)
+ core.registerDraw(id,draw or core.style.Slider2D, fraction, x,y,w,h)
+
+ -- update value
+ if core.isActive(id) then
+ core.setKeyFocus(id)
+ fraction = {
+ x = (core.mouse.x - x) / w,
+ y = (core.mouse.y - y) / h,
+ }
+ fraction.x = math.min(1, math.max(0, fraction.x))
+ fraction.y = math.min(1, math.max(0, fraction.y))
+ local v = {
+ x = fraction.x * (info.max.x - info.min.x) + info.min.x,
+ y = fraction.y * (info.max.y - info.min.y) + info.min.y,
+ }
+ if v.x ~= info.value.x or v.y ~= info.value.y then
+ info.value = v
+ return true
+ end
+ end
+
+ local changed = false
+ if core.hasKeyFocus(id) then
+ if core.keyboard.key == 'down' then
+ info.value.y = math.min(info.max.y, info.value.y + info.step.y)
+ changed = true
+ elseif core.keyboard.key == 'up' then
+ info.value.y = math.max(info.min.y, info.value.y - info.step.y)
+ changed = true
+ end
+ if core.keyboard.key == 'right' then
+ info.value.x = math.min(info.max.x, info.value.x + info.step.x)
+ changed = true
+ elseif core.keyboard.key == 'left' then
+ info.value.x = math.max(info.min.x, info.value.x - info.step.x)
+ changed = true
+ end
+ end
+ return changed
+end