ウルトラワイドに8窓を一発整列 ― Swift+AppleScript 収束ループと5つの罠

前回、環境の劣化を自動検知する話を書きました。今回はもっと地味な話です ―― ウルトラワイドモニタに散らかったTerminal窓8枚を、コマンド1発で4x2グリッドに揃えるスクリプトの設計です。

~/.claude/scripts/terminal-grid8.sh を叩くだけで、3440x1440の画面上のTerminal窓が x=0/860/1720/2580 の4列、上段・下段の2行にきっちり揃います。中身はSwift 15行＋AppleScript 60行程度の小さいスクリプトですが、座標系の変換とAppleScriptの窓操作特有の罠が詰まっていて、素朴に書くと必ずどこかで詰まります。

困りごと：tell application "System Events" で窓を動かすと平気で嘘をつく

AppleScriptで set position of window i to {x, y} を呼べば窓は動きます。が、これを8窓ぶんforeachで回すと、

• 一部の窓だけ動かない（エラーは出ない）
• 動いたはずの窓が数フレーム後に元の場所へ戻る
• 2周目に窓の名前で参照しようとしたら「そんな窓は無い」と言われる

といった現象が起きます。原因はTerminalの窓名がスピナー文字（⠐⠂✳など）を含んで実行中に変わり続けること、size と position を同時に指定すると片方が無視されること、行単位で高さが丸まることなど、AppleScript越しにTerminalを操作するときだけ出る個別の罠です。これを1つずつ回避しながら「未配置の窓が無くなるまで動かし続ける」設計にしたのが今回のスクリプトです。

設計1：Cocoa座標(左下原点)をグローバル座標(左上原点)に変換してシェルへ渡す

対象画面の矩形を取るのに、AppleScriptではなくSwiftを使っています。NSScreen.visibleFrame がDockとメニューバーを除いた作業領域を返してくれるからですが、Cocoaの座標系は左下原点・Y軸上向きで、AppleScriptの position of window は左上原点・Y軸下向きのグローバル座標です。ここを変換し損なうと、窓が画面の逆側に飛びます。

import AppKit
let screens = NSScreen.screens
guard let main = screens.first else { exit(1) }
// 最も横長の画面を対象にする(ウルトラワイド)。同率ならメイン以外を優先
let target = screens.max(by: { $0.frame.width < $1.frame.width })!
let v = target.visibleFrame   // Dock除外(Cocoa座標: 左下原点Y上向き)
let mainH = main.frame.height
var topY = mainH - (v.origin.y + v.height)  // グローバル(左上原点)座標へ変換
var h = v.height
// visibleFrameがメニューバーを反映しない画面がある(実測: AXはtop+30にクランプ)→手動で差し引く
if v.height == target.frame.height {
    topY += 30
    h -= 30
}
print("\(Int(v.origin.x)) \(Int(topY)) \(Int(v.width)) \(Int(h))")

mainH - (v.origin.y + v.height) が変換の核です。メイン画面の高さから、Cocoa座標での「visibleFrameの上端」を引くことで、AppleScript側が期待するグローバルY座標が出ます。この4値をスペース区切りで標準出力に流し、シェル側で受けます。

GEOM=$(swift - <<'EOF'
...
EOF
)
read -r GX GY GW GH <<< "$GEOM"

Swiftの swift - （標準入力からheredocでスクリプトを流し込む形）でコンパイル無しに実行し、結果をシェル変数に展開する、というのがSwiftとシェルの橋渡し方法です。ここでセル幅・セル高（CW=$(( GW / COLS ))）を計算してから、osascriptに引数として渡します。

NSScreen.visibleFrame は「メニューバーを除いた領域」のはずですが、実測では画面によってメニューバーぶんが反映されず visibleFrame.height == frame.height になるケースがありました。座標変換は一発で信用せず、既知の画面だけでも実測で検算するのが安全です。

設計2：foreachではなく「未配置窓が残る限り1枚だけ動かして再スキャン」の収束ループ

窓のリストを一度取得してforeachで動かす、という素朴な実装は破綻します。理由は「窓の名前がスピナーで失効する」「動かした窓のindexが動的に変わる」からです。そこでこのスクリプトは、毎パスで窓を再スキャンし、未配置の窓を1枚だけ見つけて動かし、また最初からスキャンし直すという収束ループにしています。

repeat with pass from 1 to (nCells * 3)
  set occupied to {}
  repeat nCells times
    set end of occupied to false
  end repeat
  set moverIdx to 0
  set n to count windows
  -- 1) 対象画面上の窓を走査し、セル一致済みをマーク・最初の未配置窓を記録
  repeat with i from 1 to n
    try
      set p to position of window i
      set px to item 1 of p
      set py to item 2 of p
    on error
      set px to -99999
      set py to -99999
    end try
    if px ≥ (gx - tol) and px < (gx + nCols * cw) and py ≥ (gy - tol) and py < (gy + nRows * ch) then
      set matched to false
      repeat with k from 1 to nCells
        if (not (item k of occupied)) and (px - (item k of cellX)) < tol and ((item k of cellX) - px) < tol and (py - (item k of cellY)) < tol and ((item k of cellY) - py) < tol then
          set item k of occupied to true
          set matched to true
          exit repeat
        end if
      end repeat
      if (not matched) and moverIdx = 0 then set moverIdx to i
    end if
  end repeat
  -- 2) 未配置窓が無ければ収束
  if moverIdx = 0 then exit repeat
  ...

ポイントは3つです。

• 「セルに一致している窓」を許容誤差 tol = 40px でマークし、それ以外で最初に見つかった1枚だけを moverIdx に入れる
• 未配置窓（moverIdx = 0）が無くなった時点でループを抜ける ―― これが収束条件
• ループ上限は nCells * 3 パス。理論上は各窓が1パスで1セルに収まるので nCells パスで十分ですが、過渡エラー（後述）のリトライぶんに余裕を持たせています

foreachで全窓を一気に動かす設計だと、1周目の途中でindexがズレたり名前参照が失効したりして事故ります。「1回のスキャンにつき1手だけ進めて、毎回状態を読み直す」というゲームループ的な設計にすることで、途中で何が起きても次のパスで辻褄が合う形にしています。

5つの実装罠

スクリプト自身のコメントと、対応するskill（~/.claude/skills/auto/terminal-grid8-tiling/SKILL.md）に「再実装しないための知識」として書き残しているものです。

• 窓の名前参照はスピナー(⠐⠂✳)回転で失効する → 名前ではなく毎パスindexで再スキャンし、その場で即操作する。名前をキャッシュして後から使う設計は事故る
• size 設定の直後に position を設定すると、delay無しだと無視される（エラーも出ない） → set size → delay 0.2 → set position → delay 0.2 → 再度 set size の順に、間へ必ず delay 0.2 を挟む。さらに読み返して補正する

try
  set size of window moverIdx to {cw, ch}
  delay 0.2
  set position of window moverIdx to {tx, ty}
  delay 0.2
  set size of window moverIdx to {cw, ch}
  delay 0.2
  -- 読み返して position を最終補正(リサイズでのドリフト対策)
  set p2 to position of window moverIdx
  if (item 1 of p2) is not tx or (item 2 of p2) is not ty then
    set position of window moverIdx to {tx, ty}
    delay 0.2
  end if
on error
  delay 0.3 -- スピナー等の過渡エラーは次パスで再試行
end try

• Terminalの高さは行単位に丸まるため、指定した ch ぴったりにはならず、セル高を超過した分がmacOSのクランプで吸収されたりされなかったりして、窓ごとにyがバラつく → 収束ループを抜けた後に、最下段の窓だけ実際の高さ(size)を読み直して下端揃えに正規化するパスを別途走らせる

-- 最下段yの正規化: 実高(行丸めでセル高を超える)のクランプ揺れで y が混在するため、
-- 実高を読み取って下端揃えに統一する
set bottomEdge to gy + nRows * ch
set lastRowTop to gy + (nRows - 1) * ch
repeat with i from 1 to (count windows)
  try
    set p to position of window i
    ...
    if px ≥ (gx - tol) and px < (gx + nCols * cw) and py ≥ (lastRowTop - tol) and py < bottomEdge then
      set s to size of window i
      set wh to item 2 of s
      set targetY to bottomEdge - wh
      ...

• visibleFrame がメニューバーぶんを反映しない画面がある → Swift側で v.height == target.frame.height を検知したら topY += 30; h -= 30 と手動で控除する（前掲コード）
• 過渡エラー（AppleScriptのエラー番号 -10006 / -1728 など）でtryブロックが落ちる → catchしてそのパスは諦め、delay 0.3 を挟んで次パスに委ねる。収束ループなので1パス失敗しても次で拾い直せる設計が効いている

検証は、最終レポートの座標が期待値に揃っているかで見ます。

- 対象: 最も横長の画面(ウルトラワイド)上のTerminal窓
- 出力: 各窓の x,y WxH タイトル
- 検証: xが 0/860/1720/2580 の4値、yが上段・下段の各1値に揃っていれば成功

まとめ

• 座標系の橋渡しはSwiftでNSScreenから取り、Cocoa座標(左下原点)をグローバル座標(左上原点)に変換してからシェル変数へ渡す。visibleFrameはメニューバー欠損を実測で疑う
• 複数窓の一括整列はforeachではなく収束ループにする。「未配置窓が残る限り1枚だけ動かして毎パス再スキャン」がAppleScriptの窓参照失効・indexズレに強い
• AppleScript特有の罠（スピナー名失効・size直後のposition無視・行高丸めのクランプ揺れ）は、delay+読み返し補正と事後の正規化パスでそれぞれ潰す
• 過渡エラーは握りつぶして次パスに賭ける。1回で完璧を狙わず、収束するまで繰り返す設計にする

次回は、この手のスクリプトを含む自動化群をどうスキル化して迷子にならないようにしているか ―― 自己増殖するエージェント環境の話を書きます。

---

Lily（@bokuwalily）― 個人開発者。Claude Code で自動化基盤を組みながら、iOSアプリやWebサービスを量産しています

• AIで「寝てても回る仕組み」を作って月120万にした話は noteの有料記事 に💰
• OSS: github.com/bokuwalily 🐙
• 最新情報・お問い合わせは X @bokuwalily へ🌍
• AI導入・自動化の相談と実装テンプレ7本の配布は 公式LINE から💬

皆さんの ❤️ やシェアが励みになります！