kredki 0.1.0

data/lib/kredki/pads/pad/pad_events.rb

@@ -0,0 +1,358 @@
+module Kredki
+  module Pads
+    # Event with position
+    class PositionEvent < Event
+
+      def initialize x, y, ...
+        super(...)
+        @x = x
+        @y = y
+      end
+
+      # Get X axis offset.
+      def x
+        @x
+      end
+
+      # Get Y axis offset.
+      def y
+        @y
+      end
+
+      # Get X and Y axes offset.
+      def xy
+        [@x, @y]
+      end
+
+      # Get main parameter.
+      def param
+        xy
+      end
+    end
+
+    class MouseButtonClickEvent < Event
+
+      # Get event button.
+      def button
+        @source.button
+      end
+
+      # Get main parameter.
+      def param
+        @source.param
+      end
+
+      # Get binding button code.
+      def code
+        @source.code
+      end
+
+      # Get position along X axis.
+      def x
+        @source.x
+      end
+
+      # Get position along Y axis.
+      def y
+        @source.y
+      end
+
+      # Get click combo.
+      def combo
+        @combo
+      end
+
+      # Get position along X and Y axes.
+      def xy
+        [x, y]
+      end
+
+      def timestamp
+        @source.timestamp
+      end
+
+      # :section: LEVEL 2
+
+      attr_writer :combo
+    end
+
+    class KeyClickEvent < Event
+      include Keyboard::ModifiersDecoder
+        
+      # Get event key.
+      def key
+        @source&.key
+      end
+
+      # Get main parameter.
+      def param
+        @source&.param
+      end
+
+      # Get binding key code.
+      def code
+        @source&.code
+      end
+
+      # :section: LEVEL 2
+
+      def modifiers
+        @source.modifiers
+      end
+    end
+
+    class FocusOfferEvent < Event
+    end
+
+    class VisionOfferEvent < PositionEvent
+
+      # Get size in the X axis.
+      def size_x
+        @size_x
+      end
+
+      # Get size in the Y axis.
+      def size_y
+        @size_y
+      end
+
+      # Get size.
+      def size
+        [@size_x, @size_y]
+      end
+
+      # :section: LEVEL 2
+      
+      def initialize size_x, size_y, ...
+        super(...)
+        @size_x = size_x
+        @size_y = size_y
+      end
+      
+    end
+
+    module PadEvents
+
+      def on event_type, early: false, always: false, do: nil, &block
+        @event_manager.manager event_type, block || binding.local_variable_get(:do), early, always
+      end
+
+      # Create and attach key pressed event reaction.
+      def on_key_press *filtered_keys, early: false, always: false, do: nil, &block
+        keycodes = Kredki.keyboard.keycodes filtered_keys
+        @event_manager.keyboard_manager KeyboardKeyPressEvent, keycodes, block || binding.local_variable_get(:do), early, always
+      end
+
+      # See #on_key_press.
+      def on_key_press= param
+        on_key_press do: param
+      end
+
+      # Create and attach key up event reaction.
+      def on_key_release *filtered_keys, early: false, always: false, do: nil, &block
+        keycodes = Kredki.keyboard.keycodes filtered_keys
+        @event_manager.keyboard_manager KeyboardKeyReleaseEvent, keycodes, block || binding.local_variable_get(:do), early, always
+      end
+
+      # See #on_key_release.
+      def on_key_release= param
+        on_key_release do: param
+      end
+
+      # Create and attach key event reaction.
+      def on_key *filtered_keys, early: false, always: false, do: nil, &block
+        keycodes = Kredki.keyboard.keycodes filtered_keys
+        @event_manager.keyboard_manager KeyClickEvent, keycodes, block || binding.local_variable_get(:do), early, always
+      end
+
+      # See #on_key.
+      def on_key= param
+        on_key do: param
+      end
+
+      def on_text_input ...
+        on(TextInputEvent, ...)
+      end
+
+      # See #on_text_input.
+      def on_text_input= param
+        on_text_input do: param
+      end
+  
+      # Create and attach mouse pressed event reaction.
+      def on_mouse_press *filtered_buttons, early: false, always: false, do: nil, &block
+        indexes = Kredki.mouse.indexes filtered_buttons
+        @event_manager.mouse_manager MouseButtonPressEvent, indexes, block || binding.local_variable_get(:do), early, always
+      end
+
+      # See #on_mouse_press.
+      def on_mouse_press= param
+        on_mouse_press do: param
+      end
+  
+      # Create and attach mouse up event reaction.
+      def on_mouse_release *filtered_buttons, early: false, always: false, do: nil, &block
+        indexes = Kredki.mouse.indexes filtered_buttons
+        @event_manager.mouse_manager MouseButtonReleaseEvent, indexes, block || binding.local_variable_get(:do), early, always
+      end
+
+      # See #on_mouse_release.
+      def on_mouse_release= param
+        on_mouse_release do: param
+      end
+
+      # Create and attach mouse click event reaction.
+      def on_mouse_click *filtered_buttons, early: false, always: false, do: nil, &block
+        indexes = Kredki.mouse.indexes filtered_buttons
+        @event_manager.mouse_manager MouseButtonClickEvent, indexes, block || binding.local_variable_get(:do), early, always
+      end
+
+      # See #on_mouse_click.
+      def on_mouse_click= param
+        on_mouse_click do: param
+      end
+
+      # Create and attach mouse enter event reaction.
+      def on_mouse_enter ...
+        on(MousePointerEnterEvent, ...)
+      end
+
+      # See #on_mouse_enter.
+      def on_mouse_enter= param
+        on_mouse_enter do: param
+      end
+
+      # Create and attach mouse leave event reaction.
+      def on_mouse_leave ...
+        on(MousePointerLeaveEvent, ...)
+      end
+
+      # See #on_mouse_leave.
+      def on_mouse_leave= param
+        on_mouse_leave do: param
+      end
+
+      # Create and attach mouse move event reaction.
+      def on_mouse_move ...
+        on(MousePointerMoveEvent, ...)
+      end
+
+      # See #on_mouse_move.
+      def on_mouse_move= param
+        on_mouse_move do: param
+      end
+
+      # Create and attach mouse scroll event reaction.
+      def on_mouse_scroll ...
+        on(MouseWheelScrollEvent, ...)
+      end
+
+      # See #on_mouse_scroll.
+      def on_mouse_scroll= param
+        on_mouse_scroll do: param
+      end
+      
+      # Create and attach joystick press event reaction.
+      def on_joystick_press *buttons, joystick: nil, early: false, always: false, do: nil, &block
+        j = Kredki.joystick joystick
+        indexes = j.buttons buttons
+        j = nil if joystick.nil?
+        @event_manager.joystick_manager JoystickButtonPressEvent, j, indexes, block || binding.local_variable_get(:do), early, always
+      end
+
+      # See #on_joystick_press.
+      def on_joystick_press= param
+        on_joystick_press do: param
+      end
+
+      # Create and attach joystick release event reaction.
+      def on_joystick_release *buttons, joystick: nil, early: false, always: false, do: nil, &block
+        j = Kredki.joystick joystick
+        indexes = j.buttons buttons
+        j = nil if joystick.nil?
+        @event_manager.joystick_manager JoystickButtonReleaseEvent, j, indexes, block || binding.local_variable_get(:do), early, always
+      end
+
+      # See #on_joystick_release.
+      def on_joystick_release= param
+        on_joystick_release do: param
+      end
+
+      # Create and attach joystick axis(axes) move event reaction.
+      def on_joystick_move *axes, joystick: nil, early: false, always: false, do: nil, &block
+        j = Kredki.joystick joystick
+        indexes = j.axes axes
+        j = nil if joystick.nil?
+        @event_manager.joystick_manager JoystickAxisMoveEvent, j, indexes, block || binding.local_variable_get(:do), early, always
+      end
+
+      # See #on_joystick_move.
+      def on_joystick_move= reaction
+        on_joystick_move do: reaction
+      end
+
+      # Create and attach joystick hat(hats) switch event reaction.
+      def on_joystick_switch *hats, joystick: nil, early: false, always: false, do: nil, &block
+        j = Kredki.joystick joystick
+        indexes = j.hats hats
+        j = nil if joystick.nil?
+        @event_manager.joystick_manager JoystickHatSwitchEvent, j, indexes, block || binding.local_variable_get(:do), early, always
+      end
+
+      # See #on_joystick_switch.
+      def on_joystick_switch= reaction
+        on_joystick_switch do: reaction
+      end
+
+      # Create and attach file drop event reaction.
+      def on_drop ...
+        on(DropEvent, ...)
+      end
+
+      # See #on_drop.
+      def on_drop= reaction
+        on_drop do: reaction
+      end
+
+      # Create and attach show event reaction.
+      def on_show ...
+        on(ShowEvent, ...)
+      end
+
+      # See #on_show.
+      def on_show= param
+        on_show do: param
+      end
+
+      # Create and attach hide event reaction.
+      def on_hide ...
+        on(HideEvent, ...)
+      end
+
+      # See #on_hide.
+      def on_hide= param
+        on_hide do: param
+      end
+
+      # Create and attach focus enter event reaction.
+      def on_focus_enter ...
+        on(FocusEnterEvent, ...)
+      end
+
+      # See #on_focus_enter.
+      def on_focus_enter= param
+        on_focus_enter do: param
+      end
+
+      # Create and attach focus leave event reaction.
+      def on_focus_leave ...
+        on(FocusLeaveEvent, ...)
+      end
+
+      # See #on_focus_leave.
+      def on_focus_leave= param
+        on_focus_leave do: param
+      end
+    end
+  end
+end

data/lib/kredki/pads/pad/picture_pad.rb

@@ -0,0 +1,89 @@
+module Kredki
+  module Pads
+    # Pad with picture area.
+    class PicturePad < Pad
+
+      # Set a feature recognized by its class.
+      def << arg
+        case arg
+        when String
+          set_subject arg
+        else
+          super
+        end
+      end
+
+      # :section: LEVEL 2
+
+      def initialize_area
+        @area = @scene.new_picture
+      end
+
+      def min_size_x_value margin
+        case @size_x
+        when Ratio
+          get_size_y * @area.aspect_ratio
+        else super
+        end
+      end
+
+      def update_subject subject
+        @area.set_content subject, @size_x == Auto && @size_y == Auto
+      end
+
+      def min_size_x_limit limit, margin
+        case limit
+        when Ratio
+          get_size_y * @area.aspect_ratio
+        else super
+        end
+      end
+
+      def get_size_x_value size_x, reference_size_x, size_y
+        case size_x
+        when Ratio
+          if @ratio
+            size_y ||= @area.original_size[1]
+          else
+            @ratio = true
+            size_y ||= get_size_y
+            @ratio = false
+          end
+          size_y * @area.aspect_ratio
+        else super
+        end
+      end
+
+      def min_size_y_value margin
+        case @size_y
+        when Ratio
+          get_size_x / @area.aspect_ratio
+        else super
+        end
+      end
+
+      def min_size_y_limit limit, margin
+        case limit
+        when Ratio
+          get_size_x / @area.aspect_ratio
+        else super
+        end
+      end
+
+      def get_size_y_value size_y, reference_size_y, size_x
+        case size_y
+        when Ratio
+          if @ratio
+            size_x ||= @area.original_size[0]
+          else
+            @ratio = true
+            size_x ||= get_size_x
+            @ratio = false
+          end
+          size_x / @area.aspect_ratio
+        else super
+        end
+      end
+    end
+  end
+end

data/lib/kredki/pads/pad/rectangle_pad.rb

@@ -0,0 +1,181 @@
+module Kredki
+  module Pads
+    # Pad with rectangle area.
+    class RectanglePad < ShapePad
+
+      # Set X start Y start corner.
+      def set_corner_ss corner_ss = @area.corner_ss, clip: :auto
+        return send_bundle :set_corner_ss, yield(self.corner_ss) if block_given?
+        @area.set_corner_ss(corner_ss) | 
+        if clip == :auto
+          @clip_area.set_corner_ss corner_ss - (@margin_xs + @margin_ys) * 0.5
+        elsif clip
+          @clip_area.set_corner_ss clip
+        end
+      end
+      
+      # See #set_corner_ss.
+      def corner_ss= param
+        send_bundle :set_corner_ss, param
+      end
+      
+      # Get X start Y start corner.
+      def corner_ss
+        @area.corner_ss
+      end
+
+      # Set X end Y start corner.
+      def set_corner_es corner_es = @area.corner_es, clip: :auto
+        return send_bundle :set_corner_es, yield(self.corner_es) if block_given?
+        @area.set_corner_es(corner_es) | 
+        if clip == :auto
+          @clip_area.set_corner_es corner_es - (@margin_xe + @margin_ys) * 0.5
+        elsif clip
+          @clip_area.set_corner_es clip
+        end
+      end
+      
+      # See #set_corner_es.
+      def corner_es= param
+        send_bundle :set_corner_es, param
+      end
+      
+      # Get X end Y start corner.
+      def corner_es
+        @area.corner_es
+      end
+
+      # Set X start Y end corner.
+      def set_corner_se corner_se = @area.corner_se, clip: :auto
+        return send_bundle :set_corner_se, yield(self.corner_se) if block_given?
+        @area.set_corner_se(corner_se) | 
+        if clip == :auto
+          @clip_area.set_corner_se corner_se - (@margin_xs + @margin_ye) * 0.5
+        elsif clip
+          @clip_area.set_corner_se clip
+        end
+      end
+      
+      # See #set_corner_se.
+      def corner_se= param
+        send_bundle :set_corner_se, param
+      end
+      
+      # Get X start Y end corner.
+      def corner_se
+        @area.corner_se
+      end
+
+      # Set X end Y end corner.
+      def set_corner_ee corner_ee = @area.corner_ee, clip: :auto
+        return send_bundle :set_corner_ee, yield(self.corner_ee) if block_given?
+        @area.set_corner_ee(corner_ee) | 
+        if clip == :auto
+          @clip_area.set_corner_ee corner_ee - (@margin_xe + @margin_ye) * 0.5
+        elsif clip
+          @clip_area.set_corner_ee clip
+        end
+      end
+      
+      # See #set_corner_ee.
+      def corner_ee= param
+        send_bundle :set_corner_ee, param
+      end
+      
+      # Get X end Y end corner.
+      def corner_ee
+        @area.corner_ee
+      end
+
+      # Set X start corners.
+      def set_corner_xs corner_ss = @area.corner_ss, corner_se = corner_ss, clip: :auto
+        return send_bundle :set_corner_xs, yield(self.corner_xs) if block_given?
+        set_corner_ss(corner_ss, clip: clip) | set_corner_se(corner_se, clip: clip)
+      end
+      
+      # See #set_corner_xs.
+      def corner_xs= param
+        send_bundle :set_corner_xs, param
+      end
+      
+      # Get X start corners.
+      def corner_xs
+        [corner_ss, corner_se]
+      end
+
+      # Set X end corners.
+      def set_corner_xe corner_es = @area.corner_es, corner_ee = corner_es, clip: :auto
+        return send_bundle :set_corner_xe, yield(self.corner_xe) if block_given?
+        set_corner_es(corner_es, clip: clip) | set_corner_ee(corner_ee, clip: clip)
+      end
+      
+      # See #set_corner_xe.
+      def corner_xe= param
+        send_bundle :set_corner_xe, param
+      end
+      
+      # Get X end corners.
+      def corner_xe
+        [corner_es, corner_ee]
+      end
+
+      # Set Y start corners.
+      def set_corner_ys corner_ss = @area.corner_ss, corner_es = corner_ss, clip: :auto
+        return send_bundle :set_corner_ys, yield(self.corner_ys) if block_given?
+        set_corner_ss(corner_ss, clip: clip) | set_corner_es(corner_es, clip: clip)
+      end
+      
+      # See #set_corner_ys.
+      def corner_ys= param
+        send_bundle :set_corner_ys, param
+      end
+      
+      # Get Y start corners.
+      def corner_ys
+        [corner_ss, corner_es]
+      end
+
+      # Set Y end corners.
+      def set_corner_ye corner_se = @area.corner_se, corner_ee = corner_se, clip: :auto
+        return send_bundle :set_corner_ye, yield(self.corner_ye) if block_given?
+        set_corner_se(corner_se, clip: clip) | set_corner_ee(corner_ee, clip: clip)
+      end
+      
+      # See #set_corner_ye.
+      def corner_ye= param
+        send_bundle :set_corner_ye, param
+      end
+      
+      # Get Y end corners.
+      def corner_ye
+        [corner_se, corner_ee]
+      end
+
+      # Set corners.
+      def set_corner corner_ss = @area.corner_ss, corner_es = corner_ss, corner_se = corner_ss, corner_ee = corner_es, clip: :auto, **ka
+        return send_bundle :set_corner, yield(self.corner) if block_given?
+        set_corner_ss(corner_ss, clip: clip) | 
+        set_corner_es(corner_es, clip: clip) |
+        set_corner_se(corner_se, clip: clip) |
+        set_corner_ee(corner_ee, clip: clip) |
+        send_branch(__method__, ka)
+      end
+      
+      # See #set_corner.
+      def corner= param
+        send_bundle :set_corner, param
+      end
+      
+      # Get corners.
+      def corner
+        [corner_ss, corner_es, corner_se, corner_ee]
+      end
+
+      # :section: LEVEL 2
+
+      def initialize_area
+        @area = @scene.new_rectangle
+      end
+    end
+  end
+end