■配布元
ttp://ahkscript.org/download/ ■前スレ
AutoHotkey スレッド part24
ttp://egg.2ch.net/test/read.cgi/software/1487149472/
■日本語解説等
AutoHotkey Wik
ttp://ahkwiki.net AutoHotkeyを流行らせるページ(ミラー)
ttp://ahk.xrea.jp/ (不調時は ttp://hdd.s300.xrea.com/ahk/ ) AutoHotkeyJp(過去ログdatあり)
ttp://sites.google.com/site/autohotkeyjp/ Autohotkey日本語ヘルプ(chmファイル）
ttp://www6.atwiki.jp/eamat/ Autohotkey専用うpろだ
ttp://ux.getuploader.com/autohotkeyl/ 簡易スクリプト掲示板
ttp://pastebin.com/ ■派生版
IronAhk (.NET製、クロスプラットフォーム)
ttps://github.com/polyethene/IronAHK AutoHotkey.dll (真のマルチスレッド対応など, AHKLの派生)
ttp://www.autohotkey.com/board/topic/39588-autohotkeydll/ VIPQ2_EXTDAT: checked:vvvvv:1000:512:----: EXT was configured 👀
Rock54: Caution(BBR-MD5:669e095291445c5e5f700f06dfd84fd2)
オリジナルである、旧 "AutoHotKey" の開発は2009年9月で終了している。
現在は、そこからフォークした "AutoHotkey_L" が主流となり、2014年1月からは後のLが取れ
正式にAutohotkeyとして扱われるようになりました。
よって古いスクリプト（主にDllCall()を利用しているスクリプト）は最新Verで動作しないものがあり、
その場合はスクリプトの修正が必用です。
旧版のAHKとの変更点多数。新しい仕様や互換性についてはドキュメントを良く読むこと。
→
ttp://ahkscript.org/docs/AHKL_Features.htm →
ttp://ahkwiki.net/Addition_L ※新規利用者には最新版を推奨しますが、旧AHK（2009年9月までのVer）の利用者は新AHKへの移行に際して
少なからず改修が必要となります。特に、旧流行らせるページの配布物(MouseGesture等)の多くは
そのままでは動作しません。安定利用できている環境を崩して移行するかどうかは各人の判断による。
MouseGestureについては有志の方が最新AHK対応版（MouseGestureL.ahk）を配布しているのでそれを
利用するのもありです。
ttp://hp.vector.co.jp/authors/VA018351/mglahk.html ttp://code.google.com/p/mousegesturel/ ※ACC.ahk（旧版用）とCOM.ahkはフォーラムのリンク先にファイルが存在しませんので下記から入手してください。
ttp://ux.getuploader.com/autohotkeyl/download/24/ACC%2BCOM.zip ※Unicode版のACC.ahkは下記（AccInfoViewer.ahk付き）またはフォーラムから入手してください。
ttp://ux.getuploader.com/autohotkeyl/download/76/ACC_Unicode_and_AccInfoViewer_kai.zip ■質問に際して
OSの種類(XP/Vista/7)や32/64ビット版の違い、利用するAutoHotkeyのバージョンを明記すること。
また、操作したいソフト・やりたい処理などは具体的に書いた方がレスが付きやすい傾向にある。
2chの仕様の関係で、このスレではインデントに全角スペースを使ってコードを貼り付ける事があるので、
レスをコピペして利用する場合は行頭の全角スペースをタブ等に置換してから利用すること。 👀 👀
Rock54: Caution(BBR-MD5:669e095291445c5e5f700f06dfd84fd2)
Part1 ttp://pc7.2ch.net/test/read.cgi/software/1098531338/
Part2 ttp://pc7.2ch.net/test/read.cgi/software/1129836713/
Part3 ttp://pc11.2ch.net/test/read.cgi/software/1157043396/
Part4 ttp://pc11.2ch.net/test/read.cgi/software/1184556627/
Part5 ttp://pc11.2ch.net/test/read.cgi/software/1201502896/
Part6 ttp://pc11.2ch.net/test/read.cgi/software/1219130051/
Part7 ttp://pc12.2ch.net/test/read.cgi/software/1230694774/
Part8 ttp://pc12.2ch.net/test/read.cgi/software/1243005818/
Part9 ttp://pc12.2ch.net/test/read.cgi/software/1253888736/
Part10 ttp://pc12.2ch.net/test/read.cgi/software/1265518996/
Part11 ttp://hibari.2ch.net/test/read.cgi/software/1280482227/
Part12 ttp://hibari.2ch.net/test/read.cgi/software/1296446228/
Part13 ttp://anago.2ch.net/test/read.cgi/software/1317156599/
Part14 ttp://anago.2ch.net/test/read.cgi/software/1333372506/
Part15 ttp://anago.2ch.net/test/read.cgi/software/1349735581/
Part16 ttp://anago.2ch.net/test/read.cgi/software/1367725658/
Part17 ttp://anago.2ch.net/test/read.cgi/software/1383384464/
Part18 ttp://anago.2ch.net/test/read.cgi/software/1398655195/
Part19 ttp://anago.2ch.net/test/read.cgi/software/1411360229/
Part20 ttp://anago.2ch.net/test/read.cgi/software/1422427426/
Part21 ttp://anago.2ch.net/test/read.cgi/software/1437910497/
Part22 ttp://potato.2ch.net/test/read.cgi/software/1452881399/
Part23 ttp://potato.2ch.net/test/read.cgi/software/1470936221/
Part24 ttp://egg.2ch.net/test/read.cgi/software/1487149472/
■実行環境
Q1：スクリプトに書いた日本語が文字化けしちゃうんだけど...
A1：スクリプトファイルを「UTF-8」の「BOM」付きで保存する。(AHK1.1の場合)
Q2：初めて使うけどどれを使えばいいの？
A2：AHK1.1のユニコード版を推奨。
旧流行らせるページの配布物をそのまま使う場合は本家をそのまま利用する事。
64ビットOSでAHK1.1 32ビット版の使用は制約が多いので、64ビット版を強く推奨。
■ リマップ・ホットキー割り当て
Q1：[CapsLock(英数)][ひらがな][全角/半角]キーの割り当てがうまくいかないよ
A1：OSのローカライズ段階で発生してる問題なので日本語環境だとLock系キーの動作は不定。
OS側がキーUp/Down情報を正しく返してこないのでAHKのみで対処は無理です。
レジストリ変更等で別キーへ再配置を行い、AHKで割り当てを行うという二段構えが必要。
例) ChangeKeyを使って[ひらがな]を[F13]にする
AutoHotkeyで任意のキーをF13にリマップする（例えばF12をF13にリマップし、スクリプトを実行）。
F12::F13
Changekeyを起動する。(
ttp://www.forest.impress.co.jp/library/software/changekey/ ) 「調査」→「どのキーなのか？またはスキャンコードでキーを変更します」を選択。
F12を押すとスキャンコード(0x0064はF13)が表示されるので覚えておき「終了」をクリック。
「ひらがな」キーをクリックすると「【ひらがな】キーをどのキーに変更しますか？」という
ウィンドウが表示されるので右上の「Scan code」をクリック。
覚えておいたスキャンコード（0064）を入力し、「OK」ボタンをクリック。
「登録」をクリックし、Windowsを再起動する。
A2：リマップは修飾キー(Ctrl,Shift,Alt,Win)の押下状態を引き継いでキー発行するので、[Ctrl]+[Esc] がキー送信されるため。
これを避けるには、「Send」コマンドを利用して明示的に修飾キーなしのキーを発行をすればよい。
^1::Send, {Esc}
Q3：[Shift], [Ctrl], [Alt], [Win]以外を修飾キーとしてキー割り当てしたいよ
A3：コンビネーションキーの機能で実現ができる。
例) 無変換 + IKJLキーをそれぞれ「↑↓←→」に割り当てたい場合は以下のように記述する。
sc07B & I::Send, {Blind}{Up}
sc07B & K::Send, {Blind}{Down}
sc07B & J::Send, {Blind}{Left}
sc07B & L::Send, {Blind}{Right}
Q4：「XX hotkeys have been received in the last XXXXms.」って怒られるんだけど、、、(XXは環境による)
A4：多分自分自身のキーを送って無限ループになっている。 例) 「a::Send, a 」
先頭に $ を付ければ回避できる(NT系のみ)。 例) 「$a::Send, a」
#UseHookで全部にキーボードフックを適応する方法でも可。
Q5：キーリマップを使うとキー押下中に連打するけど、マウスボタンの場合は連打しない…
A5：マウスはキーリピートしないので、Loopなどを使って自前でリピートさせてください。
Q6：ジョイスティックのリマップがうまくいきません！！助けて
A6：ジョイスティックではリマップできない。「Send」コマンドでキー発行する必要がある。
× Joy1::Esc
○ Joy1::Send, {Esc}
Q7：ジョイスティックの上下左右に割り当てたいけど、JoyLeft,JoyUpってホットキーは無いの？
A7：無い。AHKのジョイスティックサポートはかなり貧弱なのでプログラマブルにやる必要がある。
A8：AutoHotkeyではできない。
Q9：[Ctrl][Shift][Alt]が押されっぱなしになる時がある。これってAHKのせい？
A9：AHKが原因の場合とそうでないときがある
○AHKが原因の場合
AHKには、以下のような修飾キー付きのホットキーで修飾キー無しでキーを発効する場合、
一時的に修飾キー押下を解除して、発効後に押下状態を再度設定する機構がある。
しかしこのように発効するキーストロークが多い場合は、Sendコマンドが完了する前に
物理キーが押下解除されてしまっている場合がある。この齟齬が押しっぱなしの原因となる。
例) ^W::Send, {w 30}
これを回避するためには、以下の方法をとればよい：
・キー押下状態を常に監視するキーボードフックを導入する(#InstallKeybdHook)
・キー発効のコマンドを SendInput, SendPlay にする(SendModeで一括指定でもよい)
・上記二つが出来ない場合は、SetKeyDelay, 0 等としてキー発効をなるべく早く行うか、
#HotkeyModifierTimeout で修飾キー押下のタイムアウト値を長めに設定をする。
なお、他のキー発効を行うツール(クリップボードユーティリティやマウスジェスチャツールなど)が、
発効する修飾キーが原因となる場合もあるが、フックの導入でほぼ解決出来ると思われる。
○AHK以外が原因の場合:
環境により異なるので何とも言えないが、以下のような環境の場合発生する事が報告されている。
・ Logicool(Logitec)のマウスユーティリティSetPoint(verによっては問題ない事もあるとか)など他多数
・VirtualPC, WMWare, 窓使いの憂鬱 等のキーボードフィルタドライバを用いるアプリケーションを使っている
Q1：IMEのOn/Offの切り替えや、状態を得るにはどうすればいいの？
A1：
ttp://www6.atwiki.jp/eamat/pages/17.html の「IME.ahk」を使いましょう。 Q2：IMEが現在文字を入力している、または変換中であるかどうかを得ることはできる？
A2：↑のIME.ahkで一部可能(IEやFirefox,MS-Wordのようにインライン化しているアプリでは無理)
■ その他
Q1：「a=abc」と「a:="abc"」って違いがある？ / 「If a=1」と「If (a=1)」って違いがある？
A1：意味としては違いは無い。単体では、コマンド形式（共に前者）の方が「式」形式（同後者）より*少し*速い。
複数条件の場合、IfのネストよりはAND(&&)条件で「式」を並べた方が速い。
が、バッチでかなりの回数（数万↑～)回したりする場合以外は、体感出来るほどの差はない。
Q2：テキストエディタでキーワードの色づけなどをしたいんだけど。
A2：wikiに各種エディタの定義ファイル及びキーワード一覧あり。(
ttp://ahkwiki.net/Tools ) Q3：GUI作るのめんどくせ～～
A3：海外の有志が作ったツールを使うと楽。
SmartGUI Creator (
ttp://www.autohotkey.com/board/topic/738-smartgui-creator/ ) GUI Creator (
ttp://ahkscript.org/boards/viewtopic.php?f=6&t=303 ) Q4：AHKってマルチスレッドじゃないの？
タイマーやMsgBox, WinWait, KeyWaitを使ってるけど思った通りに動かない。
A4：「擬似マルチスレッド」です。最後に割り込んだスレッドが終わるまで元スレッドは動きません。
MsgBox、WinWait、KeyWait、Process,WaitClose などをタイマーで複数動かす時は注意。
> 要は処理系統が複数同時に走らないってこと。図にするとこんな感じ。
> → 実行中、 …：割り込み終了待ち
> 元スレッド →→→→→→……………………………………→→→→
> ★割込 ↑再開
> 割り込みスレ →→→→…………→→→→→→END
> ◆割込 ↑再開
> 更に割り込み →→→END
その行はスレが立った時点で消えてなくなるので、
告知のため、その呪文を2行目以降に再度書いてください。
A5：それぞれを違うフォルダにインストールする（最新版は分ける必要無し）
但し、インストーラーを使って最後にインストールしたAutohotkeyに対して
ahkファイルの関連付けが行われるので、レジストリエディタ(Regedit.exe)や
FileTypesMan等のツールを使って関連付を変更してください。
ahkファイルをAHK(A32)、ahlファイルをAHKLx86(U32)、ah6ファイルをAHKLx64(U64)
といったように別々の拡張子に関連付けが可能です。
それぞれに関連付けしたファイルに対してドラッグアンドドロップを有効にするにはレジストリの
[HKEY_CLASSES_ROOT\ファイルタイプの名前\ShellEx\DropHandler]
の (規定) のデータを {86C86720-42A0-1069-A2E8-08002B30309D} にする。
A6：OSのセキュリティ機能であるユーザーアカウント制御(UAC)にブロックされている。
■回避策
1：管理者として実行
Autohotkey.exeを右クリックしてプロパティを開き、「互換性」→「管理者としてこのプログラムを実行する」にチェック。
スクリプトに記載する方法もある(
ttp://www.autohotkey.com/board/topic/94126-ahk-problem-with-uac-and-privileges/ ) 2：対策パッチ
実行ファイルのマニフェスト書き換え、自己署名証明書のインストールが行われる。
※AutoHotkey.exeはProgram Files以下に置く必要がある。
ttp://www.autohotkey.com/board/topic/70449-enable-interaction-with-administrative-programs/ 3：UAC停止 ※注意!! 必ずHIPS機能がある他のセキュリティ対策ソフトを導入してください。
「コントロールパネル」→「ユーザーアカウント」
Vista：「ユーザーアカウント制御の有効化または無効化」→ チェックボックスをオフ。
7/8/8.1：「ユーザーアカウント制御設定の変更」→ スライドバーを一番下に。
※Windows 8/8.1では上記に加えレジストリを変更する必要があります。(注意：Windowsストアアプリが実行できなくなる)
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Policies\System
「EbableLUA」の値を「0」に変更。
┌ AHK64（統合）
│
AutoIt .│ ┌ AHK_U（統合）
│ │ │
AutoHotkey(1.0) ─ Autohotkey_L ┬ Autohotkey(1.1) ←いまここ
│ │ │
└ IronAHK× │ └ Autohotkey v2（α版）
│ │
└ AutoHotkey.dll .├ AutoHotkey_H v2
│ │ │
│ └ AutoHotkey_H
│
└ AutoHotkey_N×
■メインストリーム
AutoHotkey 1.0（開発終了）
ttp://www.autohotkey.com/ Autohotkey 1.1 (Autohotkey_L)
ttp://ahkscript.org/ ■開発中
Autohotkey v2（下位互換性を排除して操作利便性の向上）
ttp://ahkscript.org/v2/ IronAhk（.NET製、クロスプラットフォーム。開発終了）
ttp://www.ironahk.net/ AutoHotkey.dll（真のマルチスレッド対応）
ttp://www.autohotkey.com/board/topic/39588-autohotkeydll/ AutoHotkey_N（開発終了）
AutoHotkey_H
ttp://www.autohotkey.net/~HotKeyIt/AutoHotkey/files/AutoHotkey-txt.html ■統合
AHK_U（Unicode版）
ttp://www.autohotkey.com/board/topic/46563-unicode-version-of-autohotkey/ AHK64（64bit版）
ttp://www.autohotkey.com/board/topic/53878-autohotkey64-64-bit-autohotkey-l-updated-62410/ ■スクリプト作成支援ツール
AutoHotKey専用エディター ※必須ではありあせん。
SciTE4AutoHotkey
ttp://fincs.ahk4.net/scite4ahk/ GUI作成ツール
SmartGUI Creator
ttp://www.autohotkey.com/board/topic/738-smartgui-creator/ GUI Creator
ttp://ahkscript.org/boards/viewtopic.php?f=6&t=303 AutoGUI
ttps://www.autohotkey.com/boards/viewtopic.php?t=10157 ※テンプレここまで
スレを埋め立てているのではと判定されてしまったため、
今回は分割して貼り込んであります。
sleep 4
Toukou=
return
2.頻繁に落ちるアプリをエラーダイアログ検知後、再起動する
この機能をそれぞれタイマーにして1つのスクリプトにすると
2のエラーダイアログ表示で固まることがあります
ログをみるとIME.ahkの途中で止まってるので
・1か2のタイマーを SetTimer, Main, 500, -1 としてスレッドの割り込み優先度を指定
・一方に Critical を付けてスレッド割り込みを禁止する
・一方に Thread, NoTimers を付けてタイマーイベントの割り込みを禁止する
など試してみましたが失敗します
ちなみに2つのスクリプトに分けると上手く動くのですが
これを1つで実現できる方法がありましたら教えてください
タイマー1つで出来ないかな
そのウインドウが非アクティブになったときに何かをする
ということをしたいのですが、出来ますか？
アクティブになる機会はたまにしかないので、資源の浪費な気がして、気が引けます
ttps://sites.google.com/site/agkh6mze/howto/winevent なるほど。なんか出来そうですねえ。ありがとうございました
当初はタイマー1つで書いてましたがやはり止まるので
タイマー2つで片方の割り込みを制限すればと思い分けました
環境はWin8.1x64 AHKv1.1.24.02(U64)/v1.0.48.05(A32)で
以下コードの主要部分です
この2つのタイマーを2ファイルへ分けると正常に動きます
Classes = 特定アプリのクラス名, ...
;ここにエラーになるアプリのタイトル数パターン分
GroupAdd, err, タイトル
:
SetTimer, Main, 500 ;IME.ahkのタイマー(IME.ahkはahkの.\lib以下へ
SetTimer, Mon, 500 ;エラー検知用のタイマー
Return
Main:
WinGetClass, ActiveWinClass, A
If ActiveWinClass in %Classes%
{
If (IME_GET()) {
;ここに特定のClasNNではOFFにせずReturnする例外処理
IME_SET(0)
}
}
Return
IfWinExist ahk_group err
{
WinActivate
ControlClick, OK, A ;アプリケーションエラー画面でOKを押す
Process, WaitClose, プロセス名, 30
If ErrorLevel = 0
{
Run, パス,,, PID
Process, Wait, %PID%, 30
If ErrorLevel <> 0
{
;ここにアプリの画面を普段の状態にする処理
}
}
}
Return
ME.ahkのどこで止まってる？
あと使ってるIMEは何？
ひとつのキーで押し方によって違う動作をさせたいです
コードを書いてみましたがうまく行きません
Else以降が動作したりしなかったりです
また、シングルクリックでElseより上のコードを巻き込んでしまう場合もあり動作が安定しません
尚、別のキーにコードを分けると問題なく動作します
Pause:: ;━━ダブルクリックでモニタをオフにする━━
KeyWait, Pause
if (A_PriorHotkey==A_ThisHotkey)&&(500>A_TimeSincePriorHotkey)
Run,C:\Program\Monitor OFF.exe
Else ;━━シングルクリックでボスが来た━━
DetectHiddenWindows,On
ControlSend,,b,ahk_class MPC-BE
ControlSend,,^w,ahk_class MozillaWindowClass
ControlSend,,+{F8},ahk_class WindowsForms10.Window.8.app.0.141b42a_r14_ad1
Return
何かヒントをください。よろしくお願いします。
ifやelseは二行以上ある場合は｛｝で囲う
IMEはMS-IME2012で、Win2000のMS-IME2000でも確認してます
ログはエラー画面の時点で何も表示されず
OKを押すと復旧して以下で止まっていたことが分かります
046: WinGetClass,ActiveWinClass,A
047: if ActiveWinClass in %Classes%
049: if (IME_GET())
---- ahk\Lib\IME.ahk
147: ControlGet,hwnd,HWND,,,%WinTitle%
148: if (WinActive(WinTitle))
149: ptrSize := !A_PtrSize ? 4 : A_PtrSize
150: VarSetCapacity(stGTI, cbSize:=4+4+(PtrSize*6)+16, 0)
151: NumPut(cbSize, stGTI, 0, "UInt")
152: hwnd := DllCall("GetGUIThreadInfo", Uint,0, Uint,&stGTI) ? NumGet(stGTI,8+PtrSize,"UInt") : hwnd
154: }
156: Return,DllCall("SendMessage", UInt, DllCall("imm32\ImmGetDefaultIMEWnd", Uint,hwnd), UInt, 0x0283, Int, 0x0005, Int, 0) (14.77)
ありがとうございます
前よりマシな動作になりましたが何回か押してみたところ、ダブルクリックでElse以降のコードを巻き込んでしまうことがあります
Pause upにしたらだいぶマシになった気はするものの安定しませんね
また、シングルクリックで上のコードを巻き込むことはなくなりました
しかし、シングルクリックの場合動作が安定しません。動作したりしなかったりです
キー自体は青軸なのでしっかりカチッと入ってることがわかります(キーを変えても同じでした）
う～ん押し方のタイミングの問題でしょうか？ 軸がカチッと入って1秒くらい押し下げてからアップしないと動作しないことがありますし
また、軽いタッチでカチッと入って素早くキーから指を離しても動作することもあります
Pause up:: ;ダブルクリック的直し方でモニタをオフにする
KeyWait, Pause
if (A_PriorHotkey==A_ThisHotkey)&&(500>A_TimeSincePriorHotkey)
{
Run,C:\Program\Monitor OFF.exe
}
Else
{ ;シングルクリックでボスが来た
DetectHiddenWindows,On
ControlSend,,b,ahk_class MPC-BE
ControlSend,,^w,ahk_class MozillaWindowClass
ControlSend,,+{F8},ahk_class WindowsForms10.Window.8.app.0.141b42a_r14_ad1
}
Return
長押しという選択肢もあろうかとは思いますが、コードの内容上長押しにはしたくないので何とかワンクリックで確実に動作しないでしょうか？
未来に2回目が押されるかどうか関係なく即座に1度押しとしてelseのほうに行ってる
あぁなるほど状況は理解した
1回押しで動くコードがあるからそれがダブルの1回目で邪魔してるのね
ということはElse以降の方をダブルクリックにしたほうがいいのかな
もうちょい頑張ってみます
ありがとうございました
32bit64bitの問題じゃねえかな149でポインタサイズ確認してるのに
152のポインタ渡で型が32bitのUInt、SendMessageも64bitだと64,32,64,64で
型はptr, UInt, ptr, ptrになると思う
条件分岐する前に1回押されてしまう
1回押しを定義しつつダブルクリックを否定
から～の Else
で、ダブルクリックを設定しつつシングルクリックを拒否
理屈だとこういうことか
できんのかなコレ...
タイマー使わないとだめだと思う
サンプルコード集
ttp://ahkwiki.net/SampleCodes で解決するよ
ttps://ux.getuploader.com/autohotkeyl/download/123 勝手にIME.ahkを修正してみたけどこんな感じかな？ 👀
Rock54: Caution(BBR-MD5:669e095291445c5e5f700f06dfd84fd2)
WPARAMにUPtrすばらしい
しかし、ボスが来た自体に問題が出てることが発覚
どうやらプログラムによって発動までにラグがあったり、何度か押さないと反応が無い
あれ？ 単独スクリプトでもっとしっかり動いてたはずなんだけどなぁ
特にFirefoxの反応が悪すぎる。それに対して動画プレイヤーは素直に反応する
音楽プレイヤーはちょっと遅れ気味で反応
SetKeyDelay,を10から-1にしても変わらず...
クラスを1個づつに分けて試したけど反応悪い
直接のショトカは問題ないので何か悪さしてるのかな
Pauseキーだと10回に1回くらい2度押し判定がスカってaがsendされることがある
#UseHook ;ホットキーラベルの定義で、常にフックを使用するようにする
Pause:: ;無変換
KeyWait,Pause
KeyWait,Pause,D T0.2 ;0.2秒対象キーが押されるのを待つ
If(ErrorLevel)
{
;ここに任意のコマンド 1度押し
Send, a
KeyWait,Pause
Return
}
;ここに任意のコマンド 2度押し
Send,b
KeyWait,Pause
Return
他のキーだと2度押し判定ミスすることないからキーボードの仕様なのかな
まあPauseはそういう使い方想定してないから2度押ししたいなら素直に別キー使った方が良いんだろうね
検証ありがとうございます
現在、F13キーにして検証中
ボスキーの反応がキーによってまちまちです
もう、わけわからんのでショトカの割り当て含めて組み直しですね
MusicBee
MusicBeeのショトカをグローバル設定に変えてControlSend,,を使わず直接Send, +{f8}で送ってみた結果、レスポンスとしては全く問題なし。
それ以外の機能のショトカをControlSend,,で送ったところMusicBeeはレスポンスが非常に悪いようです
一度反応した後は間をあけないと2回目以降ラグが出てしまう？遅延しやすい感じ
分けて使ってる時はたまたま運が良かったみたい?。ボスが来なくてよかった...
Firefox
F13で反応無し、#F13で確実にレスポンスよく反応する
MPC-BE
どのキーでも確実にレスポンスよく反応する
発動キーを2キー以上使えば行けそうな気がしてきましたが
そうなるとコードをひとまとめにして簡単にしてやろうという当初の目論見から少しズレてしまうだよね
ってかFirefoxどうしたんだって感じです。もともと1キーでテキパキ反応してたんだけど
もうちょい頑張ってみます
DetectHiddenWindows,On
ControlSend,,^w,ahk_class MozillaWindowClass
Return
F13:: まったく動作せず
#F13:: アクティブの時動作せず
^F13:: アクティブでも非アクティブでも動作する
F13長押し まったく動作せず
^F13長押し アクティブの時動作せず
#F13長押し アクティブの時動作せず
うん。心が折れた
^F13でいこう。そしてボスキーは他のコードと分けようかな...
ってか面倒くさいから普通にボスキーアプリ拾ってこいって話だよな
割当じゃなくキーコード自体がF13キー
元々はAppsKey
AHKネイティブでも、あるいはDLLになっているものでも構いません。
環境はXP 32bit版、Windows 7 64bit版、Windows 10 32bit版（いずれも日本語版）の
3つで動くことが前提、Ahk2ExeでUnicode 32bitのEXEファイルにして持ち歩くことも想定中。
もしまだなければ自分で書くしかないのかなと思っていますけど、
既にあるようなら教えていただきたく。
具体的にやりたい操作としては、文字列が与えられたときに、
・全角英数字をすべて半角にする
・ASCII文字のうちファイル名に使えないものを、すべて対応する全角文字に置き換える
・カタカナの全角⇔半角を一括して切り替える
・ひらがなをすべて全角カタカナに変換する
という操作ができればOKです。
秀丸エディタを持っているので、その変換モジュールを使うという手もあるのですが、
そのまま使うには色々とネックがあります。
・秀丸の32bit DLL呼び出しはWINAPIV規約なので、WINAPI規約を前提にしたAHKの
DLL呼び出し機能で呼ぶには、ラッパーDLLをひとつ書く必要がある
・秀丸の変換モジュールの内部コードはCP932で、Unicode文字は独自の内部表現にして
渡す必要があるので、Unicode文字の入った文字列の場合には注意を要する
…やっぱり、tr() 関数を自分で書くのが手っ取り早いでしょうか？
ざっと見た限りではJavaScriptにも tr() はないようですし、いちど一念発起して作っておけば
使い回しがきくかも、とは思っているのですが、もし既に存在してBSDライセンスなり
LGPLなりで自由に使えるなら、わざわざ自作するのも馬鹿らしいので…。
みんな自分で書いてるんじゃないの
ttps://msdn.microsoft.com/en-us/library/microsoft.visualbasic.strings.strconv(v=vs.110).aspx 俺は知識のない人間だからよくわからんけどこれは使えないのだろうか
ttp://anago.2ch.net/test/read.cgi/software/1398655195/974
ttp://pastebin.com/diJWv0pw まあ、そういわれればそうですね。書いても大した手間じゃないと思ってはいます。
.NETでDLLをひとつビルドする必要がありますね。
Visual Studioが今は無料になったとはいえ、もしかしたらWindows 2000とか
98とかのVMにAHKを入れて使う可能性があるので、.NETは避けたいです。
＃単に.NETに対してアレルギーがあるだけなんだけど。
けっこう面倒臭そうですね。
＊ ＊ ＊
というわけで、大した手間じゃないので自分で書くことにします。
tr() って、いろんな言語で汎用的に使いそうな関数ですから、
著作権フリーの自前のものを手元に持っておいたほうが、
あとあと融通がききそうですし。
ってAHK単体で実現できますか？
Webブラウザで超縦長ページを高速スクロールさせたいとき、ホイールを高速で回すと10数ページぐらい移動とか・・・
ホイールスクロール - eamat @Cabinet - アットウィキ
ttps://www6.atwiki.jp/eamat/pages/30.html WheelScroll.ahkはどうだろう
一応日本人作だから日本語の説明だから分かりやすいかと
10数ページ一気に移動とか可能か分からないけど・・・
AHKの万能さに感動しました
サイドボタン1＆ホイール上下でHome/End
サイドボタン2＆ホイール上下でPageUP/PageDown
を割り当ててる
とりあえず一番上か一番下に飛びたいことが多いのでHome/End割り当てるのが効率良いです
って事はAHKで出来ますか？
Loop間隔が短いならGetKeyStateでif分岐してBreak
Loop間隔が長いならAキーに変数指定を割り当てといて
Loop中にその変数の値でif分岐してBreakとか
ありがとうございます
デスクトップのアイコンの有無ってどうやって判別したら良いんだろう？
-1が返るとアイコンなし
user32.dllを読み込んで何かのイベントを貰えれば良いのだけど、それについての情報が殆ど無いですよね
やり方もわからないし…
で、
ttps://sites.google.com/site/agkh6mze/howto/winevent このページ見てて、デスクトップのなにもない所をダブルクリックという作動をよくよく考えてみると、
すべてのフォーカスが外れた状態でダブルクリックイベント
という事なんじゃないかと
その先さっぱり
パラメータの説明はMSにあるけど、無能過ぎてちんぷんかんぷん
Spy++で調べるとデスクトップはFolder viewというFormだということはわかったけど…
ありがとうございます
まだ良くわかってないけど調べてみるとLVM_HITTESTというキーワードをちょこっと調べるとどうにかできそうな匂いがします
もうちょっと調べてみるです
検索したらすぐに見つかったけど
ttps://autohotkey.com/board/topic/82196-solved-double-click-on-the-desktop/ 1ページ目に手抜きのコード
2ページ目に実用上ほぼ問題なさそうなきれいなコード（中程のやつ）
これだと問題となるケースがあって、それを除外する努力が3ページ目までつづくけど、
結局は潰しきれないので、好きなやつをどうぞ
おぉありがとうございます
今は無理なので後で使ってみます
ありがとうございました
解析有難うございます
修正版にてようやくエラーが再現しましたが、応答なしになるのは変わらずでした
Win2000+IME2000ではIMEの状態が常にOFFになりました
残念ですが2つ起動することにします
64bit版で32bitアプリにSendMessageでメッセージは送れないと思うその逆も
タイマー1つにしてまずエラーダイアログ判定して、でなければIMEへ
;ここに特定のClasNNではOFFにせずReturnする例外処理
If (IME_GET()) {
IME_SET(0)
と書けないかな
まじ？GetKeyState("vk1Dsc07B", "P")で？
俺の指定方法がおかしいのかな
他のキーは取得できるのにな
vk1D
sc07B
それでも"vk1D"でも"sc07B"でも"P"があってもなくても0|1ちゃんと返る
ならないから多分おま環かも
面倒だし別のキーに割り当てますわ
キーヒストリー（アイコンダブルクリックでCtrl+K）に何が入っているか気になるね。
レジストリで変更してるとか。
クリックして
マウスムーブ
クリックして
マウスムーブ を繰り返したいんですが
マウスムーブの値が一定じゃない場合
数珠繋ぎにif文を増やして行けばいいのでしょうか？
キーを離したら停止は出来るんですが
If文の数珠繋ぎにするやり方を教えてください
質問するならもう少し具体例を挙げるとかとかした方がいいんじゃないかな
if (式1) {
・・・
} else if (式2) {
・・・
} else if (式3) {
・・・
}
多分コレジャナイ感
if (式1) {
・・・
}
if (式2) {
・・・
}
if (式3) {
・・・
}
概略こんなコードになるはず。
何か適当な名前の関数()
{
マウスムーブ1回目を実行
当該キーの状態を取得
if (押されていない)
return
マウスムーブ2回目を実行
当該キーの状態を取得
if (押されていない)
return
：
}
で、回数が多いようならこんな感じで1回分の作業単位の関数を書いたほうがいい。
MouseMoveAndKeyCheck(dx, dy, strKeyName)
{
MouseMove, dx, dy,. , R
return ( GetKeyState(strKeyName)=="D" )
}
この場合、この関数を
if ( !MouseMoveAndKeyCheck(10,10,"LShift") )
return
if ( !MouseMoveAndKeyCheck(10,-20,"LShift") )
return
とかかいて呼び出してやればいい。
＃テストしてないので誤字とかあったらごめんね
一つづつ比較しろってのかよ
一々%がついたりつかなかったりもウザいし
よいなウキキ
ウッキー
FileReadからのStringReplace何ですが、よく理解していないので以下のように変数から変数へリプレイスしています。
もっとスマートな方法はありますか？。
unko0 =
(
unko chan
geriguso chan
bichiguso chan
)
StringReplace, unko1, unko0, unko chan, unko kun
StringReplace, unko2, unko1, geriguso chan, geriguso kun
StringReplace, unko3, unko2, bichiguso chan, bichiguso kun
msgbox, リプレイス前`n%unko0%`n`nリプレイス後`n%unko3%
今まで本家版そのままと勘違いしてた
なるほど、変数を複数作らなくてもいいんですね。
確かにスマートですね。
勉強になりました、有難うございます。
キーリピートできるようにはできないんでしょうか？
左クリック押しながら、マウスの別ボタンを押すと
ロジクールの多ボタンマウスだとちゃんと書いたコードが機能しますが、今のやつは無理です。
たぶん、キーリピートが関係している？気がするんですが。
どんな挙動しているか自分で確認しよう
キーリピートやキーUp/Downの時間など
#InstallMouseHook
KeyHistory
Auto Hot Keyにだけマウスのボタンの入力が行ってませんでした。
左クリックだけしか反応がありません……。
質問するなら自分がどういうコード書いてるのが具体的に書けよ
エスパースレじゃねえんだから
いろいろ実験したんですけど、そのマウスだけAuto Hot Keyが認識しませんでした。
KeyHistoryを教えてくれた方、ありがとうございました。
これを知らなかったら、認識しないのに無駄にコードを書いて悩んでたと思います。感謝です。
普通多ボタンマウスならボタンのカスタマイズやキーアサイン機能あるだろ
俺の場合ならRazerNagaにF13～F24など割り当ててAHK側でキーリピートさせたりも出来る
どこのマウス使ってんだよ
さっきは書いてなかったが#InstallKeybdHook書けばそちらもログにでる
サイドボタンのマウス設定が「Z」ならAHKは「Z」と認識する
#InstallKeybdHook ; キーボードログON
#InstallMouseHook ; マウスログON
KeyHistory
の「別のボタン」とは何ボタンなのか、多ボタンマウスの特殊ボタンならばそこに何を割り当ててたのか
「今のやつ」とはどのマウスのことなのか
「エレコム ワイヤレスマウス 無線 2.4GHz レーザー 8ボタン チルトホイール Lサイズ ブラック M-XGL20DLBK」です。
KeyHistoryでは、左右クリックとホイールの上下左右しか認識がありませんでした。サイドボタンは認識していません。
サイドボタン（5番）にPgDnを、右クリックにPｇUpをマウスアシスタントドライバで割り当てて、
以下のようにコードを書きました。
~LButton & PgDn::Send,{RButton} ;①左クリックを押しながらサイドボタン（5番）（PgDn）
~LButton & PgUp::Send,#d ;②左クリックを押しながら右クリック（PgUp）
このコードはロジクールのG700Sなら動くんですが、エレコムマウスでは動かないです……。
もしくはエレコムのマウスアシスタントとの相性か。
エレコムの有線ゲーミングマウス（ドライバはゲーミング用）だと①も②も動いたんですけどね。
効いてますね。
横だけどエレコムのマウスアシスタントを切ってAHKだけででリピートできないかな
アシスタントで割り当てたキーが検出されませんね。
マウスアシスタントを切ってKeyHistoryを試してみたら、
サイドボタンの「XButton1」と「XButton2」は検出されましたが、それらにAHKでKeyを割り当てても、
KeyHistoryで「XButton1」「XButton2」と認識されるだけで、割り当てできませんでした。
もはや何が原因か分かりません。
目的の操作と動作を書いてみて
BOM付テキストだとBOMの3バイト勝手に削られちゃうのどうしたらいいの
File := FileOpen("a.txt", "r")
Enc := File.Encoding
Len := File.Length
VarSetCapacity(Buf, Len, 0)
Len := File.RawRead(Buf, Len)
File.Close()
File := FileOpen("b.txt", "w", Enc)
File.RawWrite(Buf, Len)
File.Close()
保存はしない ただ丸ごと取り込みたい
5行目の時点でLenが3行目のLenより3少なくなってるのが困る
バッチリです ありがとう
ttps://autohotkey.com/docs/commands/FileOpen.htm 例えばあるソフトで「☑」夜間モード、みたくなっていて
そのチェックありなしでキーボード操作が大幅に変わってしまうようなものに対応したホットキー（意図しない暴発を避けるため、片方のモード時にはスルーする、など）を設定したく調べでいるのです。
メニューバーの左から３番目のプルダウンの８番目のサブメニュー内の４番目の状態を取得する例。
メニューアイテムはゼロから数える。セパレータも数える。
hWnd:=WinExist("a")
hMenu:=DllCall("GetMenu","uint",hWnd)
hSmenu1:=DllCall("GetSubMenu","uint",hMenu,"uint",2)
hSmenu2:=DllCall("GetSubMenu","uint",hSmenu1,"uint",7)
St:=DllCall("GetMenuState","uint",hSmenu2,"uint",3,"uint",0x0400)
MsgBox,%St%
チェックされているかどうかでstの値が違う。
IEやchromeだと、このやり方ではメニューのハンドルが取得できない。(MDIだからかな)
できれば、 も解決すると思う。
IEのメニューのハンドル取得方法を知っている人求む。
ありがとうございます！使用したいソフトに数値あてはめてテストしたら問題なく動きました。
最近ahkを触り出したので、ご紹介いただいたDllCallなど、まだ触ったことのないコマンドでした。さっそくwikiを見つつ理解しようとしてますが頭がパニックになってます！アリモノの関数から値を引き出している？うーむ
またじっくり勉強していこうと思います、ありがとうございましたm(_ _)m
サイドボタンに割り当てた任意キー（PgDnなど）がAHKに入力されないのは原因不明で
まだ解決してないんですが、いろいろいじってたら
Xbutton1と2がAHKに認識してくれるようになりました。
Xbutton2::
Send,{PgDn}
Sleep,200
While (GetKeyState("Xbutton2", "P"))
{
Send,{PgDn}
Sleep,30
}
Return
こんな感じで、リピート機能がないサイドバタンにリピートさせてます。
こんなコードでいいのか分かりませんが。
はじめとリピート中は
Send {PgDn down}
で、return前に
Send {PgDn up}
添削ありがとうございます。
たしかにそれのほうがスマートですね。
長押しすると文字のすり抜けが発生します。
どうすればこのすり抜け現象が解決するのでしょうか？
<^h::switchKeyByWindow("{Home}", "^h")
<^;::switchKeyByWindow("{End}", "^;")
<^l::switchKeyByWindow("{Right}", "^l")
<^j::switchKeyByWindow("{Left}", "^j")
<^i::switchKeyByWindow("{Up}", "^i")
<^k::switchKeyByWindow("{Down}", "^k")
ググったら、１ページだけヒットした。
その作者に知らせてあげるのが一番良いよ。
;----------------------------------------------------------------
; Window によって送信するキーを振り分ける
;
; defaultKey デフォルトで送信するキー
; ctrlKey Ctrlを送信するウィンドウのとき送信するキー
;----------------------------------------------------------------
switchKeyByWindow(defaultKey, ctrlKey)
{
if (isCtrlKeyWindow())
{
Send,%ctrlKey%
}
else
{
Send,%defaultKey%
}
Return
}
;----------------------------------------------------------------
; Ctrl キーを送信する Window かどうかを判断する
;----------------------------------------------------------------
isCtrlKeyWindow()
{
; GVim
IfWinActive,ahk_class Vim
{
return 1
}
; Poderosa
IfWinActive,ahk_class WindowsForms10.Window.8.app.0.20f9772
{
return 1
}
; Mingw
IfWinActive,ahk_class ConsoleWindowClass
{
return 1
}
Return 0
}
Win8やWin10のマシンではちゃんと機能するのにWin7のマシンではPlayにすると全く動作しなくなる
カーソル移動しているのですが、上下左右を切り替えた瞬間に
通常キーがすり抜けます。何か手立てはありますか？
<^h::Send,{Home}
<^;::Send,{End}
<^l::Send,{Right}
<^j::Send,{Left}
<^i::Send,{Up}
<^k::Send,{Down}
SendMode,Input
#InstallKeybdHook
#UseHook
この設定だとどうなる？
レスありがとうございます
試しましたが、結果は変わりませんでした( ˘ω˘ )
Ctrlキー押しっぱなしで通常キーを切り替えた瞬間、
一文字だけすり抜けてしまいますね
autohotkeyではどのように再現すれば良いのでしょうか？
MouseGetPos
Ctrlキーと通常キーの両方を押しっぱなしにしただけでも
時々すり抜けが起きますね、、、困ったな(''_'')
Ctrlが押されてる間ループで自前処理はどうでしょう
それってどうやるのでしょう？教えて
wmic process where name=
を使って変更できますが、AHKでも出来ますか
アプリを起動するごとに複数のアプリの優先度を組み合わせによって変更したいのです
アプリの起動はAHKで行うので、AHKで優先度も変更できれば楽です
MSDOSのバッチファイルを作っていちいちそれを起動するというのは避けたいのですが
やってみたのですが、firefox.exeなのですが複数のプロセスがありますが１つだけしか変わりません
DOSではすべてが変わるのですが、全部を変える方法はありますか
WinGetのListで取ろうとしてもPIDは取れないし、同じイメージ名が複数ある場合は１つだけしか変えられないのでしょうか
それかrunコマンド経由でwmic.exeの実行はできないん？
で、WinGet Listで取得すると、IDが１つだけしか取れません
でも、firefox.exeの同名のプロセスが3つ存在しています
AHKで起動してるんだから、RunコマンドのOutputVarPIDでいいんじゃないの？
Run Firefox.exe, , , NewPID
Process, priority, %NewPID%, Low
でこのスクリプトで起動されたfirefox processは全部Low priority
OneTabのせいで、Firefoxのマルチプロセスが無効だったことに気がつかせてくれてありがとう
Firefox削除した
For process in ComObjGet("winmgmts:").ExecQuery("Select * from Win32_Process")
で全部取得しつつfirefox.exeならprocessで変えるようにすればいいんじゃない
やってみました
まず、Firefoxを全部閉じて、タブも１つだけ起動するようにして普通にFirefoxを起動しました
すると、firefox.exeという同名のプロセスが３つできます
次にこれをProcess, priorityで変更しようとすると、１つだけしか変更できず、２つは変更できません
次に
Run Firefox.exe, , , NewPID
MsgBox %NewPID%
Process, priority, %NewPID%, Low
としてやってみました。 MsgBoxでPIDを確認したかったからです
すると、確認している間にプロセスが３つ立ち上がって、結局変更できたのは１つだけ
ところが、MsgBoxをコメントアウトして
Run Firefox.exe, , , NewPID
Process, priority, %NewPID%, Low
でやれば、３つとも、プロセスがすべて低になりました
多分最初に起動したプロセスが親で、これをすぐに低に設定したら、それに続く２つのプロセスも
低のプロセスから派生したものだから低になるのでしょうね
この方法で出来ることはわかりました
でもすでに起動しているものを変更することはできないのかな
やってみました。 驚いたことに
detecthiddenwindows on
すると、１つだったIDが８つ出てきました。
これらはもちろん異なるIDだったのですが、WinGetでこれからPIDを求めるとすべて同じ多分親のPIDしか
出てこず、残りの２つのPIDは出ませんでした
以下のメソッドを追加したら少し改善した。
少なくとも一定時間の移動ではすり抜けなくなってみたい。
但し、方向切り替え時に通常キーの同時押し状態になってしまう瞬間はダメですが、
SendMode Event
#UseHook
#InstallKeybdHook
#HotkeyModifierTimeout 100
SetKeyDelay,0
それキーボード側の同時押し可能数の問題じゃね
ゲーミングキーボードとか多同時押し対応したものなら起きないかもな
自分が使ってるのはリアフォかHHKBPro2だから同時押し6つのヤツ
恐らくCtrl＋I,J,K,Lの２つのキーのSendだから3つ目が来た時に
単独押しの判定になるのかな？
少し改善したのはHotkeyModifierTimeoutを追加したのが効いてると思う。
Ctrl+Iが押されたときAHKはまずCtrl upをSendしてから↑をSendし↑ upをSendしCtrlをSendする
この処理中にJ,K,Lを押すとスルーするかな
Runwaitするとタイマーも割り込めないんですね…
Runの後にループでスリープしながら見張るのが無難でしょうか？
Send, {Blind}{Up}
Ctrl+上 になってしまうのでは
なぜあれで2度押しができるんですか？
解説お願いしたいです。
Ｑ．すぐに離されましたか？
↓yes no→ Ａ．長押しです
Ｑ．またすぐに押されましたか？
↓yes no→ Ａ．1度押しです
Ａ．2度押しです
keywaitでキーアップを待っているわけよ
0.3秒以内にキーアップがこなければ長押し
0.3秒以内にキーアップが来てそこから0.2秒以内にまたキーダウンが来たら2度押し
そうでなければ1度押し
コメント適切すぎてどこで何してるのか一目瞭然だし
あれ以上の説明って逆に難しい気がするんだけど
離されることなくタイムアウトしたら
errorlevelが trueになる
ちょっと理解が混乱するのはいたしかたない
これらのテキストをControlGetTextで取っているのですが
ひとつひとつクリックして選択してからGetしているので時間がとてもかかるのです
なので、このコントロールのメモリアドレスを取得することはできませんか
そうするとメモリから直接すべてのテキストを取得することができそうな気がするのですが
ControlGetTextでテキストを取得しているということは当然メモリにアクセスしているので
AHKはアドレスをゲットしているはずですね
一度すべてのEditコントロールのメモリアドレスをゲットしておけば以降はメモリアクセス
だけでゲットできるか考えているのですが
controlHWNDをゲットして出来そうですね。 ありがとうございました
Send, {Blind}でやってみたが、カーソルの動きが
変な動きをするんだけど、、、
「KeyWait,vk1Dsc07B,D T0.2」は0.2秒経過してもdownされてなかったらそのまま通すんですね。
そこが分かってなかったです。
{Blind} は変換キー+JKLi とかで使う時が良いよ。
3パターンともディレイがききません。
setkeydelay,400
send,{LButton 4}
send,{LButton}{LButton}{LButton}{LButton}
Click,Left 4
return
ディレイできるようになりました。
ありがとうございます。
Ctrl＋通常キーの長押しは、ほぼこれでOKのようです。
同時押し時のすり抜けはまだ解決してませんが
今のところはキーの切り替え時に同時押しにならないようにすれば、
なんとかイケてます(^^♪
バッククォート自体の入力をCtrl+バッククォートでSendしたけどうまく出来ません。
対処方法を教えてください
`::Send,{Blind}{Delete}←バッククォートをDelキーに割り当てはOK
^`::Send,{Blind}`←Ctrl+バッククォートでバッククォート入力がうまくいかない
仮想キーコード{vkC0}を使えば？
wikiの仕様のとこ読んどいで
原因追求せずいきなり対処法教えてってのもなんだかな
^`::Send,``とかでしょうか？いろいろ試したけどうまくいかない、、、
^`::Send,{vkC0}とかでしょうか？もちろん試したけどダメでしたよ
出力がダメなのか、入力がダメなのかを実験して
お前さあ、ここエスパーすれじゃねえんだから「もちろん試した」とか他人が分かるわけねえだろ
ろくに検証してないくせに上から目線になってんじゃねえよ
入力がダメです。何か手立てはありますか？
入力を仮想キーコードにすりゃいいじゃん
思考力停止してんのか？
^{vkC0}::Send,{vkC0}か？実行エラー発生だわｗ
入力の書き方が間違ってる
もっとちゃんと調べろ
これ延々と続けるの？
^vkC0::Send,{vkC0}か？これもダメだわ
なら君のキーボードが特殊で何か別のキーコードが発行されてんじゃね
#InstallKeybdHookでキーコード調べな
入力が問題ないかどうかは、
MsgBox,OK
とか出してみれば良い。
出力が問題ないかどうかは、
^a::
とかの入力で表示できるかどうか試せば良い。
日本語キーボードだから実際に押すキーはshift+ctrl+@だけど
VK_OEM3とVK_OEM4の二つの仮想キーが使われてるみたいなので
その値でSendしたら出来ました(^^♪
^vkF3::Send,``
^vkF4:Send,``
こういう奴って他人を利用することしか考えてないんだろうな
地味に気になるわ
;━現在日時をスタンプする
^Tab::
FormatTime, TimeString,,yyyy_MMdd_HHmm
Clipboard = %TimeString%
Send, +{Insert}
Sleep, 200
clipboard =
return
PCの再起動しても直らず
単独のahkファイルにコピーで動作OK (他のコードを除外して）
元のファイルの別のコードを一つづつ削除していき
下記のスクリプトを削除で動作OK
;━スクリプトの自動リロード
#IfWinActive, ahk_class TextEditorWindowW166
~^s::
ScriptName := Script
IfWinActive, %ScriptName%
{
Reload
}
return
削除前の無編集バックアップをそのまま上書きしてみる（動作しなかった時の状態のファイル）
何故か動作OK。その後ahkファイルを再起動するが動作せず
再度、スクリプトの自動リロードのコードを削除しリロードで動作OK
何か考えられる原因てあります？
この2つのコードが相性悪いようなのですが何かおかしいところはありますか？
エディタはサクラエディタを使用しています
スクリプトの自動リロードのスクリプト自体の方は問題無く動きます
自動リロードのスクリプトがある他のファイルでは問題は全く無いです
元々動作していましたが気付いたら動作しなくなってしまいました
スクリプトの順番を入れ替えたら問題無く動作するようになりました
う～ん でも何故かはわからないです
動作OK
①現在日時をスタンプする
②スクリプトの自動リロード
③その他
動作せず
①スクリプトの自動リロード
②現在日時をスタンプする
③その他
ありがとうございました
まさにその通りでした
いつの間にか#IfWinActiveを消してしまっていたようです
こんな初歩的なミスに気づかないとは...恥ずかしい
たとえば以下の記述でwindows標準のメモ帳なら動きます
ControlSend, , test, ahk_class Notepad
ただこの記述では動かないアプリが結構ありますが、そのアプリでも成功したりしなかったりの条件があります
testをControlSendするアプリケーションのウィンドウが前面にあり、アクティブ状態なら成功しますがウィンドウが最小化状態だと失敗します
なのでwinactivateで失敗するアプリのウィンドウをアクティブ化してからcontrolsendしていますが
失敗するアプリでもwinactivateなし、最小化状態でcontrolsendすることってできないもんでしょうか
ただその質問する人ってほぼもれなくctrl空欄にしてるんだよね
まずは送りたいctrl特定してやってみて、できればハンドル指定で
バックグラウンド時にはcontrolフォーカス取れなくなるようなアプリなら効果あるかもしれないし
そこきちんと指定してやると結構精度上がるよ
出来ないようです
でも、タスクマネージャーで手動では変更できます。 なぜでしょうか？
出来ないのですか？ 自分で自分は変更できないのかな
最近AHKをアップデートしたんですけど、SetBatchLines, -1にしても昔の様に失敗しなくなったみたいなんです
もしかして修正でもされたのかな
問題のスクリプトと環境は最低限書きましょう
そうしなければ何が間違っているのか誰にも分かりません
#Persistent
Process, Priority,, High
MsgBox % ErrorLevel ? "成功" : "失敗"
ESC::
ExitApp
失礼しました。私のとんだ勘違いでした。 私のスクリプトは
Process, priority, ahk_exe AutoHotkey.exe, AboveNormal
としていました
ahk_exeを外したら出来ました
その方法でためしたところ一応キーはsendできていましたがショートカットは動きませんでした
アプリ側の問題みたいです ありがとうございました
エクスプローラで選択しているファイルをあらかじめ指定したプログラムで起動したいのですが、
選択しているファイルのパスを取得するにはどうすればよいでしょうか？
それをAutoHotkeyでキーを送って自動化すれば良いような。
OSバージョンアップのたびにエクスプローラも様変わりしてるから今でも使えるかはわからんね
そもそも質問者の環境書いてないし
汎用で使いたいならクリップボードからパス拾うのが無難かと
Send, ^f
WinWaitActive, ahk_class bosa_sdm_XL9,,5
WinGet, OutputVar, ID
ControlGetText, text, ahk_id %OutputVar%
MsgBox, The text is:`n%text%
これで起動させるとtextがnullになってしまいます。
どなたかお助けを
クリップボード経由で思惑通りの動作できました
ありがとうございます
ControlGetText, text, , ahk_id %OutputVar%
これだとわざわざID取得した意味あんまりないけど
検索窓のハンドルではなくEditBOXハンドルを取得したい場合は WinGetではなくControlGetを使う
その場合もControlGetTextでの指定はControlではなくWinTitleとして指定する
ttp://ahkwiki.net/Window#Control.E7.B3.BB.E3.82.B3.E3.83.9E.E3.83.B3.E3.83.89.E3.81.A7.E3.81.AE.E3.82.A6.E3.82.A3.E3.83.B3.E3.83.89.E3.82.A6.E3.83.8F.E3.83.B3.E3.83.89.E3.83.AB.E3.81.AE.E7.9B.B4.E6.8E.A5.E6.8C.87.E5.AE.9A アドバイス頂けないでしょうか。
その機能、今知ったわ。
今まで知らなかったWindowsの操作かと思ったけど、Live5chの機能なのかな。
OSバージョンによって挙動違うかもしらんから正しく再現できてるかもわからんが
win8ではおなじ挙動になってるようだが
一部効かないのもあるけど、割と昔からあるっぽいWindows標準の操作みたい。
俺も最近知りました。
確かに、MButton:: +LButtonで行けますね。
何か変に難しく考えちゃってたみたいです。
ありがとうございます！
それは、スクロールバーの余白部分のShift+クリックという機能の方なのかな？(いきなりその場所に移動)
最初に試したのが、Live5chでスクロールバーをShift+ドラッグして、Shiftは押したまま維持、
Shiftを離すと、スクロール前の位置に自動的に戻ったから、Windowsにこんな機能があったのかと
思って他のソフトで試すと出来なかったからさっきの書き込みをした。
いきなりその場所に移動する機能のことですね。
Shift+ドラッグでShift離したら元の位置に戻るというのは見たこと無いですね。
回答ありがとうございます。
しかし、依然としてtextの値はnullのままです。
Send, ^f
WinWaitActive, ahk_class bosa_sdm_XL9,,5
ControlGet, controlHWND, Hwnd,,, 検索と置換
ControlGetText, text, ahk_id %controlHWND%, 検索と置換
MsgBox, The text is:`n%text%
このように修正しましたがダメでした。他にも
ControlGetText, text,, A
としてみたりしましたがうまくいきません。
ちょっと調べてみたところ
ttps://so-zou.jp/software/tool/system/auto-hot-key/commands/window.htm#no26 に「なお、このコマンドで取得できるのはWindow Spyの[Control Under Mouse Position]のTextと同じであり、これで取得できない情報はこのコマンドでも取得できません。」と記載されていたのでこれが原因なのかなと思いました。
長文失礼しました。
>226の後半にも書いたがcontrolHWNDはControlではなくWinTitleとして指定する
ControlGetText, text, ,ahk_id %controlHWND%
古くてすまんがうちのExcel2007ではAU3_Spy.exeで情報取れてるよ
最新のExcelは持ってないのでわからないが
ttps://i.imgur.com/DSOGYgq.png なるほどーーーーーーーーーーーーーーー
完全に私が勘違いしてました。質問自体が正しくありませんでした。
下記画像の「大文字と小文字を区別する」の文字列を取得するにはどうしたらよいですか？
ttps://imgur.com/a/DVFmh 自分が勘違いしてたのが分かったから質問し直しただけでしょ
オプション表示の有無についてはままある勘違いだけど
あの質問内容とコードからフォーカス行ってないコントロールの情報を取得しようとしてるとはまず気づけないっす
つか今回の教訓は下手な説明よりSS一発ってことですな
AutoHotKey.exeを管理者権限で実行させる
→スタートアップで起動できなくなる
MouseGestureLでタスクスケジューラでスタートアップさせる
→設定反映後に管理者権限のアプリが操作できなくなる
UAC下げるしかないの？うまくやれている人は教えてくれ
これって出来ますか？
guicontrolで出来ました
MouseGestureLは
タスクスケジューラ＞該当タスクのプロパティ＞全般タブ＞「最上位の特権で実行する」にチェック
・キーボード操作系しかコントロールできない ←AutoHotkeyとはユーザー層が異なる
・設定ファイルはPython ←多少は羨ましい， 複雑な処理をする場合に処理速度が遅そう
・一応、Macにも対応
・Win版はVisual Studio 2015 ランタイム必須 ←糞
・アプリケーションデータディレクトリを使う ←糞
・配布用の実行ファイルを作成できない
・環境のHDD容量が16MBくらい必要（AutoHotkeyの倍）
,245
Keyhacスレ作ってそちらでヤレ
ttp://did2memo.net/2013/10/03/autohotkey-ctrl-key-is-stuck/ それになってるんだけど何かの拍子で管理者権限のツールが動かなくなる。Windows 10 Insider Previewだから何か変わっちゃったのか？前はいけたのか、最近Windows 10にしたからわからん
なんでInsider Previewなんか使ってんの？
以下の様にしても、5から10までの5段階になってしまいます。
Gui, res:Add, UpDown, Range5.0-10.0
よろしくおねがいすます。
やってみます、有難うございました。
If MyVar Not Contains a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z,^,\,@,[,],:,/,*
上記処理をする時にカンマとセミコロンを含めたいのですが、上手くいきません。
よろしくおねがいします。
If MyVar is Number
同じ状況の方いらっしゃるかと思うのですが、対処をご教示賜りたく。
よろしくお願いいたします。
windows10 pro 64bit
thunderbird 52.4 32bit
ロジクールM510
WheelAccel.ahkの加速は"0"でしてません。
WheelAccel.ahkにて、thunderbirdの全てのペインにおいて
thunderbirdをアクティブな状態でスクロールすると、ホイール1ノッチに対して一気に何行もスクロールしてしまいます。
非アクティブな状態では、通常（希望通り）の動きになります。
互換スクロールに指定すると、ホイールが効かなくなってしまいます。
thunderbirdでは一切機能させなくてもいいのですが、どうしたらいいでしょうか。。
ahkスクリプト全終了させた状態ではどうなん？
thunderbird使ってないからわからんけど多分↓このあたりの予感
トラックボール コロコロ(((○ Part125©2ch.net
ttp://mevius.5ch.net/test/read.cgi/hard/1505627302/537-538 send,{shiftup} のことを今までぜーんぶ{shift up}と書いていたー
道理でへんな動きしてたんだ…
以上ですご清澄ありがとうございました
ありがとうございます。
WheelAccel.ahkを走らせていないときは、通常の動きをします。
スームーズスクロールはoffにしてましたが、onでも変わりません。
(´･ω･`)
?
それで正常に動いてるなら別にそのままでも良いかも知れないが
盛大に誤解してそう
あれれ、ウィキ見直したら確かに混在してる…表組みのほうはスペースなしで例示されてて、コード用例ではスペース入ってますね
でも自分の場合、今まで不要なShift押下げが発生してた（どうやらShiftとUpとが発生していた？）のがスペースなくすことによってスッキリ根絶されたので、ううむ謎です
つ公式Help
失礼しました
うちのwin8 & ロジマウス(M505、M570)では問題が起きないため確認できないのですが
Hotkeysの先頭に以下追加でアクティブ時に機能OFFできると思います
#IfWinActive ahk_exe thunderbird.exe
WheelDown:: Send,{WheelDown}
WheelUp:: Send,{WheelUp}
#IfWinActive
蛇足ですがWheelAccel.ahkでは加速OFFにはできないようなので加速が不要な場合は
ここのWheelScroll.ahkで以下の設定にしてみて下さい
AcclMode = 0
AcclSpeed = 0
ttps://www6.atwiki.jp/eamat/pages/30.html そこにマウスカーソルが移動して一致箇所の左上でCtrl+右クリをするマクロを作りたいと思い、
始めてコードというものを書いているシロウトです。
F8::CtS()
CtS(){
BlockInput On
ImageSearch, foundX, foundY, 1266, 584, 1904, 856, *50 \Users\HK\Desktop\pics\alc.jpg
if ErrorLevel = 0
SendInput, {Click, %foundX%, %foundY%, Left, 1}
Else If ErrorLevel = 1
MsgBox Icon could not be found on the screen.
If ErrorLevel = 2
MsgBox Could not conduct the search.
BlockInput Off
}
上記を実行したところ（このときエラーはありません）
ErrorLevel = 2 の結果が返ってきます。
考えられる要因を教えてくださるエスパーの方、いらっしゃいましたら。。。(;´Д｀)
全角スペース
の書き込みではつかっちゃいましたが
全角スペースは使用してないと思います(＞＜;)
画像ファイルをフルパス指定すれば
↓
C:\Users\HK\Desktop\pics\alc.jpg
のフルパス指定にしましたが同じでした＞＜；
デスクトップスクショの場合、自分は劣化の無いBMPで保存してそれ使ってたな
一度BMPで試してみては？(PNGも使えるようだけど自分は試したことない)
解決したみたいねは忘れて良いよ
BMPで保存したところ
できました！！！！！！！
感動です！
皆さんありがとうございました
ご返信賜り誠にありがとうございます。
なんだと言われてしまいそうですが、setpointにスムーズスクロールがあり
それをoffにすることで、何十ノッチも発生することはなくなりましたが、挙動がおかしかったため
setpointをアンインストールし、無事解決しました。
一部機能を使ってましたが、autohotkeyでまかなえますし！
firefox quantumのタブスイッチのため、autohotkeyを導入しましたが
ztopをやめて、一本化出来ました。
ありがとうございました。
(
<tag1 value1="0.0" value2="1.0">
<tag2>1.0</tag2>
</tag1>
<tag1 value1="2.0" value2="3.0">
<tag2>2.0</tag2>
</tag1>
) ;文の一番最後に改行が1個入ります
;これが連続するUTF-8(BOMなし)/改行LFの440KBの文書test.xmlを
;#MaxMem 1000 ;#MaxMemありなしで変化無し
FileEncoding, UTF-8-RAW
FileRead, var, *t %A_ScriptDir%\test.xml ;440KB
RegExMatch(var, "s)^<(tag1).+/\1>\n", $)
FileAppend, %$%, *%A_ScriptDir%\output1.xml ;test.xmlとまったく同じものになります(1)
;これを以下のようにするとvar変数を72.0KBに削らないとマッチしませんでした
{
if(!RegExMatch(var, "s)(?:^<(tag1).+?>\n<(tag2)>\d+(?:\.\d+)?</\2>\n</\1>\n)+", $)) {
var := RegExReplace(var, "s)(^.+)(?:<tag1.+$)", "$1") ;マッチするまで末尾を削る
continue
}else {
MsgBox, %A_Index%周目でマッチした, ;4430周目でした
FileAppend, %var%, *%A_ScriptDir%\output2.xml ;72.0KB(2)
break
}
}
MsgBox, おわり
(1)の$変数には440KB代入できるのに
(2)ではvar変数が72.0KBになるまでマッチしないのはなぜでしょうか
#MaxMem 1000 では結果は同じでした
Loopの手前にVarSetCapacity(var, 1000000)を入れたらスクリプトがフリーズしました
環境古くてすいません v1.1.26.01 u32版 win7です
Notepad++
サクラエディタ
秀丸エディタ
EmEditor
sublime
などがあるようですが、これらの中で、ラベルやホットキーへジャンプ出来るものは
どれですか
SciTEではラベル名を選択してF12を押すとラベルの個所へジャンプしてくれるし
ホットキーのリストも表示してくれるのですが、同じ機能を持っているエディタは
どれでしょうか
ちなみに、秀丸ではなさそうでした
c言語専用？
AHK用のプラグインなりカスタマイズなりが必要になるのでは
ちなみに秀丸の場合はAHKシンタックスの強調表示定義ファイルを作ってやると
それを元にTagsファイル生成や単語補完などが可能になる
Tagsファイルを作っておくことでダイレクトタグジャンブで飛べるようになる
他のエディタも大抵はctags使えるみたいだし ctags形式のタグファイル吐き出せるスクリプトさえ書けば
お好みのエディタでダイレクトタグジャンブできるようになると思われ
ttp://ahkwiki.net/Tools AutoHotkey用のシンタックスハイライト、オートコンプリートなどの定義ファイルあり
秀丸エディターで、AutoHotkey_L.hilight、AutoHotkey_L.txt は入れています
タグジャンプですが、tagsファイルの作成でする方法と、Exuberant Ctagsを使ってプログラム実行でする方法を
やってみましたが、AHKには対応していませんでした。 ラベルは認識されません
ちなみに使い方が違うのかと思って、ｃｐｐファイルで試してみましたがこちらは関数等はちゃんと認識されていました
ということで、ahk用には何か別の専用スクリプトとか用意しないとダメなようです
当分はこれでしますか
100px移動でジェスチャー判定していたとしたら、200%スケールしているディスプレイでは200px移動に変えないと実態としてずれる。
アドバンスナビのほうもソースコード見てみたけど辛うじて描画領域確保しているのがわかるだけでフォントが小さく表示される原因がわからん・・・
もともと入っていたC-function.hilightを参照しながら触ったのですが
91,^[a-zA-Z0-9]+:
として、これをtagsファイルの作成のときに選択すると出来なかったのですが
21,^[a-zA-Z0-9]+:
としてやると、tagsファイルにラベルも出てきてダイレクトタグジャンプが出来るようになりました
この91や21で協調文字の種類を決めているのはわかるのですが、タグの生成にも関わっているとか
いろいろとめんどくさいそうですが、タグ生成用のためのファイルは出来そうです
あとは、スレチなので、秀丸さんの方で聞いてきますか
あらら自己解決してたかな
こっちでも調べてたんだけど飛び先ラベルとして認識させるには「行の強調」にしてやらないとダメっぽいね
＞ 21,^[a-zA-Z0-9]+:
これだけだとホットキーラベルとサブルーチンラベルにしか飛べないので関数にもジャンプさせるなら
149,^[_a-zA-Z0-9]*\(.*\)
を追加すると良さげ
ちなみにうちの.hilight
独自構築モノなのでwikiの強調定義とは互換ないです
ttps://ux.getuploader.com/autohotkeyl/download/124 👀Rock54: Caution(BBR-MD5:669e095291445c5e5f700f06dfd84fd2)
わざわざありがとう。DLして参考にさせてもらいました
hilightファイルの構造がどうなってるのかググっても良くわからなかったので試行錯誤してやるしかないです
でも目的はtagsファイルを作ることなので、tagsファイルは中を見ると構成が簡単そうなので、直接外部アプリ（DosやGnu）で
tagsファイルを作成することを考えてもいいかなとも思ったのですが、助かりました
秀丸エディタマクロヘルプのloadhilight文の項に強調定義フラグの意味が載ってるので
興味当たったら調べてみて下さい
マクロヘルプのloadhilight見てきました。ありがとう。こんなところに書かれても見つからんわw
でも良くわかりました。 あとはColorSetだな
ColorSet、こちらもわかりました。 マクロヘルプのconfigcolorにありました
頂いたahk20171028.hilightのColoｒSetのコメントの意味はこれだったのですね
これでもうほぼ理解できました。ありがとうございました
ComGet(WinTitle) {
if(WinTitle = "ahk_class XLMAIN"){
ControlGet, hwnd, hwnd, , Excel71, %WinTitle%
}else if(WinTitle = "ahk_class OpusApp"){
ControlGet, hwnd, hwnd, , _WwG1, %WinTitle%
}else if(WinTitle = "ahk_class PPTFrameClass"){
ControlGet, hwnd, hwnd, , paneClassDC1, %WinTitle%
}else if(WinTitle = "ahk_class Notepad"){
ControlGet, hwnd, hwnd, , Edit1, %WinTitle%
}
Window := Acc_ObjectFromWindow(hwnd, -16)
Loop,10
try{
Application := Window.Application
}catch{
if(WinTitle = "ahk_class XLMAIN"){
ControlSend, Excel71, {esc}, %WinTitle%
}else if(WinTitle = "ahk_class OpusApp"){
ControlSend, _WwG1, {esc}, %WinTitle%
}else if(WinTitle = "ahk_class PPTFrameClass"){
ControlSend, paneClassDC1, {esc}, %WinTitle%
}else if(WinTitle = "ahk_class Notepad"){
ControlSend, Edit1, {esc}, %WinTitle%
}
}
Until !!Application
return Application
}
WinTitle := "ahk_class Notepad"
oNotepad := ComGet(WinTitle)
filePath := oNotepad.ActiveWindow.FullName
RunAs, %USERNAME%, %PASSWORD%
Run, explorer `/select`,"%filePath%"
RunAs
この様に書いたらエクセル、ワード、パワーポイントまではうまくいったんですが、メモ帳だけうまくいきません。どうかご教授を。
winget processpath
run
素直に、名前を付けて保存
ありがとうございます。スッキリしました。
欲しいものは、アプリケーションキーAppsKeyを押すと
１回目 wキーを長押し
２回め wキー+8キーを長押し
３回目 動作無し
以降繰り返し
というものです。
何から手を付けていいのかわからないのでここで質問させて頂きました。
ttps://sites.google.com/site/ahktips/howto/helloworldにあることは確認しています。 どうか御教授お願いします。
ttp://www.google.com/search?q=%Clipboard% このスクリプトで検索しているのですが、以下の（1）～（3）のようなことはできるのでしょうか？
（1）エディタで文字列を選択してこのスクリプトを実行した時、ブラウザをActiveにしない。
（2）新しいTabを開かないで検索する。
（3）新しいTabで検索するが、現在のTabに留まる。
（1）は検索したあとにもう1度エディタをActivateさせているのですが、もっとうまくできないかと。
wikiのサンプルコード集に「キーを押す度に機能を切り替え」ってのがあるからそれ参考にするといい
ttp://ahkwiki.net/SampleCodes 何から手を付けていいか分からないならとにかくwikiをよく読みな
急がば回れ
どれもブラウザ依存だからAHK側からは基本ムリ
ブラウザ側で設定したり、ショートカットキーやコマンドラインオプションをAHK側から利用するしかない
ブラウザ側でできないなら、(1)は検索する前にエディタを最前面固定するといくらかマシに見える
（2）（3）は諦メロン
ご使用中のブラウザのコマンドラインパラメータをご確認ください
分かりました。ブラウザの機能も調べてみます。ありがとうございます。
回答ありがとうございます。およそ次のような枠組みになることはわかりました。
AppsKey::
Flag += 1
If Flag =1
{
「コマンド1」
Return
}
If Flag =2
{
略
Return
}
Flag = ;３回目変数をカラ
Return
「コマンド1」に関して
ttp://ahkwiki.net/Sendを参照すると Loop
{
Send {w down}
sleep 30
}
Send {w up}
のように書くのかと思いましたが、 loopを脱出する条件やAppsKey:: Flag += 1などを考えるとわかりません。
サーチが不足しているかも知れませんが、どうかお助け願います。
何をやりたいのか良く分からないんだがの
1回目と2回目押した時の「長押し」って押しっぱなし状態で固定して
3回目押したときにwと8を離すってことじゃないの？
環境（win10 64bit、AHK v1.1.26.01）
最初にアクティブだった窓で再生したスクリプトが違う窓に切り替えた後でも、バックグラウン
ドの最初の窓で終了（動作）させたくて、下記を書いたのですが反応なしです（IEなら動作しま
した）。chromeやoperaをWintitle指定でControlsendをさせる方法がありましたら教えてください
r::
WinGetTitle, title, Yahoo! JAPAN
ControlSend, ahk_parent, {f5}, Yahoo! JAPAN
Sleep, 2000
ControlSend, ahk_parent, {f5}, Yahoo! JAPAN
Sleep, 2000
ControlSend, ahk_parent, {f5}, Yahoo! JAPAN
return
WingetClassを使おう
脱出条件が書けないのは動作イメージがあいまいだからでは？
「長押し」をどういう挙動にしたいのか考えてみて
n秒以上押下 なのか AppsKey離されるまで押下 なのか等
回答ありがとうございます
下のをやっても反応なしでしたorz
諦める系なのかな？。。
;r::
DetectHiddenWindows, on
WinGetClass, Chrome_WidgetWin_1, A
ControlSend, ahk_parent, {f5}, Yahoo! JAPAN
return
r::
WinGetClass, Chrome_WidgetWin_1
ControlSend, Chrome_RenderWidgetHostHWND1, {f5}, Yahoo! JAPAN
return
とりあえずウィンドウ指定の方法からわかってなさそうなのでwikiを読もう
ttp://ahkwiki.net/Window （別タブではなくあくまで別窓という前提で）
確認してみたがアクティブ化後は効くけど非アクティブ時は効かない
この手の挙動のアプリはControlSendでは無理な場合が多い
WinActivate, Yahoo! JAPAN ahk_class Chrome_WidgetWin_1
ControlSend, Chrome_RenderWidgetHostHWND1, {f5}, Yahoo! JAPAN ahk_class Chrome_WidgetWin_1
リストの任意の場所の値をセットすることって出来ますか
今はその場所へmousemoveでカーソルを移動してクリックさせて
Sendで値を入れるみたいなことをリストのひとつひとつにしているのですが、時間がとてもかかります
無理なんですね・・・
わざわざ確認とスクリプト、ありがとうございました
Win10ではシステムドライブ以外のフォーマットは8.3形式のファイル名の無効がデフォになったのかな？
解決しました。指摘通り単に一回目がSend {w down}...etcで動作しました。
動作チェックがテキストエディタ上のみで、またその挙動が物理キーを押し続けた場合と違ってwがリピートされなかったため、
仕様を誤認していました。混乱させてしまい申しわけありませんでした。
アドバイスくださった方々、ありがとうございました。
出来ます
result2 := VarSetCapacity(point, 64, 0x00)
result := DllCall("kernel32\GlobalMemoryStatusEx", "Ptr", &point, "int")
lasterror := Dllcall("GetLastError")
ListVars
msgbox
```
このようなものを書いたのですが、GlobalMemoryStatusExが失敗しているようで、
Global Variables (alphabetical)
--------------------------------------------------
0[1 of 3]: 0
ErrorLevel[1 of 3]: 0
lasterror[2 of 3]: 87
point[0 of 32]:
result[1 of 3]: 0
result2[2 of 3]: 64
と表示されてます。
error codeの87は"パラメータが正しくない"だそうです。なにがだめなのでしょうか？
環境はwin8.1 64 のAutoHotkeyU64.exeです。
プログラム言語やスクリプトはAutoHotkey以外ほとんどやった事がないです。
ttps://msdn.microsoft.com/ja-jp/library/windows/desktop/aa366770(v=vs.85).aspx NumPutで構造体のdwLengthを指定しないとだめでしょ
The size of the structure, in bytes. You must set this member before calling GlobalMemoryStatusEx.
ありがとうございます！解決しました。
```
result2 := VarSetCapacity(point, 64, 0x00)
NumPut(64, point , 0, "int")
result := DllCall("kernel32\GlobalMemoryStatusEx", "Ptr", &point, "int")
;dwLength := NumGet(point, 0, "Int")
dwMemoryLoad := NumGet(point, 4, "Int")
ullTotalPhys := NumGet(point, 8, "Int64")
ullAvailPhys := NumGet(point, 16, "Int64")
ullTotalPageFile := NumGet(point, 24, "Int64")
ullAvailPageFile := NumGet(point, 32, "Int64")
ullTotalVirtual := NumGet(point, 40, "Int64")
ullAvailVirtual := NumGet(point, 48, "Int64")
;ullAvailExtendedVirtual := NumGet(point, 56, "Int64")
MsgBox,
(
メモリ使用率:%dwMemoryLoad%`%
全物理メモリ:%ullTotalPhys%B
利用可能メモリ:%ullAvailPhys%B
ページング可能な最大ファイルサイズ:%ullTotalPageFile%B
現在ページング可能なファイルサイズ:%ullAvailPageFile%B
全仮想メモリ:%ullTotalVirtual%B
利用可能仮想メモリ:%ullAvailVirtual%B
)
```
下記のスクリプトで、tipwindowというのを表示させてこれをアクティブにして
ActiveWindowsInfoを見てもWindowTitleのところに
tipwindow
というのが出てきません。にもかかわらず
WinGet, aid, ID, tipwindow
WinGetTitle, t1, ahk_id %aid%
とすると拾えて、t1にはtipwindowと入っています
これにExcludeTitleを加えて
WinGet, aid, ID, tipwindow,,ahk_exe AutoHotkey.exe
WinGetTitle, t1, ahk_id %aid%
とすると取れないだろうと思ったのですが、これでも
t1には、tipwindow
が入ってきます。 なぜでしょうか
idでもpidでも同じ結果です
^a::
ToolTip, tipwindow, 100, 500, 2
WinSet, AlwaysOnTop, On, ahk_class tooltips_class32
WinGet, aid, ID, tipwindow,,ahk_exe AutoHotkey.exe
WinGet, apid, PID, tipwindow,,ahk_exe AutoHotkey.exe
WinGetTitle, t1, ahk_id %aid%
WinGetTitle, t2, ahk_pid %apid%
MsgBox aid=%aid%`napid=%apid%`nt1=%t1%`nt2=%t2%
return
ToolTip, tipwindow, 100, 500, 2の最後の2にはなんの関係もありません。これはなしでも同じ結果です
このコードがwikiにありますが
タスクバー上で、Wheelの左右が効かないのはなぜでしょうか？
少し試してみた感じだと、Tooltipの内容をタイトルとして取得できるのは同一のプロセス内だけっぽい？
AWIは別スクリプトだから取れてないのかと
あとExcludeTitleにはahk_??は使えなかったような
ToolTipsのときは、ActiveWindowsInfoのWindowTitleには出てないのに
WinGet等で取れるっていうのがなんとも気持ち悪いです
デバッグするときにあれって思う
Window Spyのことね
WindowSpyがTooltipの内容をタイトルとして拾えないのは昔から仕様扱いだったと思う。
ahkとWindowSpyの両方から全く同じコードでGetWindowText()を呼び出しても、
ahkからしか取得できないので、OSの仕様じゃねーの？という扱いだったような。
ahkのcppソースのコメントにWM_GETTEXT()とGetWindowText()のどちらを使うかってのが説明してあって、
WindowSpy改造すればタイトルとして取得できるけど、問題のほうが多そうということで仕様扱い。
まあ、tooltipにはタイトルなんてない、で誰も困らないような。
複数のアプリを立ち上げていて、そのWinTitleがたとえば
アプリ１
アプリ２
アプリ３
となっていて、ToolTipsにアクティブになってる同じタイトル名を表示する、ということをしたのですよ
で、WinGet, v, PID, アプリ１
ってやったら、なぜかAutoHotkey.exeのPIDを取ってきたのです
で、なんで？ ってなって今回の話になりました
ToolTipsはWindowSpyで見たらタイトルにはなかったのでテキストに入ってるのかと思ってて
原因究明にめっちゃ時間がかかりました。まさかToolTipsのPIDを取って来てたなんて思っても
いなかった
結局、こういう場合、WinTitleからは確実にアプリ１のPIDをとることが出来ません
現状ではアプリ１のexe名を憶えておいて、それを利用するとかしか出来ません
ExcludeTitleも使えないなんてなあ
でもexe名もWinTitleからは得られないんですよね。AutoHotkey.exeになっちゃうから
やろうとしたことは大まかにわかったけど詳細がわからないので解決できるのか知らないけど、
WinGet使う前にtooltip非表示にしてしまえばいいのでは？
WinGetで取る前にtooltip非表示にして取ってから
再度表示にする、ということですね
非表示にすると取らなくなるのかな
でも可能性はありますね
でもなあ、ExcludeTitleが使えたら解決するんですけどねえ
ahk_XXのときは使えないとか、なんでやねんw
今日は疲れました
＞まあ、tooltipにはタイトルなんてない、で誰も困らないような。
それとここですが、結局、Tooltipsの場合は、そこに表示されている内容も
WinTitleになる、ということですね。でもWindowSｐｙには出ないので要注意です
ほんとこれこそちょっとしたTIPSになりましたw
自分のtooltipはちゃんとタイトル表示されるようになったわ
俺も似たようなことやってるけど
「アクティブウィンドウ：t1」みたいに表示させてたおかげで無自覚回避できてたようだな
というか真面目な話、バグとして報告していい案件なんじゃないの
>ToolTipsにアクティブになってる同じタイトル名を表示する
この部分がよく分からないんだけど、アクティブになってるウインドウのPIDを取得して、
それを元にウインドウタイトルを取得して、
そのタイトルをtooltipに表示する
ということだろうか？
だとしたら、
^a::
WinGet, v, PID, A
WinGetTitle, title, ahk_pid %v%
ToolTip, % title, 100, 500, 2
return
というのは？
wingetにおけるPIDの説明には
PID 条件に一致する一番最初(前面)のウィンドウのPID(プロセスID)。
となっており、「一番最初(前面)」というのは必ずしも「アクティブ」とは限らないと思うんだが…
間違っていたらスマン
2.tooltipにapp1と表示させてた状況で
3.WinGetでタイトルがapp1のappを釣ろうとしたら、tooltipの中身のほうにひっかかった
という話でしょ。
appとtooltipを区別して釣ることができない、ということ
あまり相手したくない感じの人だから関わらないほうがいいかな
10 も 30 も変わりないように感じるけど
本家ヘルプによるとvista以降で機能しない
横からだけどよかったら触りだけ教えて
書いてあったんですね、ごめんなさい。
ありがとうございます。
ahk_class ^(?!tooltips_class32$)
その正規表現の意味がわからなかったけど試したらできたわありがとう
正規表現の勉強しなおしてくる
{
実行文字列
}
で読み込んだ関数が
この後に
v::
while (GetKeyState("v","p") )
{
aaa()
}
return
で読み込めないのなんでだ…
aaaの実行ラインは
v::
の後に書き込むと問題なく動いてる
1.関数化できてない？
2.引数できてない？
あまり恥ずかしい内容なので中身を詳しく書けませんが
原因として考えられることがあれば教えてください
恥ずかしい内容の中身に問題があるのでは？
v::
while (GetKeyState("v","p") )
{
aaa()
}
tooltip
return
aa(){
tooltip,aaa
}
確かにtooltipで動かすと問題なく作動してますね
中を確認してみます
ありがとうございます
a::
の中と
b::
の中に
同じ処理を入れようとすると
Duplicateエラーが出るのは同じ関数を使っているから？
対応策はありますか？
goto label1
label1:
return
b::
goto label1
label1:
return
だとエスパー
トライアル版を試したこれも動かなかった。
HippoEDIT
ttps://www.hippoedit.com/ 俺のバージョンはv1.1.22.04。OSはWin7 64bit。
外国ののソフトは動かないのが多い気がする。
v1.1.23.05やで
最新の
v1.1.26.01
試してみたらどうや
ｱﾌﾟﾃﾞって言っても置き換えるだけだし
AHKの「なにが」動かない？
書かなければ「分からない」
ホットキーが無視されてしまいます。v1.1.26.0.1でも同様です。キーをフックする優先順位がAHKよりも高いような印象です。
皆様はいかがでしょうか？
最近､海外のソフトでは案外ひんぱんに経験します。AHKを管理者権限でインスコすればいいのかな？
問題が起こる最小限のスクリプトを書いていれば話がスムーズに進む
F1::MsgBox フックなし
$F2::MsgBox フックあり
フックの有無
管理者権限
おお､動きました。ありがとうございました。
管理者権限で起動する方法は↓にありましたので早速やってみます。
管理者権限で実行しなければいけない常駐アプリのスタートアップ設定方法
ttp://tanweb.net/2015/10/21/5101/ 私はいわゆるSpaceFNをやっていまして､それがSpace押下でSpaceが入力されて困っていました。
何故外国のマイナーなソフトだとこういう現象が起きるのか不思議ですね。定番のソフトでは経験したことありませんでした。
ABS_AUTOHIDE = 0x0001
よろしければ出典を
1 Hour Software by Skrommel - DonationCoder.com
ttp://www.donationcoder.com/Software/Skrommel/index.html 【RunAndHide】
#NoEnv
#SingleInstance,Force
#NoTrayIcon
SetWinDelay,0
IfWinExist,ahk_class Shell_TrayWnd
{
WinHide,ahk_class Shell_TrayWnd
WinHide,Start ahk_class Button
}
Else
{
WinShow,ahk_class Shell_TrayWnd
WinShow,Start ahk_class Button
}
あ
「Start」は「スタート」と日本語にしないとスタートボタンに適用されないはず
ま、どうでもいいけどスレ汚しスマン
ttp://anago.5ch.net/test/read.cgi/software/1317156599/7のﾏﾝﾄﾞｸｾがすげー便利だからブクマしとくといい >■リンク等
>AutoHotkey メモ - Principia
>
ttp://principia.s54.xrea.com/index.php?AutoHotkey%20%A5%E1%A5%E2 >なまず日記
>
ttp://www.tierra.ne.jp/~aki/diary/ >eamatの日記
>
ttp://d.hatena.ne.jp/eamat/ >1 Hour Software by Skrommel - DonationCoder.com
>
ttp://www.donationcoder.com/Software/Skrommel/ >Rosetta Code (さまざまな処理を各種プログラム言語で書いた場合の比較)
>
ttp://rosettacode.org/wiki/Category:Programming_Tasks >
>以下公式フォーラムより
>
ttp://www.autohotkey.com/forum/topic8795.html Tips N Tricks >
ttp://www.autohotkey.com/forum/topic26855.html ListViewで大きな画像を扱いたい >
ttp://www.autohotkey.com/forum/topic19509.html GUIで標準のもの以外を使いたい >
ttp://www.autohotkey.com/forum/topic20097.html GUIを手軽に作りたい >
ttp://www.autohotkey.com/forum/topic39598.html DllCallで定数調べるのﾏﾝﾄﾞｸｾ >
ttp://www.autohotkey.com/forum/topic22975.html コンパイルユーティリティ%28Compile_AHK II) >
ttp://www.autohotkey.com/forum/topic23072.html HIDを直に読んで、キーボードやマウスの拡張ボタンの状態を得たい >
ttp://www.autohotkey.com/forum/topic19367.html Windowsのイベントをフックして色々やりたい >
ttp://www.autohotkey.com/forum/topic20701.html ShellFolder() ： エクスプローラのPathおよび選択ファイルを取得 >
ttp://www.autohotkey.com/forum/topic20701-42.html ShellDesktop() ： デスクトップで選択されたファイルを取得 >
ttp://www.autohotkey.com/forum/topic21451.html ポップアップメニューの情報を得る 昔はテンプレにあったんだがいつの間にか消えてたんだな
G13使用とかでジョイスティックの傾きで歩き、走りを検出できるようにしたもの
Fallout4用に作ったけどジョイスティックが使えないゲームとか、他にも応用が効くはず
あるならうpします
JTKまがいなジョイスティックの傾き入力をキーボードに変換するということをAutohotkeyでやりたいという人
興味があればどうぞ
ttps://ux.getuploader.com/autohotkeyl/download/125 👀Rock54: Caution(BBR-MD5:669e095291445c5e5f700f06dfd84fd2)
ありがてえありがてえ
JTKより好みにキーコンフィグできそうだ
ttps://qiita.com/hakomo/items/a19eb4b08bc2b3aa1533 緑文字の「Ctrlキーと(SandSの)Shiftキーを押しながら」のところが実現できるのか...
JTKの特殊入力のアナログレベルによって切り替えるってところに不満があったから
多分、座標のXYの傾きだけで長方形判定してる。斜め入力時のときに誤操作が起きるって理由から
コッチは半径を求めてそれを目安にすることにした
それと内部的にキーおしっぱループの処理がわかってないのが怖い、連打してるかもしれないから
なので作った
ありがとうございます。もう少し調べてみます。
ttp://jump.5ch.net/?https://ux.getuploader.com/autohotkeyl/download/126">ttps://ux.getuploader.com/autohotkeyl/download/126 ： [sage] 2017/11/12(日) 23:49:57.26:8jWLb8S60
右スティックの軸はゲームパッドによってZ/Z回転だったり
X回転/Y回転だったりモデルによって異なるぞ
ああ、そうか、そうなっちゃうともうデバッグonにして動いてるパラメーターから同じ要領で変更してください。
関数化してもよかったか
これだけあれば無理にバージョンアップしなくてもええで
軸情報さえ与えればいいからな
GPDwin用に使わせてもらうわ
対策は知らんけど、消す方法ならある
loop, 5 {
ifwinexist
break
winactivate, ahk_class #32768
send, {alt}
}
じゃなくて
ifwinnotexist, ahk_class #32768
ポップアップメニュー表示中は、SetTimerの割り込みでさえ出来なくなるので、
ポップアップメニューを別AHKにして呼び出さないと、表示後の対策は何も出来ない。
元がmigemo対応してたんで、こっちにも組み込んでみたら落ちるようになったつらい
^b::
send,^a
return
^a:: ;コピー
send,^c
return
^bでコピーのスクリプトを動かす方法ってないですか？Goto、Gosubは使わないで
何をしたいのか具体的に書かずに、省略した謎コードを添削させるという
^a::
send,^c
return
send,^a はどこ行っちゃったんですかねぇ
#usehook外せばいいんじゃないすか
すいませんその方法も使えないんです。
そうですソフトウエアホットキーを使いたいということです。
ですが#usehookや$がないと無限ループがおこるとかリスクがあるみたいなのでもう少し調べてなかったらあきらめます。
ありがとうございました。
^a:: send,^a
とかやった場合だよ
A_ThisHotkeyと同じものをsendしたい場合だけ ラベルに$つければいいだけじゃね
何が条件なんだろう
space::
a:=10
b:=20
c:=30
z:=(a < c > b)
tooltip,%z%,600,800
return
まああれは質問というか文句言いに来て恥かいただけだったが
まとめて一行で書く方法が分からないってこと？
3つの数字は常に変動してて、ホットキー押したときにそのとき一番大きい値のを選択するってことがしたいです。
ifを沢山書けばできるけど一行でやる方法ないかなあと調べたのですが分からず。
一つ増えまして4つで比較ができればいいのですが。
1行で書けるけど、1年後とかに見たら何をやってるのか分かり難いので
ifで書いといたほうが視認性はいいんじゃないかな
Max(params*) {
t := params[1]
Loop % params.MaxIndex() - 1 {
b := params[A_Index + 1]
t := t > b ? t : b
}
Return t
}
a := 10
b := 20
c := 30
d := 40
MsgBox % Max(a, b, c, d)
Return
これはすばらしい。 こんなこと出来たんだ
Max_integer(params*) {
o := object()
Loop % params.MaxIndex() {
o[params[a_index]] := true
}
Return, o.MaxIndex()
}
対話形式プログラムの自動化ってできるんでしょうか？
コマンドプロンプトに対してControlSendで送ることは出来ても
返答メッセージの読み取り方が分かりません。
おー、すごい
できるようになりましたありがとうございました。
ahkを一年以上使ってるけどwiki読んだり検索して似たようなことやってる人のスクリプトを見てもわからなくてちょっと改変して移植もできない場合が多すぎて自分のポンコツぶりが悲しいｗ
uwscは doscmd で出来るけど、ahkでは試そうとしたこと無いので出来るかどうか解らない
大昔に無理やり実装してた人はいた、オリジナルANSI版の頃のだからたぶん今だと動かないと思うが
ここの プロセスを起動して標準出力を読み書き
ttp://lukewarm.s101.xrea.com/myscripts/ 最近のだとこの辺とか？
AutoHotKey_Lで、標準出力を得る方法。
ttp://poimono.exblog.jp/22219786/ 単純に出力見たいだけだったらファイルにリダイレクトしちゃうのが簡単だけど
(書き込み規制に引っかかるので全角化)
ＲｕｎＷａｉｔ， ｃｍｄ．ｅｘｅ ／ｃ ｅｓ．ｅｘｅ 検索文字列＞ｔｅｍｐ．ｔｍｐ，，Ｈｉｄｅ ／ＵｓｅＥｒｒｏｒＬｅｖｅｌ
ＦｉｌｅＲｅａｄ，ｖａｒ，ｔｅｍｐ．ｔｍｐ
ｍｓｇｂｏｘ，％ｖａｒ％
例えば rmdir を使ってフォルダとその中にあるファイルを削除する場合
app := ComObjCreate("WScript.Shell").Exec(ComSpec)
app.StdIn.WriteLine("rmdir /s D:\DeleteMe") ; D:\DeleteMe と DeleteMe フォルダの中にあるファイルを削除するコマンド
While (1) { ; DeleteMe フォルダの中に一つでもファイルやフォルダがないと無限ループするから注意
msg .= app.StdOut.Read(1) ; ReadLine だとこちらの入力待ちの時にデッドロックする
If (InStr(msg, "よろしいですか (Y/N)?")) {
MsgBox % msg
app.StdIn.WriteLine("Y") ; 確認を求められたので y を入力して削除を実行
break
}
}
app.StdIn.WriteLine("exit")
Return
こちらの入力待ちになるまでの処理は色々なやり方があると思う
ttps://autohotkey.com/board/topic/82732-class-command-line-interface/ 対話型には向いてなさそうな…
url一つ目のやつは試してみたけどahk_lだと動きませんでした
url二つ目のやつはout of memoryとでて、こっちもダメでした😭
これです！
なるほどこうやってCOMオブジェクトを使うんですね
すごい勉強になりました
原理的には411とほぼ一緒みたいですね
WINAPIはいまだにさっぱりよくわかりません
高速でControlSendを使うと
キーボードからの入力がたまにロックされて使えなくなってしまうことがあったので
COMオブジェクトで直接読み書きできるならそれにこしたことないですね
未だなら早よ！
これがちゃんとできないとカーソル移動とか怖くてAHKは使えないんだよ
致命的な不具合だ！
こんなポンコツよく使ってると感心する 信じられないｗ
もちろんこれがゆえにkeyhacに移行したわ！
ハイハイ二度と来るなよ
なんで俺はAHKを使ってるんだろう…？
本来ならbatやwshあたりでやればいいんだろうけど
キーログを見るツールとかを立ち上げてAHKの動作を確認したんだが
スクリプトがまともに動かんのよ、ダメだろこれは！
ちゃんとフックできてないんよ、笑うわｗ
だからもう来るなよ
頭沸いてんの？
本当に改善が必要な部分を指摘してるのにまともに考えられないの？
だよ
お前こそ宗教なの？
気持ち悪いから早く消えろよ
/ ヽ / ヽ
＿＿＿＿＿＿ /U ヽ＿＿＿/ ヽ
| ＿＿＿＿ ／ U :::::::::::U:＼
| | ﾊｻﾐ が /／ ＿__ ＼ ::::::::::::::|
| | 使ｴﾈｰﾖ | | | U :::::::::::::|
| | ヽ(`Д´)ﾉ.|U | | ::::::U::::|
| | | ├―-┤ U.....:::::::::::::::::::/
| |＿＿＿＿ ヽ .....:::::::::::::::::::::::<
└＿＿＿／￣￣ :::::::::::::::::::::::::|
|＼ | :::::::::::::::::::::::|
＼ ＼ ＼＿＿＿ ::::::
そもキーリピート発生するキーをホットキー長押ししようとは思わんし
ahkは名前こそAutoHotkeyだがキーカスタマイズだけが目的なソフトじゃないしな
ウィンドウ制御とかいらんならahkである必要性は薄い
ソフトによって得手不得手あるんだし自分の目的に合ったもん使えばいいよ
GUI,Add, GUI,Showなどで作ったウインドウ上でスペースキーを押したときの挙動
ってどこかに書いてあるでしょうか
このときに別の挙動をするように、
#IfWinActive
でこのGUIがアクティブになったときに
Space:Msgbox TEST
としても反応しないのです
で、このGUIウインドウ上でアクティブなボタンが実行されます
GUIがアクティブのときにSpaceキーで別の挙動をするようにする方法を
教えてください
ソースコードをテキストエディタで開いてカーソル移動したら
意図しない文字が入力されてしまうなんて怖くて使えませんな
スペースキーが出来ません
Gui,Add,Button,GButton1 W242 H30,ボタン1
Gui,Add,Button,GButton2 W242 H30,ボタン2
Gui,Show, , テスト
return
Button1:
MsgBox ボタン１
return
Button2:
MsgBox ボタン２
return
#IfWinActive, テスト
Space::MsgBox SPACE
Up::MsgBox UP
#IfWinActive
俺の環境でも再現できるかどうか実験したいから、そのスクリプトを書き込んでくれるとありがたい。
Spaceキーを押したらmsgboxに SPACE と表示されるよ
だから使わなきゃいいだろ
思考力停止してんの？
ごめんなさい。 いまやったら出来ました。おかしいな、さっきは何回やっても出来なかったのに
どうも私の環境のようです。 この質問は撤回します
処理が異常に遅いんですけど、10秒くらいかかるんですけど、何か対処法
知っていたらご教授お願いします。
くわしく
自己解決したので報告します。
FileCreateShortcut, "%filePath%", %shortcutName%
といった具合に%filePath%にはダブルクオーテーションを付ける。
以上です。
ラベル名の話。テストとか
自分はじゃないが試してみたら確かに"すり抜け"っつうのは発生した
例えばメモ帳でctrl押しながらhを押しっぱなしにして十数秒～数十秒そのままにしてると
文字の「h」が入力されたり「置換」ダイアログが現われたりした
win7 32bit home ahk 1.1.26.01
自分はこんな操作しないから困らないな
いやだから具体的に何故ダメなのか教えて
俺が引っかかった事例としては関数呼び出しのときにエラー吐いたり、文字化け起こしたり、ファイルの保存形式によってはそのまま貼るとエラー吐いたりして二度手間になったり、コンパイルする時エラー吐いたりした
Gui,Add,Buttonで作ったボタンの色を変えることは出来ますか
Gui, Color, Red, Blue
とかやってみたのですが、ウインドウの背景は変わってもボタンの色が
変わりません
ボタンはひとつづつ個別に色を変えたいです
オプションのBackgroundもやってみたのですが、良くわかりません
Cnもボタンのテキストの色が変わりません
UTF8だから3バイトじゃないの
ttp://mimizun.com/log/2ch/software/1265518996/420-422 U32.exeはLPCSTRの型をAStrにすると戻ってこなくなっちゃう
Strのままだと文字化けしちゃう
VarSetCapacityのポインタ回りだと思うんですがどう直したらいいかわかる方いますでしょうか
ArcGetName(){
/*** int WINAPI SevenZipGetFileName(HARC _harc, LPCSTR _lpBuffer, int _nSize) ***/
global
;;;size:=VarSetCapacity(buf,256)
;;;DllCall(ArcLibPrefix . "GetFileName",UInt,hArc,Str,buf,Int,size,Int)
size:=VarSetCapacity(buf,256*2)
DllCall(ArcLibPrefix . "GetFileName",UInt,hArc,AStr,buf,Int,size,Int)
return buf
}
DllCall した後に、StrGet(buf, "cp932") すればいいんでない
基本的にできない
応用的には超めんどい（
ttp://anago.5ch.net/test/read.cgi/software/1317156599/659,661） Pictureで代用するのが早いと思う
ButtonではなくCheckbox, ComboBox, DropDownList, Edit, ListBox, Radio, Textのいずれかなら以下を使うとできる
[CLASS] CtlColors - color your controls (2017-10-30)
ttps://autohotkey.com/boards/viewtopic.php?f=6&t=2197 return buf
↓
return StrGet(&buf, "cp932")
でできました！
ついでに 7-zip64.dll 入れてライブラリ参照元書き換えたらU64.exeでも動きました
ありがとうございます！
label1:
filename=test1
gosub routine
return
label2:
filename=test2
gosub routine
return
label3:
filename=test3
gosub routine
return
と、番号が違うだけでほかは同じスクリプトが20個くらいある場合、これって
ずらっと書かないとダメなのでしょうか。 それともAHKらしく、
loop,20
{
label%A_index%:
filename=test%A_index%
gosub routine
return
}
みたいな技って使えませんか。これではダメだと思いますが。スクリプト生成まではやってくれないのでしょうか
それなら、filenameを引数にした関数で良いんじゃないかな
スクリプトの展開まではしてくれないのですか
label1:
label2:
label3:
label4:
label5:
label20:
StringReplace filename, A_thisLabel,label,,ALL
gosub routine
return
ラベルごとループで作成したいなら一旦ファイルに書き出して .ahkスクリプトとして実行するしかないのでは
loop,20
{
FileAppend,label%A_index%:,temp.ahk
FileAppend,gosub routine,temp.ahk
FileAppend,return,temp.ahk
}
run,temp.ahk
なるほど、A_thisLabelを使うというのは思いつきませんでした
ちょっとやってみましたが、これは使えそうです
それと、temp.ahkを出力するやり方ですが、これもインクルードファイルを自動生成させて
それを読み込ませるという方法が出来そうですね
ahkがインクルードファイルを読み込むタイミングを確認する必要がありそうですが
ちょっと期待できそうですw
インクルードファイルがなければ自動生成させてreloadで再実行し、ファイルが出来てれば
自動生成処理は飛ばすとか
関数が使えないと言うのもきっと思い込みなんだろう
ならインクルードファイルではダメなのかな
でもthisLabelが使えるのは教えて頂いて助かりました
その後自動生成させれば出来ました。ありがとうございます
if IsLabel(label%no%){
gosub,label%no%
}
「AutoHotkey：キー押しっぱなし病・ホットキーすり抜け病対策の研究」
ttp://did2memo.net/2013/10/03/autohotkey-ctrl-key-is-stuck/ スクリプトの書き方でかなり変わるのかも
キーログソフト（インストール不要）を立ち上げて負荷を掛ける顕著に再現できる
ttp://kts.sakaiweb.com/keymill.html リストビュー初期化時にLV_Addで追加する事は出来たのですが、リストが作られた後に追加する方法が分かりません。
LV_Addで変数を％で囲ったらダメでした。外したらいけました＞＜
関数内でのみScreenにしたいのですが。
A_CoordModeだけで試してて「出ないじゃん」とか思ってました
ありがとうございます
Win10 + Visual Studio community 2017 では動きませんでした
Win7 + Visual Studio 2013(管理者権限で実行) もダメでした
Win7 + Visual Studio 2013(管理者権限でない) はAHKきちんと動いたのが謎ですが・・
Win10 + Visual Studio community 2017 も
管理者権限だとAHKは動かなくて
管理者権限でないとAHKが動きました。
これは何なんだろう
この際、keyhacに乗り換えるのが賢明、時間が勿体無い
早く消えればいいのに
ここに居る人はkeyhacじゃ出来ない事が腐るほどあるからahk使ってんだし
Visual Studioを管理者権限で実行するとキーリマップが効かないみたいですね・・
一応確認しとくけど、Visual Studioそのものを操作したいなら、管理者権限が必要かもしれないのはAHKの方だぞ
AHKの側に権限が無いなら、 は正常動作
Dll等を使っても構いません
あるウインドウがあって、特定の場所がはっきりわかるように色を上書きして塗りたいのです。
既存のウインドウにデコレーションするというか
AHK以外でも、もしそういうことが出来る方法をご存じなら教えてください
ありがとう！解決しました！
おっしゃる通りAHKを管理者権限で実行したらVisualStudioでもきちんと動きました
ttps://autohotkey.com/docs/FAQ.htm#uac UIA有効じゃダメなん？
WinGetでハンドルが取れる
WinGetPosでウィンドウのサイズと位置が取れる
Guiでウィンドウにかぶさるようなウィンドウを作ったり画像を表示できる
WinSetでウィンドウの表示領域や透明度をいじれる
こんなとこ？
とってもいいヒントを頂きました。ウインドウに直接描画するのではなく、別のウインドウを作って
それにお絵かきして上に載せるということですね。で、WinSetで表示領域を加工するとか
ちなみに、AHKのGUIで、ツールチップのようにタイトルとか枠とかのないほんとにプレーンなウインドウって
作れますか
F1::
Gui, Color, 00AA00
Gui, -0x00C00000 +ToolWindow
Gui, Show, W300 H200
Return
みたいな感じかな
あとはマウスイベント透過するとかWindowの切り抜きとか透過率とかはWinsetで指定
さらにWindowの移動やサイズ変更に追従させるとか、非アクティブ時や最小化時にhideするとかの必要があればそれも考慮する必要あるかな
すばらしい。ありがとうございました。これは参考になりました
MGLのソース見てみたら分かるかも
progressやguiなら色やサイズを変更可能なのでTooltipとして代用可能
ttps://egg.5ch.net/test/read.cgi/software/1487149472/134 教えてエロいひと。
2.SetTimerで常にマウス下のコントロールを監視
3.取得したコントロールにControlFocus（必要に応じてWinActivateも追加）でフォーカスを移す
でどうだろう。スマートではないが。
ありがとうございます。
本来の目的を達成する方法はあるのですが。。
マウスオーバーはトリガーに出来なさそうですね。。。
ポップアップに変更した端末名
が出るようなスクリプトを
Windows10でやり方教えて
いただけないでしょうか？
割りとかんたん。
タイマーでモニターしてマウスオーバーでウィンドクラスを取り続けて変数によけとく
変数内のウィンドクラスとマウスオーバーで取ったクラスが違ったらそのウィンドクラスをアクティベートする
以前作ったけどウィンドの順序が切り替わりまくってボツにした
ってやるとQTTabBarで新しいウィンドウが開いてしまうから
ファイル名を指定して実行でやってるんです。下記のように。
string = explorer `/select`,"%path%"
MGU_ExecuteByFileName(string)
MGU_ExecuteByFileName(exeString){
Send, #r
WinWaitActive, ファイル名を指定して実行,, 5
MGU_PasteString(exeString)
Send, {Enter}
Return
}
MGU_PasteString(string, pasteKeys := "^v"){
Backup := ClipboardAll
Clipboard := string
Send,%pasteKeys%
Sleep, 200
Clipboard := Backup
}
っていう風にしてるんですけど、これだとたまーーに実行文字列がNullになったり
するんで、もっといい方法ないですか？
ご教授お願いします。
OHP 見た感じ COM が使えそうなんだけど、どうだろう
ttp://qttabbar-ja.wikidot.com/scripting qt := ComObjCreate("QTTabBarLib.Scripting")
qt.Open(path)
QTTabBarは使ったことないのでいい加減だけど、タブブラウザみたいに
新規ウインドウで開くか新規タブで開くかオプションで設定できないのかな？
どうも、ファイルを選択してフォルダを開くメソッドが無いみたいなんですが、
どうでしょうか？
shellexecutehookを利用してキャプチャするにチェックをしても、別のプロセスで
フォルダーウィンドウを開くのチェックを外しても
Run, explorer `/select`,"%path%"
とすると、新規ウィンドウで開いてしまうみたいです。
あと報告です。
Clipboard := string
の後に
Sleep, 100
を入れたらNullになる症状が今のところ出ていません。
少し脱線するけど俺は「App=Device」というコマンドラインで再生デバイスを変更できるフリーソフトを使用してる
AHKとこれを組み合わせてポップアップを表示したりすればお望みのことが出来るんじゃないかな
環境によっては管理者権限で実行する必要がある
qs := ComObjCreate("QTTabBarLib.Scripting")
qs.Open("C:\Users\UserName\Documents")
aw := qs.ActiveWindow
at := aw.ActiveTab
at.SelectedItems := "Book2.xlsx"
と記述したらできました！ありがとうございました！
ahkrun、ファイル名runで管理者権限の有無が統一されてなかったとか？
ファイル名runでだけ別プロセスにならない理由がよく分からんね
試しに
RunAs, %USERNAME%, %PASSWORD%
Run, explorer `/select`,`"%filePath%`"
RunAs
とやっていたところを、単に
Run, explorer `/select`,`"%filePath%`"
と書き換えてみましたが、どちらとも新規ウィンドウで開いてしまいます。
コマンドプロンプトからやってみても同じでした。
ファイル名を指定して実行のexeを見てみたところ、explorer.exeとなっていた
のでこれが原因ではないでしょうか？
If GetKeyState("RButton", "P")
msgbox, 押されている
else
msgbox, 押されていない
この部分を
If GetKeyState("RButton" "MButton" "XButton1", "P")
とか
If GetKeyState("RButton" and "MButton" and "XButton1", "P")
とか
If GetKeyState("RButton" || "MButton" || "XButton1", "P")
とか
If GetKeyState("RButton" or "MButton" or "XButton1", "P")
とか素人なりにやってみましたが、全くダメでした。
宜しくお願いします。
If( GetKeyState("RButton", "P") or GetKeyState("MButton", "P") or GetKeyState("XButton", "P") )
msgbox Hit
とか
ｷﾀ━━━━━━(ﾟ∀ﾟ)━━━━━━ !!!
ｷﾀ━━━━━━(ﾟ∀ﾟ)━━━━━━ !!!!!
顔射感激雨あられぇ！
本当にありがとうございました！
「and」や「||」や「or」を知ってるのに書式が分からないって・・・
wikiとかhelp見ないで適当にやってできないから質問した感がもの凄くあるんだが・・・
これが素人AHK使いの現実何です。
お察し下さい。
でもちょっとやれば、すぐにわかるようになるよ
「かつ」と「または」のことだ。縦線は初めてみたときわからんかったので
ヘルプみたが。
前述した方法で行うとAHK起動後、約5分くらいで下記のエラーが出ます。
Error.File:C:\Apps\MouseGestureL\Config\MG_User.ahk
Error.Line:771
Error.Message:0x8013150B -
Source: mscorlib
Description: オブジェクト '/62092dc6_d0c8_47dd_803a_d87384c15e0f/sqpempia+y4xaa3s532qntda_2.rem' が切断されたか、サーバーに存在しません。
HelpFile: (null)
HelpContext: 0
Error.What:
Error.Extra: ActiveTab
aw := qs.ActiveWindow
at := aw.ActiveTab
at.SelectedItems := "Book2.xlsx"
を下記のように修正したりしましたがエラーが出ます。
qs.ActiveWindow.ActiveTab.SelectedItems := fileName
どうもタイムアウトエラーのようなのですが、下記のページの解決策のように
AHKで記述する方法がわかりません。
ttp://bbs.wankuma.com/index.cgi?mode=al2&namber=21484&KLOG=41 どなたか解決策をご存知の方、ご教授お願いします。
ttps://support.microsoft.com/ja-jp/help/815065/what-is-a-dll VisualStudio VC++とかやらないとその世界は難しいよ
あっちもDeclare宣言必要だから型とか調べるのによくVBの解説サイト見に言ってたわ
今だとMSDN直に見たほうが早いんだろうけど
ttps://sites.google.com/site/agkh6mze/howto/dllcall Sleep,aaa
mouseclick left
Sleep,bbb
.
.
Gosub,A
でgosubの処理時間をループするsleepで調整したいのですが
Gosubの処理時間を計る方法ありませんか
; A_TickCount精度10ms
StartTime := A_TickCount
Sleep 1000
MsgBox % A_TickCount - StartTime " (ms)"
; ナノ秒の精度が欲しいなら高分解能タイマ
DllCall("QueryPerformanceCounter", "Int64*", CounterBefore)
Sleep 1000
DllCall("QueryPerformanceCounter", "Int64*", CounterAfter)
MsgBox % CounterAfter*1000 / CounterBefore " (ms)"
return
Gosub,A
ElapsedTime := A_TickCount - StartTime
MsgBox, %ElapsedTime% milliseconds have elapsed.
これでも可？
ありがとうございます！
ComObjCreate("QTTabBarLib.Scripting") を使って、使う度に毎回インスタンスを取得してますか？
グローバル変数に一度取得したあと、使いまわしてたりしませんか
グローバル変数に代入してません。毎回取得してます。
後、mscorlib.dll ver 5.1.30514.0をダウンロードしSystem32フォルダへ投入した
ところ、エラー内容が変わりました。下記のようになります。
---------------------------
Error in #include file "C:\Apps\MouseGestureL\Config\MG_User.ahk":
0x8013150B -
Source: mscorlib
Description: IPC ポートに接続できません。指定されたファイルが見つかりません。
HelpFile: (null)
HelpContext: 0
Specifically: SelectedItems
Line#
769: }
770: dirPath := MGU_GetDirFullPath(dirPath)
771: qs := ComObjCreate("QTTabBarLib.Scripting")
772: wnd := qs.ActiveWindow
773: qs.Open(dirPath)
774: if (file = TRUE)
774: {
---> 775: wnd.SelectedItems := fileOrDirPath
776: }
777: ObjRelease(qs)
778: }
780: {
781: Try
781: {
787: if (appName = null)
Continue running the script?
どうでしょうか？
私の書いたソースを載せておきます。
MGU_OpenWithQTTabBar(fileOrDirPath, file){
if(file = TRUE){
fileName := MGU_GetFileNameFromPath(fileOrDirPath)
dirPath := MGU_GetDirPathFromPath(fileOrDirPath)
}else{
dirPath := fileOrDirPath
}
dirPath := MGU_GetDirFullPath(dirPath)
qs := ComObjCreate("QTTabBarLib.Scripting")
wnd := qs.ActiveWindow
qs.Open(dirPath)
if(file = TRUE){
wnd.SelectedItems := fileOrDirPath
}
ObjRelease(qs)
}
あと、qs.Open(dirPath)まではエラーなく進むんですけど、
wnd.SelectedItems := fileOrDirPath
でエラーが出るんですよね～。
理由がいまいち分かりません。
特定の文字をクリックする方法があれば教えてください。
文字の場所はばらばらなので、場所指定のクリックは出来ません。
結局、その箇所だけjsで対応することにしました。
原因は今も分からずです。
お騒がせしてすいませんでした。
１、最初に開くページをURLDownloadToFileでローカルにファイルとして落としていく
２、落としたファイルの中をLoop(file)、Loop,Readでループさせ、RegExMatch()で検索する
３、目的の文字列があったらRunでそのURLを開く
自分には難しかったので、URLコピペして文字追加して貼り付ける方法で代用できました。
ありがとうございました。
getkeystateによってあるキーの押し下げ有無はとれますが そうでなく、「いま押し下げられてるキーを一覧で得る」ような方法はありますか？
ホットキーなど使用していると、自分の環境だとわりと発行されたキーがそのまま残ったりします
今まではプログラム的にキー残りがないよう試行錯誤してましたが、単純に「物理的に、残ったそのキーをもう一回押す」と直ることに気づきました
ちょうど、今押してるキーやマウスを画面表示させられるkbvというフリーソフトを見つけたので、それで一応対応はできなくはないのですが若干起動が重くて…なのでahk内でどうにか調べられたら良いなと思ったのです
Pはずせ
GUIでウインドウをたくさん作ると、左下のタスクバーのAHKのところにカーソルを持っていくと
作っただけのウインドウ数のタイトルがポップアップで出てきてしまいます
邪魔なので、これを出さないようにする方法ってありますか
スクリプトは１つなので、１つのスクリプトに１つのポップアップのタイトルで十分だとおもうのですが
ttp://ahkwiki.net/Gui,Option 実験してみたよ。
AHKのSetTimerでAltキーを監視してON/OFF表示させていて、
ついさっきたまたまAltを離しているのにAlt押しっぱなし状態になった。
しかし、AHKのGetKeyStateではOFF判定だった。
今度はON判定。
とりあえず、あてにならんわ。
キー押し下げ判定自体も精度アヤシイようだと、ちょっとアレですね
過度にahkでゴチャゴチャやらない方向で運用を見直すようにしてみます
フックは？ディレイは？ちゃんとDown Up使ってる？Sleepも無茶な数値入れてない？
よくわからんな
Alt Down
Scroll Up
Alt Up
でやると、早くグリグリ回すと拡大しないときが数回に一回発生する。
Sleep入れてもダメ。
これがすり抜け？
Alt押し込んでホイール離すを何度も何度も繰り返してるから操作のエミュレートになってない
Alt押し下げた状態でホイール操作を待つっていうスクリプト書かないと
キーやボタンと違ってホイールには押す/離すなんて判定は無いけど
ホイール操作の何を待つんだ？
loopで出来る
この文章からして意味不明だし
なぜなら「ホイール離す」なんで動作は存在しないので
そもそも質問者が何をやろうとしてるのか分かって無さそうだけど
まあも端折らずに自分が書いたコードそのまま貼った方がいいと思うけど
的外れなサンプルとか要らんよ
俺は質問者でもなければコードなんて求めてないし
ただお前の言う「ホイール離す」とは何のことだ？って聞いただけだし
Photoshop CS6 環境設定 - 一般
Photoshop CC 環境設定 - ツール
にそれぞれ 「スクロールホイールでズーム」って項目あるよ
チェック入れとけばAlt押さなくてもホイールだけでズームできる
興味があったんで、541は見たいです。
出先なので、コードはうろ覚えなのですが、
実際はシフトとアルトを押しながらホイールを回す動作をしたいです。
Shift Down
Alt Down
Wheel Up（Down）
Shift Up
Alt Up
で書いています。ゆっくり回す分には動作しますが、早く回すと抜けが発生すします。
が言うのはホイールを離すじゃなくてホイールを回すの間違いでは？
ホイール操作を待つってスクリプトがよくわからないので、サンプルコード待ってます。
ありがとうございます。
バージョンが違うのでできるかはわかりませんが、それはそれで参考にさせて頂きます。
だからさ、それはahkのコードじゃないから質問する際にそういう中途半端な書き方は良くないぞって意味な
で、本題だけどのオプション設定で済む話ならそれが一番いいだろうけど
余談になるがShiftやAltなど修飾キーならいちいちDownとかUpとか書かずとも
WheelUp::Send, +!{WheelUp}
だけでいいんじゃね？
それでもすり抜けるならしょうがないね
が言ってた「ホイール離す」は所詮そのレベルの勘違いだろうな
何を待つのかは未だによく分からんけど
Wheel Up（Down） の前後に
Sleep,50
を入れたらどうなる？
失礼しました。
修飾キーでの記述では、そもそも全く動作しなかった記憶があります。
すり抜けも変な感じで、Shiftだけ押されてAltが押されないままホイールが回る動作をしたりします。
Sleepを入れて色々時間を調整すると、入れない時よりも失敗の頻度は改善されました。が、完全には対策できていません。
#Usehook は使ってる？
言いたいことが伝わってないのは気持ち悪い
使い方がいまいちわからず、使ってませんでした…
>>よろしくお願いしますm(_ _)m
#InstallMouseHook
~*WheelDown::
~*WheelUp::
wheel := A_ThisHotkey
loop
{
If wheel contains ^,+,!,*,~,#,<,>,$
StringTrimLeft, wheel, wheel, 1
else
BREAK
}
GetKeyState, state, LAlt
If state = U
send,{blind}{LAlt Down}
sleep,30
send,{Blind}{{%wheel%}
settimer,AltRelease,-200
Return
AltRelease:
send,{Blind}{LAlt up}
Return
すまんloop監視使うよりタイマー使ったほうが簡単だった
最初はloopで全体を監視してWheelを監視して回した分だけ変数にためて
sendの回数部分に渡す予定だったけどややこしくなりそうだ
言いたかったのはこんな感じで、まずキーボード操作ならAltを押しっぱなしにしたままwheel操作をするはず
その間Altは離さないはずなんだ
これを簡単に書こうとして
send,{LAlt Down}{Wheel up}{LAlt up}
なんて書こうもんならログではホイール回すたびにAltキーが連打されることになる
しつけーんだよ
少し頭冷やせ
質問者はサンプル待つつもりで「よろしく」って言ってるのに、横からしつこく揚げ足とりしてるあなたの方が頭冷やすべきでしょ
横からしつこくもなにも俺は最初からその一点についてしか話してない
それなのに一人で勝手に興奮してるだけ
間違いなら最初から間違い認めりゃいいだけなのにな
無視しとけよw
なんでみんなからしつこいって
言われるかわからないんだから
お前もそんな顔真っ赤にしてんなよ
＞一人で
＞顔真っ赤
とか言い出したら要注意な
ありがとうございます。
今外出中で試せないのですが、今夜やってみます。
#InstallMouseHook
; variable
EtatWheelDown = 1
EtatWheelUp = 1
Check_EtatWheelDown = 1
Check_EtatWheelUp = 1
Loop, ; ( or SetTimer )
{
if EtatWheelDown <> %Check_EtatWheelDown% ; Wheel Down is turn
{
Tooltip, Wheel Down is turn.
Break
}
if EtatWheelUp <> %Check_EtatWheelUp% ; Wheel Up is turn
{
Tooltip, Wheel Up is turn.
Break
}
Check_EtatWheelDown = %EtatWheelDown%
Check_EtatWheelUp = %EtatWheelUp%
}
~*WheelDown::
EtatWheelDown += 1
return
~*WheelUp::
EtatWheelUp += 1
return
ちょっと探したらgetkeystateじゃないにしてもホイール回してるか回してないかの取得スクリプトならあった
これでホイール離してる状態も取得できるな
質問者です。
わざわざコードを書いて下さりありがとうございます。
今試してみたら動きました！
なるほど、ホイール回す度にalt連打されると処理がおかしくなるのですね。（処理が完了する前に次の入力が来る？）
ホイール回す間はalt押しっぱなしにするという方法は目から鱗でした。
アルゴリズムやコマンドの勉強にもなりました。これで長くAutohotkeyを愛用していけそうです。
重ねてお礼申し上げます。
どうしたらいいでしょうか
タイマーで１秒おきとかにファイルのプロパティーを見ながら日付の変更確認とか、そんなことをしないと
いけないのですか？
多分settimerでFileGetTimeし続けるほうが楽だと思う
これを強制的にahk_class Progmanに戻す事って出来ますか？。
何故戻したいのかはわからないけど、同時に適用したいならClass判定のところをorでいいんじゃないの？
となっているとします。文字の長さ、数字の桁数は別に３ということではなく任意です
この変数vから、数字のtttだけをとってくるにはどうしたらいいでしょうか
RegExMatch()とかを使うのですか。 かなりややこしくなりそうですが
NewStr := RegExReplace( ttl, "[^0-9]+", "")
これでいいのかな。 一応、確認したところ出来ていそうです
数字の0-9ってなにか\を使った記法ってあったような
loopでぶん回して取得する無理矢理な方法もなくはないけど
規定値（一番上）に選択→隣接リストで同じ処理……
を5回位繰り返させようとしています。
【処理】
start地点のコントロールを選択してからHotKeyを押して処理開始。
１．ControlGetFocus
→どのコントロールでも、どのwebページでも
「Ineternet Explorer_server1」しか返ってこない。
２．Key（↑）を送ってリストを遡らせる
→TABで次のコントロールに移るを繰り返す
→Javascriptで監視されているようで、コントロールの
value変更後の処理でFocusが外れてしまい、処理が継続できなくなる。
AutoHotKey無印を使っています。
AutoHotKeyでは、そもそもブラウザ上に展開したコントロールを
直接操作することはできないのでしょうか？
ショートカットキーを使って、既存のブラウザのコントロールにアクセスしたいというのが
もともとの願望でした。
（会社の基幹システムの提携作業をマクロ化したいという動機）
検索すると、HotKey制御ならAutoHotKeyらしいということがわかって、
いろいろ試行錯誤してみた次第です。
ずっとVBAで業務支援ソフトなんかを同僚のために作ってきたのですが、
HotKeyの制御はC#やVBなんかでもできるのでしょうか？
初心者ですが、VisualAtudioは最近ちょろっと触ってるので、
HotKeyを使ったブラウザ制御なんかを学べる環境を教えていただけると幸いです。
| IEウインドウを最大化
| IEを最前面表示固定
| 座標100,200 を左クリック
| 1秒待つ
| 座標100,220 を左クリック
| 0.5秒待つ
| 座標300,200 を左クリック
| 1秒待つ
| 座標300,220 を左クリック
| ・・・
| IEを最前面表示固定解除
みたいなのにすればいいだろ
＃スクリプト動作中はマウス、キーボードを触らない
AHKじゃなくても、マウスユーティリティー系で可能
openmausujiならソースが公開されているから、業務で使用も可能だろ
テンプレにあるACC.ahkでDoDefaultActionでいいんじゃないかな
それでできないならUI AutomationのSetFocus()でフォーカス合わせるぐらいしか思いつかないけど
UI AutomationのほうもAutoHotKeyである程度使いやすいようにされたものがどっかにあったはず
ありがとうございます。
レスが遅くなって申し訳ありません。
上記を参考に一度トライしてみます。
不定期に反応しなくなります
すり抜けとかではなく全く反応しなくなるのですが、リロードすれば直ります
右クリック、左クリック、サイドボタンでは全く問題ないです
定期的にリロードするよう書き込んだ方が良いのか、それとも
他に何か原因があるのでしょうか？
まず、余分なものをどんどん省いていって、それが再現する必要最低限のスクリプトにしてみましょう。
その結果、原因が分かって自分で解決できる場合もあるし、その最低限のスクリプトをここに書き込めば
誰かにヒントをもらえる確率が上がると思います。
WheelRight::send,a
return
これだけしか書いてないスクリプトでも急に受け付けなくなるのですが・・
ただ言えるのは、短く書こうとして誤動作おきてるなんてことはよくある
WheelRight::
send,{a down}
keywait,WheelRight
send,{a up}
Return
くらいは書かないとダメかも
早すぎて抜けてるとかなら調節しないといけないわけだし、そもそもキーが送られてないとかになると、マウスとの相性まで疑ったほうが良い。
WheelLeft、Rightはうちも反応して無くて、しょうがないからF13,F14をレジストリレベルで割り当ててF13に設定してたりする
仮想PC上で動かしていたりするんじゃない？
もしそうなら思考錯誤すればなんとかなったりするけど
Autohotkeyとの併用だと根本的解決は厳しいのでどこかで妥協が必要
質問者の様に途中から反応しなくなると言った症状とは全く別問題
反応しなくなるのは件のホットキーだけ？
それとも他のホットキーも全滅になるん？
リダイレクトホイール系のスクリプト入れてるけど
ブラウザとかでページの読み込みが重いとスクロール処理に遅延が生じてしまって
それ以降他のアプリ上でホイール回しても一切スクロールしなくなることはあった
ただ処理はロストしてるわけじゃなく溜まっててるだけで
数分～10分後に え今更？ってタイミングでスクロールされるけど
(win8 x64 & ahkL U64 v1.1.24 & m570)
ありがとうございます
そのスクリプトでやってみると初めの一文字だけしか出てきません
キーヒストリーを見ると
002: Send,{a down} (0.09)
003: KeyWait,WheelRight (2.81)
で止まって Send,{a up} が送られていないようでそれ以降反応しません
WheeｌLeft、,WheelUp とかでも同じ挙動です
WheelRight::send,a
return
で反応しなくなるときはキーヒストリーにも何も記述されなくなってます
環境は win8 x64 & ahk v1.1.26.01(Unicode 32-bit) マウスはエレコム です
#NoEnv
#InstallKeybdHook
#UseHook
SendMode,Input
WheelRight::send,a
このスクリプトのみを書いたAHKを実行させてみたけど、問題なく動いてるよ。
何回目のホイール右倒しで無反応になるの？
とりあえずは無視した方が良いぞ
ろくに確認もしてないやつだから
ありがとうございます
WheelRight::
send,{a down}
keywait,WheelRight
send,{a up}
Return
で反応しなくなるのは2回目からです
とりあえずスクリプトの頭に
#NoEnv
#InstallKeybdHook
#UseHook
SendMode,Input
を付けてうまくいくのか様子を見てみます
ボタンのアップ待ちは無駄かもよ。
keywait,WheelRight とか言ってるやつがアホなだけ
そこまでキーボードでやりだい心境ってどうなの？
お前何と戦ってんの？
全く真逆のこと言ってんだがｗ
>551の時は代替キーがモデファイヤ含んでたからそういう処理が必要だったけどそうでないなら助長じゃね
WheelLeft/Rightは倒してる間中リピート発生するみたいだし本来なら
WheelRight::a
だけでいいはず
書き方じゃなく環境的な問題な予感
#NoEnv
#InstallKeybdHook
#UseHook
SendMode,Input
スクリプトの頭に上のを付けてもやっぱり不定期にホイールは反応しなくなるので
諦めます
MGLを使った回避はあったのですが、単体利用での回避方法を誘導していただけないでしょうか。
よろしくお願いいたします。
WheelScroll.ahk modernUI対策版を上げました
ただwin10の場合は標準でリダイレクトホイール可能ですのでもうこのスクリプトは要らないかも
ttp://www6.atwiki.jp/eamat/pages/30.html %USERPROFILE%を展開する方法などはないでしょうか。
Path := "C:\Users\ユーザー名\Desktop\Google Keep - メモとリスト.lnk"
FileGetShortcut,% Path,,,,, OutIcon
Gui, Add, Picture ,w32 h32 ,%OutIcon%
Gui, Show, AutoSize x60y60
%USERPROFILE%を直接展開する方法は分からないが、
A_UserNameでログインしているユーザー名を
または、A_Desktopでデスクトップフォルダのフルパスを
取得することは出来るから置換すればいいような…
ありがとうございます。
StringReplace, OutIcon, OutIcon,% "%USERPROFILE%" , %USERPROFILE%, All
この一行で解決しました。
お世話になってます。
WheelScroll.ahkの作者さんがいらっしゃったのですね。
スクリプトの修正ありがとうございました。
業務用ソフトだからでしょうか。
特殊なコントロールが多いせいか、必須スクリプトです！
加速以外は全部の機能を使ってると思います。
横スクロールのコメントがございました。
Shiftホイールで横スクロール部分を有効にしました。
20150711バージョンにて、excelのシート切り替えのため、下記を追加しておりましたが
20171219バージョンで機能しなくなりました。
スクリプトを比較してみて、競合しそうな追加部分は無いように見えるのですが、いかがでしょうか。
WheelScroll.ahkの最終行に追加
#IfWinActive ahk_exe EXCEL.EXE
XButton1::Send ^{PgUp}
XButton2::Send ^{PgDn}
Return
あと、諦めていたことなのですが、excelにて、列の固定(ウインドウ枠の固定）をしていると横スクロールできません。
環境依存などあれば書き込みます。
よろしくお願いいたします。
ご使用＆報告ありがとうございます
当方先月やっとwin10に移行したばかりであまり動作確認が取れておりませんでご不便をおかけします
色々酷いので手直ししたいんですがWheelaccelやMGLのほうがいい感じに改良されてるようですし
こっちはもう自分用で汚くてもいいかな～みたいな感じで放置してました
こんなでも使ってくださってる方がいるのは嬉しいです、ありがとうございます
＞WheelScroll.ahkの最終行に追加
こちらでも20171219に同条件で追加し、Excel2007、2016の2種で試しましたがどちらも問題なくシート切替できました
もしやShiftホイール部のコメントを外されたときに */での閉じに失敗してたりしないでしょうか
; /***** チルトが無いマウス用
：
; */
↑行頭にセミコロンでコメントのコメント化してみてください
(shift横スクロールはチルトのないm570使い続けてる自分のために入れたままにしてたんですが
今更チルトマウス使ってない人のほうが少なかろうということで今回コメントにしてしまいました
ややこしいことしてすみません)
excelの固定時横スクロールについては原因判明しましたので次回更新時に修正いたします
他にも手直ししたい箇所があるため少しお時間下さい
の５を変数でできないです？
send {down %a%}
%か～さんんきゅ～
ご説明賜り感謝致します。
コメントアウトの方法は理解しており間違っていませんでした。。
これから出張なので、来週改めて確認していきたいと思います。
その他含め、ありがとうございました！
私はm510でチルト出来るのですが、shift横スクロールの方がスクロール量をコントロールできるので便利です。
632です。
ahk_classで指定したらシートの切り替えができました。
あとコメントにありました互換固定のテストは、| modeの方でないと動かないソフトがありました。
ありがとうございました。
たとえば、
aaa
bbb
ccc
aaa
ddd
bbb
を
aaa
bbb
ccc
ddd
としてほしいのです。ソートはしません
var =
(
aaa
bbb
ccc
bbb
aaa
)
Loop, Parse, var, `n
{
If(!InStr(newvar, a_loopfield "`n"))
newvar .= a_loopfield "`n"
}
Msgbox, %newvar%
i := 4
p := &i
MsgBox, % *p
MsgBox, % NumGet(p + 0, "int")
のように書いても両方共iとは関係のない値が出てしまいます
どうすればpからiの中身にアクセスできるのでしょうか？
VarSetCapacityとNumPutを使えば良かったのですね
隣のリストボックスに表示する、というのがあります
今はAHKでmousemoveでカーソル移動してツリービュー上でクリックして
隣のリストボックスの情報をControlGet等でとっています
これをもっとスマートにしたいのですが、
ツリービューをクリックしてネットに情報を送るところを直接httpで送ることは
できませんか。具体的にどういうメッセージを送ってるのかを知ることは出来ないのでしょうか
URLDownloadToFileというのは見つけたのですがここまでのことはAHKでは出来ませんか
質問内容から想像つく範囲で答えるならdllcallからwinsockAPI叩けばおそらく可能ではある
ただSendMessageみたいに1発投げればいいってもんじゃないし
相手サーバーとのネゴシエート必要だし通信プログラムの知識は必要になると思うが
●AutoHotkey Downloads
ttps://autohotkey.com/download/ どうやればいいのでしょうか？
たとえば
Ctrl+K→Ctrl+T
など
v.1.1.27.00にしたらremap用スクリプトがエラーで起動しなくなった
sc073::+vkE2sc073という記述が一箇所あってそこでエラー発生したてので、
sc073::+sc073としたらスクリプトが正常に動いた
今バージョンからvk**付けるとエラーになってしまうのか？
wiki読め
変更履歴によるとこれまでの「vk**sc***」という記述は廃棄されてsc***を削除した「vk**」でOK
●Changes & New Features
ttps://autohotkey.com/docs/AHKL_ChangeLog.htm 期待はしたいが現状のコード1万行を移植しないといけないと思うとめっちゃだるいな
つまり文章をコンバートするスクリプトさえ作ればなんとかなんじゃね？
としてもメモ帳を認識しない。
無題をやめて - にすると大丈夫。
何か問題ある？
スクリプトはUTF-8。
環境は、Windows10で、v.1.1.27.00です。
UTF-8のBOM付きやSJISしたら動作した。
ウィンドウタイトルの日本語を探すのは初めてだから、ごめんちょ。
中ボタン単体では動作しなくなってしまうので
Mbutton::send,{Mbutton}
return
としていたのですが、これだと中ボタンでドラッグアンドドロップできなくなることに気付いて
Mbutton::MouseClick,middle,,,,,d
return
Mbutton up::send,{Mbutton Up}
return
と書いてみたのですがうまくドラッグアンドドロップ出来ません
どのように書けば良いのでしょうか？
中ボタン＋右クリックにホットキーを当てた時点で
中ボタン単体の判定は中ボタンを離した時に行われる様になるので
通常の方法ではドラッグは出来なくなる
別の対処策としては2度押しでドラッグにするとか、別のボタンにドラッグ割り当てるとか幾つかやりようはあるけど
どうしても普通にドラッグしたいなら中ボタン＋右クリックを諦めた方が良い
特定のウィンドウがアクティブ時、または中クリック長押しで切り替えとか
中ボタンでドラッグアンドドロップ出来るアプリを持っていないので確認できないけど、
オートスクロールのキャンセルはCtrlで出来るから、
#if GetKeyState("MButton","P")
RButton::
Send,{Ctrl}
ToolTip,M+R
Sleep,1000
ToolTip
return
#if
こんな感じでどうだろ
出来ました！ありがとうございます
GetKeyStateを使えばホットキーとして割り当てなくて済むのですね！
それだと中+右ボタンを押す時にも中ボタン単体押しが送信されるのでは？
それで構わないならば
~MButton & RButton::
にすればいいだけだな
でも出来るのですが ~MButton & RButton:: でも出来ますね
~ の意味を調べたら イベントを乗っ取らず、そのままシステムに通す って書いてあったのですが
元のキーの機能を殺さずに的なことなんでしょうか？
●Changes & New Features
ttps://www.autohotkey.com/docs/AHKL_ChangeLog.htm vkF3SC029::rerurn ;全半角
vkF4SC029::rerurn ;全半角up
でエラー出る
俺環かな
スキャンコードなし指定ならokだた
久しぶりにアップデートしたら自分もInvalid hotkeyってエラー出たわ
とりあえず1.1.26に戻した
チェンジログ読んだらちゃんと書いてあったや
Scripts containing hotkeys of the form VKnnSCnnn:: will need to be corrected by removing SCnnn, which was previously ignored.
しかし互換性持たせてくれればいいのになぁ
スキャンコード全部削除したけど動作がおかしくならないか不安
せっかくなので、これからverup予定の方に、自分が修正したキー一覧を以下に
変換…vk1Csc079
無変換…vk1Dsc07B
:(コロン)…vkBAsc028
:(コロン)…vkBAsc03A
;(セミコロン)…vkBBsc027
;(セミコロン)…vkBBsc03B
,(コンマ)…vkBCsc033
\(バックスラッシュ)…vkE2sc073
CapsLock…vkF0sc03A
ひらがな/カタカナ…vkF2sc070
全角/半角…vkF3sc029
全角/半角…vkF4sc029
grepツールで済ませてそんなに時間はかからなかったけど、久しぶりに面倒な更新作業だった
vkxxまたはscxxxのどちらかで指定と理解してるんだけどいいんかな?
使ってる人いるかわからないけど･･･
vkff系のscはkeywaitでエラー出たので
sc056::
keywait,vkff
return
としたらエラー無しで動いた。
sc05eは使えなくなったが、こいつだけvkff::をアテた。
とりあえず他とバッティングしてない。
ちょっと？？？な部分があるのでお伺いしたいです。
「[[」って打ったら「『」、「[[[」って打ったら「【」になるようにするにはどう書けばいいんでしょう？
Z0オプションでバッファが残るっていうならそれ指定するだけでいいのかなーと思ったら思うように動かず。
フラグを変数に格納するなり、複数行書かないとダメでしょうか？
ホットストリング - AutoHotkey Wiki
ttp://ahkwiki.net/Hotstrings シンプルな構文で書けるのか書けないのか書けないのか、単にそれだけを慣れている人に聞きたかったんです。
必要ないでしょうけど一応晒すと、
:*Z0:[[::『
:*:[[[::【
で[を３回押したら【になりそうだなーと思ったのですがならないなーってことでして。
特に「終了文字」の項目を・・・
……？ *で不要化してますよね？
「置換後のテキストに2バイト文字を使うことはできないので、スクリプト実行型でクリップボードを経由して貼り付けるなどの方法を取る必要がある」
ご自分で試されましたか？
大分前から２バイト文字送信も実装されているようですが
そもそも質問の方向性が全く違います
『が入力される時に[[がBSで消されたことになるので、続けて[を打っても:*:[[[::が実行されない。
あー、簡単に上手いことはいかないんですね。
B0にして、かつスクリプト実行型に変えたらようやく入力バッファ残りました。
しかもバグなのか、必要とされるBackspaceの量（置換後に本来消す文字数）まで引き継がれてしまい、
後続もB0で手動でBackspaceの数を調整しないといけないハメに。
さらに言うと、「:B0 O*:abc::」のあとは「:B0 O*:bcd::」では反応せず、「:B0 O*:abcd::」のみ受け付けると仕様がよーわからん…。
とりあえず↓のように出来ましたけど、もっとスマートな書きかたあります？
:B0 O*:[[[::{Backspace}【
:B0 O*:[[::
Send, {Backspace}『
Return
?オプション付けないとa～z打った直後に動いてくれないから付けた方が良い
ちなみに、他にキー入力をいじるソフト（やまぶきRとか）使ってるとちゃんと動かない事がある
①Iキーを送る
②指定座標上で右クリ
③再びIキーを送る
という単純なものです
Q::example() ;
examplel(){
BlockInput On
Send {i}
Click right 1305,829
Send {i}
BlockInput Off
return
}
ここで質問なのですが、このマクロによる操作（①～③ですね）が一通り終わった後、マウスポインタをもとの位置に戻ってこさせるということは可能でしょうか？
移動する前に座標取得
MouseGetPos
ありがとうございます
NewStr := RegExReplace("C:\a\b", "([^\\]+?)?$", "c")
tooltip,%NewStr%
結果が「C:\a\cc」となってしまいます。なぜか置き換え文字に指定した文字が二重で入力されます
以下のように置き換え回数を1に制限すると「C:\a\c」となってくれます
NewStr := RegExReplace("C:\a\b", "([^\\]+?)?$", "c",,1)
tooltip,%NewStr%
使っている正規表現がまずいのかRegExReplaceの記述の仕方がまずいのかわかりませんが置き換え文字が二重に入力されないようにするにはどうしたらいいんでしょうか？
RegExReplace("C:\a\b", "(.*\\).*", "$1c")
拡張子、ファイルかフォルダの考慮も忘れずに
正規表現がまずくて、量指定子"?"とグループ化"()"の使い方が迷走してるんだと思う
個人的にはこう
RegExReplace("C:\a\b", "[^\\]+$", "c")
1.1.27.04になっとるやないかい
ありがとうございます
参考になりました
;キャプションバーをなくす
LWIN & LButton::
WinSet, Style, -0xC00000, A
return
「bug.n」の以下のスクリプトでも同様のことができているようなのでこの方法でもかまいません
(キャプションバーの非表示という部分の抽出の方法)
ttps://github.com/fuhsjr00/bug.n/blob/master/src/Window.ahk 実はこれで1年以上悩んでおります。
どうかよろしくお願いします。
ttps://arak.jp/diary/?20091030S1 できました！
本当に助かりました
ありがとうございました
scのみで今まで問題無く行けてたがvkのみにしたら
一部でsc***→vk**変換以外で手直しやら動かなくなるやら困った事になった(ので途中で元に戻した)
例えば
sc029::send, {BS} ←[全角/半角]押下で{BS}
↓
vkF3::
vkF4::
send, {BS}
return
とする必要があったり
+sc03a::関数("引数") ←[shift]+[CapsLock]で関数実行
↓
普通にCapsLockのON/OFF切り替えになってしまう
([CapsLock]キーを[F**]に割り当てて、+F**::～ とすれば行けるのかな？…面倒なので確認していない)
とりあえず未だsc***のみでも問題無く動いてるので行けるとこまでこのままいくわ(´･ω･`)
更新内容がいまいちわからん
これがエラーで動かなくなった
;CapsLock ON/OFF
~Shift & vkF0sc03A::Send, {CapsLock}
こっちは動く
;------CapsLock Auto OFF ------
CapsLock::
GetKeyState, state, CapsLock, T
If state = U ;OFF
SetCapsLockState, ON
else
{
SetCapsLockState, OFF
}
Timer03:
If(A_TimeIdlePhysical>5000)
SetCapsLockState, OFF
Return
でもこっちでCapsLockの状態取得しようとすると動かない
~Shift & vkF0sc03A::
バージョン戻したけど時間がある時にもう一度書き直してみようと思う
何か分かる人いたらヒントください。
vkF0sc03A
↓
sc03A
でいけると思う。
vkF0sc03A が sc03a に置き換わっただけで状況は同じでした
どちらも動かない
+sc03a
~Shift & sc03a
動作する
sc03A
やりたいこと
違うソフトでCapsLockのオンオフの操作を変えていたので
Shift + CapsLock で統一したい
その際に自動オフのコードを...
CapsLock:: ;Shift + CapsLockにしたい
GetKeyState, state, CapsLock, T
If state = U ;OFF
SetCapsLockState, ON
else
{
SetCapsLockState, OFF
}
Timer03:
If(A_TimeIdlePhysical>5000)
SetCapsLockState, OFF
Return
~Shift & sc03A::Send, {CapsLock}
CapsLockのみでも反応してしまう
問題無し
~Shift & vkF0sc03A::Send, {CapsLock}
でも、~Shift & vkF0sc03Aはオートオフのコードが反応しない
は
CapsLock::returnしております
しばらくは1.1.26.01で止めておいたほうがよさそうだな
まあアプリの性質的に誤検出しやすいのはしょうがないけど
裏で入力させることって出来ませんか
最前面では別のウインドウで作業していて、その間に、他の隠れているウインドウにControlSendで値を入れたい
のですが
DetectHiddenWindowsを試してみたら
裏に隠れているだけだから
素直にプログラマブルキーパッドを使いましょう
一時使ってた
その辺は CG用補助入力総合スレ あたりが詳しかったと思う
ttp://mevius.5ch.net/test/read.cgi/cg/1486757763/ 長時間起動してるといつの間にかフリーズしているので
更新.ahkで両方のahkをリロードしたいのですが
どのようなスクリプトを書けば良いのですか
よろしくお願いします
main.ahkは冒頭に
#SingleInstance force
を書いておけば更新.ahkでRunするだけでリロードされる
何とか出来ました！
reload
run , c：~main.ahk
上記のアホなことやっていて更新できないなぁと悩んでいましたｗ
教えて頂きありがとうございました
MouseGestureLでジェスチャ毎に再利用しない変数を保持しっぱなしなのもなんだし
最後に一々解放するのもスマートでないというかめんどいというか
代替案でもいいのでお願いします
どこでもいいから関数書いて呼び出すだけ
return
hoge() {
MsgBox
}
; --------
hoge2()
hoge2() {
MsgBox
}
return
; --------
hoge3() {
MsgBox
}
hoge3()
return
っていうか即時関数というより無名関数でしたね
ってやってるだけなんだけど
いつのバージョンからかキーボードの他のキーやマウスのサイドボタンまでおかしな挙動をするようになった
割り当て自体は成功してるんだけど副作用がすごい
仕様変更ですかそれともおま環ですか？
そういうのはレジストリ変更タイプのキーチェンジャーをおすすめする
すまん…おま環だったわ
マウス変えた時に入れたLogicool Optionsと競合してるだけだった
まぁ解決は出来なかったんだけどね
できない
v2でも実装する予定なし（去年の時点で）
ttps://autohotkey.com/boards/viewtopic.php?p=150578#p150578 関数名やラベル名を消費しないでサブルーチン作る方法は今のところないんじゃないかな
変数の一斉解放だけなら、変数をオブジェクトにまとめておいて最後に空にするとかあるけど
代案とするには弱すぎる
実装予定もなしかー
プラグインレベルの大掛かりなのだとobjectもありかもですね
ありがとうございました
したくて以下のようにしたのですが、^q後の^cがPageDown
に置き換えられてしまっているのかInputで拾えません。
何か方法はありませんでしょうか？
^c::send, {PgDn}
^q::
Transform, CtrlC, Chr, 3
Input,InputChar,I M L1 T2
if (InputChar = "c" or InputChar = CtrlC)
Send,^{END}
？？は 三と書いてあるキーです
FnキーはOSやソフトウェアを介さないハードウェアキーなので無理
「三と書いてあるキー」と言うのは恐らくAppsKeyのことなんだろうけど、それなら
AppsKey & ○:: でそれぞれの機能を割り当てれば疑似的にFnキーの様に使うことは可能
一つずつ割り当て行う必要あるから少し面倒だけどね
例）
AppsKey & Left:: Send, {Home}
AppsKeyのことじゃなかったら知らん
ありがとうございます。
三はAppsKeyというのですね。
何もしらなくてすいません。
Fnキー無理なのですね、ファンクションキーがFn＋数字キーなので片手で押せないので指の届く近くのキーに割り当てようと思いました。
でも全然わからなかったので質問してみました。
親切にありがとうございます。
だからFnキー自体は割り当てられないけどAppsKeyをFnキーの様に使うことはできるっつーの
AppsKeyと数字の1キーを押したらF1を出力
AppsKeyと数字の2キーを押したらF2を出力
AppsKeyと数字の3キーを押したらF3を出力
以下略
これらを一通り割り当てればAppsKeyをFnの替わりに使える
例まで出してやってんだしこれで分からないなら質問する以前に基礎知識不足
wikiをよく読んでから出直して
vk1Dsc07B & MButton:: foo()
みたいのが片っ端から動かなくなって焦った
結局元に戻したぜ
余計なことすんな
AppsKey & 6:: Send, {F6}
AppsKey & 7:: Send, {F7}
AppsKey & 8:: Send, {F8}
AppsKey & 9:: Send, {F9}
できました。
これで日本語入力楽になります。
本当にありがとうございました。
助かったです。
もともとWinデフォのホットキーがあるキーに、
下のようなKeyWaitを使った複数タップ系のスクリプトが動かなくなった。
とりあえず「#2 Up::return」を上に置けば動いたけど何だろな？
#2::
Key := "2"
Timeout := 0.5
KeyWait,%Key%
KeyWait,%Key%,D T%Timeout%
if ErrorLevel = 1
{
スレタイ検索
return
}
;2タップ時
Googleで全文検索
return
GetKeyState, state, CapsLock, T で状態取得してelseで分岐させると動かない
でもトリガーがCapsLockキー単体なら問題無く動くんだよなぁ
同じコードなのにキーが違うと動かない理由ってなんだろう
;Shift+CapsLockに変えると動かない
;------CapsLock Auto OFF ------
vkF0sc03A::
GetKeyState, state, CapsLock, T
If state = U ;OFF
SetCapsLockState, ON
else
{
SetCapsLockState, OFF
}
Timer03:
If(A_TimeIdlePhysical>5000)
SetCapsLockState, OFF
Return
;Shift+CapsLockはこれじゃないと動かない
;------CapsLock Auto OFF ------
CapsLock::return
~Shift & vkF0sc03A::
Send, {CapsLock}
Timer03:
If(A_TimeIdlePhysical>5000)
SetCapsLockState, OFF
Return
下のコードだと何か気持ち悪い
それはそれとしてもLock系キーの動作は日本語OSではもともと不定でBIOS(UEFI)によって挙動バラバラだったし
たまたま動いてたのがバージョン変わったことで動かなくなったとしても別に不思議じゃないと思うが
ほとほと困ってます…
環境：windows7 32bit + Autohotkey 1.1.27.07
上記はvmware上で動作しています
この環境に，ipad + bluetooth keyboard + vmware horizone clientで，リモート接続しています
(つまり，クライアント側(ipad)の環境には，手が出せないということです)
で，windows7側で，キー入力をフックしたいのだが，Autohotkeyのkey historyで探ると，例えば…
VK=E7，SC=003D Type=U → 実際のキー入力は ”=”
VK=E7，SC=005B Type=U → 同 ”[”
VK=E7，SC=0040 Type=U → 同 ”@"
と表示されます
この情報から例えば，
sc003D::a
sc005B::b
sc0040::c
と，キーのリマップを定義しても，思い通りの動作にはなりません(scの後を3桁にしてもダメ)
また，
=::a
[::b
@::c
とやっても，思い通りの動作となりません
どうやら，autohotkey側で，VK=E7のキー入力をフック出来ていないような感じがします
このような(妙なキー入力)をフックする方法をご教授頂きたいのです
良い知恵や，サンプルコードなど，ありませんでしょうか？
=::a
[::b
@::c
で機能してるけど
単に権限で弾かれてるだけじゃね？
試してもらった環境で、autohotkeyのkey historyを確認してほしい。
該当する箇所のVK、SC、Typeの欄、 と違うのではないかと…。
@ → vkC0 sc01A
=なんてキーはないから知らん
[ は DB 01B
= はshift-なので、- は BD 00C
本来は、それが正しいんだと思う。
のキー入力は、特殊な環境で発生するみたいで…。
何とかフックして、正しい状態に変換したいというのが、やりたいことなんです。
autohotkeyの他、keymillを使っても確認したが、やはり、仮想キーコードとスキャンコードは、 と同じでした。
手詰まりなのかなぁ。
現時点ではサンプルコードで動作確認している程度なので，必要かどうかは疑問
----- -----
#InstallKeybdHook
sc003D::a ; sc03Dも試した
sc005B::b ; sc05Bも試した
sc0040::c ; sc040も試した
----- -----
scriptとしては，上記しか記載していないです
#UseHookの記載があったとしても，効果ないですよね？
$は関係なさそうだし…
$ や #UseHookは
実際にキーが押された信号を拾う（ドライバレベルのキー変更は変更後を拾う）
ないときはソフトで発行されたキーも拾う
----- -----
#InstallKeybdHook
#UseHook On
sc003D::a ; sc03Dも試した
sc005B::b ; sc05Bも試した
sc0040::c ; sc040も試した
----- -----
とやっても，ダメポ
思った通りの動きをしてくれない
----- -----
#InstallKeybdHook
#UseHook On
=::a ; sc03Dも試した
[::b ; sc05Bも試した
@::c ; sc040も試した
----- -----
もダメ
ヤレヤレ…
今判ったのだが，SCの4桁って，Unicodeだわ
U+003Dは"="，U+005Bは"["，U+0040は"@"
autohotkeyでUnicodeの入力をフックすることは，さすがに出来ないんだろうな
悩ましい…
変更点多数
以前は、次の関数呼び出しまたはtry-block / threadの終わりまで例外を延期する（誤った）影響がありました。
アクティブなウィンドウが変化するのではなく、フォーカスが変化したときにホットストリング認識機能をリセットしました。
メニュー0＆をウィンドウのシステムメニューとして扱うようにWinMenuSelectItemを変更しました。
#Includeに渡されたパス内のすべてのビルトイン変数のサポートが追加されました。
A_TimeIdleKeyboardとA_TimeIdleMouseを追加しました。
A_ListLinesを追加しました。
A_ComSpec（ComSpecのエイリアス）を追加しました。
A_LoopFilePath（別名A_LoopFileFullPathのエイリアス）を追加しました。
自動置換の代わりに同じ行のアクションを実行するhotstring Xオプションを追加しました。
Hotstring（）を追加しました。
機能ホットストリングを追加。
StrSplitにMaxPartsパラメータを追加しました。
#MenuMaskKeyを改善して、VKとSC、またはvk00sc000を指定できるようにしました。
vkxxは動くとこと動かないとこがある
scxxxは安定ぽい
v1.1.24.01のHotkeyコマンド関連の仕様変更にいまだに修正対応できずに足踏みしてる
同じく
修正マンドクセ
結局、vk**sc***表記を復活させたということかな
その方がいいんだけど、1.1.27～の時の苦労は何だったのかｗ
週末にでも更新しようかね
レスポンスが悪くなった？
ALTキーの空押しでIMEの制御してたけど
ALT upがワンテンポ遅くなった
IME自体の表示は即オンオフの反映されるんだけど
文字を打ち込もうとするとALTが押された状態みたいでエラー音がティンティン鳴る
2秒位待たないと文字が打てなくなってしまった
何故かエディタのみで起こってブラウザでは問題無い
後、トグル系が急に効かなくなったり効いたり
トライアンドエラーで対策できず、結局バージョン戻したわ
何故か反応するようになってしまってる
ブラウザの方はアクセラレーター切ってってて
使ってるエディタにメニューバーが無いので気づかなかったわ
空押しでアクセラレーターキーが効かないのを効くように修正したってことかな
もう一度バージョン上げてみたみたはいいけど、やっぱ駄目かも
┌────┐
│存在判定│
└────┘
WinExist→WinActive…アクティブ判定
■関数
WinExist_1("WinTitle") ;前方一致検索
WinExist_2("WinTitle") ;部分一致検索
WinExist_3("WinTitle") ;完全一致検索
WinExist_R("WinTitle") ;正規表現検索
■使用例
if WinExist_n("WinTitle") ;ウィンドウがあれば
if !WinExist_n("WinTitle") ;ウィンドウがなければ
*/
WinExist_1(WinTitle) {
SavedTitleMatchMode := A_TitleMatchMode
SetTitleMatchMode,1
ErrorLevel := WinExist(WinTitle)
SetTitleMatchMode,%SavedTitleMatchMode%
return ErrorLevel
}
WinExist_2(WinTitle) {
SavedTitleMatchMode := A_TitleMatchMode
SetTitleMatchMode,2
ErrorLevel := WinExist(WinTitle)
SetTitleMatchMode,%SavedTitleMatchMode%
return ErrorLevel
}
SavedTitleMatchMode := A_TitleMatchMode
SetTitleMatchMode,3
ErrorLevel := WinExist(WinTitle)
SetTitleMatchMode,%SavedTitleMatchMode%
return ErrorLevel
}
WinExist_R(WinTitle) {
SavedTitleMatchMode := A_TitleMatchMode
SetTitleMatchMode,RegEx
ErrorLevel := WinExist(WinTitle)
SetTitleMatchMode,%SavedTitleMatchMode%
return ErrorLevel
}
関数などの別スレッドの各種設定は終了すると
規定値（AutoExecuteセクションの設定）に戻るので戻す必要はないよ
> SavedTitleMatchMode := A_TitleMatchMode
> SetTitleMatchMode,%SavedTitleMatchMode%
大量の関数ではなく引数を使おう
MsgBox % isWindow(, 2, "電卓")
return
isWindow(Active=0, MatchMode=1, WinTitle="A", WinText="", ExcludeTitle="", ExcludeText="") {
SetTitleMatchMode %MatchMode%
return (Active ? WinActive(WinTitle, WinText, ExcludeTitle, ExcludeText)
: WinExist(WinTitle, WinText, ExcludeTitle, ExcludeText))
}
え？まじだ
すいません間違えました
すいません訂正します
同じスレッドでした
> 関数などの別スレッドの各種設定は終了すると
> 規定値（AutoExecuteセクションの設定）に戻るので戻す必要はないよ
MsgBox % isWindow(, 2, "電卓") "`nA_TitleMatchMode: " A_TitleMatchMode
return
isWindow(Active=0, MatchMode=1, WinTitle="A", WinText="", ExcludeTitle="", ExcludeText="") {
Save := A_TitleMatchMode
SetTitleMatchMode %MatchMode%
e := (Active ? WinActive(WinTitle, WinText, ExcludeTitle, ExcludeText)
: WinExist(WinTitle, WinText, ExcludeTitle, ExcludeText))
SetTitleMatchMode %Save%
return e
}
別解ありがとうございます。知識になります。
ttps://i.imgur.com/DmXSDJk.png上の画像のように、ゲーム内で検索した装備品で、
検索にヒットし黄色の枠でハイライトされているものを鞄にCtrl+LClickで移動させるマクロを作りたいと思っていまして
黄色の枠のみをペイントで抽出し、bmpで保存（下のコードのtest.bmpです）し
ahkのImageserchに使えばいけるのでは？と考えたわけですが
error level１が返ってきます。
同じように加工したjpg、枠以外を透過させたpngでも試しましたが同じくerorrlevel1でした
なにがまずいのでしょうか。。。
ttps://i.imgur.com/DDTMyo5.png（抽出画像） F8::some()
some(){
BlockInput On
ImageSearch, foundX, foundY, 0, 0, 1920, 1080, *TransFFFFFF C:\Users\User01\Desktop\test.bmp
If ErrorLevel = 2
MsgBox Could not conduct the search.
Else If ErrorLevel = 1
MsgBox Icon could not be found on the screen.
if ErrorLevel = 0
{
SendInput, {
MouseMove, %foundX%, %foundY%
Send {Ctrl down}
Click, %foundX%, %foundY%, Left, 1
Send {Ctrl up}}
BlockInput Off
}
}
画像を見た感じ、境界の部分が明示的透過というより背景と混ざっているように見える
多分アンチエリアスとかのせい
よって、*Nオプションである程度認識する色に幅を持たせるか
抽出画像の方を明確に色の濃い部分だけを残して真っ白にして透過指定する
とかを試してみてはどうだろう？
ありがとうございます
誤差検索*90をオプションに追記しましたところ、
ハイライトされたもののうち2つには反応しましたが
その二つを取り除いてみるとerror2でした
たしかにwindowsプリセットの画像ビューワで見たとき滲んだように見えますね
しかしペイントで抽出した際は滲んでいるようには見えず、この枠の太さ（ほかに表現方法がわかりません笑）が1ドットになるようにしたのですがこれが限界ではないということでしょうか(;´Д｀)
枠の形変わりそうだし画像で探すなら
最小限の3ドット以上の角（┏）でいいのでは？
PixelSearch*3回でもおｋ
そういうのは何か他のツールに処理投げた方がマシ
日本人っぽいニッチな工夫というか何というか
これ対象画像側の枠サイズ一定じゃないね
まじすか
それはどうやってわかりました？
管理者権限のアプリも操作するためにAHK自身を管理者で実行すると、
今度はRUNで何か走らせる際にそれらも全部管理者権限になってしまう。
対策としては、
・タスクスケジューラを噛ませる
・Win+R 窓を開いてそこでコマンドを実行する
ほかにもっと簡単な方法はないでしょうか？
画像編集ソフトで半透明レイヤー重ね合わせてみたら縦横ズレることろあるね
ttps://i.imgur.com/CzwkKZ1.png 775良く気付いたなｗ
俺はこうやってる
Run, Explorer "標準権限で起動したいアプリ.exe"
のをやろうとしたんですがMbuttonが効かないんです
スクロールは割り当てできます
おま環ですかね？
run, explorer "notepad.exe"
とかやってみたけど、マイドキュメントフォルダーが開くだけだったよ
run, explorer "C:\Windows\System32\notepad.exe"
パス付けたら動いた
どうもありがとう！！
ちゃんとパス指定しないとアカン
パス指定は絶対パスでも相対パスでも可能
ただし起動したいexeと同一フォルダにahkファイル置くならパス指定不要
いろいろ試したけど、
ターゲットアプリに引数を渡すことは出来ないみたいだね
例）
explorer "C:\Program Files\internet explorer\iexplore.exe"
ttp://ntt.setup explorer.exe の仕様なんだろうか
ttps://github.com/Lexikos/AutoHotkey-Release/blob/master/installer/source/Lib/ShellRun.ahk これ使えばできた
sc03Aでやっと出来た
OFFにするだけのコードに手こずってしまった
何を当ててもOFFから当てたキーと同時にONになってしまうのね～
GetKeyState, state,でイケたけどSetCapsLockState, OFFでONにしないというのは感覚的にキモいな
元々OFFの状態だからか何かもぞもぞする
;USキーボードCapsLock制御
#InstallKeybdHook
SetTimer, Timer01, 1000
SetStoreCapslockMode, off
;------------------------------------
~LShift & sc03A:: ;左Shift+CapsLockでCapsLockのON OFF
Send, {CapsLock}
Timer01:
If(A_TimeIdlePhysical>5000) ;5秒間何も押されなかったら
SetCapsLockState, OFF ;自動でOFFにする
Return
sc03A:: ;CapsLockがONの時にOFFにするだけ（ONにしない）
GetKeyState, state, CapsLock, T
If state = D ;ONだったら
SetCapsLockState, OFF ;OFFにする
GetKeyState, state, CapsLock, P
If state = U ;物理的にCapsLockキーが押し下げされてなければ
SetCapsLockState, OFF ;OFFにする(ONにしない）
Return
│マッチ判定(通常検索)│
└──────────┘
■関数
□大文字/小文字の区別なし
InStr_1(var, "検索文字列") ;前方一致検索
InStr_2(var, "検索文字列") ;部分一致検索
InStr_3(var, "検索文字列") ;完全一致検索
□大文字/小文字の区別あり
InStr_1(var, "検索文字列", "true") ;前方一致検索(大文字/小文字の区別)
InStr_2(var, "検索文字列", "true") ;部分一致検索(大文字/小文字の区別)
InStr_3(var, "検索文字列", "true") ;完全一致検索(大文字/小文字の区別)
■返値
真…マッチ位置
偽…0
■使用例
if InStr_n(var, "検索文字列") ;マッチすれば
if !InStr_n(var, "検索文字列") ;マッチしなければ
if InStr_n(var, "検索文字列") = n ;検索文字列がn文字目にマッチすれば
SavedTMM := A_TitleMatchMode
SetTitleMatchMode, 1
FoundPos := InStr(Haystack, Needle, %CaseSensitive%)
SetTitleMatchMode, %SavedTMM%
return FoundPos
}
InStr_2(Haystack, Needle, CaseSensitive="") {
SavedTMM := A_TitleMatchMode
SetTitleMatchMode, 2
FoundPos := InStr(Haystack, Needle, %CaseSensitive%)
SetTitleMatchMode, %SavedTMM%
return FoundPos
}
SavedTMM := A_TitleMatchMode
SetTitleMatchMode, 3
FoundPos := InStr(Haystack, Needle, %CaseSensitive%)
SetTitleMatchMode, %SavedTMM%
return FoundPos
}
の
ttp://pastebin.com/を使ったらどう？ 次から使わせていただきます。
InStr に SetTitleMatchMode を設定しても何の効果も無いよ
ご指摘ありがとうございます。
InStr()関数はIfInString文同様部分一致検索のみで意味ないことしてました。m(_ _)m
後方一致検索…RegExMatch(var, "検索文字列$")
完全一致検索…RegExMatch(var, "^検索文字列$")
部分一致検索…InStr(var, "検索文字列")
部分一致検索…IfInString, var, 検索文字列
うざい
…って書こうとしたら_nで分けること自体に意味がないのかこれw
2ちゃんあるあるを利用したのかもしれない
ペーストできない欄にID、パスワード等を書き込むのに便利
こんなの10年前にやるべきだったな…
^+v:: send,%clipboard%
コピペでパスワード入力するってことは、パソコン内にパスワードのテキストを置いているんでしょ。
Send,LoginID{Tab}PassWord{Enter}
で良いんじゃないの？
エディタ等では使えるんですがExplorer上でファイル名の編集で使えないです
クリップボードの文字に括弧を付けて一旦格納することは可能でしょうか？
タイムスタンプは^vで貼り付け出来ているのでこれも出来ないかなと思いまして
どなたか知恵をお貸しくださいおねしゃす
;選択したテキストを括弧で囲む
Menu, 01, Add, 【 】で囲む, Command1 ;メニュー
;━━━━━━
Command1:
clipboard =
Send ^c
ClipWait
Send 【%clipboard%】
clipboard =
Return
;━━━━━━
~Alt & [:: ;Alt+ [ でメニューの表示
IME_SET(0)
Menu, 01, Show
return
こっちはどこでも使える
;━━━━━━
~F13 & Tab::
FormatTime, TimeString,,yyyy_MMdd_HHmm
Clipboard = %TimeString%
Send, ^v
clipboard =
return
Command1:
clipboard =
Send ^c
ClipWait
clipboard = 【%clipboard%】
Send ^v
clipboard =
Return
最後の Send と clipboard = の間に、
Sleep,100
を入れて実験してみて。
メニュー表示した段階でファイル名編集状態が外れてるんじゃないの？
フォーカス外れた段階でファイル名のEditBoxがなくなるから別窓やメニュー表示は無理
LiNameみたいなリネームソフトでいったんエディタに飛ばして変換するのが無難かと
結果的にExplorer上ではメニュー出さずに直で行うようにしました
F14::
clipboard =
Send ^c
ClipWait
Send 【%clipboard%】
clipboard =
Return
あとはキーをちょっと工夫してみます。
トグルして括弧の種類を変えていければいいんだけど...
clipboard= ; クリップボードの内容をクリア
send, ^c
clipwait,1000 ; クリップボードの内容がからの間は待つ
if ErrorLevel <> 0 ; タイムアウト時のエラー処理もちゃんとする
{
return
}
msgbox, clipboard changed: [%clipboard%]
return
RegExMatch("こんにちは。", "(.)+", $)
MsgBox, %$1% ;「こ」じゃなくて「。」が入るんだね
RegExMatch(str, "^(.)+", $)
でも同じ結果だた
2バイト文字だからこうかなと思たら
RegExMatch(str, "^(..)+", $)
$1に「は。」が入る
もうわけわかんねー
(.) 1文字キャプチャ
+ 繰り返し
→$1が都度上書きされて最終的に「。」
ﾄﾝ
>$1が都度上書きされて最終的に「。」
勉強になりました
入力履歴、若しくはhotstring recognizerのリセットってできますか？
ホットストリング使ってるんですが、動作して欲しく無い場合があり、その場合途中でリセットしたいんです。
（物理）カーソルキーとかを挟むとリセットできるんですが、
ＡＨＫから（例えば無変換＋で発生させたカーソルキー）だとリセットされないんですよね……
とりあえず、
問題のキー入力から最速で!"#$みたいな、絶対に使われない文字列をsendで出力して
ソレをホットストリングの確定文字無しで認識させて、その時Ｚオプションを使う
でイイですかね？
ttps://autohotkey.com/docs/commands/Hotstring.htm コマンドのHotstringやＺＴオプションとか、色々増えてるんですね。
いつも日本語のwikiの方を見てました。
＃IFを使って、
ＩＭＥオンオフでホットストリングの挙動を分けていたんですが、
ＩＭＥオンの時も、
ＩＭＥオフキーを押す操作（変換中 文字をかなからローマ字小・大にする）があるので、反応してしまい困ってました。
しかし、よく考えたら、
その操作の後は（ＡＨＫ側の変数では）ＩＭＥオフになっているので打鍵に反応してしまいますね。
結局そのキーを２つに分けるしかないみたいです。
お騒がせしました。
SwitchingGems(){
BlockInput On
Send I
Click, RIGHT, , 1690, 372
Click, LEFT, , 1615, 250
Click, RIGHT, , 1690, 372
Send I
BlockInput Off
return
}
上記のように指定箇所を計三回クリックするマクロを作りたいのですが
Clickの三回目だけが動作していないようでクリックされません
左クリックと右クリックの間にsleepやdelayなどを挟んでみましたが解決しませんでした。
どうすればいいのでしょうか。。。
マクロ対策されてるかもしれないから
sleepをすごい多めにとってみるとか
○ 三回目だけ残して動くなら
ミスかどうか判断できないので
sleepやdelayなどを挟んで解決しなかったものを書いてほしい
Click, RIGHT, , 1690, 372
}
闇雲に連打してみる
WinMoveやWinMaximaize等が効きません。
Winsetも効きません。
これらを効くようにすることは出来ませんか？
出来るのですか
その場合はahkスクリプトも管理者権限で実行する必要ある
あくまでも一般論
①指定キーを押すと画像認識マクロが有効になる
②有効となっている間、画面上にお目当ての画像が出てきた場合にInput
③指定キーをもう一度押すとマクロ自体をsuspend
マクロが有効となっている間、常時画像認識マクロが目を光らせるようにするには
どんなコマンドを使えばいいのでしょうか？
今のところ自分でできてるのは
suspendをトグルさせること（①と③）と
1回キー押したときに1回だけ画像認識を正確に行わせることまでです。。
あとは指定キーでSetTimerをON/OFF
あと質問するなら自分が書いたスクリプト張った方がいい
もちろん管理者権限でやってみましたよ。でもダメでした
参考になるかどうか分からないけど、俺のウィンドウの移動やサイズ変更のスクリプトだと、
移動は、ハンドラを使ったWinMove と コントロールを使ったControlMove
の2通りを使っていて、サイズ変更も同じような感じ。
たしか、MDIウィンドウに対応するためだった。
ハンドラを使うということはDllを使うとかってことですか？
本来のWinMoveはハンドラは扱えないと思ったけど
マウス位置のウィンドウを移動するのに
MouseGetPos,,,mh,ct,3
WinMove,ahk_id ,%mh%,,x,y
こんな感じの書き方をしてた。
ControlMove,,x,y,,,ahk_id %ct%
だったら先に言えよな
偉そうに「もちろんやった」とか後出しで言われても知ったこっちゃねえし
動作自体はして、111と押すと123と出力されるのですが、2回目移行は、
1111と入れないと、123と出力がされません。
何か他に設定する必要があるのでしょうか？
1::
ComboF += 1
If ComboF = 1
{
send, 1
return
}
If ComboF = 2
{
send, 2
return
}
If ComboF = 3
{
send, 3
return
}
ComboF = 0
return
1回押すごとにComboFが今いくつで、どこのifに入って、どこでreturnしているのかをちゃんと追っていけばわかる
ComboF = 0
が4回目になってるからだろう
3回で繰り返したいならSend, 3の後に入れれば良い
ありがとう。
うまく動きました！
xbutton1::send,{Ralt}
return
と書いても動きませんでした
AutoHotkeyの履歴ではRaltが送られているのですがソフト側が認識しないみたいです
試しにメモ帳などでも試したらキーボードでAｌtを打つとメニュー欄にフォーカスが移動しますが
AutoHotkeyからAltを送っても何も反応しません
修飾キーを単独で押した事にするには何か別な書き方があるのですか?
Send,!^{Del}
って機能しない？
Send自体は機能してるので入力検出ソフトなどではCtrl Alt Delを検出してる
ただしOSは受け取らないっぽい
ありがとうございます。
できないことが、はっきりわかると
もう試行錯誤しなくてすむので。
trayメッセージ？の表示存在の有無や内容テキストを得る方法はあるんでしょうか
使っているbluetooth機器が自動電源オフになり、その都度trayに出てくるバルーンを数回クリックして再接続するのが手間なので、これを自動化できたらいいなと思っております
一応動いてるんですが書き方はこんな感じでいいんでしょうか？
;a+CapsLock+SpaceでShift+a
a::
#if GetKeyState("sc03A", "Space")
Send, +a
return
押しっぱなしになってaキー単独で使えないっす
a & space::
if [CapsLockの押し下げ状態] なら[処理]
ではどうです。Capsの押し下げは取得が面倒だったような気もするけど
あっ そうか
そりゃそうっすよね
しかし、2キーをトリガーで3つ目をifってみたけど駄目ですな～
う～ん
ちょっと分岐してごにょごにょしてみます
~a & sc03A:: ;a+CapsLock
GetKeyState, state, Space, P ;Spaceの状態
If state = D ;押されてたら
Send, +a ;Shift+aを送る
else ;そうでない場合
GetKeyState, state, Space, P ;Spaceの状態
If state = U ;押されてなかったら
Send, a ;aを送る
return
ありがとうございました！
CapsLock+aが使えなくなった
分岐の必要が無かった
~a & sc03A::
GetKeyState, state, Space, P
If state = D
Send, +a
return
しかし、CapsLock+aに行くには一度キーを離さないと駄目だぬ
a::
GetKeyState, state, Space, P
If state = U
Send, a
else
GetKeyState, state, Space, P
If state = D
Send, +a
Return
これならCapsLockに指乗せたままで2つのコマンドを行き来できて
単独でaキーも押せる
まぁ実際CapsLock押して無くていいんだけど
操作の流れで感覚的にCapsLockをコマンドキーにしたかったので
まぁいいか
このはい、いいえ、キャンセルという名前を変えることは出来ませんか。
これらを表示してからあとからの変更でも構いません
ただし普通にMsgBoxの次の行に書いてもダメだからなんらかの別スレッドで
無理にmsgbox使うよりGUIでカスタムダイアログ作るほうが良さげ
winAPIのMessageBox関数を呼び出してるだけだし
AHKに限らず どの言語でもMsgBoxつったらこういう仕様なんだけど
コマンドプロンプトにcontrolsendでファイル名やコマンドを送ると
２文字目が大文字になって（元の文字列の大文字にした文字の次の文字が大文字になります）
しまいます。どうしたらなおせますか？
おかしいと思いはじめ調べたところオートリーロードのコードが効かなくなっていた Orz
原因を調べようとエディタを変えてみたが変わらずリロードできない
別のahkファイルをオートリーロードすると効く
で、問題のファイルに戻りトライアンドエラー
ファイル名変更も駄目
ファイル作り直しても駄目
簡単なコードだけ残して試しても駄目
バックアップしておいた物を丸ごと上書きしても駄目
何故このファイルのみオートリーロードのコードが効かなくなってしまったか原因がわからない
ファイル名以外のとこを別のファイルへ移植して動くので
コード自体に問題は無いはず
ファイル名自体も間違っていない
Auto execute Section内は特に何も変更していない
タスクトレイのアイコンは反応ある
キーは送信されている
PCの再起動はした
セキュリティソフトで除外もした
#IfWinActive, ahk_class TextEditorWindowW166 ;サクラエディタ
~^s::
ScriptName :=Remap
If WinActive, %ScriptName%
{
Reload
}
Return
#IfWinActive
お手上げです
何だよもぅ
はじめにトライすればよかった
時間を無駄にしたわ Orz
何が原因だったんだろう…
autohotkeyでpc作業の効率化・自動化、正規表現を用いたファイル操作等を行うスクリプトは趣味でやったことありますはアピールになるかな？
と言い換えておけ。
大抵の人にはAHKなにそれって言われるだろうけど業務に役に立つものとわかれば多少のプラスにはなるんじゃないか
せいぜいクリックしたりのルーチンワークをやらせるくらいだろ
そんなもの特技にもアピールにもなら無いと思うよ
まだExcel使いこなせます、の方が100倍通る
スキルとしては役に立つとは見なされないだろうけど
しかし今はアラサーからでも始められるんだねえ
うちなんかの頃はプログラマー35才定年説とか冗談でいいながら
結局30才の時に辞めちゃったけど
業務にめっちゃ役立つだろ。 どんだけ効率化できることか
ただ世間では知らない人の方が圧倒的に多いから
何それって言われるだけ
あの人に頼むと仕事速いって評価は得られる
履歴書段階ではよくわからん余計な事が書いてあるみたいな顔されるけどね
プログラマーの仕事は職場環境の改善や効率化ではないのでアピールとしては微妙かな
SEなら顧客先への提案にAHKでの効率化もねじ込めるかも知れないが
.ahkにドラッグアンドドロップされたファイルを違うアプリにわたす場合、
どうやって変数を書いたらいいのでしょうか？(ドラッグアンドドロップされるファイル)
.ahkにドラッグアンドドロップされたmp3ファイルをmp3directcut.exeに渡したい(D&D)です。
スクリプトのコマンドライン引数
ttp://ahkwiki.net/Scripts でも配列が分かるなら、というか分かるようになってでもa_argsを使うほうがいい
ttps://www.autohotkey.com/docs/Variables.htm#Args #NoTrayIcon
Run, mp3directcut.exe %1%
OpenCVベースのライブラリを作成中なのですが。
ImageSearch
AHKはスクリプトであり簡易的なプログラム
本格的なプログラミング言語に比べ、用途を限定することで、覚えやすいように簡単な構造になっている
スクリプトの中でもAHKは特に簡単な方なんじゃないかな多分
用途も限られ、誰でも覚えられ、用意されたコマンドも少ない
でも高度な事しようと思ったらwin apiの知識が必要だったり
他からライブラリ持ってきたり
リファレンスが英語しかなかったり
汎用性はあまりないよ
AHKの言語はかなり特殊で癖が強すぎて出来は良くないよ
perlの方が圧倒的に言語としての出来はいい
スプリクト言語として簡単な方だとは正直言い難い
増改築繰り返してて色んな言語の方言ぶち込まれてるから纏まりないしね
出来がいいとか悪いとかそんな話は誰もしてないから
プログラミング言語は以下の総称、AHKはスクリプト言語に属している
スクリプト言語 - プログラミング言語のうち、プログラムの記述や実行を比較的簡易に行うことができる言語の総称
JavaScript、Perl、Python、PHP、Rubyなど
コンパイラ言語 - 人間が書いたプログラムをコンピュータが理解できる形式に変換するプログラム言語
C言語やC++、Javaなど、上記と比較してパフォーマンスに優れている
スクリプト言語とインタープリタの違いは？
コンパイルせんけどあれもれっきとしたプログラミング言語ですよ
日本のユーザーほとんどいないのかしら
ttps://headlines.yahoo.co.jp/hl?a=20180317-00000007-it_nlab-sci 本来の用途を知ってもやっぱりahkで覆すのが一番だな
BreakもVBAの暴走止めるのに使うしScrollLockだけは要らんけど
あの辺をahkで覆すことってないなあ
そもそもホームポジションから遠いから便利キーとして活用しづらいというのもあるが
無変換キー使わないから他に置き換えるって記事も出てくるけど、個人的にはしょっちゅう使ってるんだよなぁ。ショートカットの関係とかもあるし、キーの置き換え考えるのってけっこう難しい。
^Insert::Send, {Insert}
Aキーを押した後、Xを押したらある処理Xをする
Aキーを押した後、Yを押したらある処理Yをする
Aキーを押した後、Zを押したらある処理Zをする
みたいなことをしたいのですが、簡単なスクリプトの書き方ってありますか？
キーによって最適の処理があるとおもうから、具体的に何のキーか書いた方が良いよ
処理
Return
ではいかんの？aキー殺したくないなら~a & x::で。
そぅいう書法があるのですか。これは初めて知りました。ちょっと調べてきますね
やってみました。 なるほど。これでもよさそうです。 ありがとうございました
んでしょうか？
無変換＋Jに左矢印を割り当てるくらいできればいいのですが。
StringGetPosで`nを見つけてみたいなことをしています。 それしか方法ないのかな
100万回ぶん回したらRegExMatchのほうが1.8倍早かった
Text =
(
111
222
333
444
)
RegExMatch(Text, "`n)(?:.*\n*){2}", Var1)
MsgBox % Var1
Loop, Parse, Text, `n
Var2 .= A_LoopField "`n"
Until A_Index = 2
MsgBox % Var2
return
StringGetPos, n, text, `n, L10
StringLeft, text,text, n
としました。
Loop, ParseかRegExReplaceってのは気づきませんでした
いくつか方法ありますね。 gnuとかやってたのでもうちょっと関数ほしいかな
例えば↓だと記号が入っている行では0が帰ってきてしまうので、これを正しくマッチさせたいです
str =
(
abcdefg
abcd*e\fg
hijklmn
hijk*"l\mn
)
Loop,parse,str, `n
{
a := RegExMatch(str, A_LoopField)
MsgBox % a
}
できましたありがとうございます
A:="U|D|L|R"
x:="X|3|m|x"
Ax:="(" . A . "|" . x . ")"
}
k := new k
Shift & Ctrl::msgbox,% k.Ax
このk.Axが(U|D|L|R|X|3|m|x)で欲しいのですが
(|)が還ってきます
Classの中では、変数の再定義などもエラーになるので振る舞いが違うようですが、
Class中で自身の変数を使うにはどうしたらいいのでしょうか
UWSCのchkimgXのような高機能な画像認識機能はこちらにはありますか？
ピクセルの色を調べる機能はあるぞ
必要なら私が作成したchkimgXのようなのを公開しますが。
配列とかが難しいですね＞＜
chkimgX(テンプレートマッチング)
それぞれ互換性を持った関数をDLLとして提供しています。
ahkでUWSCとほぼ同じ画像認識操作が可能です。
ttps://www.axfc.net/u/3901288 また細かいバグフィックスだろうけど
現時点でチェンジログは出ていない
ttps://github.com/Lexikos/AutoHotkey_L/releases チェンジログはGitHubのが早い
thx
Fixed Control ChooseString and ControlGet FindString ignoring the first two items.
Fixed Control ChooseString to send WM_COMMAND even if the control's ID is 0.
Fixed WinActivate to restore the active window, as originally intended for [v1.1.20.00].
最後のやつ、なんかおかしいと思ってたんだよ
やっぱバグだったのか
ifの条件が無視されて画面のどこでも動作してしまいます
どのように書けば良いのでしょうか？
Xbutton1 ::
CoordMode,Mouse,Screen
MouseGetPos,xpos,ypos
if (100<xpos<200 && 100<ypos<200 )
{
send,a
}
return
って書き方を認めていない言語も多かったような
その通りでした
if (100<xpos && xpos<200 && 100<ypos && ypos<200 )
としたら動きました、ありがとうございます
上海問屋、6つのボタンに任意キーを割り当てできるUSB有線リモコン - ITmedia PC USER
ttp://jump.5ch.net/?http://www.itmedia.co.jp/pcuser/articles/1804/11/news093.html">ttp://www.itmedia.co.jp/pcuser/articles/1804/11/news093.html ： [sage] 2018/04/12(木) 14:46:13.63:kOEYD5Ut0
ま、要らんけど
ttps://ux.getuploader.com/autohotkeyl/download/130 Autohotkeyでゲームパッドを弄り倒す叩き台作ってみたよ
サンプルはトーチライト2 👀
Rock54: Caution(BBR-MD5:669e095291445c5e5f700f06dfd84fd2)
なので、win7時代から使っていたWheelAccel.ahkが不要になったよ
(むしろ、スタートメニューなど一部の窓でスクロール出来なくて困っていたし、加速機能使わなかったから不便無い)
例えばbinary.datと言うファイルがあります
このファイルの中身は”FF FF FF FF”とします
これを先頭が”FF”だった場合に”00 FF FF FF”と書き換えたいのです。
どこかに良いサンプルコードありませんでしょうか？
どうすれば良いですか？
FileGetSize, size, binary.dat
FileRead, data, binary.dat
file := FileOpen("binary.dat", "w")
file.RawWrite(data, size)
Jtkのまがいもの更新しました。
ttps://ux.getuploader.com/autohotkeyl/download/131 思いつくのは入れて満足したのでしばらくこのままだと思います。
なにか要望あれば考えます 👀
Rock54: Caution(BBR-MD5:669e095291445c5e5f700f06dfd84fd2)
バグ報告いいかな？
無線パットだと起動した直後にLRがキーログに出てくる
実際押されてる模様。初期化の速さに通信が追いついてないっぽい
あと要望はLTトリガーにフルプル対応してほしい。それさえクリアしたらSteamのキーアサインの呪縛から抜けられそう
コントロール名の取得方法が分からず、座標で操作しています。
しかし、画面サイズが異なると座標がずれてしまうため、コントロール名で操作したいです。
コントロール名を取得する良い方法はありませんか。
Au3Info_x64を使ったりもしているのですが、テキストボックスやボタンの名前の取得もできません。
よろしくお願いします。
jtkモドキ微更新。何度もすみません
バグ取ってフルプル分岐作りました。
フルプルとソフトプルの分岐設定も書いているので参考に
ttps://ux.getuploader.com/autohotkeyl/download/132 👀Rock54: Caution(BBR-MD5:669e095291445c5e5f700f06dfd84fd2)
十字キー関数にミスが有りました。再アップしたのでのAutohotkey専用うpろだ からどうぞ。目玉でまくってるし
ありがとうございます
mousegetpos試してみました
そこで取得したテキストボックスらしきClassNNにsendしてみたけど入力されないので、
ClassNNがあってるかどうかも分からない状態です
dllはまだよく分かっておらず、試せていません
もう少し試行してみます
capslockのキーコードをsendすれば？と思いましたが必ずロック入にだけなってしまいオフにできません
SetCapsLockState
946です、出来ました感謝m(_ _)m
画面上のボタンにマウスカーソルが乗っているかどうかを1か0で返す関数も作りました
今回は主に画像で分岐する処理を追加したものになります
ttps://ux.getuploader.com/autohotkeyl/download/137 👀Rock54: Caution(BBR-MD5:669e095291445c5e5f700f06dfd84fd2)
これjtk超えたわ
今の所目立つ不具合もないので開発はこれで終わりです。お騒がせしました
進捗知らせるリンクとかないの？
割とすごく便利に使ってるからこれで開発終了も勿体無い
これからなんか機能付け足すとかあるかも知れんからお願いします
文字通りのウェブログみたいなのでかまわないから。
たまにうpろだを覗いたらアップされてるくらいでも嬉しいから
よかったら続けてくれ
動いたのですが、他のウィンドウに切り替えても
動いたままです。アクティブ時以外は停止させる
ことはできないのでしょうか。
#IfWinActive ahk_class XLMAIN
^!down::
Interval :=2
Loop, 20
{
Send {enter}
Sleep, 1000*Interval
}
#IfWinActive
アクティブ外れたからって実行中のスレッドを強制的に止めるような怖い機能はついてない
止めたいなら自分でloopの中でアクティブ切り替わったかどうか見てアボート処理入れないと
つうかhotkeyの中でsleep使うとキー連打したときにめんどくさくなるから
settimer使った方が安全だと思うけど
if(WinActive("ahk_class XLMAIN")){
で実行させるかなぁ
参考にさせてもらいます
ttp://gamepadtokeybordframework.blogspot.jp/2018/04/gamepadtokeybord.html 乙
XboxコントローラーでLRトリガー同時押しできるってだけでも相当助かってるので頑張って
やたら過度に称賛してる連中自演臭い
この程度の自作自慢ぐらいいちいち締め出すこともないだろうに
噛みつきたいだけのキチガイの言うことなんかほっとけよ
Windows10であることを取得したい場合なんか方法ある？
で10.0.16299と表示されたけど
スレ汚しすまん
AutoHotkeyU64.exe(UNICODE 64bit)が入ってるので自分の環境に合うやつを
AutoHotkey.exeにリネームなりコピーなりして使う
.ahkの関連付けされてないと不便だし
AキーをCapsLockとSpaceキーの押下状態での分岐ですが
Aキーを単押しの状態は最初のSend, aだけでいいのでしょうか
一応どちらでも動作するのですがもっとスマートに記述する場合どの様にするのがベストですか？
A::
GetKeyState, state, sc03A, P
If state = U
Send, a
Else
GetKeyState, state, sc03A, P
If state = D
Send, ^!+{A}
Else
GetKeyState, state, Space, P
If state = U
Send, a
Else
GetKeyState, state, Space, P
If state = D
Send, +{A}
Return
普通にコンビネーションキーじゃダメなのか？
嫌です
そもそもIfとElseの使い方も滅茶苦茶
もう少し基本のサンプルコード良く見て基本中の基本を自力で理解した方が良い
そのスクリプト実行すると「a」を一回押しただけで「aa」が入力されるしな
指摘されて気付いたけどaが2回押されてた
ソフト側でaキーでトグルされる設定がワンセットあったので気づかなかった
詳しくは割愛するが実際に動作に支障がない状態にあった
2つ目はとりあえず消すことで対処出来たけど
とりあえず、書き方がめちゃくちゃと言われたので
ひとまず単純に分岐を1つにして書き方を変えてみた
Ifで条件に一致したときに実行させて一致しない時にElseで分岐でいいのかな？
この場合だとわざわざIf state = U で押上状態を取得しなくていいの？
あと、ifは1行ならカッコで閉じなくていい？閉じるべき？
単一コマンドはElseの直後に絶対書くべき？
↓一応これで意図した動作はします
A::
GetKeyState, state, sc03A, P
If state = D
Send, ^!+{A}
Else Send, a
Return
俺は、
if(GetKeyState("sc03A","P")){
} else {
}
で書く方が好き。
(capsやスペース押下でどうしたいのか) そのものが他人にはわからんのだが
ほんとだよな
他人から見たらSpaceとaを押して「 A」（Aの前にSpaceが入る）になるのも本当に意図した通りなのか疑問だし
結局、Spaceキーはどうでも良かったわけね
ありがとうございます
参考にします
985はひとまずって言ってるでしょ
CapsLock押下+aキーは Send, ^!+{A}
Space押下＋aキーは Send, +{A}
aキーは aキー
で最初の質問での分岐はこうなった
これでaキーの単独押しをわざわざ条件から指定せず単純に分岐するだけでよくなった
A::
GetKeyState, state, sc03A, P
If state = D
{
Send, ^!+{A}
Return
}
GetKeyState, state, Space, P
If state = D
Send, +{A}
Else Send, a
Return
> Ifで条件に一致したときに実行させて一致しない時にElseで分岐でいいのかな？
OK
> この場合だとわざわざIf state = U で押上状態を取得しなくていいの？
押上を待ちたかったり、押上た時になにかしたいのでなければいらない
> あと、ifは1行ならカッコで閉じなくていい？閉じるべき？
> 単一コマンドはElseの直後に絶対書くべき？
究極的には趣味の問題だけど、初心者のうちはifやelseの後は必ず{}にしといたほうが無難
それとスマートさを求めるなら、If分岐を整理するのもそうだけど
が言ってるCapsLockやSpaceが入力されてるのをどうにかするのが先だと思う
どんなソフトで試してるのか知らないけど、余計なキー入力は誤動作の元だから
KeyWaitを使って横取りするか、コンビネーションキーを使うのが早い
コンビネーションキーが嫌なら、あえてその理由を解消する方向でスクリプトを考えてみるのが楽な場合もある
ただ、今の時点で期待通りに動いてるなら
下手にいじらないのもひとつの手
初心者の自覚があるならなおさら
Spaceとaを押したときにAの前にスペースが送られてるのも意図的にやってるのであれば
a::
GetKeyState, state, Space, P
If state = D
Send, +{A}
Else Send, a
Return
↑この6行と
~Space & a::Send, +a
の一行で動作は同じだろう
なぜコンビネーションキーではダメなのか知らんが
スマートに記述するならこっちの方がスマート
ありがとうございます
元々Photoshop等同系ソフトの共通コマンドを同じキーにするための
単なるリマップでしたが、複数のコードをひとまとめにしたかったのがきっかけですです
内容的には押しにくいキーを押しやすくしてるのものです
単純に押しやすいものでも操作の流れ上押しにくかったりするので。
ちなみに、左の小指をCapsLockに固定、親指をSpaceに固定が理想です
~Space & W::Send, +{W}
~Space & S::Send, +{S}
~Space & A::Send, +{A}
~Space & D::Send, +{D}
~sc03A & W::Send, +{W}
~sc03A & S::Send, +{S}
~sc03A & A::Send, +{A}
~sc03A & D::Send, +{D}
Spaceキーは以前単純にリマップしてたときより理想的な動作になってるのですが...
Spaceキー押しっぱなしで次に押したいSpace＋◯が動作出来るようになったので
CapsLockはUSキーボードですが、Shift+CapsLockでON、OFF + 単推しでのOFFにしています
ただし、Photoshop等ではCapsLock単体はsc03A::Returnで無効化しています
一応、CapsLockが送信されてることは確認していますが
意図せずオンオフになったりLEDがチラつくこともないです...
ただ、これが意図した動作だとしても書き方がおかしいようなら
もう少し考えます
タイマーでもOFFになるようにしておりました
たぶんすごく不自然なことやってるんだと思いますがこれで意図した状態のことが出来てます
SetStoreCapslockMode, off
SetTimer, Timer05, 1000
;------------------------
~LShift & sc03A::
Send, {CapsLock}
Timer05:
If(A_TimeIdlePhysical>5000)
SetCapsLockState, OFF
Return
sc03A::
GetKeyState, state, CapsLock, T
If state = D
SetCapsLockState, OFF
GetKeyState, state, CapsLock, P
If state = U
SetCapsLockState, OFF
Return
~sc03A & W::Send, ^!+{W}
~sc03A & S::Send, ^!+{S}
~sc03A & A::Send, ^!+{A}
~sc03A & D::Send, ^!+{D}
とりあえず、状態を取得してもその後Ifでon,off出来なかったのでこんな事になってます
CapsLockがトリガーなら大丈夫なのですが、~LShift & sc03Aをトリガーにすると何故か動作しないので
CapsLockを送って処理してる次第です。
新しいスレッドを立ててください。
life time: 222日 23時間 7分 3秒
運営にご協力お願いいたします。
───────────────────
《プレミアム会員の主な特典》
★ 5ちゃんねる専用ブラウザからの広告除去
★ 5ちゃんねるの過去ログを取得
★ 書き込み規制の緩和
───────────────────
会員登録には個人情報は一切必要ありません。
月300円から匿名でご購入いただけます。
▼ プレミアム会員登録はこちら ▼
ttps://premium.5ch.net/ ▼ 浪人ログインはこちら ▼
ttps://login.5ch.net/login.php 