smalruby-editor 0.1.6-x86-mingw32 → 0.1.7-x86-mingw32

data/app/models/concerns/ruby_to_block/block/events_on_click.rb

@@ -0,0 +1,14 @@
+module RubyToBlock
+  module Block
+    class EventsOnClick < CharacterEvent
+      blocknize '^\s*' + CHAR_RE + 'on\(:click\)\s+do\s*$',
+                statement: true, indent: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        add_character_event_blocks(context, md2[1], new)
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/events_on_key_push_or_down.rb

@@ -0,0 +1,17 @@
+module RubyToBlock
+  module Block
+    class EventsOnKeyPushOrDown < CharacterEvent
+      # rubocop:disable LineLength
+      blocknize '^\s*' + CHAR_RE + 'on\(:key_(down|push),\s*([^),]+)\)\s+do\s*$',
+                statement: true, indent: true
+      # rubocop:enable LineLength
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        add_character_event_blocks(context, md2[1],
+                                   new(fields: { KEY: md2[3], POD: md2[2] }))
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/events_on_start.rb

@@ -0,0 +1,14 @@
+module RubyToBlock
+  module Block
+    class EventsOnStart < CharacterEvent
+      blocknize '^\s*' + CHAR_RE + 'on\(:start\)\s+do\s*$',
+                statement: true, indent: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        add_character_event_blocks(context, md2[1], new)
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_init_hardware.rb

@@ -0,0 +1,14 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class HardwareInitHardware < Base
+      blocknize '^\s*init_hardware\s*$', statement: true
+
+      def self.process_match_data(md, context)
+        context.blocks.push(new)
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_led_off.rb

@@ -0,0 +1,16 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class HardwareLedOff < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'led\("(D(?:[2-9]|1[0-3]))"\).off\s*$',
+                statement: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        add_character_method_call_block(context, md2[1],
+                                        new(fields: { PIN: md2[2] }))
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_led_on.rb

@@ -0,0 +1,16 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class HardwareLedOn < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'led\("(D(?:[2-9]|1[0-3]))"\).on\s*$',
+                statement: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        add_character_method_call_block(context, md2[1],
+                                        new(fields: { PIN: md2[2] }))
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_on_sensor_change.rb

@@ -0,0 +1,17 @@
+module RubyToBlock
+  module Block
+    class HardwareOnSensorChange < CharacterEvent
+      # rubocop:disable LineLength
+      blocknize '^\s*' + CHAR_RE + 'on\(:sensor_change,\s*"(A[0-5])"\s*\)\s+do\s*$',
+                statement: true, indent: true
+      # rubocop:enable LineLength
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        add_character_event_blocks(context, md2[1],
+                                   new(fields: { PIN: md2[2] }))
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_rgb_led_off.rb

@@ -0,0 +1,18 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class HardwareRgbLedOff < CharacterMethodCall
+      # rubocop:disable LineLength
+      blocknize '^\s*' + CHAR_RE + 'rgb_led_(anode|cathode)\("(D[39])"\)\.off\s*$',
+                statement: true
+      # rubocop:enable LineLength
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        block = new(fields: { AC: md2[2], PIN: md2[3] })
+        add_character_method_call_block(context, md2[1], block)
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_rgb_led_on.rb

@@ -0,0 +1,23 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class HardwareRgbLedOn < CharacterMethodCall
+      # rubocop:disable LineLength
+      blocknize '^\s*' + CHAR_RE + 'rgb_led_(anode|cathode)\("(D[39])"\).on\(color:\s*\[(\d+),\s*(\d+),\s*(\d+)\]\)\s*$',
+                statement: true
+      # rubocop:enable LineLength
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+
+        color = [md2[4], md2[5], md2[6]].map(&:to_i)
+        return false if color.any? { |c| c < 0 || c > 255 }
+        color_code = '#' + color.map { |c| sprintf('%02x', c) }.join
+        block = new(fields: { AC: md2[2], PIN: md2[3], COLOUR: color_code })
+
+        add_character_method_call_block(context, md2[1], block)
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_sensor_value.rb

@@ -0,0 +1,23 @@
+module RubyToBlock
+  module Block
+    class HardwareSensorValue < Value
+      include CharacterOperation
+
+      blocknize '^\s*' + CHAR_RE + 'sensor\(\s*"(A[0-5])"\s*\)\.value\s*$',
+                value: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+
+        character = get_character(context, md2[1])
+        return false if context.receiver != character
+
+        block = new(fields: { PIN: md2[2] })
+        context.add_value(block)
+        block.character = character
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/hardware_two_wheel_drive_car.rb

@@ -0,0 +1,26 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class HardwareTwoWheelDriveCar < CharacterMethodCall
+      # rubocop:disable LineLength
+      blocknize '^\s*' + CHAR_RE + 'two_wheel_drive_car\("(D(?:[2-9]|10))"\).(forward|backward|turn_left|turn_right|stop)\s*$',
+                statement: true
+      # rubocop:enable LineLength
+
+      attr_accessor :method_name
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        block =
+          add_character_method_call_block(context, md2[1],
+                                          new(fields: { PIN: md2[2] }))
+        block.method_name = md2[3]
+        true
+      end
+
+      def type
+        "hardware_two_wheel_drive_car_#{method_name}"
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/looks_hide.rb

@@ -0,0 +1,8 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class LooksHide < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'visible\s*=\s*false\s*$', statement: true
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/looks_say.rb

@@ -0,0 +1,20 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class LooksSay < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'say\(message:\s*("[^"]*")\)\s*$',
+                statement: true, inline: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+
+        block = new
+        _, context.current_block =
+          *add_child_or_create_character_new_block(context, md2[1], block)
+        process_value_string(context, block, md2[2], :TEXT)
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/looks_show.rb

@@ -0,0 +1,8 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class LooksShow < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'visible\s*=\s*true\s*$', statement: true
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/looks_vanish.rb

@@ -0,0 +1,8 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class LooksVanish < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'vanish\s*$', statement: true
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/math_number.rb

@@ -0,0 +1,14 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class MathNumber < Value
+      blocknize '^\s*([+-]?\d+(?:\.\d+)?)\s*$', value: true
+
+      def self.process_match_data(md, context)
+        context.add_value(new(fields: { NUM: md[type].sub(/^\+/, '') }))
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_change_x_by.rb

@@ -0,0 +1,20 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class MotionChangeXBy < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'x\s*\+=\s*(\S+)\s*$',
+                statement: true, inline: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+
+        block = new
+        _, context.current_block =
+          *add_child_or_create_character_new_block(context, md2[1], block)
+        process_value_string(context, block, md2[2], 'X')
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_change_y_by.rb

@@ -0,0 +1,20 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class MotionChangeYBy < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'y\s*\+=\s*(\S+)\s*$',
+                statement: true, inline: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+
+        block = new
+        _, context.current_block =
+          *add_child_or_create_character_new_block(context, md2[1], block)
+        process_value_string(context, block, md2[2], 'Y')
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_move.rb

@@ -0,0 +1,15 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class MotionMove < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'move\((.+)\)\s*$',
+                statement: true, inline: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        add_character_method_call_block(context, md2[1], new, STEP: md2[2])
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_point_towards_character.rb

@@ -0,0 +1,24 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class MotionPointTowardsCharacter < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'point_towards\(([^:)]+)\)\s*$',
+                statement: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+
+        name = md2[2]
+        name.strip!
+        c = context.characters[name]
+        return false unless c
+
+        block = new(fields: { CHAR: name })
+        _, context.current_block =
+          *add_child_or_create_character_new_block(context, md2[1], block)
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_point_towards_mouse.rb

@@ -0,0 +1,9 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class MotionPointTowardsMouse < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'point_towards\(:mouse\)\s*$',
+                statement: true
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_reach_wall.rb

@@ -0,0 +1,24 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class MotionReachWall < Value
+      include CharacterOperation
+
+      blocknize '^\s*' + CHAR_RE + 'reach_wall\?\s*$',
+                value: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+
+        character = get_character(context, md2[1])
+        return false if context.receiver != character
+
+        block = new
+        context.add_value(block)
+        block.character = character
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_rotate_left.rb

@@ -0,0 +1,20 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class MotionRotateLeft < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'rotate\(\-(\d+)\)\s*$',
+                statement: true, inline: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+
+        block = new
+        _, context.current_block =
+          *add_child_or_create_character_new_block(context, md2[1], block)
+        process_value_string(context, block, md2[2], :ANGLE)
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_rotate_right.rb

@@ -0,0 +1,20 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class MotionRotateRight < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'rotate\(\+?(\d+)\)\s*$',
+                statement: true, inline: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+
+        block = new
+        _, context.current_block =
+          *add_child_or_create_character_new_block(context, md2[1], block)
+        process_value_string(context, block, md2[2], :ANGLE)
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_self_angle.rb

@@ -0,0 +1,23 @@
+module RubyToBlock
+  module Block
+    class MotionSelfAngle < Value
+      include CharacterOperation
+
+      blocknize '^\s*' + CHAR_RE + 'angle\s*$',
+                value: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+
+        character = get_character(context, md2[1])
+        return false if context.receiver != character
+
+        block = new
+        context.add_value(block)
+        block.character = character
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_self_x.rb

@@ -0,0 +1,23 @@
+module RubyToBlock
+  module Block
+    class MotionSelfX < Value
+      include CharacterOperation
+
+      blocknize '^\s*' + CHAR_RE + 'x\s*$',
+                value: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+
+        character = get_character(context, md2[1])
+        return false if context.receiver != character
+
+        block = new
+        context.add_value(block)
+        block.character = character
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_self_y.rb

@@ -0,0 +1,23 @@
+module RubyToBlock
+  module Block
+    class MotionSelfY < Value
+      include CharacterOperation
+
+      blocknize '^\s*' + CHAR_RE + 'y\s*$',
+                value: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+
+        character = get_character(context, md2[1])
+        return false if context.receiver != character
+
+        block = new
+        context.add_value(block)
+        block.character = character
+
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_set_angle.rb

@@ -0,0 +1,15 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class MotionSetAngle < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'angle\s*=\s*(\S+)\s*$',
+                statement: true, inline: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        add_character_method_call_block(context, md2[1], new, ANGLE: md2[2])
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_set_x.rb

@@ -0,0 +1,38 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class MotionSetX < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'x\s*=\s*(\S+)\s*$',
+                statement: true, inline: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        block = add_character_method_call_block(context, md2[1], new,
+                                                X: md2[2])
+
+        md3 = MotionSetY.regexp.match(context.look_next_line)
+        process_motion_set_y(context, block, md3) if md3
+
+        true
+      end
+
+      def self.process_motion_set_y(context, block, md)
+        if block.character == get_character(context, md[1])
+          process_value_string(context, block, md[2], :Y)
+          context.next_line
+        end
+      rescue
+        return
+      end
+      private_class_method :process_motion_set_y
+
+      def type
+        if @values.key?(:Y)
+          'motion_set_x_y'
+        else
+          super
+        end
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_set_y.rb

@@ -0,0 +1,15 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class MotionSetY < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'y\s*=\s*(\S+)\s*$',
+                statement: true, inline: true
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+        add_character_method_call_block(context, md2[1], new, Y: md2[2])
+        true
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_turn.rb

@@ -0,0 +1,8 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class MotionTurn < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'turn\s*$', statement: true
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/motion_turn_if_reach_wall.rb

@@ -0,0 +1,8 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class MotionTurnIfReachWall < CharacterMethodCall
+      blocknize '^\s*' + CHAR_RE + 'turn_if_reach_wall\s*$', statement: true
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/null.rb

@@ -0,0 +1,17 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    # Null(何もない)ブロックを表現する
+    class Null < Base
+      def to_xml(parent)
+        return nil unless @sibling
+
+        @sibling.to_xml(parent)
+      end
+
+      def null?
+        !@sibling
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/operators_compare.rb

@@ -0,0 +1,36 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class OperatorsCompare < Value
+      blocknize '^\s*(\S+?)\s*(<|<=|==|>=|>)\s*(\S+?)\s*$',
+                value: true, inline: true
+
+      OPERATOR_TO_TYPE = {
+        '<' => "#{type}_lt",
+        '<=' => "#{type}_lte",
+        '==' => "#{type}_eq",
+        '>=' => "#{type}_gte",
+        '>' => "#{type}_gt",
+      }
+
+      attr_accessor :compare_type
+
+      def self.process_match_data(md, context)
+        md2 = regexp.match(md[type])
+
+        block = new
+        context.add_value(block)
+
+        process_value_string(context, block, md2[1], :A)
+        block.compare_type = md2[2]
+        process_value_string(context, block, md2[3], :B)
+
+        true
+      end
+
+      def type
+        OPERATOR_TO_TYPE[@compare_type]
+      end
+    end
+  end
+end

data/app/models/concerns/ruby_to_block/block/operators_false.rb

@@ -0,0 +1,8 @@
+# -*- coding: utf-8 -*-
+module RubyToBlock
+  module Block
+    class OperatorsFalse < Value
+      blocknize '^\s*false\s*$', value: true
+    end
+  end
+end