おい！あふを語ろうぜ！Ver.17
以前、紹介された、マーク数を入力してマークする uwsc スクリプトが、
Litestep(ckVWM-1.42.dll) + 窓使いの憂鬱 環境で、動作不安定になるので
AutoHotkey に移植してみた。動作不安定になる方は、こちらで安定している
のでお試しあれ。以下使用方法とスクリプト。
AutoHotkey.exe afx_mark.ahk $V"afx"\bin\afx_mark.ahk $I1"マーク数""
Litestep(ckVWM-1.42.dll) + 窓使いの憂鬱 環境で、動作不安定になるので
AutoHotkey に移植してみた。動作不安定になる方は、こちらで安定している
のでお試しあれ。以下使用方法とスクリプト。
AutoHotkey.exe afx_mark.ahk $V"afx"\bin\afx_mark.ahk $I1"マーク数""
|
|
|
SetTitleMatchMode, 2 ; タイトルの検索を中間一致にする
WinGet, afxid , ID, あふ
if afxid =
{
MsgBox, あふが起動していません。
ExitApp
}
if %0%=0
ExitApp
if 1 is not integer
ExitApp
WinActivate, ahk_id %afxid% ; 「あふ」をアクテイブにする
BlockInput, on ; キーボードやマウス入力の無効化
Send,{Space} ; カーソル行をマーク
Loop, %1%
{
Send,{Down} ; １行ダウン
}
Send,{Up}{Up} ; 補正の為、２行アップ
Send, ^{Space} ; 一括マーク
BlockInput, off ; キーボードやマウス入力の無効化解除
ExitApp ; 本スクリプト終了
WinGet, afxid , ID, あふ
if afxid =
{
MsgBox, あふが起動していません。
ExitApp
}
if %0%=0
ExitApp
if 1 is not integer
ExitApp
WinActivate, ahk_id %afxid% ; 「あふ」をアクテイブにする
BlockInput, on ; キーボードやマウス入力の無効化
Send,{Space} ; カーソル行をマーク
Loop, %1%
{
Send,{Down} ; １行ダウン
}
Send,{Up}{Up} ; 補正の為、２行アップ
Send, ^{Space} ; 一括マーク
BlockInput, off ; キーボードやマウス入力の無効化解除
ExitApp ; 本スクリプト終了