add Counter node.

README.md

@@ -64,6 +64,7 @@
    -  [Popup](https://ethosa.github.io/nodesnim/popup.html)
    -  [TextureButton](https://ethosa.github.io/nodesnim/texture_button.html)
    -  [TextureProgressBar](https://ethosa.github.io/nodesnim/texture_progress_bar.html)
+   -  [Counter](https://ethosa.github.io/nodesnim/counter.html)
 -  2D nodes
    -  [Node2D](https://ethosa.github.io/nodesnim/node2d.html)
    -  [Sprite](https://ethosa.github.io/nodesnim/sprite.html)

src/nodesnim.nim

@@ -42,6 +42,7 @@ import
   nodesnim/nodescontrol/popup,
   nodesnim/nodescontrol/texture_button,
   nodesnim/nodescontrol/texture_progress_bar,
+  nodesnim/nodescontrol/counter,
 
   nodesnim/nodes2d/node2d,
   nodesnim/nodes2d/sprite,
@@ -61,6 +62,6 @@ export
   # Control nodes
   control, color_rect, texture_rect, label, button, box, hbox, vbox, grid_box, edittext,
   rich_label, rich_edit_text, scroll, progress_bar, vprogress_bar, slider, vslider, popup,
-  texture_button, texture_progress_bar,
+  texture_button, texture_progress_bar, counter,
   # 2D nodes
   node2d, sprite, animated_sprite, ysort

src/nodesnim/nodescontrol/counter.nim

@@ -0,0 +1,147 @@
+# author: Ethosa
+## Number counter box.
+import
+  ../thirdparty/opengl,
+  ../thirdparty/opengl/glut,
+
+  ../core/vector2,
+  ../core/rect2,
+  ../core/anchor,
+  ../core/input,
+  ../core/enums,
+  ../core/color,
+
+  ../nodes/node,
+  ../nodes/canvas,
+  control,
+  label
+
+
+type
+  CounterObj* = object of ControlPtr
+    as_int*: bool  ## if true, then use integer representation.
+    min_value*, value*, max_value*: float
+    label*: LabelPtr
+    label_obj*: LabelObj
+  CounterPtr* = ptr CounterObj
+
+
+proc Counter*(name: string, variable: var CounterObj): CounterPtr =
+  ## Creates a new Counter pointer.
+  ##
+  ## Arguments:
+  ## - `name` is a node name.
+  ## - `variable` is a CounterObj variable.
+  runnableExamples:
+    var
+      cobj: CounterObj
+      c = Counter("Counter", cobj)
+  nodepattern(CounterObj)
+  controlpattern()
+  variable.rect_size.x = 90
+  variable.rect_size.y = 25
+  variable.min_value = 0
+  variable.value = 0
+  variable.max_value = 10
+  variable.as_int = true
+  variable.label = Label(variable.label_obj)
+  variable.label.mousemode = MOUSEMODE_IGNORE
+  variable.label.parent = result
+  variable.background_color = Color(0x212121ff)
+
+proc Counter*(obj: var CounterObj): CounterPtr {.inline.} =
+  ## Creates a new Counterpointer with default node name "Counter".
+  ##
+  ## Arguments:
+  ## - `variable` is a CounterObj variable.
+  runnableExamples:
+    var
+      cobj: CounterObj
+      c = Counter(cobj)
+  Counter("Counter", obj)
+
+
+method changeValue*(self: CounterPtr, value: float) {.base.} =
+  ## Changes value, if it more than `min_value` and less than `max_value`.
+  if value > self.max_value:
+    self.value = self.max_value
+  elif value < self.min_value:
+    self.value = self.min_value
+  else:
+    self.value = value
+
+
+method draw*(self: CounterPtr, w, h: GLfloat) =
+  ## This uses in the `window.nim`.
+  self.calcGlobalPosition()
+  let
+    x = -w/2 + self.global_position.x
+    y = h/2 - self.global_position.y
+
+  glColor4f(self.background_color.r, self.background_color.g, self.background_color.b, self.background_color.a)
+  glRectf(x, y, x+self.rect_size.x, y-self.rect_size.y)
+
+  self.label.resize(self.rect_size.x - 40, self.rect_size.y)
+  self.label.setTextAlign(0.5, 0.5, 0.5, 0.5)
+  if self.as_int:
+    self.label.setText($self.value.int)
+  else:
+    self.label.setText($self.value)
+  self.label.draw(w, h)
+
+  glColor4f(1f, 1f, 1f, 1f)
+
+  glBegin(GL_TRIANGLES)
+  # First button
+  glVertex2f(x + self.rect_size.x - 20, y - 8)
+  glVertex2f(x + self.rect_size.x - 10, y)
+  glVertex2f(x + self.rect_size.x, y - 8)
+
+  # Second button
+  glVertex2f(x + self.rect_size.x - 20, y - self.rect_size.y + 8)
+  glVertex2f(x + self.rect_size.x - 10, y - self.rect_size.y)
+  glVertex2f(x + self.rect_size.x, y - self.rect_size.y + 8)
+  glEnd()
+
+  # Press
+  if self.pressed:
+    self.press(last_event.x, last_event.y)
+
+
+method duplicate*(self: CounterPtr, obj: var CounterObj): CounterPtr {.base.} =
+  ## Duplicates Counter object and create a new Counter pointer.
+  obj = self[]
+  obj.addr
+
+
+method handle*(self: CounterPtr, event: InputEvent, mouse_on: var NodePtr) =
+  procCall self.ControlPtr.handle(event, mouse_on)
+
+  let
+    first_button = Rect2(
+      self.global_position.x + self.rect_size.x - 20, self.global_position.y,
+      20, 8).hasPoint(last_event.x, last_event.y)
+    second_button = Rect2(
+      self.global_position.x + self.rect_size.x - 20, self.global_position.y + self.rect_size.y-8,
+      20, 8).hasPoint(last_event.x, last_event.y)
+
+  if first_button and self.pressed:
+    self.changeValue(self.value+1)
+  elif second_button and self.pressed:
+    self.changeValue(self.value-1)
+
+  elif self.pressed:
+    if self.as_int:
+      self.changeValue(self.value - event.xrel)
+    else:
+      self.changeValue(self.value - event.xrel*0.01)
+
+method setMaxValue*(self: CounterPtr, value: float) {.base.} =
+  ## Changes max value, if it more then current `value`.
+  if value > self.value:
+    self.max_value = value
+
+method setMinValue*(self: CounterPtr, value: float) {.base.} =
+  ## Changes max value, if it less then current `value`.
+  if value < self.value:
+    self.min_value = value

tests/README.md

@@ -30,3 +30,4 @@
 28. [Use AnimatedSprite node.](https://github.com/Ethosa/nodesnim/blob/master/tests/test28.nim)
 29. [Use TextureProgressBar node.](https://github.com/Ethosa/nodesnim/blob/master/tests/test29.nim)
 30. [Use YSort node.](https://github.com/Ethosa/nodesnim/blob/master/tests/test30.nim)
+31. [Use Counter node.](https://github.com/Ethosa/nodesnim/blob/master/tests/test31.nim)

tests/test31.nim

@@ -0,0 +1,20 @@
+# --- Test 31. Use Counter node. --- #
+import nodesnim
+
+
+Window("hello world")
+
+var
+  mainobj: SceneObj
+  main = Scene("Main", mainobj)
+
+  counterobj: CounterObj
+  counter = Counter(counterobj)
+
+main.addChild(counter)
+counter.move(128, 64)
+
+
+addScene(main)
+setMainScene("Main")
+windowLaunch()