cyberarm_engine 0.13.0 → 0.17.0

data/lib/cyberarm_engine/ui/elements/button.rb

@@ -1,67 +1,160 @@
-module CyberarmEngine
-  class Element
-    class Button < Label
-      def initialize(text, options = {}, block = nil)
-        super(text, options, block)
-
-        @style.background_canvas.background = default(:background)
-      end
-
-      def render
-        draw_text
-      end
-
-      def draw_text
-        @text.draw
-      end
-
-      def enter(sender)
-        @focus = false unless window.button_down?(Gosu::MsLeft)
-
-        if @focus
-          @style.background_canvas.background = default(:active, :background)
-          @text.color = default(:active, :color)
-        else
-          @style.background_canvas.background = default(:hover, :background)
-          @text.color = default(:hover, :color)
-        end
-
-        return :handled
-      end
-
-      def left_mouse_button(sender, x, y)
-        @focus = true
-        @style.background_canvas.background = default(:active, :background)
-        window.current_state.focus = self
-        @text.color = default(:active, :color)
-
-        return :handled
-      end
-
-      def released_left_mouse_button(sender,x, y)
-        enter(sender)
-
-        return :handled
-      end
-
-      def clicked_left_mouse_button(sender, x, y)
-        @block.call(self) if @block
-
-        return :handled
-      end
-
-      def leave(sender)
-        @style.background_canvas.background = default(:background)
-        @text.color = default(:color)
-
-        return :handled
-      end
-
-      def blur(sender)
-        @focus = false
-
-        return :handled
-      end
-    end
-  end
-end
+module CyberarmEngine
+  class Element
+    class Button < TextBlock
+      def initialize(text_or_image, options = {}, block = nil)
+        @image = nil
+        @scale_x = 1
+        @scale_y = 1
+
+        @image = text_or_image if text_or_image.is_a?(Gosu::Image)
+
+        super(text_or_image, options, block)
+
+        @style.background_canvas.background = @style.background
+      end
+
+      def render
+        if @image
+          draw_image
+        else
+          draw_text
+        end
+      end
+
+      def draw_image
+        @image.draw(
+          @style.border_thickness_left + @style.padding_left + @x,
+          @style.border_thickness_top + @style.padding_top + @y,
+          @z + 2,
+          @scale_x, @scale_y, @text.color
+        )
+      end
+
+      def draw_text
+        @text.draw
+      end
+
+      def enter(_sender)
+        @focus = false unless window.button_down?(Gosu::MsLeft)
+
+        if !@enabled
+          @style.background_canvas.background = @style.disabled[:background]
+          @text.color = @style.disabled[:color]
+        elsif @focus
+          @style.background_canvas.background = @style.active[:background]
+          @text.color = @style.active[:color]
+        else
+          @style.background_canvas.background = @style.hover[:background]
+          @text.color = @style.hover[:color]
+        end
+
+        :handled
+      end
+
+      def left_mouse_button(_sender, _x, _y)
+        @focus = true
+
+        unless @enabled
+          @style.background_canvas.background = @style.disabled[:background]
+          @text.color = @style.disabled[:color]
+        else
+          @style.background_canvas.background = @style.active[:background]
+          @text.color = @style.active[:color]
+        end
+
+        window.current_state.focus = self
+
+        :handled
+      end
+
+      def released_left_mouse_button(sender, _x, _y)
+        enter(sender)
+
+        :handled
+      end
+
+      def clicked_left_mouse_button(_sender, _x, _y)
+        @block.call(self) if @enabled && @block
+
+        :handled
+      end
+
+      def leave(_sender)
+        unless @enabled
+          @style.background_canvas.background = @style.disabled[:background]
+          @text.color = @style.disabled[:color]
+        else
+          @style.background_canvas.background = @style.background
+          @text.color = @style.color
+        end
+
+        :handled
+      end
+
+      def blur(_sender)
+        @focus = false
+
+        :handled
+      end
+
+      def recalculate
+        unless @enabled
+          @style.background_canvas.background = @style.disabled[:background]
+          @text.color = @style.disabled[:color]
+        else
+          @style.background_canvas.background = @style.background
+          @text.color = @style.color
+        end
+
+        if @image
+          @width = 0
+          @height = 0
+
+          _width = dimensional_size(@style.image_width, :width)
+          _height = dimensional_size(@style.image_height, :height)
+
+          if _width && _height
+            @scale_x = _width.to_f / @image.width
+            @scale_y = _height.to_f / @image.height
+          elsif _width
+            @scale_x = _width.to_f / @image.width
+            @scale_y = @scale_x
+          elsif _height
+            @scale_y = _height.to_f / @image.height
+            @scale_x = @scale_y
+          else
+            @scale_x = 1
+            @scale_y = 1
+          end
+
+          @width = _width || @image.width.round * @scale_x
+          @height = _height || @image.height.round * @scale_y
+
+          update_background
+        else
+          super
+        end
+      end
+
+      def value
+        @image || super
+      end
+
+      def value=(value)
+        if value.is_a?(Gosu::Image)
+          @image = value
+        else
+          super
+        end
+
+        old_width = width
+        old_height = height
+        recalculate
+
+        root.gui_state.request_recalculate if old_width != width || old_height != height
+
+        publish(:changed, self.value)
+      end
+    end
+  end
+end

data/lib/cyberarm_engine/ui/elements/check_box.rb

@@ -1,59 +1,51 @@
-module CyberarmEngine
-  class Element
-    class CheckBox < Flow
-      def initialize(text, options, block = nil)
-        super({}, block = nil)
-        options[:toggled] = options[:checked]
-
-        @toggle_button = ToggleButton.new(options)
-        @label         = Label.new(text, options)
-
-        define_label_singletons
-
-        add(@toggle_button)
-        add(@label)
-      end
-
-      def text=(text)
-        @label.text = text
-        recalculate
-      end
-
-      def value
-        @toggle_button.value
-      end
-
-      def value=(bool)
-        @toggle_button.vlaue = bool
-      end
-
-      def define_label_singletons
-        @label.define_singleton_method(:_toggle_button) do |button|
-          @_toggle_button = button
-        end
-
-        @label._toggle_button(@toggle_button)
-
-        @label.define_singleton_method(:holding_left_mouse_button) do |sender, x, y|
-          @_toggle_button.left_mouse_button(sender, x, y)
-        end
-
-        @label.define_singleton_method(:released_left_mouse_button) do |sender, x, y|
-          @_toggle_button.released_left_mouse_button(sender, x, y)
-        end
-
-        @label.define_singleton_method(:clicked_left_mouse_button) do |sender, x, y|
-          @_toggle_button.clicked_left_mouse_button(sender, x, y)
-        end
-
-        @label.define_singleton_method(:enter) do |sender|
-          @_toggle_button.enter(sender)
-        end
-
-        @label.define_singleton_method(:leave) do |sender|
-          @_toggle_button.leave(sender)
-        end
-      end
-    end
-  end
-end
+module CyberarmEngine
+  class Element
+    class CheckBox < Flow
+      def initialize(text, options, block = nil)
+        super(options, block)
+        options[:toggled] = options[:checked]
+
+        @toggle_button = ToggleButton.new(options)
+        @label         = TextBlock.new(text, options)
+
+        @label.subscribe(:holding_left_mouse_button) do |sender, x, y|
+          @toggle_button.left_mouse_button(sender, x, y)
+        end
+
+        @label.subscribe(:released_left_mouse_button) do |sender, x, y|
+          @toggle_button.released_left_mouse_button(sender, x, y)
+        end
+
+        @label.subscribe(:clicked_left_mouse_button) do |sender, x, y|
+          @toggle_button.clicked_left_mouse_button(sender, x, y)
+          publish(:changed, @toggle_button.value)
+        end
+
+        @label.subscribe(:enter) do |sender|
+          @toggle_button.enter(sender)
+        end
+
+        @label.subscribe(:leave) do |sender|
+          @toggle_button.leave(sender)
+        end
+
+        add(@toggle_button)
+        add(@label)
+      end
+
+      def text=(text)
+        @label.text = text
+        recalculate
+      end
+
+      def value
+        @toggle_button.value
+      end
+
+      def value=(bool)
+        @toggle_button.value = bool
+        publish(:changed, @toggle_button.value)
+      end
+    end
+  end
+end

data/lib/cyberarm_engine/ui/elements/container.rb

@@ -1,176 +1,256 @@
-module CyberarmEngine
-  class Element
-    class Container < Element
-      include Common
-
-      attr_accessor :stroke_color, :fill_color
-      attr_reader :children, :gui_state
-      attr_reader :scroll_x, :scroll_y
-
-      def initialize(options = {}, block = nil)
-        @gui_state = options.delete(:gui_state)
-        super
-
-        @scroll_x, @scroll_y = 0, 0
-        @scroll_speed = 10
-
-        @text_color = options[:color]
-
-        @children = []
-      end
-
-      def build
-        @block.call(self) if @block
-
-        recalculate
-      end
-
-      def add(element)
-        @children << element
-
-        recalculate
-      end
-
-      def clear(&block)
-        @children.clear
-
-        old_container = $__current_container__
-
-        $__current_container__ = self
-        block.call(self) if block
-
-        $__current_container__ = old_container
-
-        recalculate
-        root.gui_state.request_recalculate
-      end
-
-      def render
-        Gosu.clip_to(@x, @y, width, height) do
-          @children.each(&:draw)
-        end
-      end
-
-      def update
-        @children.each(&:update)
-      end
-
-      def hit_element?(x, y)
-        @children.reverse_each do |child|
-          case child
-          when Container
-            if element = child.hit_element?(x, y)
-              return element
-            end
-          else
-            return child if child.hit?(x, y)
-          end
-        end
-
-        self if hit?(x, y)
-      end
-
-      def recalculate
-        @current_position = Vector.new(@style.margin_left + @style.padding_left, @style.margin_top + @style.padding_top)
-        return unless visible?
-        stylize
-
-        layout
-
-        if is_root?
-          @width  = @style.width  = window.width
-          @height = @style.height = window.height
-        else
-          @width, @height = 0, 0
-
-          _width = dimensional_size(@style.width, :width)
-          _height= dimensional_size(@style.height,:height)
-
-          @width  = _width  ? _width  : (@children.map {|c| c.x + c.outer_width }.max || 0).round
-          @height = _height ? _height : (@children.map {|c| c.y + c.outer_height}.max || 0).round
-        end
-
-
-        # Move child to parent after positioning
-        @children.each do |child|
-          child.x += @x
-          child.y += @y
-
-          child.stylize
-          child.recalculate
-          child.reposition # TODO: Implement top,bottom,left,center, and right positioning
-        end
-
-        update_background
-      end
-
-      def layout
-        raise "Not overridden"
-      end
-
-      def max_width
-        @max_width ? @max_width : window.width - (@parent ? @parent.style.margin_right + @style.margin_right : @style.margin_right)
-      end
-
-      def fits_on_line?(element) # Flow
-        @current_position.x + element.outer_width <= max_width &&
-        @current_position.x + element.outer_width <= window.width
-      end
-
-      def position_on_current_line(element) # Flow
-        element.x = element.style.margin_left + @current_position.x
-        element.y = element.style.margin_top  + @current_position.y
-
-        element.recalculate
-
-        @current_position.x += element.outer_width
-        @current_position.x = @style.margin_left if @current_position.x >= max_width
-      end
-
-      def tallest_neighbor(querier, y_position) # Flow
-        response = querier
-        @children.each do |child|
-          response = child if child.outer_height > response.outer_height
-          break if child == querier
-        end
-
-        return response
-      end
-
-      def position_on_next_line(child) # Flow
-        @current_position.x = @style.margin_left
-        @current_position.y += tallest_neighbor(child, @current_position.y).outer_height
-
-        child.x = child.style.margin_left + @current_position.x
-        child.y = child.style.margin_top  + @current_position.y
-
-        child.recalculate
-
-        @current_position.x += child.outer_width
-      end
-
-      def move_to_next_line(element) # Stack
-        element.x = element.style.margin_left + @current_position.x
-        element.y = element.style.margin_top  + @current_position.y
-
-        element.recalculate
-
-        @current_position.y += element.outer_height
-      end
-
-      # def mouse_wheel_up(sender, x, y)
-      #   @children.each {|c| c.y -= @scroll_speed}
-      #   @children.each {|c| c.recalculate}
-      # end
-
-      # def mouse_wheel_down(sender, x, y)
-      #   @children.each {|c| c.y += @scroll_speed}
-      #   @children.each {|c| c.recalculate}
-      # end
-
-      def value
-        @children.map {|c| c.class}.join(", ")
-      end
-    end
-  end
-end
+module CyberarmEngine
+  class Element
+    class Container < Element
+      include Common
+
+      attr_accessor :stroke_color, :fill_color
+      attr_reader :children, :gui_state, :scroll_position
+
+      def initialize(options = {}, block = nil)
+        @gui_state = options.delete(:gui_state)
+        super
+
+        @scroll_position = Vector.new(0, 0)
+        @scroll_speed = 40
+
+        @text_color = options[:color]
+
+        @children = []
+
+        event(:window_size_changed)
+      end
+
+      def build
+        @block.call(self) if @block
+
+        root.gui_state.request_recalculate
+      end
+
+      def add(element)
+        @children << element
+
+        root.gui_state.request_recalculate
+      end
+
+      def clear(&block)
+        @children.clear
+
+        old_container = $__current_container__
+
+        $__current_container__ = self
+        block.call(self) if block
+
+        $__current_container__ = old_container
+
+        root.gui_state.request_recalculate
+      end
+
+      def apend(&block)
+        old_container = $__current_container__
+
+        $__current_container__ = self
+        block.call(self) if block
+
+        $__current_container__ = old_container
+
+        root.gui_state.request_recalculate
+      end
+
+      def render
+        Gosu.clip_to(@x, @y, width, height) do
+          @children.each(&:draw)
+        end
+
+        if false # DEBUG
+          Gosu.flush
+
+          Gosu.draw_line(
+            x, y, Gosu::Color::RED,
+            x + outer_width, y, Gosu::Color::RED,
+            Float::INFINITY
+          )
+          Gosu.draw_line(
+            x + outer_width, y, Gosu::Color::RED,
+            x + outer_width, y + outer_height, Gosu::Color::RED,
+            Float::INFINITY
+          )
+          Gosu.draw_line(
+            x + outer_width, y + outer_height, Gosu::Color::RED,
+            x, y + outer_height, Gosu::Color::RED,
+            Float::INFINITY
+          )
+          Gosu.draw_line(
+            x, outer_height, Gosu::Color::RED,
+            x, y, Gosu::Color::RED,
+            Float::INFINITY
+          )
+        end
+      end
+
+      def update
+        @children.each(&:update)
+      end
+
+      def hit_element?(x, y)
+        @children.reverse_each do |child|
+          next unless child.visible?
+
+          case child
+          when Container
+            if element = child.hit_element?(x, y)
+              return element
+            end
+          else
+            return child if child.hit?(x, y)
+          end
+        end
+
+        self if hit?(x, y)
+      end
+
+      def recalculate
+        @current_position = Vector.new(@style.margin_left + @style.padding_left, @style.margin_top + @style.padding_top)
+        @current_position += @scroll_position
+
+        return unless visible?
+
+        Stats.increment(:gui_recalculations_last_frame, 1)
+
+        stylize
+
+        layout
+
+        if is_root?
+          @width  = @style.width  = window.width
+          @height = @style.height = window.height
+        else
+          @width = 0
+          @height = 0
+
+          _width = dimensional_size(@style.width, :width)
+          _height = dimensional_size(@style.height, :height)
+
+          @width  = _width  || (@children.map { |c| c.x + c.outer_width }.max || 0).round
+          @height = _height || (@children.map { |c| c.y + c.outer_height }.max || 0).round
+        end
+
+        # Move child to parent after positioning
+        @children.each do |child|
+          child.x += (@x + @style.border_thickness_left) - style.margin_left
+          child.y += (@y + @style.border_thickness_top) - style.margin_top
+
+          child.stylize
+          child.recalculate
+          child.reposition # TODO: Implement top,bottom,left,center, and right positioning
+
+          Stats.increment(:gui_recalculations_last_frame, 1)
+        end
+
+        update_background
+      end
+
+      def layout
+        raise "Not overridden"
+      end
+
+      def max_width
+        _width = dimensional_size(@style.width, :width)
+        if _width
+          outer_width
+        else
+          window.width - (@parent ? @parent.style.margin_right + @style.margin_right : @style.margin_right)
+        end
+      end
+
+      def fits_on_line?(element) # Flow
+        p [@options[:id], @width] if @options[:id]
+        @current_position.x + element.outer_width <= max_width &&
+          @current_position.x + element.outer_width <= window.width
+      end
+
+      def position_on_current_line(element) # Flow
+        element.x = element.style.margin_left + @current_position.x
+        element.y = element.style.margin_top  + @current_position.y
+
+        @current_position.x += element.outer_width
+        @current_position.x = @style.margin_left if @current_position.x >= max_width
+      end
+
+      def tallest_neighbor(querier, _y_position) # Flow
+        response = querier
+        @children.each do |child|
+          response = child if child.outer_height > response.outer_height
+          break if child == querier
+        end
+
+        response
+      end
+
+      def position_on_next_line(child) # Flow
+        @current_position.x = @style.margin_left
+        @current_position.y += tallest_neighbor(child, @current_position.y).outer_height
+
+        child.x = child.style.margin_left + @current_position.x
+        child.y = child.style.margin_top  + @current_position.y
+
+        @current_position.x += child.outer_width
+      end
+
+      def move_to_next_line(element) # Stack
+        element.x = element.style.margin_left + @current_position.x
+        element.y = element.style.margin_top  + @current_position.y
+
+        @current_position.y += element.outer_height
+      end
+
+      def mouse_wheel_up(sender, x, y)
+        return unless @style.scroll
+        return if height < max_scroll_height
+
+        if @scroll_position.y < 0
+          @scroll_position.y += @scroll_speed
+          @scroll_position.y = 0 if @scroll_position.y > 0
+          recalculate
+
+          return :handled
+        end
+      end
+
+      def mouse_wheel_down(sender, x, y)
+        return unless @style.scroll
+        return if height < max_scroll_height
+
+        if @scroll_position.y.abs < max_scroll_height
+          @scroll_position.y -= @scroll_speed
+          @scroll_position.y = -max_scroll_height if @scroll_position.y.abs > max_scroll_height
+          recalculate
+
+          return :handled
+        end
+      end
+
+      def value
+        @children.map { |c| c.class }.join(", ")
+      end
+
+      def to_s
+        "#{self.class} x=#{x} y=#{y} width=#{width} height=#{height} children=#{@children.size}"
+      end
+
+      def write_tree(indent = "", _index = 0)
+        puts self
+
+        indent += "  "
+        @children.each_with_index do |child, i|
+          print "#{indent}#{i}: "
+
+          if child.is_a?(Container)
+            child.write_tree(indent)
+          else
+            puts child
+          end
+        end
+      end
+    end
+  end
+end