bioshogi 0.0.3

data/lib/bioshogi/preset_info.rb

@@ -0,0 +1,130 @@
+# frozen-string-literal: true
+module Bioshogi
+  class PresetInfo
+    include ApplicationMemoryRecord
+    # special_piece:
+    #   大駒があるか？
+    #   大駒がないのに「居飛車」と言うのはおかしいので special_piece を確認する
+    #
+    # minor:
+    #   一般的なソフトが対応してないものか？
+    #   逆算で安易に「手合割：トンボ」と表記しないようにするため
+    #   と一般的なソフトはなにそれ状態になり初期配置を用意できない
+    #
+    # handicap:
+    #   △が初手を指すモードか？
+    #
+    memory_record [
+      { key: "平手",           minor: false, handicap: false, special_piece: true,  piece_boxes: { black: "",       white: "",       }, },
+      { key: "香落ち",         minor: false, handicap: true,  special_piece: true,  piece_boxes: { black: "",       white: "",       }, },
+      { key: "右香落ち",       minor: true,  handicap: true,  special_piece: true,  piece_boxes: { black: "",       white: "",       }, },
+      { key: "角落ち",         minor: false, handicap: true,  special_piece: false, piece_boxes: { black: "",       white: "",       }, },
+      { key: "飛車落ち",       minor: false, handicap: true,  special_piece: false, piece_boxes: { black: "",       white: "",       }, },
+      { key: "飛香落ち",       minor: false, handicap: true,  special_piece: false, piece_boxes: { black: "",       white: "",       }, },
+      { key: "二枚落ち",       minor: false, handicap: true,  special_piece: false, piece_boxes: { black: "",       white: "",       }, },
+      { key: "二枚持ち",       minor: true,  handicap: true,  special_piece: false, piece_boxes: { black: "飛角",   white: "",       }, }, # これは盤の情報から逆算できない。「二枚落ち」と判定されてしまうため、根本的にロジックを変更しないといけない。
+      { key: "三枚落ち",       minor: false, handicap: true,  special_piece: false, piece_boxes: { black: "",       white: "",       }, }, # 1849/03/15 伊藤宗印 vs 天満屋 の手合割にある
+      { key: "四枚落ち",       minor: false, handicap: true,  special_piece: false, piece_boxes: { black: "",       white: "",       }, },
+      { key: "六枚落ち",       minor: false, handicap: true,  special_piece: false, piece_boxes: { black: "",       white: "",       }, },
+      { key: "トンボ",         minor: true,  handicap: true,  special_piece: true,  piece_boxes: { black: "",       white: "",       }, },
+      { key: "八枚落ち",       minor: false, handicap: true,  special_piece: false, piece_boxes: { black: "",       white: "",       }, },
+      { key: "十枚落ち",       minor: false, handicap: true,  special_piece: false, piece_boxes: { black: "",       white: "",       }, },
+      { key: "十九枚落ち",     minor: true,  handicap: true,  special_piece: false, piece_boxes: { black: "",       white: "",       }, },
+      { key: "二十枚落ち",     minor: true,  handicap: true,  special_piece: false, piece_boxes: { black: "",       white: "",       }, },
+      { key: "青空将棋",       minor: true,  handicap: false, special_piece: true,  piece_boxes: { black: "",       white: "",       }, },
+      { key: "バリケード将棋", minor: true,  handicap: false, special_piece: true,  piece_boxes: { black: "飛角香", white: "飛角香", }, },
+      { key: "5五将棋",        minor: true,  handicap: false, special_piece: true,  piece_boxes: { black: "",       white: "",       }, },
+    ]
+
+    class << self
+      def lookup(key)
+        key = key.to_s
+        key = key.sub(/[5５五][5５五々]/, "5五") # 五々将棋 -> 5五将棋
+        key = key.sub(/(.)車/, '\1')             # 飛車 香車 -> 飛 香
+        key = key.sub(/飛落/, "飛車落")
+        key = key.sub(/裸玉/, "十九枚落ち")
+        key = key.sub(/詰将棋/, "平手")
+        key = key.sub(/落\z/, "落ち")            # 香落 -> 香落ち
+        super
+      end
+
+      # 一般的なものに絞る
+      def major_list
+        @major_list ||= reject(&:minor)
+      end
+
+      # 持駒の比較は別途行う必要あり
+      def lookup_by_soldiers(soldiers, options = {})
+        options = {
+          :optimize        => false, # 速くなる (気がするだけでほとんど効果がない)
+          :inclusion_minor => false, # トンボなど一般的な名前も含めるか？
+        }.merge(options)
+
+        if options[:optimize]
+          raise "must not happen"
+          # # 盤上の駒数で瞬時に比較すれば全体と比較する必要はなくなり速くなるかと思ったが誤差だった
+          # @lookup_by_soldiers ||= yield_self {
+          #   list = to_a
+          #   if options[:public_name]
+          #     list = list.find_all(&:public_name)
+          #   end
+          #   list.group_by { |e| e.shape_info.board_parser.soldiers.count }
+          # }
+          # if list = @lookup_by_soldiers[soldiers.count]
+          #   sorted_soldiers = soldiers.sort
+          #   list.find do |e|
+          #     sorted_soldiers == e.sorted_soldiers
+          #   end
+          # end
+        else
+          sorted_soldiers = soldiers.sort
+          if options[:inclusion_minor]
+            list = to_a
+          else
+            list = major_list
+          end
+          list.find { |e| sorted_soldiers == e.sorted_soldiers }
+        end
+      end
+    end
+
+    def to_sfen
+      container = Container::Basic.new
+      container.placement_from_preset(key)
+      container.turn_info.handicap = handicap
+      container.to_short_sfen
+    end
+
+    def to_short_sfen
+      to_sfen
+    end
+
+    def to_board
+      Board.new.tap do |e|
+        e.placement_from_preset(key)
+      end
+    end
+
+    # 手合を元に手番を得る
+    def to_turn_info
+      TurnInfo.new(handicap: handicap)
+    end
+
+    # 格式の高さ(ソート用)
+    def formal_level
+      self.class.count - code
+    end
+
+    # 平手と比べてどこの駒が足りないかがわかる
+    # PresetInfo["二枚落ち"].declined_soldiers.collect(&:to_s) # => ["△８二飛", "△２二角"]
+    def declined_soldiers
+      @declined_soldiers ||= self.class.fetch("平手").sorted_soldiers - sorted_soldiers
+    end
+
+    def handicap_shift
+      handicap ? 1 : 0
+    end
+
+    include Explain::ShapeInfoRelation
+  end
+end

data/lib/bioshogi/rect.rb

@@ -0,0 +1,6 @@
+module Bioshogi
+  class Rect < V
+    alias w x
+    alias h y
+  end
+end

data/lib/bioshogi/screen_image/README.org

@@ -0,0 +1,14 @@
+* 各レイヤーの特徴
+
+|---------------------+------+--------+---------+----+--------------+----------|
+| name                | 用途 | static | dynamic | 影 | 影キャッシュ | リセット |
+|---------------------+------+--------+---------+----+--------------+----------|
+| d_piece_count_layer | 駒数 |        | o       |    |              | o        |
+| d_piece_layer       | 駒   |        | o       | o  |              | o        |
+| s_lattice_layer     | 格子 | o      |         |    |              |          |
+| d_move_layer        | 動き |        | o       |    |              | o        |
+| s_board_layer       | 盤   | o      |         | o  | o            |          |
+| s_canvas_layer      | 背景 | o      |         |    |              |          |
+|---------------------+------+--------+---------+----+--------------+----------|
+
+static + 影 のレイヤーは影を作っておく

data/lib/bioshogi/screen_image/board_methods.rb

@@ -0,0 +1,148 @@
+module Bioshogi
+  module ScreenImage
+    concern :BoardMethods do
+      private
+
+      def lattice_layer_create
+        transparent_layer(:s_lattice_layer).tap do |e|
+          lattice_draw(e)
+          inner_frame_draw(e)
+          star_draw(e)
+        end
+      end
+
+      # 外枠を含まない格子
+      # line で stroke を使うと fill + stroke で二重に同じところを塗るっぽい
+      # だから半透明にしても濃くなる
+      # なので fill だけにする
+      def lattice_draw(layer)
+        draw_context(layer) do |g|
+          g.fill(inner_frame_lattice_color) # 塗り潰し色で line する (stroke と勘違いしがち)
+          (1...lattice.w).each do |x|
+            line_draw(g, V[x, 0], V[x, lattice.h])
+          end
+          (1...lattice.h).each do |y|
+            line_draw(g, V[0, y], V[lattice.w, y])
+          end
+        end
+      end
+
+      # 格子の外枠
+      # 盤から見れば内側
+      # 基本透明で枠だけを描画する
+      # 塗り潰したいときは board_layer_create の方で行うべき
+      # inner_frame_stroke_width が 0 または nil で inner_frame_fill_color も nil ならスキップ
+      def inner_frame_draw(layer)
+        if inner_frame_stroke_width > 0 || params[:inner_frame_fill_color]
+          draw_context(layer) do |g|
+            g.stroke(inner_frame_stroke_color)
+            g.stroke_width(inner_frame_stroke_width)
+            g.fill = params[:inner_frame_fill_color] || "transparent"
+            g.rectangle(*px(V[0, 0]), *px(V[lattice.w, lattice.h])) # QUESTION: 右下は -1, -1 するべきか？
+          end
+        end
+      end
+
+      def star_draw(layer)
+        draw_context(layer) do |g|
+          g.stroke("transparent")
+          g.fill(star_fill_color)
+
+          i = params[:star_step]
+          (i...lattice.w).step(i) do |x|
+            (i...lattice.h).step(i) do |y|
+              v = V[x, y]
+              g.circle(*px(v), *px(v + V.one * params[:star_size]))
+            end
+          end
+        end
+      end
+
+      # 盤 padding を入れる場合 or 盤画像
+      def board_layer_create
+        layer = transparent_layer(:s_board_layer)
+        case
+        when params[:fg_file]
+          if false
+            # 座標を見ずに画面中央に表示する場合
+            layer.composite!(texture_image, Magick::CenterGravity, 0, 0, Magick::OverCompositeOp)
+          else
+            # 自分で座標を指定すると1ドット左に寄っているように見えるので ceil で補正している
+            # https://rmagick.github.io/image1.html#composite
+            layer.composite!(texture_image, *px(outer_top_left).collect(&:ceil), Magick::OverCompositeOp)
+          end
+        else
+          draw_context(layer) do |g|
+            if params[:outer_frame_stroke_width].nonzero?
+              g.stroke(params[:outer_frame_stroke_color])
+              g.stroke_width(params[:outer_frame_stroke_width])
+            end
+            g.fill = params[:outer_frame_fill_color]
+            g.roundrectangle(*px(outer_top_left), *px(outer_bottom_right), *round_radious) # stroke_width に応じてずれる心配なし
+          end
+        end
+
+        if v = params[:cell_colors].presence
+          colors = Array(v).cycle
+          cell_walker do |v|
+            color = colors.next
+            if color
+              draw_context(layer) do |g|
+                g.fill = color
+                # NOTE: 格子が1pxの場合に隙間ができるため minus_one しない方がよさそう
+                if false
+                  g.rectangle(*px(v), *minus_one(*px(v + V.one))) # 隙間ができる
+                else
+                  g.rectangle(*px(v), *px(v + V.one)) # 正確ではないが隙間ができない
+                end
+              end
+            end
+          end
+        end
+
+        with_shadow(layer)
+      end
+
+      # 盤テクスチャ
+      #
+      # 1. テクスチャと同じサイズの透明の画像を準備
+      # 2. 透明画像で表示したい部分を塗り潰す (このとき角だけ透明になっている)
+      # 3. その透明画像が金型なので元のテクスチャに押し当てる (CopyAlphaCompositeOp)
+      # 4. 角が取れたテクスチャが出来上がる
+      #
+      def texture_image
+        @texture_image ||= yield_self do
+          image = Magick::Image.read(params[:fg_file].to_s).first
+          image.resize_to_fill!(*ps(outer_rect))
+
+          # 角を取る場合
+          if outer_frame_radius.nonzero?
+            mask = Magick::Image.new(image.columns, image.rows) { |e| e.background_color = "transparent" }
+            Magick::Draw.new.tap do |gc|
+              gc.stroke("none")
+              gc.stroke_width(0)
+              gc.fill("white") # 透明以外であれば何でもよい
+              gc.roundrectangle(0, 0, mask.columns - 1, mask.rows - 1, *round_radious) # 見たい部分を塗る
+              gc.draw(mask)
+            end
+            image.composite!(mask, 0, 0, Magick::CopyAlphaCompositeOp) # 角が取れる
+          end
+
+          image
+        end
+      end
+
+      def inner_frame_lattice_color
+        params[:inner_frame_lattice_color] || params[:piece_font_color]
+      end
+
+      def star_fill_color
+        params[:star_fill_color] || inner_frame_lattice_color
+      end
+
+      def inner_frame_stroke_color
+        params[:inner_frame_stroke_color] || params[:piece_font_color]
+      end
+    end
+  end
+end

data/lib/bioshogi/screen_image/color_theme_info.rb

@@ -0,0 +1,137 @@
+require "color"
+
+module Bioshogi
+  module ScreenImage
+    class ColorThemeInfo
+      include ApplicationMemoryRecord
+      memory_record [
+        { key: :is_color_theme_real,   },
+        { key: :is_color_theme_piyo,   },
+        { key: :is_color_theme_paper,  },
+        { key: :is_color_theme_shape,  },
+        { key: :is_color_theme_club24, },
+      ]
+
+      ################################################################################
+
+      def to_params
+        @to_params ||= send(key)
+      end
+
+      def color_theme_cache_build(options = {})
+        options = {
+          verbose: false,
+        }.merge(options)
+        parser = Parser.parse(SFEN1)
+        file = ASSETS_DIR.join("images/color_theme_preview/#{key}.png")
+        bin = parser.to_png(color_theme_key: key, width: 1920, height: 1080)
+        FileUtils.makedirs(file.dirname)
+        file.write(bin)
+        if options[:verbose]
+          puts file
+        end
+      end
+
+      ################################################################################
+
+      def is_color_theme_real
+        is_color_theme_shogi_extend.merge({
+            :fg_file => ASSETS_DIR.join("images/board/board_a.png"),
+            :bg_file => ASSETS_DIR.join("images/background/background_a.png"),
+            :piece_image_key => "Portella",
+          })
+      end
+
+      def is_color_theme_paper
+        {
+          :face_pentagon_stroke_width => 1, # ☗の縁取り幅(先後マーク)
+          **shadow_disabled,
+        }
+      end
+
+      def is_color_theme_shape
+        {
+          **pentagon_enabled,
+          **shadow_disabled,
+          :piece_pentagon_fill_color   => "hsla(0,0%,100%,1.0)",
+          :piece_pentagon_stroke_color => "hsla(0,0%,0%,0.4)",
+          :piece_pentagon_stroke_width => 1,
+          :face_pentagon_stroke_width  => 1, # ☗の縁取り幅(先後マーク)
+        }
+      end
+
+      def is_color_theme_club24
+        is_color_theme_shogi_extend.merge({
+            :canvas_bg_color        => "hsl(84,62%,84%)",
+            :outer_frame_fill_color => "hsl(39,66%,60%)",
+            :face_pentagon_stroke_width  => 0,                  # ☗の縁取り幅(先後マーク)
+          })
+      end
+
+      def is_color_theme_piyo
+        is_color_theme_shogi_extend.merge({
+            :canvas_bg_color             => "hsl(35,100% 85%)", # 背景
+            :outer_frame_fill_color      => "hsl(37,73%,68%)",  # 盤の色
+            :piece_pentagon_fill_color   => "hsl(52,76%,87%)",  # ☗の色
+            :piece_pentagon_stroke_color => "hsl(36,78%,50%)",  # ☗の縁取り色
+            :piece_pentagon_stroke_width => 3,                  # ☗の縁取り幅
+            :face_pentagon_stroke_width  => 0,                  # ☗の縁取り幅(先後マーク)
+          })
+      end
+
+      private
+
+      def is_color_theme_shogi_extend
+        {
+          **piece_count_on_shadow_black_on_white,
+          **outer_frame_padding_enabled,
+          **pentagon_enabled,
+          :piece_font_color           => "hsla(0,0%,25%,1.0)",
+          :promoted_font_color        => PaletteInfo.fetch("主用朱色").to_color.html,
+          :outer_frame_fill_color     => "hsla(0,0%,0%,0.2)", # "rgba(120,120,120,0.5)",
+          :piece_move_cell_fill_color => "hsla(0,0%,0%,0.1)",
+          :piece_pentagon_fill_color  => PaletteInfo.fetch("主用駒色").to_color.html,
+        }
+      end
+
+      # 六角形の駒にする
+      def pentagon_enabled
+        {
+          :piece_pentagon_draw => true,
+          :soldier_font_scale  => 0.64,
+          :piece_char_adjust => {
+            :black => [ 0.0425, 0.08],
+            :white => [-0.01,   0.05],
+          },
+        }
+      end
+
+      # 影OFF
+      def shadow_disabled
+        {
+          :real_shadow_sigma => 0, # 影を取る
+        }
+      end
+
+      # 持駒駒数
+      def piece_count_on_shadow_black_on_white
+        {
+          :piece_count_bg_scale        => 0.3,         # 駒数の背景の大きさ
+          :piece_count_font_scale      => 0.25,        # 持駒数の大きさ
+          :piece_count_position_adjust => {            # 駒数の位置
+            :single                    => [0.7, 0.08], # 駒数1桁のとき。[0, 0] なら該当の駒の中央
+            :double                    => [0.7, 0.08], # 駒数2桁のとき
+          },
+        }
+      end
+
+      # 盤の周囲に隙間を作る
+      def outer_frame_padding_enabled
+        {
+          :outer_frame_padding      => 0.1,
+          :inner_frame_stroke_width => 1,
+        }
+      end
+    end
+  end
+end