#Requires AutoHotkey v2.0 https://www.autohotkey.com/

x_media_downloader.ahk

#Requires AutoHotkey v2.0

; ==============================================================================
; 【Windows 11 環境での具体的な利用方法・事前準備】
;
; 1. ブラウザでの初期状態
;    ・ブラウザで対象の「メディア欄」に移動し、**任意の画像をクリックして拡大表示
;      （ポップアップで大きく開いた状態）** にしてからF4キーを押してください。
;    ・アドレスバーのURL末尾が必ず半角数字の「1」で終わっていることを確認してください。
;      （例: https://example.com/item/1 ）
;
; 2. 画面の配置（重要：Alt + Tab の並び順）
;    ・事前に「ブラウザ（メイン）」と「書き込み用のメモ帳(urls.txt)」の2つのウィンドウだけを
;      開いた状態にしてください。他の不要なアプリは最小化するか閉じておきます。
;    ・F4を押す直前に、一度「メモ帳」をクリックしてアクティブにし、
;      そのあと「ブラウザ」をクリックして最前面に出してください。
;      （これで Alt + Tab を押したときに確実にこの2画面間を行き来できるようになります）
;
; 3. マウスカーソルの位置
;    ・F4キーを押す前に、あらかじめマウスカーソル（矢印）を
;      「コピーしたい画像の中央（要素の上）」に重ねて置いておいてください。
;      ※ループ中、カーソル位置を自動で左クリック・右クリックメニュー展開します。
;
; 4. マクロの実行と緊急停止
;    ・準備ができたら 【 F4 】 キーを押すとスタートします（5回大ループします）。
;    ・もし予期せぬ動きをしたり暴走した場合は、すぐに 【 Shift + Esc 】 を押せば
;      マクロを強制終了できます。
;
; ------------------------------------------------------------------------------
; 【補足：保存した urls.txt から一括ダウンロードするPowerShellコマンド】
;
; メモ帳を「urls.txt」という名前で保存し、そのフォルダでPowerShellを開いて
; 以下のコマンドをコピー＆ペーストしてEnterを押すと、末尾に「.png」を付けて自動保存されます。
;
; [コマンド本体]
; Get-Content urls.txt | ForEach-Object { if ($_ -ne "") { $filename = ($_ -split '/' | Select-Object -Last 1) + ".png"; curl.exe -o $filename $_; Start-Sleep -Seconds 3 } }
; ==============================================================================

F4:: {
    Loop 5 {
        ; 1. 念のため現在のポップアップ等を閉じる
        Send("{Esc}")
        Sleep(500)      ; 0.5秒
        
        ; 2. 前の項目へ移動（Shift + Tab）
        Send("+{Tab}")
        Sleep(500)      ; 0.5秒
        
        ; 3. 決定（Enter）
        Send("{Enter}")
        Sleep(500)      ; 0.5秒
        
        ; --- ここからURL変更＆コピーのループ（1から4まで） ---
        Loop 4 {
            ; 現在のループ回数（1, 2, 3, 4）を変数に入れる
            currentNum := A_Index
            
            ; 初回（1のとき）はすでにそのページにいる前提とし、2以降の場合のみURLを書き換える
            if (currentNum > 1) {
                ; アドレスバーを選択してコピーし、新しいタブを開く
                Send("^l")          ; アドレスバーを選択
                Sleep(500)          ; 0.5秒
                Send("^c")          ; 現在のURLをコピー
                Sleep(250)          ; 0.25秒
                Send("^t")          ; Ctrl + T で新しいタブを開く
                Sleep(500)          ; 0.5秒
                Send("^v")          ; コピーしたURLを貼り付け
                Sleep(250)          ; 0.25秒
                
                ; 末尾の数字（1つ前の数字）を削除して、新しい数字を入力
                Send("{BackSpace}") ; 末尾の数字を削除
                Sleep(250)          ; 0.25秒
                
                ; クリップボードを経由して、確実に「半角数字」を貼り付ける
                A_Clipboard := currentNum
                Sleep(100)          ; クリップボードの更新をわずかに待つ
                Send("^v")          ; Ctrl + V で半角数字を貼り付け
                Sleep(250)          ; 0.25秒
                
                Send("{Enter}")     ; ページ移動を確定
                Sleep(2500)         ; 【維持】ページ読み込み待ちは2.5秒のまま
            }
            
            ; 4. カーソル位置を左クリックし、右クリックメニューを開いて「画像アドレスをコピー(C)」を実行
            Click()             ; 現在のマウスカーソル位置で左クリック
            Sleep(500)          ; 0.5秒
            Send("{AppsKey}")   ; 右クリックメニューを開く
            Sleep(500)          ; 0.5秒
            Send("c")           ; 「画像アドレスをコピー」のアクセスキー(C)を押す
            Sleep(500)          ; 0.5秒
            
            ; 5. メモ帳（裏の画面）に切り替え
            Send("!{Tab}")
            Sleep(250)          ; 0.25秒
            
            ; 6. 貼り付けと改行
            Send("^v")
            Sleep(250)          ; 0.25秒
            Send("{Enter}")
            Sleep(250)          ; 0.25秒
            
            ; 7. ブラウザ（元の画面）に戻る
            Send("!{Tab}")
            Sleep(500)          ; 0.5秒
        }
        ; --- URLループここまで（4まで終わったら次へ） ---
        
        ; 新しく開いた3つのタブを閉じる（Ctrl + W を3回）
        Loop 3 {
            Send("^w")
            Sleep(250)          ; 0.25秒
        }
        
        ; 8. 状態をリセットして次の周回へ
        Send("{Esc}")
        Sleep(500)          ; 0.5秒
    }
}

; --------------------------------------------------
; 【緊急停止キー】マクロが暴走したら Shift + Esc で強制終了できます
; --------------------------------------------------
+Esc:: {
    ExitApp
}