bioshogi 0.0.3

data/lib/bioshogi/explain/distribution_ratio_generator.rb

@@ -0,0 +1,48 @@
+# -*- compile-command: "ruby -I../.. -rbioshogi -e Bioshogi::Explain::DistributionRatioGenerator.new.generate" -*-
+# https://www.shogi-extend.com/api/swttars/distribution_ratio
+
+require "faraday"
+
+module Bioshogi
+  module Explain
+    class DistributionRatioGenerator
+      SOURCE_URL = "https://www.shogi-extend.com/api/swars/distribution_ratio.json"
+
+      def generate
+        output_file.write(template % { body: body_hash.pretty_inspect.strip })
+        puts "write: #{output_file}"
+      end
+
+      private
+
+      def body_hash
+        response = Faraday.get(SOURCE_URL)
+        hash = JSON.parse(response.body, symbolize_names: true)
+        validate(hash)
+        hash[:items].inject({}) {|a, e| a.merge(e[:name].to_sym => e) }
+      end
+
+      def output_file
+        Pathname("#{__dir__}/distribution_ratio.rb").expand_path
+      end
+
+      def template
+        o = []
+        o << "# -*- frozen_string_literal: true -*-"
+        o << "# #{__FILE__} から生成しているので編集するべからず"
+        o << "module Bioshogi"
+        o << "  module Explain"
+        o << "    DistributionRatio = %{body}"
+        o << "  end"
+        o << "end"
+        o.join("\n") + "\n"
+      end
+
+      def validate(hash)
+        unless hash[:items].sum { |e| e[:emission_ratio] } == 1.0
+          raise "must not happen"
+        end
+      end
+    end
+  end
+end

data/lib/bioshogi/explain/file_normalizer.rb

@@ -0,0 +1,20 @@
+module Bioshogi
+  module Explain
+    class FileNormalizer
+      def call
+        TacticInfo.all_elements.each.with_index(&method(:normalize_one))
+      end
+
+      private
+
+      def normalize_one(elem, index)
+        if file = elem.sample_kif_or_ki2_file
+          info = Parser.parse(file.read)
+          new_file = file.sub_ext(".kif") # ki2 だった場合を考慮する
+          new_file.write(info.to_kif)
+          puts "[#{index.next} / #{TacticInfo.all_elements.size}] #{new_file}"
+        end
+      end
+    end
+  end
+end

data/lib/bioshogi/explain/group_info.rb

@@ -0,0 +1,16 @@
+# frozen-string-literal: true
+
+module Bioshogi
+  module Explain
+    class GroupInfo
+      include ApplicationMemoryRecord
+      memory_record [
+        { key: "右玉", },
+      ]
+
+      def values
+        @values ||= TacticInfo.all_elements.find_all { |e| e.group_info === self }
+      end
+    end
+  end
+end

data/lib/bioshogi/explain/monitor_mod.rb

@@ -0,0 +1,78 @@
+# frozen-string-literal: true
+
+module Bioshogi
+  module Explain
+    concern :MonitorMod do
+      def execute_after_process
+        player.used_piece_counts[hand.to_counts_key] += 1
+      end
+
+      def move_hand_process(move_hand)
+        super
+
+        if move_hand.soldier.piece.key == :king
+          # if move_hand.origin_soldier.initial_place?
+          #   # 元の位置から動いたか？
+          # end
+          player.king_moved_counter += 1 # 居玉判定用
+          player.king_first_moved_turn ||= container.turn_info.turn_offset # 本当の居玉判定用
+        end
+      end
+
+      # 大駒コンプリートチェック用にしか使ってない、ことはない
+      def piece_box_added(captured_soldier)
+        # 駒を取った回数の記録
+        container.kill_count += 1
+
+        # 駒が取られる最初の手数の記録
+        container.critical_turn ||= container.turn_info.turn_offset
+
+        # 「歩と角」を除く駒が取られる最初の手数の記録
+        unless container.outbreak_turn
+          key = captured_soldier.piece.key
+          if key != :pawn && key != :bishop
+            container.outbreak_turn = container.turn_info.turn_offset
+          end
+        end
+
+        if perform_skill_monitor_enable?
+          TacticInfo.piece_box_added_proc_list.each do |e|
+            if instance_exec(e, captured_soldier, &e.piece_box_added_proc)
+              player.skill_set.list_push(e)
+              skill_set.list_push(e)
+            end
+          end
+        end
+      end
+
+      def clock_add_process
+        super
+
+        if v = @params[:used_seconds]
+          player.single_clock.add(v)
+        end
+      end
+
+      def perform_skill_monitor
+        if perform_skill_monitor_enable?
+          SkillMonitor.new(self).execute
+        end
+      end
+
+      def skill_set
+        @skill_set ||= SkillSet.new
+      end
+
+      def perform_skill_monitor_enable?
+        # return instance_variable_get("@perform_skill_monitor_enable_p") if instance_variable_defined?("@perform_skill_monitor_enable_p")
+        # @perform_skill_monitor_enable_p ||= yield_self do
+        if Bioshogi.config[:skill_monitor_enable]
+          if Dimension.dimension_info.key == :d9x9
+            container.params[:skill_monitor_enable]
+          end
+        end
+        # end
+      end
+    end
+  end
+end

data/lib/bioshogi/explain/note_info.rb

@@ -0,0 +1,63 @@
+# frozen-string-literal: true
+
+module Bioshogi
+  module Explain
+    class NoteInfo
+      include ApplicationMemoryRecord
+      memory_record [
+        { key: "入玉",      trigger_piece_key: {piece_key: :king,   promoted: false, motion: :move}, parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil,  },
+        { key: "角不成",    trigger_piece_key: {piece_key: :bishop, promoted: false, motion: :move}, parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil,  },
+        { key: "飛車不成",  trigger_piece_key: {piece_key: :rook,   promoted: false, motion: :move}, parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil,  },
+
+        { key: "居飛車",    parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil, skip_if_exist_keys: "振り飛車", },
+        { key: "振り飛車",  parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil, skip_if_exist_keys: "居飛車",   },
+
+        # トリガーはもっていないシリーズ
+        { key: "相入玉",             parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil,  },
+        { key: "大駒全消失",         parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil,  },
+        # { key: "居玉",               parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil,  },
+        { key: "相居玉",             parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil,  },
+        { key: "背水の陣",           parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil,  },
+
+        { key: "相居飛車",           parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil,  },
+        { key: "対振り",             parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil,  },
+        { key: "相振り",             parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil,  },
+        { key: "対抗型",             parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil,  },
+
+        # { key: "駒柱",               parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil,  },
+
+        {
+          key: "大駒コンプリート", parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil,
+          piece_box_added_proc: -> note_info, captured_soldier {
+            if captured_soldier.piece.stronger
+              retv = player.stronger_piece_completed?
+
+              # 相手にも追加
+              if retv
+                player.opponent_player.skill_set.list_push(Explain::NoteInfo["大駒全消失"])
+                # list << note_info
+                # skill_set.list_of(e) << note_info
+              end
+
+              retv
+            end
+          },
+        },
+
+        {
+          key: "駒柱", parent: nil, other_parents: nil, alternate_name: nil, alias_names: nil, turn_limit: nil, turn_eq: nil, order_key: nil, not_have_pawn: nil, kill_only: nil, drop_only: nil, pawn_bishop_have_ok: nil, pawn_have_ok: nil, kill_count_lteq: nil,  hold_piece_not_in: nil, hold_piece_in: nil, hold_piece_empty: nil, hold_piece_eq: nil,
+          every_time_proc: -> note_info {
+            retv = player.board.piece_piller_by_latest_piece
+            if retv
+              player.opponent_player.skill_set.list_push(note_info)
+            end
+            retv
+          },
+        },
+      ]
+
+      include ShapeInfoRelation
+      include TechAccessor
+    end
+  end
+end

data/lib/bioshogi/explain/sect_info.rb

@@ -0,0 +1,13 @@
+# frozen-string-literal: true
+
+module Bioshogi
+  module Explain
+    class SectInfo
+      include ApplicationMemoryRecord
+      memory_record [
+        { key: "居飛車",   },
+        { key: "振り飛車", },
+      ]
+    end
+  end
+end