fix items, map, protocls

800OTClient/modules/corelib/ui/uispinbox.lua

@@ -0,0 +1,191 @@
+-- @docclass
+UISpinBox = extends(UITextEdit, "UISpinBox")
+
+function UISpinBox.create()
+  local spinbox = UISpinBox.internalCreate()
+  spinbox:setFocusable(false)
+  spinbox:setValidCharacters('0123456789')
+  spinbox.displayButtons = true
+  spinbox.minimum = 0
+  spinbox.maximum = 1
+  spinbox.value = 0
+  spinbox.step = 1
+  spinbox.firstchange = true
+  spinbox.mouseScroll = true
+  spinbox:setText("1")
+  spinbox:setValue(1)
+  return spinbox
+end
+
+function UISpinBox:onSetup()
+  g_mouse.bindAutoPress(self:getChildById('up'), function() self:up() end, 300)
+  g_mouse.bindAutoPress(self:getChildById('down'), function() self:down() end, 300)
+end
+
+function UISpinBox:onMouseWheel(mousePos, direction)
+  if not self.mouseScroll or self.disableScroll then
+    return false
+  end
+  if direction == MouseWheelUp then
+    self:up()
+  elseif direction == MouseWheelDown then
+    self:down()
+  end
+  return true
+end
+
+function UISpinBox:onKeyPress()
+  if self.firstchange then
+    self.firstchange = false
+    self:setText('')
+  end
+  return false
+end
+
+function UISpinBox:onTextChange(text, oldText)
+  if text:len() == 0 then
+    self:setValue(self.minimum)
+    return
+  end
+
+  local number = tonumber(text)
+  if not number then
+    self:setText(number)
+    return
+  else
+    if number < self.minimum then
+      self:setText(self.minimum)
+      return
+    elseif number > self.maximum then
+      self:setText(self.maximum)
+      return
+    end
+  end
+
+  self:setValue(number)
+end
+
+function UISpinBox:onValueChange(value)
+  -- nothing to do
+end
+
+function UISpinBox:onFocusChange(focused)
+  if not focused then
+    if self:getText():len() == 0 then
+      self:setText(self.minimum)
+    end
+  end
+end
+
+function UISpinBox:onStyleApply(styleName, styleNode)
+  for name, value in pairs(styleNode) do
+    if name == 'maximum' then
+      self.maximum = value
+      addEvent(function() self:setMaximum(value) end)
+    elseif name == 'minimum' then
+      self.minimum = value
+      addEvent(function() self:setMinimum(value) end)
+    elseif name == 'mouse-scroll' then
+      addEvent(function() self:setMouseScroll(value) end)
+    elseif name == 'buttons' then
+      addEvent(function()
+        if value then
+          self:showButtons()
+        else
+          self:hideButtons()
+        end
+      end)
+    end
+  end
+end
+
+function UISpinBox:showButtons()
+  self:getChildById('up'):show()
+  self:getChildById('down'):show()
+  self.displayButtons = true
+end
+
+function UISpinBox:hideButtons()
+  self:getChildById('up'):hide()
+  self:getChildById('down'):hide()
+  self.displayButtons = false
+end
+
+function UISpinBox:up()
+  self:setValue(self.value + self.step)
+end
+
+function UISpinBox:down()
+  self:setValue(self.value - self.step)
+end
+
+function UISpinBox:setValue(value, dontSignal)
+  if type(value) == "string" then
+    value = tonumber(value)
+  end
+  value = value or 0
+  value = math.max(math.min(self.maximum, value), self.minimum)
+
+  if value == self.value then return end
+
+  self.value = value
+  if self:getText():len() > 0 then
+    self:setText(value)
+  end
+
+  local upButton = self:getChildById('up')
+  local downButton = self:getChildById('down')
+  if upButton then
+    upButton:setEnabled(self.maximum ~= self.minimum and self.value ~= self.maximum)
+  end
+  if downButton then
+    downButton:setEnabled(self.maximum ~= self.minimum and self.value ~= self.minimum)
+  end
+
+  if not dontSignal then
+    signalcall(self.onValueChange, self, value)
+  end
+end
+
+function UISpinBox:getValue()
+  return self.value
+end
+
+function UISpinBox:setMinimum(minimum)
+  minimum = minimum or -9223372036854775808
+  self.minimum = minimum
+  if self.minimum > self.maximum then
+    self.maximum = self.minimum
+  end
+  if self.value < minimum then
+    self:setValue(minimum)
+  end
+end
+
+function UISpinBox:getMinimum()
+  return self.minimum
+end
+
+function UISpinBox:setMaximum(maximum)
+  maximum = maximum or 9223372036854775807
+  self.maximum = maximum
+  if self.value > maximum then
+    self:setValue(maximum)
+  end
+end
+
+function UISpinBox:getMaximum()
+  return self.maximum
+end
+
+function UISpinBox:setStep(step)
+  self.step = step or 1
+end
+
+function UISpinBox:setMouseScroll(mouseScroll)
+  self.mouseScroll = mouseScroll
+end
+
+function UISpinBox:getMouseScroll()
+  return self.mouseScroll
+end