asterism-games 0.18.0 → 0.20.0

data/lib/asterism_games/commentate/voicevox.rb

@@ -0,0 +1,110 @@
+# frozen_string_literal: true
+
+require "net/http"
+require "uri"
+require "json"
+
+module AsterismGames
+  module Commentate
+    # The VOICEVOX engine's HTTP (README "Commentary", "The voice"): a free
+    # Japanese speech synthesiser running on this machine (the VOICEVOX app
+    # or its engine in docker). The standard library's net/http only.
+    #
+    #   vv = Voicevox.new("http://127.0.0.1:50021")
+    #   vv.version                        # => "0.25.0" (raises Voicevox::Error when it is not there)
+    #   id = vv.style_id("ずんだもん", "ノーマル")   # the number from /speakers, never assumed
+    #   wav = vv.synthesize("リーチなのだ！", id)    # the WAV's bytes
+    class Voicevox
+      DEFAULT_URL = "http://127.0.0.1:50021"
+      # Where people get the VOICEVOX app (it is not in this gem).
+      HOME = "https://voicevox.hiroshiba.jp/"
+
+      # The engine is not there, or said no.
+      class Error < StandardError; end
+
+      # No such character or style: the message lists what there is.
+      class NotFound < Error
+        attr_reader :candidates
+
+        def initialize(message, candidates)
+          super(message)
+          @candidates = candidates
+        end
+      end
+
+      attr_reader :url
+
+      def initialize(url = DEFAULT_URL, open_timeout: 2, read_timeout: 60)
+        @url = url.to_s.empty? ? DEFAULT_URL : url.to_s.chomp("/")
+        @uri = URI(@url)
+        raise Error, "#{@url}: not an http:// URL" unless @uri.is_a?(URI::HTTP) && @uri.host
+        @open_timeout = open_timeout
+        @read_timeout = read_timeout
+      end
+
+      # GET /version: the engine's version (a JSON string).
+      def version
+        v = JSON.parse(request(:get, "/version").force_encoding("UTF-8"))
+        v.is_a?(String) ? v : v.to_s
+      rescue JSON::ParserError => e
+        raise Error, "#{@url}/version: #{e.message}"
+      end
+
+      # GET /speakers: [{"name", "styles" => [{"name", "id"}]}], as the engine
+      # says them.
+      def speakers
+        list = JSON.parse(request(:get, "/speakers").force_encoding("UTF-8"))
+        raise Error, "#{@url}/speakers: not a list" unless list.is_a?(Array)
+        list.map do |s|
+          { "name" => s["name"].to_s,
+            "styles" => Array(s["styles"]).map { |st| { "name" => st["name"].to_s, "id" => st["id"] } } }
+        end
+      rescue JSON::ParserError => e
+        raise Error, "#{@url}/speakers: #{e.message}"
+      end
+
+      # The style's number, looked up by the character's and the style's
+      # names. NotFound lists the characters (or the character's styles).
+      def style_id(speaker, style, list = speakers)
+        s = list.find { |x| x["name"] == speaker }
+        unless s
+          raise NotFound.new("VOICEVOX has no character #{speaker.inspect} (there are: #{list.map { |x| x['name'] }.join(', ')})",
+                             list.map { |x| x["name"] })
+        end
+        st = s["styles"].find { |x| x["name"] == style }
+        unless st
+          names = s["styles"].map { |x| x["name"] }
+          raise NotFound.new("#{speaker} has no style #{style.inspect} (there are: #{names.join(', ')})", names)
+        end
+        st["id"]
+      end
+
+      # POST /audio_query then POST /synthesis: the WAV of text in style id.
+      def synthesize(text, id)
+        q = request(:post, "/audio_query?#{URI.encode_www_form(text: text, speaker: id)}", "")
+        wav = request(:post, "/synthesis?#{URI.encode_www_form(speaker: id)}", q, "Content-Type" => "application/json")
+        raise Error, "#{@url}/synthesis: not a WAV" unless wav.start_with?("RIFF")
+        wav
+      end
+
+      private
+
+      def request(method, path, body = nil, headers = {})
+        http = Net::HTTP.new(@uri.host, @uri.port)
+        http.use_ssl = @uri.scheme == "https"
+        http.open_timeout = @open_timeout
+        http.read_timeout = @read_timeout
+        http.write_timeout = @read_timeout if http.respond_to?(:write_timeout=)
+        res = http.start do |h|
+          method == :get ? h.get(path) : h.post(path, body.to_s, headers)
+        end
+        raise Error, "#{@url}#{path[/\A[^?]*/]}: HTTP #{res.code}" unless res.is_a?(Net::HTTPSuccess)
+        res.body.to_s.b
+      rescue Error
+        raise
+      rescue StandardError => e
+        raise Error, "#{@url}: #{e.class}: #{e.message}"
+      end
+    end
+  end
+end

data/lib/asterism_games/commentate.rb

@@ -0,0 +1,223 @@
+# frozen_string_literal: true
+
+require_relative "version"
+require_relative "play"
+require_relative "commentate/voicevox"
+require_relative "commentate/voice"
+require_relative "commentate/ai_comment"
+
+module AsterismGames
+  # `asterism-games commentate <game>` (README "Commentary"): watches a
+  # table from outside (its spectate key, README "Spectate"), draws it in
+  # a browser and comments on it in captions and a voice (VOICEVOX's, on
+  # this machine, else the browser's). It
+  # only reads: it never joins or calls a table. CRuby and the asterism gem
+  # only; the page is served from this process on 127.0.0.1.
+  module Commentate
+    GAMES = {
+      "mahjong" => "a mahjong table: the four hands drawn with Family mruby's tiles, the commentary as captions and voice"
+    }.freeze
+    DEFAULT_PORT = 7470
+    DEFAULT_SPEAKER = "ずんだもん"
+    DEFAULT_STYLE = "ノーマル"
+
+    USAGE = <<~TEXT
+      Usage: asterism-games commentate <game> [options]
+
+      Games:
+      %<games>s
+
+      Options:
+        --router LOCATOR      the Zenoh router (tcp/127.0.0.1:7447 when nothing says otherwise)
+        --credentials FILE    a console's .tar (a viewer's or a spectator's role reads the
+                              spectate keys; the router and the node ID come from it)
+        --namespace PREFIX    a room's tables (room/01: their spectate keys room01-<table>,
+                              outside the room; the connection itself has no namespace)
+        --table TABLE         the table to show first (<table>, <host>/<table>, or
+                              <host>/spectate/<table>); without it every table that puts
+                              its spectate key is listed and the first one shown
+        --node NODE           the node ID (default: commentate-<host>-<pid>, or the .tar's name)
+        --port N              the page's port on 127.0.0.1 (default %<port>d; taken: the next free)
+        --public              hide the hands: the page never gets them and the commentary
+                              never tells them (for a stream; H on the page does the same
+                              for that page only)
+        --no-open             do not open the browser
+        --json                every commentary line as a JSON line on standard output
+        --voicevox URL        the VOICEVOX engine (default VOICEVOX_URL, else
+                              http://127.0.0.1:50021); not there: the browser's voice.
+                              VOICEVOX is a free app you install and start yourself
+                              (not in this gem)
+        --speaker NAME        the VOICEVOX character (default %<speaker>s)
+        --style NAME          its style (default %<style>s)
+        --ai on|off           the AI's one-liners (default on; they need
+                              ANTHROPIC_API_KEY and the anthropic gem)
+        --ai-model MODEL      the model (default %<ai_model>s)
+        --ai-daily-usd USD    what they may cost a day (default %<ai_usd>.2f); then the
+                              fixed commentary alone
+        -h, --help            this text
+
+      The page: Space pauses, M turns the voice off and on, H hides the hands.
+      The browser speaks once the page has been clicked (its autoplay rule).
+
+      The voice: VOICEVOX's character says the fixed phrases (リーチ, ポン,
+      ロン, the rounds ...) from WAV files made on this machine at the first
+      start, and the rest of each line as it comes. The page shows the credit
+      (VOICEVOX:<character>); put it in a stream's description too.
+
+      The AI's one-liners: at the big moments (a riichi, a win, a draw, the
+      lead changing hands, the last round, the end) and after a quiet
+      minute, Claude says a short line after the fixed commentary (at most
+      one call every 20 s, 8 s for a bigger scene than the last, such as a
+      win after a riichi; only while a page is open). With the hands hidden
+      (--public, H) it is not told the hands. What it costs is counted in
+      $XDG_STATE_HOME/asterism-games/commentary_ai_usage.json
+      (~/.local/state/... by default); the page shows today's money.
+
+      Usage: asterism-games commentate voices --list [--voicevox URL]
+             asterism-games commentate voices --make [--voicevox URL] [--speaker NAME] [--style NAME]
+        --list   the engine's characters and their styles
+        --make   make the fixed phrases' WAV files now (the commentary makes
+                 the missing ones at its start too), in
+                 $XDG_CACHE_HOME/asterism-games/voices/<speaker>-<style>/
+                 (~/.cache/... by default; delete it at any time)
+
+      With neither --router nor --credentials, ASTERISM_ROUTER and
+      ASTERISM_CREDENTIALS from the environment are used (all or nothing).
+    TEXT
+
+    module_function
+
+    def usage
+      format(USAGE, games: GAMES.map { |n, text| format("  %-9s %s", n, text) }.join("\n"), port: DEFAULT_PORT,
+                    speaker: DEFAULT_SPEAKER, style: DEFAULT_STYLE, ai_model: AIComment::DEFAULT_MODEL,
+                    ai_usd: AIComment::DEFAULT_DAILY_USD)
+    end
+
+    def main(argv, out: $stdout, err: $stderr)
+      game = argv.first
+      if game.nil? || %w[-h --help help].include?(game)
+        out.puts usage
+        return 0
+      end
+      return voices(argv.drop(1), out: out, err: err) if game == "voices"
+      unless GAMES.key?(game)
+        err.puts "asterism-games commentate: no game #{game.inspect} (#{GAMES.keys.join(', ')})"
+        return 2
+      end
+      opts = parse(argv.drop(1))
+      if opts[:help]
+        out.puts usage
+        return 0
+      end
+      require_relative "commentate/mahjong"
+      MahjongRunner.run(opts, out: out, err: err)
+      0
+    rescue Voicevox::NotFound => e
+      err.puts "asterism-games commentate #{game}: #{e.message} (voices --list)"
+      2
+    rescue ArgumentError => e
+      err.puts "asterism-games commentate #{game}: #{e.message} (--help)"
+      2
+    end
+
+    def parse(args, env: ENV)
+      opts = { router: nil, credentials: nil, namespace: nil, table: nil, node: nil, port: DEFAULT_PORT,
+               public: false, open: true, json: false, help: false,
+               voicevox: env["VOICEVOX_URL"].to_s.empty? ? Voicevox::DEFAULT_URL : env["VOICEVOX_URL"],
+               speaker: DEFAULT_SPEAKER, style: DEFAULT_STYLE,
+               ai: true, ai_model: AIComment::DEFAULT_MODEL, ai_daily_usd: AIComment::DEFAULT_DAILY_USD }
+      args = args.dup
+      until args.empty?
+        k = args.shift
+        need = lambda do
+          v = args.shift
+          raise ArgumentError, "#{k} takes a value" if v.nil? || v.start_with?("--")
+          v
+        end
+        case k
+        when "--ai"
+          v = need.call
+          raise ArgumentError, "--ai takes on or off" unless %w[on off].include?(v)
+          opts[:ai] = v == "on"
+        when "--ai-model" then opts[:ai_model] = need.call
+        when "--ai-daily-usd"
+          v = Float(need.call, exception: false)
+          raise ArgumentError, "--ai-daily-usd takes a number of dollars (0 or more)" unless v&.finite? && v >= 0
+          opts[:ai_daily_usd] = v
+        when "--router" then opts[:router] = need.call
+        when "--credentials" then opts[:credentials] = need.call
+        when "--namespace" then opts[:namespace] = need.call
+        when "--table" then opts[:table] = need.call
+        when "--node" then opts[:node] = need.call
+        when "--port"
+          v = need.call
+          raise ArgumentError, "--port takes a number (1-65535)" unless v.match?(/\A\d+\z/) && v.to_i.between?(1, 65_535)
+          opts[:port] = v.to_i
+        when "--public" then opts[:public] = true
+        when "--no-open" then opts[:open] = false
+        when "--json" then opts[:json] = true
+        when "--voicevox" then opts[:voicevox] = need.call
+        when "--speaker" then opts[:speaker] = need.call
+        when "--style" then opts[:style] = need.call
+        when "-h", "--help" then opts[:help] = true
+        else raise ArgumentError, "unknown option #{k}"
+        end
+      end
+      Play.network!(opts, env)
+      opts
+    end
+
+    # `commentate voices --list | --make`: the engine's characters, or the
+    # fixed phrases' files made now.
+    def voices(args, out: $stdout, err: $stderr, env: ENV, root: nil)
+      opts = { voicevox: env["VOICEVOX_URL"].to_s.empty? ? Voicevox::DEFAULT_URL : env["VOICEVOX_URL"],
+               speaker: DEFAULT_SPEAKER, style: DEFAULT_STYLE, list: false, make: false }
+      args = args.dup
+      until args.empty?
+        k = args.shift
+        need = lambda do
+          v = args.shift
+          raise ArgumentError, "#{k} takes a value" if v.nil? || v.start_with?("--")
+          v
+        end
+        case k
+        when "--list" then opts[:list] = true
+        when "--make" then opts[:make] = true
+        when "--voicevox" then opts[:voicevox] = need.call
+        when "--speaker" then opts[:speaker] = need.call
+        when "--style" then opts[:style] = need.call
+        when "-h", "--help" then return out.puts(usage) || 0
+        else raise ArgumentError, "unknown option #{k}"
+        end
+      end
+      raise ArgumentError, "--list or --make" unless opts[:list] || opts[:make]
+      vv = Voicevox.new(opts[:voicevox])
+      begin
+        ver = vv.version
+      rescue Voicevox::Error => e
+        err.puts "asterism-games commentate voices: no VOICEVOX at #{vv.url} (#{e.message}); " \
+                 "start the VOICEVOX app or its engine (README \"Commentary\", \"The voice\")"
+        return 1
+      end
+      list = vv.speakers
+      if opts[:list]
+        out.puts "VOICEVOX #{ver} at #{vv.url}: #{list.size} character(s) (--speaker NAME --style NAME)"
+        list.each { |s| out.puts "  #{s['name']}: #{s['styles'].map { |st| "#{st['name']} (#{st['id']})" }.join(', ')}" }
+      end
+      if opts[:make]
+        id = vv.style_id(opts[:speaker], opts[:style], list)
+        voice = Voice.new(vv, opts[:speaker], opts[:style], id, version: ver, root: root || ClipBank.cache_root)
+        out.puts "voices: #{opts[:speaker]} (#{opts[:style]}, #{id}) into #{voice.bank.dir}"
+        made, had = voice.bank.make!(log: ->(m) { out.puts "  #{m}" })
+        out.puts "voices: #{made} made, #{had} already there. Credit: #{voice.credit}"
+      end
+      0
+    rescue Voicevox::Error => e
+      err.puts "asterism-games commentate voices: #{e.message}"
+      1
+    rescue ArgumentError => e
+      err.puts "asterism-games commentate voices: #{e.message} (--help)"
+      2
+    end
+  end
+end

data/lib/asterism_games/host.rb

@@ -107,7 +107,7 @@ module AsterismGames
                                     prices: ->(k) { settings.prices(k) })
       unless deciders.empty?
         @log.call("games: AI players: #{deciders.keys.join(', ')} (#{AI::Hub.limits_text(deciders.keys, budget)}, " \
-                  "#{settings.calls_per_game} decisions a game)")
+                  "#{settings.calls_per_game} decisions a seat in a game)")
       end
       AI::Hub.new(deciders, budget, calls_per_game: settings.calls_per_game, threads: settings.threads, log: @log)
     end

data/lib/asterism_games/othello/table.rb

@@ -78,7 +78,7 @@ module AsterismGames
         @stats = Hash.new(0)
         @ai_kinds = []         # the AI players the host can offer now (the lobby view's "ak")
         @ai_calls_per_game = nil
-        @ai_calls = 0          # decisions asked this game
+        @ai_calls = Hash.new(0) # seat => decisions asked this game
         @ai_want = nil         # the decision asked of the AI seat to move: {seat:, key:, kind:, at:, sent:}
         @ai_got = nil          # [key, move number or nil] come back
         load_saved(0)
@@ -205,7 +205,7 @@ module AsterismGames
         @seats = @seats.shuffle(random: Random.new(SecureRandom.random_number(2**32)))
         @game = Othello::Match.new
         @result = nil
-        @ai_calls = 0
+        @ai_calls = Hash.new(0)
         @status = "play"
         @log&.call("othello: #{@name}: game started (#{@seats.map { |s| s['name'] }.join(' (black), ')} (white))")
         schedule(now)
@@ -272,7 +272,8 @@ module AsterismGames
       # does not come in time, or fails, is the CPU's. A turn with one legal
       # move is not asked (it is played as the CPU plays). The host turns
       # the AI seats into CPUs when the day's money is spent, and the table
-      # does when the game has asked ai_calls_per_game decisions.
+      # turns an AI seat into a CPU when that seat has asked
+      # ai_calls_per_game decisions in the game (each seat its own count).
 
       def ai_seat?(seat)
         s = @seats[seat]
@@ -291,12 +292,12 @@ module AsterismGames
       def ai_requests(now)
         w = @ai_want
         return [] if w.nil? || w[:sent]
-        if @ai_calls_per_game && @ai_calls >= @ai_calls_per_game
-          ai_off!("#{@ai_calls_per_game} decisions in this game")
+        if @ai_calls_per_game && @ai_calls[w[:seat]] >= @ai_calls_per_game
+          ai_off!("#{@ai_calls_per_game} decisions of seat #{w[:seat]} in this game", seats: [w[:seat]])
           return []
         end
         w[:sent] = true
-        @ai_calls += 1
+        @ai_calls[w[:seat]] += 1
         @stats["ai_asked"] += 1
         [{ seat: w[:seat], key: w[:key], kind: w[:kind], until: w[:at],
            request: { "game" => "othello", "table" => @name, "seat" => w[:seat],
@@ -313,10 +314,12 @@ module AsterismGames
         true
       end
 
-      # The AI seats become CPUs (the day's money, or the game's decisions,
-      # are used up): all of them, or those of one kind.
-      def ai_off!(why, kind: nil)
-        seats = (0...SEATS).select { |i| ai_seat?(i) && (kind.nil? || @seats[i]["ai"] == kind) }
+      # The AI seats become CPUs (the day's money, or a seat's decisions of
+      # the game, are used up): all of them, those of one kind, or the
+      # seats named.
+      def ai_off!(why, kind: nil, seats: nil)
+        only = seats
+        seats = (0...SEATS).select { |i| ai_seat?(i) && (kind.nil? || @seats[i]["ai"] == kind) && (only.nil? || only.include?(i)) }
         return false if seats.empty?
         seats.each { |i| @seats[i].delete("ai") }
         @stats["ai_off"] += 1

data/lib/asterism_games/play/mahjong.rb

@@ -21,7 +21,8 @@ module AsterismGames
         On a terminal it reads keys, as the table app does: Left/Right choose a tile,
         Enter or Space discards it; R riichi, T tsumo/ron, P pon, C V B chi, K L J kan,
         N nine kinds, Esc pass, Enter the result's OK; in the lobby 1-4 sit, S stand,
-        C CPUs, Enter start; Q or Ctrl+C quits; : (or /) opens a line for a command.
+        C CPUs, A then 1-4 a seat's CPU or AI player, Enter start, W a watch game;
+        Q or Ctrl+C quits; : (or /) opens a line for a command.
         Mahjong commands (one per line, or after :):
           a .. n         discard that tile of the hand (the drawn tile is the last letter)
           6s, 0p, 東     discard that tile (0: the red five; 1z..7z for the honours too)
@@ -33,7 +34,8 @@ module AsterismGames
           ok             the result's OK (an empty line too); at the end, the owner: back to the lobby
           sit [1-4], stand, cpu [1-4] (empty seats to CPUs; the owner), nocpu 1-4,
           ai 1-4 KIND (an AI player, when the lobby offers one), tonpuu, hanchan,
-          rule ITEM VALUE (README "Local rules"), start (the owner)
+          rule ITEM VALUE (README "Local rules"), start (the owner),
+          watch (the owner: the four seats CPUs or AI players, a game only watched)
           auto           let the client play for you (wins, passes, discards the drawn tile,
                          OKs the results); again to stop
           tables, view, help, quit
@@ -50,8 +52,8 @@ module AsterismGames
       TIMER_EVERY_S = 1.0
 
       # --commands that only work in the lobby, and those of the owner.
-      LOBBY_WORDS = %w[sit stand cpu nocpu ai start tonpuu hanchan rule].freeze
-      OWNER_WORDS = %w[cpu nocpu ai start tonpuu hanchan rule].freeze
+      LOBBY_WORDS = %w[sit stand cpu nocpu ai start watch tonpuu hanchan rule].freeze
+      OWNER_WORDS = %w[cpu nocpu ai start watch tonpuu hanchan rule].freeze
 
       REASONS = {
         "token" => "卓の人ではない", "not seated" => "席に着いていない", "stale" => "画面が古い: 読み直し中",
@@ -60,7 +62,8 @@ module AsterismGames
         "not owner" => "卓の主だけができる", "seats" => "4 席がそろっていない", "no human" => "人が 1 人もいない",
         "no change" => "変わらない", "full" => "卓が満員", "spectators" => "観戦の人数が上限",
         "value" => "選べない値", "no rule" => "その項目は無い", "no ai" => "その AI は今は出せない",
-        "identity" => "この部屋での名乗りが合わない"
+        "identity" => "この部屋での名乗りが合わない", "human" => "人が座っている (観戦対局は 4 席とも CPU か AI)",
+        "ai limit" => MahjongText::WATCH_AI_NOTE
       }.freeze
 
       # The whole run: connect, find the table, play until quit (or over).
@@ -120,6 +123,7 @@ module AsterismGames
         @keys = keys
         @sel = -1
         @pick = false
+        @ai_pick = false # A in the lobby: a seat's number comes next
         @typing = false
         @path = path
         @name = name
@@ -233,7 +237,8 @@ module AsterismGames
       # One key (Play.key_loop); false to quit, :line for a line to type.
       def key(k)
         v = @view.is_a?(Hash) ? @view : nil
-        r = MahjongText.key_command(k, v, sel: @sel, pick: @pick)
+        r = MahjongText.key_command(k, v, sel: @sel, pick: @pick, ai_pick: @ai_pick)
+        @ai_pick = false unless r[0] == :ai_pick
         case r[0]
         when :quit then return false
         when :line then return :line
@@ -248,6 +253,12 @@ module AsterismGames
             @note = ""
             draw
           end
+        when :ai_pick
+          @lock.synchronize do
+            @ai_pick = r[1]
+            @note = ""
+            draw
+          end
         when :act
           answer = act(r[1], r[2])
           say(answer == "ok" ? "" : answer)
@@ -315,9 +326,10 @@ module AsterismGames
         return "画面を待っています" unless v.is_a?(Hash) && !v["error"]
         return "待ち合わせを待っています" unless v["st"] == "wait"
         return nil unless OWNER_WORDS.include?(w)
-        return "席に着くのを待っています" unless v["me"].to_i >= 0
-        return "卓の主を待っています" unless v["ow"] == v["me"]
-        return "4 席がそろうのを待っています" if w == "start" && (v["sk"] || [0]).any?(&:zero?)
+        unless MahjongText.owner?(v)
+          return v["me"].to_i >= 0 ? "卓の主を待っています" : "席に着くのを待っています"
+        end
+        return "4 席がそろうのを待っています" if %w[start watch].include?(w) && (v["sk"] || [0]).any?(&:zero?)
         nil
       end
 
@@ -394,6 +406,7 @@ module AsterismGames
         when "nocpu" then args.empty? ? "nocpu 1-4" : reason(@table.cpu(@token, seat_arg(args), false))
         when "ai" then args.size < 2 ? "ai 1-4 KIND" : reason(@table.cpu(@token, seat_arg(args), args[1]))
         when "start" then reason(@table.start(@token))
+        when "watch" then reason(@table.watch(@token))
         when "tonpuu" then reason(@table.rule(@token, 0, 1))
         when "hanchan" then reason(@table.rule(@token, 0, 0))
         when "rule"
@@ -453,7 +466,7 @@ module AsterismGames
 
       # What the screen needs of the keys (nil: commands are typed).
       def key_state
-        @keys && !@typing ? { sel: @sel, pick: @pick } : nil
+        @keys && !@typing ? { sel: @sel, pick: @pick, ai_pick: @ai_pick } : nil
       end
 
       # The countdown on a terminal (the move's time and the bank, the

data/lib/asterism_games/play/mahjong_screen.rb

@@ -157,6 +157,7 @@ module AsterismGames
       def lobby
         v = @v
         out = ["#{v['t'] || @path}  待ち合わせ#{"  ゲームホスト #{v['hv']}" if v['hv']}"]
+        out << "  (卓の主: 自分)" if v["mo"] == 1 && @me.negative?
         sk = v["sk"] || [0, 0, 0, 0]
         ai = v["ai"] || []
         4.times do |s|
@@ -169,8 +170,11 @@ module AsterismGames
           out << "  席#{s + 1}  #{n}#{" (#{tags.join(', ')})" unless tags.empty?}"
         end
         out << "  ルール: #{rules_text}" if v["ru"]
-        watchers = (v["mb"] || []).select { |m| m[1] == -1 }.map(&:first)
+        # Members without a seat; the owner among them (an owner without a
+        # seat, README "Watch games") marked.
+        watchers = (v["mb"] || []).select { |m| m[1] == -1 }.map { |m| m[2].to_i & 2 == 2 ? "#{m[0]}(卓の主)" : m[0] }
         out << "  観戦: #{watchers.join(' ')}" unless watchers.empty?
+        out << "  #{MahjongText::WATCH_AI_NOTE}" if v["wc"] == 2 && MahjongText.owner?(v)
         out
       end
 
@@ -189,6 +193,7 @@ module AsterismGames
         v = @v
         r = v["r"] || []
         out = []
+        out << "観戦対局 (CPU と AI だけ)" if v["wm"] == 1
         if r.size >= 4
           h = row.text("#{round_name(r)}  供託#{r[3]}  残り#{r[5]}  ドラ ")
           bytes(v["dora"]).each { |t| tile_cell(h, t) }
@@ -463,12 +468,16 @@ module AsterismGames
         types = opts.map(&:first).uniq
         case v["st"]
         when "wait"
-          return "観戦中: sit で座る、quit で出る" if @me.negative?
-          owner = v["ow"] == @me
+          owner = MahjongText.owner?(v)
+          if @me.negative?
+            return "観戦中 (卓の主): sit で座る、cpu [席]、ai 席 KIND、watch (観戦で始める)、quit" if owner
+            return "観戦中: sit で座る、quit で出る"
+          end
           return "stand、cpu [席] (空きを CPU で)、nocpu 席、tonpuu / hanchan、start、quit" if owner
           return "4 席がそろったら卓の主が始める (stand、quit)"
         when "over"
           return "ok で待ち合わせに戻す (quit で出る)" if types.include?(NEXT)
+          return "観戦対局: しばらくすると待ち合わせに戻る (quit で出る)" if v["wm"] == 1
           return "次へ: 卓の主が待ち合わせに戻す (quit で出る)"
         when "result"
           return "ok で次へ" if types.include?(NEXT)
@@ -512,6 +521,7 @@ module AsterismGames
         when "wait" then return lobby_keys
         when "over"
           return "[Enter]待ち合わせに戻す  #{COMMON_KEYS}" if types.include?(NEXT)
+          return "観戦対局: しばらくすると待ち合わせに戻る  #{COMMON_KEYS}" if v["wm"] == 1
           return "次へ: 卓の主が待ち合わせに戻す  #{COMMON_KEYS}"
         when "result"
           return "[Enter]OK  #{COMMON_KEYS}" if types.include?(NEXT)
@@ -567,26 +577,37 @@ module AsterismGames
       end
 
       # The lobby's keys: 1-4 for the seats that may be taken (empty or a
-      # CPU's), S stand, C CPUs and Enter start (the owner).
+      # CPU's), S stand, C CPUs, A then 1-4 a seat's CPU or AI player,
+      # Enter start and W a watch game (the owner; README "Watch games").
       def lobby_keys
         v = @v
         sk = v["sk"] || [0, 0, 0, 0]
+        if @keys && @keys[:ai_pick]
+          return "AI: [1]-[4] 席を選ぶ (空き→CPU→#{Array(v['ak']).map { |k| AI_LABELS[k] || k }.join('→')}→CPU) " \
+                 "ほかのキーでやめる"
+        end
+        owner = MahjongText.owner?(v)
         free = (0..3).select { |s| sk[s] != 1 && s != @me }.map { |s| "[#{s + 1}]" }
         words = []
         words << "#{free.join}座る" unless free.empty?
-        if @me >= 0
-          words << "[S]立つ"
-          if v["ow"] == @me
-            words << "[C]CPU で埋める" if sk.any?(&:zero?)
-            words << "[Enter]始める" unless sk.any?(&:zero?)
-          else
-            words << "(卓の主が始める)"
+        words << "[S]立つ" if @me >= 0
+        if owner
+          words << "[C]CPU で埋める" if sk.any?(&:zero?)
+          words << "[A]AI" unless Array(v["ak"]).empty?
+          if v["wc"] == 1
+            words << "[W]観戦で始める"
+          elsif @me >= 0 && sk.none?(&:zero?)
+            words << "[Enter]始める"
           end
+        elsif @me >= 0
+          words << "(卓の主が始める)"
         end
         words << COMMON_KEYS
-        "#{@me.negative? ? '観戦中: ' : ''}#{words.join(' ')}"
+        "#{@me.negative? ? (owner ? '観戦中 (卓の主): ' : '観戦中: ') : ''}#{words.join(' ')}"
       end
 
+      AI_LABELS = { "claude" => "Claude", "jev" => "Jev" }.freeze
+
       def turn_text(r)
         cur = r[6]
         return "" if cur.nil? || cur.negative? || r[7].to_i >= 2