AutoHotkey スレッド part6

■公式
http://www.autohotkey.com/

■解説
AutoHotkeyを流行らせるページ
http://lukewarm.s101.xrea.com/

■過去スレ
1 http://pc7.2ch.net/test/read.cgi/software/1098531338/
2 http://pc7.2ch.net/test/read.cgi/software/1129836713/
3 http://pc11.2ch.net/test/read.cgi/software/1157043396/
4 http://pc11.2ch.net/test/read.cgi/software/1184556627/
5 http://pc11.2ch.net/test/read.cgi/software/1201502896/

関連リンク>>2以降も参照

■関連記事のあるサイト

AutoHotkey メモ - Principia
http://principia.s54.xrea.com/index.php?AutoHotkey%20%A5%E1%A5%E2
AutoHotKey - notitle.txt
http://kan.s151.xrea.com/?AutoHotKey
なまず日記
http://www.tierra.ne.jp/~aki/diary/
eamatの日記
http://d.hatena.ne.jp/eamat/
おばけ日記
http://d.hatena.ne.jp/obake/

1 Hour Software by Skrommel - DonationCoder.com
http://www.donationcoder.com/Software/Skrommel/
ACConsole
http://www.autohotkey.com/forum/topic7831.html

※ 404のリンクをを外した

FAQ
Q：CapsLock(英数)キーの割り当てがうまくいかないよ
A：日本語環境だとLock系キーの動作は不定。
　 OS側がキーUp/Down情報が正しく返してこないので対処のしようがない。
　 OSのローカライズ段階で発生してる問題なので、窓使いの憂鬱やChange Keyのように
　 ドライバレベルで弄らないとダメだが英語圏では問題ないらしいので今後のサポートもあまり期待できない。
　 対処としては前述のソフトで、CapsLock（英数）キーを別のキー（F13〜F24など）に割り当ててから
　 AHKで利用すべし。

Q：「〜ＡチЯ�`荏柿義形港餐汁秦疏蛋伝覗描冒輿倭兪啻嫣彖拜杼歔」を含む文字列がうまく扱えないよ
A：これらの文字の2バイト目が、AHKのエスケープ文字である0x60[`]なため。
　 対処としてはこれらの文字の"直後"に「`」を記述する（例：「線形`代数」）か、
　 #EscapeCharでエスケープ文字を別のものに変えるべし。

Q：Shift, Ctrl, Alt, Winキー以外のキーを修飾キーとしてキー割り当てしたいよ
　 （例：無変換 + IKJLキーをそれぞれ「↑↓←→」に割り当てたいよ）など
A：Remap機能は記述が簡単になる反面、細かい指定がしにくい。
　 流行らせるページのHotkeys, キーリスト, リファレンス→Send, #IfWinActive, GetKeyState()なども参照すること。
　 なお、例の場合は以下のように記述する。
　 sc07B & I:: Send, {Blind}{Up}
　 sc07B & K:: Send, {Blind}{Down}
　 sc07B & J:: Send, {Blind}{Left}
　 sc07B & L:: Send, {Blind}{Right}

ttp://pc11.2ch.net/test/read.cgi/software/1201502896/953
> 953 名前：名無しさん＠お腹いっぱい。[sage] 投稿日：2008/08/13(水) 19:51:48 ID:5xF6GluX0
> フォーラム見てたらこんなの発見した。
>
> AutoHotkey_L
> ttp://www.autohotkey.com/forum/viewtopic.php?t=34070
>
> 有志のカスタマイズ版みたい。
>
> 個人的には #if expression と while の実装が大当たり。
> AutoHotkeySC.binもあるからexe化も問題なかったし。
> ToDo見たら「Full unicode build.」とかもあった。
> あんま時間取れないって書いてるから、期待しすぎは良くなさそうだけど。

前スレでのウィンドウサイズの件、有難う御座いました。
例を頂いた方法で各種ソフトに仕込んだのですが、
該当ソフトを複数起動中は、AutoHotkeyのプロセスも
その分多くなります。Returnのコマンドで最初の行に
戻っていると思うのですが、サイズを合わせたいのは
初回起動時だけなので、Returnを消してしまっても
問題は無いでしょうか、度々申し訳御座いませんが
宜しくお願いします。


Run,firefox.exe
WinWaitActive,Mozilla Firefox
WinMove, A, , 40, 100, 1200, 900
Return

個別のスクリプトにしたんなら
ExitAppで終わって結構だよ

常駐のに書いたならReturnがいる

>>7
有難う御座いました感謝致します。

>>1
おつです。

なぜか突然autohotkey.exeが消えちまった。同じフォルダの他のファイルは残ってるんだけど…。
他のPCにインスコされたautohotkey.exeをそのままコピーしても大丈夫かな？

>>10
大丈夫だと思うけど、ウィルス対策ソフトが勘違いして隔離したんだとしたら、
除外ソフトに設定するなりしないとコピーしてもまた消える可能性が。

>>11
あんがと。俺もそれは疑った。嫁が使ってる間にウイルス駆除来たのかと。まだログはチェックしてないけど…。
ウイルス対策ソフトはノートン360なんだけど、これもAHKもずっと使ってるからなぁ。
新たにウイルス認定されたのかな。w

exe化したのがウィルス認定ってよく聞くけど、本体ってどうなんだろね。

下のフォルダにあるんじゃないの？

単純にexeを起動したらctrl+shift+→をキー送信して、即終了させたいんですが、
Send, {^+Right}
Exit
これじゃダメみたいです・・・
リファレンスの説明がよく分かっていないので、ご教授いただけないでしょうか。

うりゃー
Send, ^+{Right}

>>16
ありがとうございました！助かりました！

お世話になります。

　MsgBox, 引数は%0%個です 引数1は%1%です 引数2は%2%です 引数3は%3%です
　if ( %0% = 3 ) {
　　MsgBox, 引数は3個です
　} else {
　　MsgBox, 引数は3個ではありません
　}

上記スクリプトを引数3つ(A1、A2、A3)で実行してみたのですが、実行結果が

　1回目のメッセージ　→　引数は3個です 引数1はA1です 引数2はA2です 引数3はA3です
　2回目のメッセージ　→　引数は3個ではありません


となり、IF文による分岐が期待した通りに動作してくれず悩んでおります。
試しに if ( %0% == 3 ) と書き換えてもみたのですがやはり結果は同じでした。

ここのif文をどう記述するべきか、識者の方々のご教示をお願いいたします。

if (3 = %0%)

>>19
お手数お掛けいたします。

　if (3 = %0%) {
　　MsgBox, 引数は3個です
　} else {
　　MsgBox, 引数は3個ではありません
　}

ご指示の通り、条件式の右辺と左辺を交換してみたのですが
メッセージは>>18と変わらずでした…


全発言でバージョン表記が漏れていましたので追記いたします。
AutoHotKey.exeはv1.0.47.06
OSはXP/SP3とVista(Business)/SP1の2台で試しております。

( 0 = 3)じゃないかな？試してないけど。
紛らわしいから,%0%を%aaa%とかにして(aaa = 3)にしたほうが。

それか、(%0% = %3%)にすればいいか、どっちにしても紛らわしい。
できなかったら、死にたくなるほど恥ずかしい。

>>21

　aaa = %0%
　If ( aaa = 3 ) {

ご高察の通り、引数の総数%0%を一度別変数に格納することで
意図した結果となりました。

これでやっと次の段階に進めます、本当にありがとうございました。

理由があってそうしているのかもしれないが
括弧を外せばすんなり行くと思うけど

If 0 = 3

つか、バッチ系の仕様を引きずり過ぎ。
どっちにしろ、バッチファイルをそのまま動かすことは出来ないし

配列は添え字形式にしてほしいなぁ。 args[0], args[1], ...
ハッシュも欲しいなぁ

式の中だと、%X%から展開されたものが数字の場合でも変数として扱うから上手くいかないみたいだな。
aaa=123
123=888
msgbox, % %aaa%
msgbox, % 123

結果、888に続いて123が表示される


コマンドライン引数3で
msgbox, % %0%
の場合、最終的に
msgbox, % 3
と展開されて、変数3に入っている3番目のコマンドライン引数が表示される。

括弧付きif文の場合も論理的な式として扱われる為上手くいかない。

やっぱノートンに捕まってた。
何やら実験的駆除ってな感じで、ウイルスの疑いがあるのでシマンテックヘ報告すべきファイルらしい。
別に新しいスクリプトを走らせた訳でもないのになんで急に…。
会社のPCでもAHK入れてるのだが、ウイルス対策ソフトは情報部門で集中管理されてるので、ウイルスとして弾かれると騒ぎになりそう…アンインストールするかな。しかしAHK無いと恐ろしく仕事の効率落ちるんだよなぁ…。

ノートンってウイルスの疑いがあるのを勝手に削除したり隔離するの？
アクセス制限でも十分だと思うんだけど。
tiddlywikiを勝手に削除して大騒ぎになったりしたな。

ノートン起動したら自分を消し去ったので、それ以来使ってないな

ん〜、シマンテックに ウィルス or スパイウェア 認定されたとしたらめんどいな。

キーロガーっていえばそうだし・・・
管理者権限が無くてもインストールして使える数少ないユーティリティなんだが

ClamWinだとAutoHotkeySC.binがトロイ判定された。

ノートンが新しいスクリプト作ってくれればよくね？
変なこと徹底して出来ないやつｗ

>>28
いや。確認のダイヤログは出るはず。
嫁がPC使ってる時に出て、テキトーにOKしたっぽい。

>>33
うちのPC二台も時間差でAutoHotkey.exeが消えた。
17日〜20日辺りで削除されたらしい。
NIS2008が今月頭からサンプル提出や統計提出したとログにあるが、
削除に関しては、確認ダイアログも出ないし、ログにも無いし、検疫にも残っていない。

>>34
うちのが消されたのは18日だったな。
ちなみにノートンはノートン360でログには残っていた。

しかし、1台のPC(XP)では消えたが、同じノートンを入れてるもう1台(Vista)では今のところ、消えたり
AutoHotkey.exeやばいよ警告は出ていない模様。

まじで会社が使ってるセキュリティソフトにウイルス認定されたりすると厄介すぎる。orz

もしかしてこれ.exe化したスクリプトも認定されちゃうの？

>>36
そっちの方は既に前から認定されてるって。w

NISつかってるけどLiveupdate施行後スキャンしても何ともない。

ver. 1.0.47.04 だったんで公式から最新(?)の ver. 1.0.47.06にしたけど
認定はされてない。

NIS / NAV 系と 360 とはエンジン違うのか？

ちなみに XP SP3

すまん・・・
>>39レス番号間違い・・・ >>38で

AutoHotkey.exeそのものが悪いんじゃなしに、
スクリプト側が適合して、そのあおりを受けてexeが消えてるって格好？

>>41
そんな感じだと思うのだが、新しいスクリプトなんか最近走らせてないのにノートンに
捕まった。
(使ってるのはMousegesture.ahkと、キーの置き換えやウインドウ操作をさせてるahkだ
け。ずっと前から使ってる。）

シマンテックのページで検索してもautohotkeyではヒットしないね。
ググっても、コンパイルしたやつが駆除されたって話はちょくちょく出てくるが、本体が
駆除されたって話は出てこない。

もう1台のPCでは同じノートンでも駆除されてないし、駆除したのを元に戻したら駆除
された時のログも一緒に消えちゃったので、しばらく様子見ます。

FileDeleteでちょっと間違えれば怒涛の消去ってこともありうるからなあ

>>43
それいったらLinuxとかのコマンドだって危険極まりないけどな。
find . hoge -print | xargs rm
うっかり -name を入れ忘れて死ぬ思いをした新人の頃の苦い記憶。

rm -r ./ の後に補完しようと C-i 押そうとしたら
手がすべって C-o 押して実行されたことがあるよ。

アクティブウィンドウの実行ファイルがあるフォルダ名って取得できます？
フルパスでもいいんだけど、WinGetじゃ無理みたいだし。

eamatの日記
ttp://d.hatena.ne.jp/eamat/
にあると思う

ttp://d.hatena.ne.jp/eamat/20050826 の一番下

これ大元は流行らせるページ管理人氏のなんだけどそっちは今見れないね。
削除されちゃったんだろか。結構需要あると思うんだけど。

>>47>>48
おおっ、�d。
Dllを使うのか。レベルが違ったorz
使い道は、ブラウザとかを再起動させるだけなんだけどね。
ショートカット作って誤魔化して使ってたけど、楽になった。

loop内で変数を使って、ラベルを定義なんてことできませんか？
Menu命令で飛ばす先のラベルを全部普通に書くと、膨大な数になりそうなので…

全部同じラベルに飛ばして
%A_ThisMenuItem%で分岐するとか？

guiの drop down list をリフレッシュする方法について質問です。

初期設定
　Gui, 1:Add, DropDownList ,vdropdown　〜〜〜
　Guicontrol, 1:,dropdown,|a|b|c|

　まずこれで「abc」が選択できるドロップダウンが出ます。
　↓このあと「abc」は破棄して、新規の「def」をドロップダウンリストで選びたい

　Guicontrol, 1:,dropdown,|d|e|f|

ところがこの方法だと「def」ではなく、最初の情報と合成されて「abcdef」となってしまいます。

GUIをDestroyしないで、最初に設定した「abc」を破棄するには、
どのように書けばよいでしょうか。

（参考）　はやらせるページ「Gui,Add,DropDownList」
http://lukewarm.s101.xrea.com/commands/Gui_Add_DropDownList.html

>>50
よくわからんがこういうことか？

buf := "lblA,lblB,lblC,lblD"
Loop,Parse,buf,CSV
{
Menu,MenuTest,Add,Item%A_Index%,%A_LoopField%
}

タスクトレイアイコンをダブルクリックしたときの動作を決めることができますが、
シングルクリックの動作を決めることはできないのでしょうか？

>>51
組み込み変数ですか、思いつきませんでした。
これを使うとできそうです。

>>53
いえ、メニュー項目を増やすには、必ずラベルを指定しないといけませんよね。なので

Loop,Parse,buf,CSV
{
sample%A_Index%,:
ここに処理
return
}

みたいな感じで、ラベルを定義できないかと思ったわけで…。

作りたいのはフリーソフトのCLCLでいうところの、定型文貼り付け機能なんですが
(テキストファイルから文字を読み込んでSend,^vでペーストさせてます)
定型文を増やすたびにMenu項目を増やして…とAHKを変更しているのですが面倒で
もっとスマートにできないかなと思いまして。

方針は>>51でいいとして。

A_ThisMenuItemPos
> A_ThisMenuItemのアイテムがA_ThisMenu内で何番目にあったかを格納する。

がいいんじゃないのかぇ。
行番号 と メニュー番号が一致( or 一定の差分)であればいいわけだし。

>>54
押す→離すを連続実行で

それなら
Menu, Hoge, Add, %A_LoopReadLine%, Paste

Paste:
{
ClipBoard=%A_ThisMenuItem%
Send, ^v
Return
}

こんな雛形でいけると思うけど
改行付きとかは一工夫いるかもしれん

右手にマウスでウェブブラウザ、
左手にジョイパッドでフライトシミューレータをする事はできますか？
ジョイパッドのボタンはSendControlで出来ましたが
左スティックは遅れないのでしょうか？

できるならJoyキーまとめてフライトシミュに送る方法ありませんか？

>>57
それはどういうふうに書けばいいのでしょうか？

>>60
俺はこれでやってるけど、どう？

menu, tray, Click,1 ;クリック1回でAHKメニューを出す
menu, tray, add, TMenu
menu, tray, Default,TMenu

TMenu：
GUIコマンドでmenu,addして、やりたいことを書く

>>61
できました。
ありがとうございました。

それはよかった。

でも、なんでこれで動くのか、俺自身もよくわかってない。

1行目の「menu, tray, Click,1」は、本来AHKメニューを出す意味だと
思うのだけど、入れないと2度クリックしないと動かない標準設定のままで、
入れるとなぜかデフォルトに設定したラベルに飛ぶ動作になる。

Helpの方だと
Click, ClickCount: Specify 1 for ClickCount to allow a single-click to activate the tray menu's default menu item.
Specify 2 for ClickCount to return to the default behavior (double-click).
For example: Menu, Tray, Click, 1
ってなってるね

>>56
そんな組み込み変数もあったのですね。目から鱗です。
スクリプトがグッとスリムになりそうです。

>>58
サンプルありがとうございます。
複数行の需要はないのですが、数が増えてくると選ぶのも大変なので
メニューの階層化についても考えてみます。

皆さんはメニューの[ファイル][編集][表示]…みたいなメニューを選択させる時って
どうされてます？自分はIME OFF→ALTキー+英文字をSendしてるんですけど
たまにIME OFFにならなかったり、処理が追いつかず、実行されなかったりします。

もっと良い方法はないでしょうか？

WinMenuSelectItem

>>67
ぐはっ、自分の目ってばどんなに節穴…
本当にありがとうございます。

ものによってはWinMenuSelect聞かないときがあるので、そういうときはSendMessageするのもあり

いまネットワーク接続のncpa.cpl見てるんだけどWinMenuSelectItem効かないし
リソースハカーで見てもツリーにmenuがないしでこういうのはどうすれば・・・

せっかく教えてもらったんですけど、WinMenuSelectItem使えませんでした。
仕方ないのでClick命令に変えましたが、Windowsクラシック表示のパソコンだとY座標がズレそうで怖いです。。

>>71
WinMenuSelectItem
>PostMessageでWM_COMMANDを使用するかControlSendでショートカットキーを送ることで代用できる。
PostMessage/SendMessage関連-WM_COMMANDのコマンド番号を調べる
>これらの方法では、ツールバーにしか割り当てられていないコマンドIDを調べることは出来ない。
>そこで、ツールバーボタンのコマンドIDを調べるスクリプトを作成した。
>標準的なツールバーであれば、ボタン番号に対応するコマンドIDを調べることができるはずである。

スクロールバーのつまみをドラッグする機能を割り当てることって出来るのでしょうか？

具体的には、Win+Altとマウスの上下で、アクティブウィンドウのスクロールバーのつまみの上下ドラッグを再現したいのです。

>>73
http://pc11.2ch.net/test/read.cgi/software/1201502896/963-972

>>74
分かりづらくてすいません。
確かに前スレのものと似ているのですが
スクロール機能といよりは、スクロールバーのつまみをドラッグするという動作自体を割り当てることが出来るのかなと思いまして。

AHKのコマンドひとつで、それをやるのは無理

>>76
そうなんですか。何かフリーソフト探してみます。

その発想はなかったわ

>>75
いや分かってたが、マウスを使わないでドラッグってどうやって実現すんの？
それに無理にそうしたところで得られる結果は結局スクロール動作な気がするんだが

>>72
はい、私もリソースハッカーや、窓コン、管理人さんのスクリプトで調べようとしたのですが
コマンドIDが拾えないのです。KompoZerっていうMozilla系列のソフトなんですが…。

ALT押して照準がメニューに移るのが、標準的なメニューってことなのですかね〜？

むりやり考えてみた。

・Win+Alt＋下or上　が押されたら　マウスのXY座標をpushする
・画面内スキャンコマンドを使い、該当ウインドウから、灰色の縦長バーをみつける
　（スクロールバーの大きさ変化対策のため、細い状態で発見できる素材にする）
・そこの場所でLClickを押しっぱなし
・1ドットマウスカーソルをずらす
・Win+Alt＋下　あるいは上　が押されつづけたら1つ上を繰り返す　離されたらLClick上へ
・マウスのXY座標をpopし、カーソルを元の場所に戻す

これでどうだ。

↑は>>73へのレスね

>>79
そうですか、リンク以外のコメントがなかったので分かりませんでした。
ただ、分かっていないようなので書きますと、ドラッグの代わりにマウスを上下に動かすことで出来
たらなと思ったのです。ウィンドウの右端にカーソルを合わせる手間をなくせればなあと。

スクロールバーのつまみによるスクロールが、通常のホイールとかのスクロールよりいいと思う点は、
スクロール先の位置がおおよそ分かっていると、マウスを少し動かしただけでだいたい目的の場所ま
で行けることです。

>>81
なるほど、画面内スキャンコマンドというのがあるんですね。
ちょっと難しそうですが、調べてみます。

>分かっていないようなので書きますと、
いや、ていうかね。それってマウスカーソル位置がスクロールバーにない状態でってことでしょ
目視できない状態でそれやっても「どの位動かしたか」って感覚的にわからないし
混乱するだけじゃね？ってことが言いたかったんだが。

まぁ 81みたいにマウスカーソルごとスクロールバーにワープさせるんならわかるけど。

>>84
もし実現できたらの話ですが、マウスの動きに連動してスクロールバーのつまみも上下する訳なので、
視覚的にも、感覚的にもわかりやすいと思うのですが。個人的にはつまみドラッグの感覚と同じ感覚で
出来るのではないかと考えています。
ちょっと実際にやってみないと想像しにくいコトではありますよね。

>>85
TrackScrollで検索してみて。
カーソルの移動量でスクロールするソフトだよ。
似たような動作はすると思うから試してみればいいよ。
俺はAHKで書いたやつ使ってるけど。

>>83
単純に、なんかキー押してる間、カーソルがスクロールバーのつまみの上に飛んで左クリック保持状態になるようにし、キーを離したらカーソルが元の位置に戻る様にしたらいいんじゃない？

＞俺はAHKで書いたやつ使ってるけど。（ ´_ゝ｀）

>>86
TTBaseのdragscrollみたいな感じだね。あれはデフォルトでマウス中ボタンだけど。
それをAHKでやるってことね

>>86
マウスの移動量に合わせてWM_V(H)SCROLL投げてるっっぽいな
まぁ厳密に つまみドラッグエミュしてるわけではないと思う

初歩的な説明なんですが、FileAppendって追記しかできませんよね？
テキストファイルの中を全部書き換える場合には、一度ファイル自体を
FileDeleteで消して、FileAppendで保存し直すって形が普通なんでしょうか？

FileReadで変数を読み込むと、文字列の形式になるんですが、
これを数値型に変換する方法はありますか？

FileRead,t,wait.txt

t+=100 ←計算できない

Sleep,%t%

出来たけど？

>>93
ごめんさない、できました orz

>>80
気になったからやってみたら、ControlSendでできたけど･･･
これでいいんだよね？肝はコントロールのウィンドウハンドル。その取得は適当に変更して。
WinMenuSelectItem
sleep, 1000
;アクティブウィンドウがKompoZerでないなら終了
Winget, aaa, processName,A
if aaa != kompozer.exe
exitapp
;すべてのコントロールのウィンドウハンドルを取得し
;メニューバー等のコントロールのウィンドウハンドルを抜き出す。
Winget, bbb, ControlListHWND,A
stringsplit, bbb, bbb, `n
;msgbox, "%bbb%"`n"%bbb0%"`n"%bbb1%"
return

;WinTitleに「ahk_id %controlHWND%」というように
;コントロールのウィンドウハンドルを指定し、
;Control引数を省略することで、
;ウィンドウハンドルで指定してコントロールを操作
;ex1 File(Alt+F)を押す。
a::Controlsend,, !f,ahk_id %bbb1%
;ex2 ショートカットNew(Ctrl+N)
b::Controlsend,, ^n,ahk_id %bbb1%
;ex3 options
c::
Controlsend,, !t,ahk_id %bbb1%
Controlsend,, o,ahk_id %bbb1%
return

>>95
書き残したｗ
WinMenuSelectItemはメモ帳ぐらいしか効かないね。
スクリプトはSleeep,1000からね

書き残した？書き忘れただろ

っ！！！！！！！ﾁｯ
書き残し忘れたのを、書き残したんだっ
それをあえて過去形のまま倒置して、尚かつ短いセンテンスで強く印象づけようとする高等なレトリックさ
他人のミスの誘い水にならないように
己のミスのフォローとしては世界最高峰だねorz

>>95
ありがとうございます。頂いたサンプル、動作確認しました。
Controlsendは、ウィンドウハンドルを指定すれば全角モードでも操れるんですね〜

ただ、私はかな入力なのですが、ControlSendした後に、なぜか全角英数入力モードに
なったり、ホットキーが２回続けて実行できなかったりと、KompoZerでは予期せぬ動作が
起きるようなので、やはりIMEをオフにして、適度にSleep入れながらAlt+●をSendで送る
方式でいこうと思います。

今回はすごく勉強になりました。ありがとうございました。

>>99
そりゃ残念。なんでだろう？問題ないけど。
AutoHotkeyが最新の1.0.47.06じゃなかったら自分で自分をビンタしてね。

>>100
1.0.47.04って書いてある罠…。ひ、ひぃ。

>>101
そして、頂いたスクリプトの動作率が上がった罠。
ひ、ひぃ〜。

重ね重ねありがとうございます。

二人の交換日記だな

AutoHotkeyでFTP接続する方法について質問です。
スクリプト自体は、本家から下記のサブルーチン郡をDLし、includeしました。

DllCall: Basic FTP Functions
http://www.autohotkey.com/forum/topic10393-15.html

下記のように修正し、1を押すと「C:\debug.txt」をFTPへアップするようにして実行してみました。
1::
; init internet resources
INetOpen()
; connection to the FTP server
Server=ftp.my_server.com
Port=21
User=abc
Pwd=defg
hFTP = INetConnect(Server, Port, User, Pwd, "ftp")
if(hFTP)
{
Msgbox Connect
if(FtpPutFile(hFTP, "C:\debug.txt"))
Msgbox File uploaded successfuly
else
Msgbox "Upload failed: " %A_LastError%
; close the FTP connection
INetCloseHandle(hFTP)
}
; release internet resources
INetClose()

しかし、一瞬で「connect」までスクリプトが進んでしまい、ネットワークへのアクセスがありません。
当然ファイルのアップも失敗します。どのへんを修正すれば正常に動きますでしょうか。
なお、動作してくれればこれ以外のスクリプトでもかまいません。OSはW2K、AHKは1.0.47.05です。

hFTP = INetConnect(Server, Port, User, Pwd, "ftp")

カレントウィンドウが変化したことを検知する方法って
Loop or タイマでウィンドハンドルが変化するのを見る以外にある？

OnCurrentWindowChange みたいな感じで使えればいいんだけど。。。

まぁ、ウィンドウ(プロセス)毎に自動で音量を変えたいだけなんだけどね。

WinWaitNotActive,A でアクティブウィンドウが変わるのを待つとかは？
イベント発生するわけじゃないからループは必要だけど。
個人的には素直にタイマで回した方が楽だと思う

>>105
なんと！コロンが足りねぇ！　できました。

どうやら、サブルーチン集の冒頭に書いてあったサンプルコードが、typoだったようです。
本当に気づかなかったので助かりました。

> WinWaitNotActive,A でアクティブウィンドウが変わるのを待つとかは？

それもありか・・・。
以前のウィンドハンドルをグローバル変数で持たなくても良い分スマートかな。

どうせ処理処理の部分は変わらないし、ループでやるかね。
とりあえず、混ぜないで単品で作ろうっと。

一方ロシア人はFaderControllerを使った

ALT + tabの動作をCtrl + pに割り当てたいんだけど
ただ置き換えただけじゃダメだったどうしたらいいか教えてくれ

ALT押しっぱなしのままtabを何回も押したときの動作にならないんだ
二つのウィンドウ行ったりきたりするだけになる

>>111
Help にヒントが載ってる。AltTabのところ。

おれはAlt+Esc割りあててる。

>>110
じ、自分で作りたかっただけよ。
で、でも、便利だから使ってあげる。

FOON STAZIOの人がんばってね

「ねこぽい」というソフトにあった機能なんだが、

キーボードでウィンドウ動かすのって、どうやるの

WinMove

Alt+Space→M

#Persistent

SetTimer,OnTimer,50
return

OnTimer:
Send,{z}
return

でゲームで連打が機能しないのはどこに原因がありますか？
メモ帳だとzがずらずらと打たれるのですが。

そのゲームがnProtect使ってるんなら諦めるしかないと思う

ネトゲではない普通の同人ゲームです。
>>119でZキー押し続けると連打機能し始めるんだけど何か挟まないとだめとか？

>>121
モード変えてみたら？

Send,{z down}
Sleep,30
Send,{z up}

とかやると動くかもよ。
反応の悪いゲームなんかでこうしてる。

>>116
TTBaseのプラグインでできるからそっちなら一発でできるよ
俺はWinキー＋方向キーにわりあててる
ちなみにウインドウサイズまで変えられる

>>116
#Left::
WinGetPos,x,,,,A
WinMove,A,,x-20
Return

こんなのが過去ログにあった

>>116

http://d.hatena.ne.jp/ajinoya/20080719/1211159932

#Left::WinMoveBy(-8,0)
#Right::WinMoveBy(8,0)
#Up::WinMoveBy(0,-8)
#Down::WinMoveBy(0,8)

WinMoveBy(dx, dy)
{
WinGetPos, x, y,,,A
x := x + dx
y := y + dy
WinMove, A,, x, y
}

おされだな

コマンドランチャーのようにブラウザの検索バーが使えれば便利化と思っております。
そこで、ホットキーでSleipnirの検索バーをアクティブにする、というようなことができる、
と聞いたのですが、どのようにすればできるでしょうか？
指針がヒントのようなものはありませんでしょうか？

Enterと;を入れ替えたいです。が、

;::Enter

がコメントとみなされて失敗します。どうすれば ; をRemapできますか？

Enter::;

なら動くんですが。

vkBB::Enter
Enter::vkBB
でいけました。

(AutoHotkey)(仮想キーコード(vk) と スキャンコード(sc) を調べたい 編) - もらかなです。
http://d.hatena.ne.jp/morakana/20080214/1202961553

を参考にしました。

traytipでバルーンを表示させることが出来ますよね。

http://lukewarm.s101.xrea.com/commands/TrayTip.html

このバルーンの表示中、ユーザがバルーンをクリックすると消えます。

このとき、ユーザがバルーンをクリックして閉じた場合、
「バルーンをクリックして閉じられた」ことを検知する方法またはコマンドはありますか？

バルーンと同じ「見た目」「挙動」のGUIを作り、
閉じるイベントのみをオーバーライドして独自の処理を噛ませる

>>129
やりたいことがイマイチ分からんけど、ぷにるがアクティブなら、Alt+Sで検索バーにフォーカスするよ。

ん〜、>>133じゃ芸がないな

誤爆の危険があるけど、一応動く

#Persistent
TrayTip, ほげほげ, ふがふが, 10
WinWaitClose, ahk_class tooltips_class32
MsgBox, 閉じた

ありがとうございます。その方法で切り抜けられそうです。

>>134
サンクス。たぶんやりたいことは、
ホットキー押下→Sleipnirアクティブ→検索バーアクティブ(Alt+s)
でできそう。
ちょっとがんばってみるっす

>>134
これでいけた！やってみると以外に簡単でびっくり。

; active Sleipnir 2 at search bar
+^!g::
　　WinActivate ahk_class SleipnirMainWindow
　　Send, !s
return

#n:: WinMinimize, A
と書いておいて
別にVirtualDimensionのMinimize to trayオプションで
最小化時にタスクトレイに入れる設定をしているのですが、
Win+Nではトレイに入らず普通に最小化されます。
最小化ボタンを押せばトレイに最小化されます。
Win+Nでもトレイに入るようにできますか？

応用で検索バーをアクティブにした時にあらかじめ、文字列を入れておきたいのですが、
Send, hoge とかでできるのですが、
IMEが起動していると全角を入力しようとします。
IME無視して、文字をペーストか、もしくはIME解除して文字入力はできないでしょうか？

クリップボードを汚してしまうけど、clipboard使って^vするとか。
http://lukewarm.s101.xrea.com/misc/Clipboard.html

sadat-studio.net - ダウンロード
http://sadat-studio.net/modules/mydownloads/viewcat.php?cid=3

こちらのIME制御スクリプトでIMEをオフにしてやってみました。
以下の例では、Sleipnir2の検索バーをアクティブにして、"mb "という文字列を挿入します

#include ime_func.ahk

; search my bookmark on Sleipnir 2 at search bar
+^!b::
　　WinActivate ahk_class SleipnirMainWindow
　　Send, !s
　　Sleep, 100
　　IME_OFF("A")
　　Send, mb{Space}
return


>>141
ありがとう。クリップボードを使う手もあるんですね。

なんか一昔前の自分を見てるようだ
一応、参考になりそうなの晒しとく

#Include D:\AutoHotkey\IME_Func.ahk
paraLen = %0%
If paraLen = 0
{
InputBox, sword, Web Search - 検索語句を入れてください。, , , 320, 90
If ErrorLevel <> 0
return
}
else
{
Loop, %paraLen%
{
buf := %a_index%
sword = %sword% %buf%
}
}
IfWinNotExist, ahk_class Sylera gecko tab browser
Run, D:\Bin\Sylera\sylera.exe
WinWait, ahk_class Sylera gecko tab browser
IME_OFF("ahk_class Sylera gecko tab browser")
SendMessage, 0, 204, 0, , ahk_class Sylera gecko tab browser
ControlSetText, Edit5, %sword%, ahk_class Sylera gecko tab browser
SendMessage, 0, 205, 0, , ahk_class Sylera gecko tab browser
ControlSend, Combobox3, {1}, ahk_class Sylera gecko tab browser
ControlSend, Combobox3, {Enter}, ahk_class Sylera gecko tab browser
SendMessage, 0, 207, 0, , ahk_class Sylera gecko tab browser
Return

メニューバーのコマンド項目がグレーアウトしてるか調べることはできますか？
WinMenuSelectItemで実行してErrorLevelを調べてもダメでした

WinMenuSelectItemホントに使えねーな・・・

>>139
WinMinimizeを使わずに
PostMessage, 274, 61472, 0, , A
はどう？

>>139
; 無変換 + N
~vk1Dsc07B & n::PostMessage, 0x112, 0xF020, , , A

俺はこれでやってる

>>146>>147
できました。
ありがとうございます。

~Ctrl::
CtrlCount = 1
Loop
{
Input, InputKey, T0.3 V L1 I, {LCtrl}{RCtrl}
If ErrorLevel Contains Control
CtrlCount ++
Else Break
}
If Not(ErrorLevel = "TimeOut" && CtrlCount > 1)
Return
MsgBox, %CtrlCount% Clicks
Return

テンキーのシングルタップとダブルタップで別のキーを送りたくて
流行らせるページのスレにあった上のをまんまパクって
CtrlだけNumpadに入れ替えてやってみたんですけどうまく出来ませんでした。
テンキーでやるのは無理ですか？

どこも入替えてないように見えるんだが？

ちょっとMouseGesture.ahkを触ってみたけど、
マウ筋からの移行での一番の問題はツールチップの表示をどうするか。
MouseGesture.ahkは発動条件がマウ筋より多彩だから
チップに何を表示させるかが難しいゆえに、ああいう仕様なんだろうね。

結局はマウ筋ライクなツールチップ表示にして落ち着いた。
何をしたいか確認してから発動させたいとなると、どうしてもこうなる。

初心者なのですがご教授願いたく…。
エンター押して0.5秒待ってまたエンター押して、というような動作はどう記述したらいいのでしょうか。

窓使いの憂鬱を使っていた時は
Enter &Wait(500) Enter
というふうに書いていたのですが、これと同じような事をAutoHotkeyでできたらいいな…と。

Send, {Enter}
Sleep, 500
Send, {Enter}

てか、mayu設定出来るくらいなら、マニュアルくらい読めるだろうに

>>152
thx
AutoHotkeyを流行らせるページを見たり、ぐぐってみたりしたんですがどうにも見つからなくて…。
「待機」とか「wait」でばっかり探していたのが失敗だったようで orz。

助かりました。

アンカー間違ってるし。
>>153 です orz。

GuiのListviewで、長文（(数百文字）を入れたセルがいくつもあるとものすごく動作がもっさりするんですが、回避方法はないんでしょうか。
Core2Duoの3GHzあっても、スクロールがもたついてしまいます。

入れない

ウィンドウ指定で、
特定のソフトのComboBoxでのみ動作するようにするにはどうしたらいいでしょうか？

Control

>>159
ありがとうございます。
コントロールの指定はできたのですが、なぜかコマンドが実行されません。

Return::ControlSend ,.*ComboBoxEx32.*,{HOME} , タイトル,
z::ControlSend ,.*ComboBoxEx32.*,abc, タイトル,

ReturnでHOME、zでabcが入力される、はずなんですが、
どちらを押しても何の反応もなく、本来のReturnの動作、zの入力もされません。
書き方が間違っているのでしょうか？

>>151
どのようツールチップ表示したか教えてもらえませんか？
前に同じようなことを感じ挑戦したけど、設定編集からのツールチップ表示は
うまく動作せずあきらめていました。

>>161
結構適当だけどいいかな？AHK素人だから、まあ問題なく使えるねって程度。
条件的には、マウ筋と同等の使い方設定を面倒臭がらない文句言わないけなさない。

まず全部バックアップをとる。
AutoHotkey.exeごとmousgesture.ahk等と一緒に別フォルダで作業。
AutoHotkey.exeをMouseg.ahk.exeに改名複写して使うと人によって便利かも。
AutoHotkey.iniは#include MouseGesture.ahkで

MG_Config.ahkを見てるとマウスジェスチャを投げて、そこからウィンドウ判定してるみたい。
ツールチップでもそれと同じことをする。MouseGesture.iniを使い回すため後でComment.iniに改名コピー。
4方向モード専用の人は、後々大後悔をしないために設定で８方向モードにして斜めの広さは全部0にする。
ジェスチャ定義名は基本RB_4_のようにジェスチャ定義と同じにする。手間。iniでの例。2つ以上登録する人は知りません。
[RB_4_]
G=RB_4_
KIKI=Send, !{Left}

mousgesture.ahkのMG_ShowNavi:欄を書き換え。
適当だからプログラミングとしてあってるかわからない。
全部理解しながら読むのも面倒だしｗ
「MG_Is条件定義」、上例で言えばKIKI等の条件分岐は自分で手直し。手間。

MG_ShowNavi:
if(!MG_Active && (A_TickCount>(MG_LastTime+MG_DGInterval+MG_WaitNext))){
Tooltip
MG_Tooltip=
}else{
if(MG_IsKIKI()){
IniRead, comm,%A_ScriptDir%\Comment.ini, %MG_Gesture%_,kiki, ;%MG_Gesture%
tooltip, %comm%
}else if(MG_Isnotepad()){
IniRead, comm,%A_ScriptDir%\Comment.ini, %MG_Gesture%_,notepad
tooltip, %comm%
}else if(MG_Isedge()){
IniRead, comm,%A_ScriptDir%\Comment.ini, %MG_Gesture%_,edge
tooltip, %comm%
}
;tooltip,%MG_Gesture%,0,0,20
comm =
}
return
あと、mousgesture.ahkのコメント行の下に次の1,2行をそれぞれ足す。
;全てのトリガが離された
SetTimer,MG_ShowNavi,50
;移動中にタイムアウト
SetTimer,MG_ShowNavi,OFF
tooltip

MouseGesture.iniを使い回すためComment.iniに改名複写。
これで一応使えるけど、問題あるところはちょくちょく手直し。
難しいことはやってないから、だれでも理解できると思う。
修正求む。

まあ説明しなくてもわかると思うけど、
見づらいからするけど、
今入力中のジェスチャ文字列%MG_Gesture%（ツールチップのデフォルト）
にボタンをどれか一つはなす。動作を加えた%MG_Gesture%_をセクション名にして
Comment.iniからそれぞれのキー名を、一回一回読み込んでるだけ。

あと設定で、起動時からナビを有効にチェック。
マウ筋から移行の俺的には不便がないからいいけど、どうなんだろうね。

標準でついてるMG_Tooltipはただテキストをチップ表示するだけで、
それからジェスチャの続行はできなかった。と思う。

あ、、、exe化したスクリプトがノートン先生に削除された。。。

URLを引数に受け取って、iniに書いた正規表現に基づいてJaneだったり
火狐だったり、Boonだったりに振り分けるだけのやつなんだが。。。

ソーススクリプトから再コンパイルして、
exe単体をスキャンしたが「リスクなし」だとさ。

意味わかんねぇ。

まずノートンと言う名のウィルスを削除するんだ

つ ポチエスの正規表現版

>>161
もうちょい、編集しやすくしといた。
ttp://www.rupan.net/uploader/download/1221291262.rar
PASS
mgahk

>>167
紹介サンクス。誰でも同じことは考えるわな。

でも、ノートンのログ見たらこれだけじゃなかったよ・・・
ちょっとしたのを集めたフォルダをPATH通してコマンドラインとか使ってるし

とりあえず除外フォルダにでもしとくかな。
てか除外ってウィルスだけだっけ・・・

Sleep 1000 してから PostMessage を非同期に行うことはできるでしょうか？
PostMessage する前にある程度待つ必要があるのですが、
普通に書くと１秒間は連打ができないくなってしまうので
Sleep と PostMessage をバックグラウンドで実行したいのですが。

タイマーがいいんでない？

無変換を押しながらホイールを回した時に、無変換を押している間中Altは押しっぱなしでホイ
ールを１クリック回す毎にCtrl+Tabを送り、無変換を離すとAltを離すにはどの様に書けば良い
でしょうか？

Alt-Tab動作は下の様に書けばいける訳ですが、これにTabを送るときにCtrlを加えたいです。
vk1Dsc07B & WheelDown:: AltTab

TaskSwicthXPというタスク切り替えソフト(Alt+Tab置き換え）を使っていて、Alt+Ctrl+Tab
でWord等同じタスク内の複数開いているウインドウのみを表示して切り替えできるインスタンス
スイッチという機能があり、Alt+Ctrl+TabでAlt-Tabのタスク切り替えの様に操作できるのです
が、これを無変換+ホイールで操作したいのです。

コンビネーションキーについて教えてください。例えば、

A & B:: send, 1

とすると、A を押しながら B を押すと "1" が入力されます。しかし、

A & B Up:: send, 1

とすると、"b1" が入力されてしまいます。
Up を付けたい理由はキーリピートさせたくないからなのですが、
この問題を回避する方法はあるでしょうか。

>>173
一つ目に指定したキーが修飾キーとなり、一つ目のキーを押しながら二つ目のキーを押すと発動する。
一つ目のキー自体のもともとの機能は無効化される。
A & B up:: send, 1
a::send, a
使いにくいけどね。aがワンテンポ遅れてやってくる。
173ではaが無効化されてるだけ。
aを押してからbを押せば問題なし。押し順の問題。

>>174
おっしゃるとおり、このコンビネーションの例では "A" がモディファイヤになっており、
"A" を押しながら "B" を押すと "1" を返す、という操作を想定しているのですが、
なぜか "b1" が返ってきてしまうんです。
つまり "Up" を付けることで、修飾される側のキー "B" が修飾されずに同時に入力されてしまうのです。
これは (当方の環境では) "A" 単体にあたえられた機能によらず再現します。

いやー、問題ないけどね。
ずっとaを押してる？bを押してからa押しb離しってわけじゃねいよねｗ？
OSは2000以降だよね？
A & B up:: send, 1
上の一行だけのスクリプトでやっても？
AHKは最新？

>>172
なんか難いね。とりあえず姑息なれど

~vk1D & WheelDown::
settimer, taskswitch
ifwinnotactive, ahk_class _As12__TaskSwitchXP_TaskSwitchWnd_
send, #{F11}
ifwinactive, ahk_class _As12__TaskSwitchXP_TaskSwitchWnd_
send, {TAB}
return

taskswitch:
KeyWait, vk1D
settimer, taskswitch, off
ifwinactive, ahk_class _As12__TaskSwitchXP_TaskSwitchWnd_
send, {Return}
return

>>176
ありがとうございます。1行スクリプト基本ですね、忘れていました。
当方でも問題なかったです。
OS は XP Pro SP3 で、AHK は 最新を使っています。

それで常駐スクリプトを部分的に順番にコメントアウトしていって、
結局 "#IfWinExist" の部分があると上手く作動しない事がわかりました。
この部分のスクリプトとコンフリクトしていそうなので、もうちょっと調べてみます。

丁寧な対応、ありがとうございました。
詳細がわかりましたら、ここでフィードバックさせていただきます。

このソフトのスクリプトを勉強したいのですが、何とググったら学べるでしょうか。
ちなみにですが、やりたい事は何かのｷｰを押すと左クリック、1秒後に右クリックです。
>>2は私には高度すぎて、理解が出来ません。
文系のアホにも初歩から学べるところかありましたら、どうぞ教えて下さい。

>>1

>>179
ヒントは >>152-154あたり。

お作法はやはりマニュアルを読まなきゃ分からんが、全部読む必要はない。
学校の勉強と違って覚える必要はないので、軽く斜め読みすればよい。
Hotkeysあたりは手を動かしながら読んだ方がいいかも。

ま、結局は >>179の文中にある事を単にスクリプト言語に変えるだけなんだけど。

何かのｷｰを押すと::
　左クリック
　1秒後に
　右クリック

AutoHotkeyを流行らせるBBS でも質問をしたのですが、返信がありませんでしたので、
こちらにも質問をさせていただきます。

sc07B & m::send,{Blind}{Down}
sc07B & i::send,{Blind}{Up}
sc07B & j::send,{Blind}{Left}
sc07B & k::send,{Blind}{Right}
sc07B::Send,{sc07B}
といいますように、無変換キー＋○○で、
ダイヤモンドキーを実装させています。

ここで、
無変換キー単打→無変換
無変換キー長押し→動作なし
というようにキーを割り当てられないでしょうか？
カーソルを動かそうと思ったけれどやっぱり止めた、
などと言うときに無変換キーが押されては不便ですので。
同時に、無変換キーはよく使いますので単純に無効にはしたくありません。

お力を貸していただけますと本当に助かります。
よろしくお願いします。

俺もその使い方が便利で使ってるけど、単独で動作するコマンドはないと思う。

gosubで飛ばして、そこで長押しかどうかを判別して分岐させている。

>>181
どうもありがとうございます。
まずは簡単な事から出来る限り頑張ってみようと思います。

>>183
Gosub ですか？
AutoHotkeyを流行らせるページで調べてみましたが、
どう書けばいいのか分かりませんでした。
詳しく教えていただけますとうれしいです。

押し下げで、変数に押し始めの時刻を覚えておいて、
押し上げで、現在時刻-さっきの変数>閾値 の判定をすればいいんでない

>>185
ちがうよ。長押しを検出するコードをユーザー定義関数で別枠で作って、
キーが押されたら、そこへgosubなりで定義関数なりで飛ばすと言うこと。

たとえば俺の場合は、0.3秒(300msec)以上押されたときに別の機能を
割り当てるため、nagaosiファンクションを作ってる。

if nagaosi(A_ThisHotkey,300)=1
　send,長押しされたときのコマンド
else
　みじか押ししたときに処理する内容

として呼び出す。A_ThisHotkeyをつかえば、押されるキーが変わっても
まるごとコードを流用するだけで動作する。

ちなみに、これコピペしただけじゃ動かないからね。
必要な情報は、はやらせるページに全部載ってる。

こういうパターンを多用するならmayuの方が向いてるけどね・・・
One Shot モディファイアの定義で一発なんだが。

Vistaは後継ってか傍系のmodoka(シェアウェア)になるけど。。

modokaってなんだよ・・・「のどか(nodoka)」な。

>>187
ありがとうございます。
ただ、A_ThisHotkey の使い方などを中心に小一時間ほど調べましたが、
やはり、うまく動作させることが出来ませんでした。
さらに詳しく教えていただけますと助かります。
どうぞ、よろしくお願いします。

>>188
ええ、先月までは mayu で同様の動作をさせていました。
ただ、もうすぐ Vista に移行しようと考えていますので、
mayu ではなく、AHk を使い始めました。

>>190
動かないコードを丸ごとここに書けば、誰かが修正してくれるよ。
その時点で、あなたがどこまで努力してるかも同時にわかるけど

>>191
sc07B::
if nagaosi(A_ThisHotkey,300)=1
return
else
Send,{sc07B}
return

と書いたところ、

if nagaosi(A_ThisHotkey,300)=1

でエラーが出ました。

sc07B::
if (A_ThisHotkey,300)=1
return
else
Send,{sc07B}
return

と書きますと、エラーは吐きませんが、
sc07B::Send,{sc07B}
と同じ動作になってしまいます。

sc07B::gosub, nagaosi と if の前に書いてもエラーが出ました。

>>191
nagaosi 関数を自分でつくらなきゃ

ごめん >>192

>>193のとおり、そのままじゃ動かないよ。
ってかコピペしても動かないよって書いてたんだけど。

俺のコードはスパゲッティ状態だから、長押しの認識に特化したシンプルな
コードがどっかにあるといいんだけど。

あー、長押し関数を自分で書かないといけないんですね。
なるほど、ふりだしに戻る。

AutoHotkeyを流行らせるページ内を「長押し」で検索しても何も引っかかりませんでしたし、
ちょっとお手上げのようです。

「ある長押ししたかどうか」ってどうやって判断する？

それが分かればコード書けると思うけどな。

ちょっと作ってみた。あんまり便利じゃないかも。

/* 1 of 2 */

/**
* 指定のキーの長押しの設定を行う。
* "Hotkey"コマンドでのキー設定なので、"Hotkey, IfWinExist,..."等が利用可能(なはず)
*
* @param keyName - 設定対象キー名
* @param delay - 長押しと判断する経過時間(ms)
* @param actType - key:キー押下発行, sub:関数呼び出し, その他:何もしない
* @param action - 長押ししたときに動作するサブルーチン名 or キー名
*
* サブルーチン "LongKeyPressStart", "LongKeyPressEnd"に依存
*/
InitLongKeyPress(keyName, delay, actType, action) {
　global
　longKeyPressDelay_%keyName% := delay
　longKeyPressActType_%keyName% := actType
　longKeyPressAction_%keyName% := action
　Hotkey, %keyName%, LongKeyPressStart, On
　Hotkey, %keyName% up, LongKeyPressEnd, On
}

/* 2 of 2 */
; キー押下時のシステム時刻をキー毎に記録する
LongKeyPressStart:
　if (!(longKeyPressKeyDown_%A_ThisHotkey% > 0)) {
　　longKeyPressKeyDown_%A_ThisHotkey% := A_TickCount
　}
　return

; キー押下中の経過時間を取得し、設定に基づき動作する。(キー名は" up"を取り除く)
LongKeyPressEnd:
　StringTrimRight, longKeyPressKeyName, A_ThisHotkey, 3
　if (A_TickCount - longKeyPressKeyDown_%longKeyPressKeyName% > longKeyPressDelay_%longKeyPressKeyName%) {
　　longKeyPressAction := longKeyPressAction_%longKeyPressKeyName%
　　longKeyPressActType := longKeyPressActType_%longKeyPressKeyName%
　　if (longKeyPressActType = "key")
　　　Send, {%longKeyPressAction%}
　　else if (longKeyPressActType = "sub")
　　　Gosub, %longKeyPressAction%
　}
　else
　　Send, {%longKeyPressKeyName%}
　longKeyPressKeyDown_%longKeyPressKeyName% := -1
　return

>>198-199 を利用したサンプル

#SingleInstance

; (サンプル) Deleteキー長押し時に"Backspace"キーを発行
InitLongKeyPress("Delete", 500, "key", "Backspace")

; (サンプル) Insertキー長押し時にサブルーチン"InsertLongPress"を実行
InitLongKeyPress("Insert", 500, "sub", "InsertLongPress")

return

; (サンプル)Insert長押し時の動作用
InsertLongPress:
　MsgBox, 長押し
　return

>>177
ありがと。ちょっと思い通りに動かなかったけど、確かにキー押しっぱなしじゃなくても
ウインドウを閉じない#{F11}でTaskSwithXPを呼び出して、｛Enter｝で選択という処理を
させるという道もあるね。

しかし、TaskSwitchXPに限らず、WindowsXPのAlt-Tabも、タスク選択ウインドウ表示中
は特殊なキーフックするのかなぁ。なんかAutoHotKeyからのsendじゃAlt操作を受け付
けない感じ。

Alt+Tabの場合、単純に下の様に書いてもいけそうな気がするんだけど、無変換+ホイー
ルでタスク選択ウインドウを呼び出すと、無変換離してもAltUpしてくれなくてタスク切り替
えウインドウ閉じない。

で、その状態でAlt押せば（つまり強制的にキーボードでAltUpを送れば）TaskSwithXPだと
ちゃんとタスク切り替わってTask選択ウインドウも閉じるんだけど、Windows標準に至って
は、アクティブウインドウは選択どおり切り替わるがタスク選択ウインドウが出っぱなしという
始末。

vk1Dsc07B & WheelDown:: send,{AltDown}{Tab}
vk1Dsc07B Up::{AltUp}

間違えた。これでもダメ。

vk1Dsc07B & WheelDown:: send,{AltDown}{Tab}
vk1Dsc07BUp:: send,{AltUp}

>>198-199
最初にファンクションで飛んで、その引数でさらにgosubへ飛ぶのか。
これは思いつかなかった。参考になったよ。

スクリプト実行中のカーソルの形状を変えたいと思い下のコードを先頭に加えてみました。

Typeは5046、ErrorLevelは両方0なのでうまくいっているとしか思えないのですが

全く変化がありません。

どこがまちがっているのでしょうか。


Type := DllCall("user32.dll\LoadCursor","Int", 0,"Int", 32514, "Int")

DllCall("user32.dll\SetCursor","Int", %Type%)

>>204
間違えました
DllCall("user32.dll\SetCursor","Int", Type)
です(結果は同じなんですが)

無変換長押し時って気になって自分なりにやってみたけど。
結局keywaitで待たなきゃダメなんかな。
sc07B & mとかのコンビネーションキーがあったら、Up時に発動するんだね。
あたりまえだけど。

111:
keywait, sc07B, D
aaa:= A_TickCount
keywait, sc07B
bbb:=A_TickCount
ccc:=bbb-aaa
ht := A_TimeSinceThisHotkey
;無変換を押されてから指定ミリ秒経てたら(長押し時)無変換なしなど
if (ccc > 200){
goto,111
}
;無変換押下でホットキーを押されたら無変換なし
if (ccc > ht && ht != -1)
goto,111
;他は無変換を送る
else
send, {vk1Dsc07B}
goto,111

sc07B & m::send,{Blind}{Down}
sc07B & i::send,{Blind}{Up}
sc07B & j::send,{Blind}{Left}
sc07B & k::send,{Blind}{Right}

ああ、別のスクリプトで実行すればいいのか？
>>198-200を参考にして初めて関数使って作ってみた。
関数の勉強になったし、Libフォルダの存在も知っただけでも良しとしよう。
a::LongKeyPress("a",500)
;keyNmaeとactionは""
LongKeyPress(keyName,delay,action=0){
aaa:= A_TickCount
keywait, %keyName%
bbb:=A_TickCount
ccc:=bbb-aaa
ht := A_TimeSinceThisHotkey
;msgbox, "%keyName%"%ccc%=(%bbb%-%aaa%)>%ht%---%delay%
;%keyName%を押されてから%delay%ミリ秒たったら%action%:へ(第3引数省略時は無効)
if (ccc > delay){
if action = 0
return
if action != 0
Hotkey, %keyName%,off
gosub, %action%
Hotkey, %keyName%,on
return
}
;%keyName%押下でその他ホットキーを押されたら無効
if (ccc > ht && ht != -1)
return
;その他は%keyName%を送る
else
Hotkey, %keyName%,off
send, {%keyName%} ;{vk1Dsc07B}
Hotkey, %keyName%,on
return
}

>>206
ありがとうございます。
望むとおりの動作を確認しました。
>>207の方はコピペでは動かなさそうですね。
あとで読ませていただきます。
感謝です。

>>181 こんな初歩的な事はどうでも良いと思うのですが、一応結果報告です。
LShift::
Send, {LButton}
Sleep, 1000
Send, {RButton}
こんな事でさえ試行錯誤でしたが、何とか出来ました、どうもありがとうございました。

>>205
SetSystemCursorで変更はできるよ。
;標準を砂時計へ
Type := DllCall("user32.dll\LoadCursor","Int", 0,"Int", 32514,"Int")
DllCall("user32.dll\SetSystemCursor","Int", Type,"Int", 32512)

リマップで
a:: b
と書くのと、ホットキーで
a:: Send, b
と書くのはどう違うんでしょうか？

特定のアプリがアクティブなときだけ
「Ctrl+g => F3」、「Shift+Ctrl+g => Shift+F3」
をしたいのですが、
^g:: F3
だとダメで
^g:: Send, {F3}
+^g:: Send, +{F3}
だとOKでした。

あとこれは ShiftなしとShiftありを別々に書くしかないですか？
リマップなら１行でいけるんじゃないかと思ったんですが・・・

>>210
ありがとうございます、うまくいきました。
２ちゃんねるで質問して解決に至ったのは初めてなので、とてもうれしいです。
以下が完成したものです。

;カーソルファイルのパス取得
RegRead, Path, HKEY_CURRENT_USER, Control Panel\Cursors, Wait
if(Path = null)
;デフォルトの場合
Type := DllCall("user32.dll\LoadCursor","Int", 0,"Int", 32514,"Int")
else
Type := DllCall("user32.dll\LoadCursorFromFile","Str", Path, "Int")
DllCall("user32.dll\SetSystemCursor","Int", Type,"Int", 32512)

;処理終了後元に戻す
RegRead, Path, HKEY_CURRENT_USER, Control Panel\Cursors, Arrow
if(Path = null)
Type := DllCall("user32.dll\LoadCursor","Int", 0,"Int", 32512,"Int")
else
Type := DllCall("user32.dll\LoadCursorFromFile","Str", Path, "Int")
DllCall("user32.dll\SetSystemCursor","Int", Type,"Int", 32512)

>>211
マニュアル読め。
質問事項は全部書いてある。

>151
返事が遅くなりましたが、ありがとうございました。
ご参考にさせて頂き、これからいじってみます。

>>214
>>168のやつ落ちてたからあげといた。
ttp://www.rupan.net/uploader/download/1221548226.rar
書き換え項目もスクリプトファイルの中にコメントしてある。
上に書いてたよりも少し自分で書く手間を省いているのと、
コメントファイルを少し見やすくして少し編集し易くしといた。
上のはあんまりにもひどい、自分でもコメント編集してなかったから。

自分でやることは最低３つ、
ジェスチャ定義名をジェスチャ定義と一緒にする。
スクリプトコピペ
付属スクリプトの実行（コメント編集）
あとは、ジェスチャを増やすたびに付属スクリプト実行しファイル編集で付け足していける。

;; googleで検索
#g::
clipboard=
Send,^c
ClipWait
SetEnv,word,%clipboard%
Run, http://www.google.co.jp/search?hl=ja&q=%word%
return

このスクリプトを文字列を選択していない状態で実行すると、その後文字列を選択して実行しようとしても実行できず、
クリップボードに文字列が送られたときに実行されることがあります。

ClipWaitのところで止まっているせいだと思うのですが、文字列が選択されていない状態で実行した場合にはこの
スクリプトを実行しないようにできないでしょうか？

ClipboardAllでいったん退避
それと比較して変化無しならReturn

>>216
自分も、そこで躓いて・・只今 プランBで模索中。
読み換え、よろしく。

clipboard := ""
Send,^c
ClipWait,0.01 ; 0.01秒 コピーされず時間経過「1」、されれば「0」をErrorLevelに返す
if(ErrorLevel == 1){
Send, {ALTDOWN}{TAB}{ALTUP}
return
}
word := clipboard
run,C:\Program Files\DDWin\ddwin.exe `,2`,グループ01`,1`, %word%
return

>>217
横からですが、自分も試させていただきます。　謝謝

Ahk2Exe.exeで作成したファイルを配布したいと思ってますが、
ファイルのプロパティのバージョン情報のタブの情報
(ファイル バージョン、説明、著作権、正式ファイル名等)
を設定する方法は無いのでしょうか

>>217-218
ありがとうございます。リファレンスも参考にしてこんな感じにしてみました。

;; EBWinで検索
#s::
clipboard = ; Empty the clipboard
Send, ^c
ClipWait, 0.01
if ErrorLevel <> 0
{
return
}
SetEnv,word,%clipboard%
Run, C:\applications\EBWin\EBWin.exe /C=1 /S=%word%
return

>>177
けっきょくAlt+Shift+Tabは断念。
書いて貰ったのを少し手直ししたらいけました。
Alt+ホイールでAltTab、無変換+ホイールでインスタンススイッチにして快適快適。
ありがとうございました。

vk1D & WheelDown::
settimer, taskswitch
ifwinnotactive, ahk_class _As12__TaskSwitchXP_TaskSwitchWnd_
send, #{F11}
ifwinactive, ahk_class _As12__TaskSwitchXP_TaskSwitchWnd_
send, {TAB}
return

taskswitch:
KeyWait, vk1DUP
settimer, taskswitch, off
ifwinactive, ahk_class _As12__TaskSwitchXP_TaskSwitchWnd_
send, {Return}
return

と思ったが、下のでAlt+Ctrl+Tabいけるね。勉強になります。

vk1Dsc07B & WheelDown::
settimer, release
send, {AltDown}^{Tab}
return

release:
KeyWait, vk1Dsc07B Up
settimer, release, off
send, {AltUp}
return

キーバインディングソフトを探してAutoHotkeyにたどり着きました。
初歩的な質問なのですがお願いします。

1,独自のキーボードドライバをインストして使うソフトでしょうか？
2,日本語の解説ページを呼んで、特定のアプリ実行時だけキーの置き換えなどが出来ることは分かるのですが、
複数のソフトに対して、それぞれ独自のキーマッピングはできますでしょうか？

1が不明なため、まだインストしていない段階で申し訳ないですが、よろしくお願いします。

1: 違う。exeが動くだけ。動かすだけなら管理者権限も要らない（はず）

2: 「複数のソフトに対して」というのが、「現在のアクティブウィンドウが何かを判別して」と言う意味なら、できる。

ちなみに、CapsLockは無理。
レジストリ変更か、ドライバレベルのremapソフトが必要。

>>224
どうもありがとうございます。
おかげで目的がこのソフトで果たせそうだとわかりました。
ありがとうございました。

>>224
そういえば漏れこのｿﾌﾄをadminで起動したこと一度もないけど何の問題もないｗ

IME制御って、ATOKとかでも有効なの？

Guiにhtmlファイルを表示させたいのですが、AHKでhtmlを展開（？）することはできるのでしょうか。
<br>とかタグを含んだままテキストを表示するならLabelとして貼り付ければいいんですが、
WindowsかIEだかの機能を利用してこれをhtmlとして表示することはできるのでしょうか。

>>228
ttp://www.autohotkey.com/wiki/index.php?title=Internet_Explorer_Control
ttp://www.autohotkey.com/wiki/index.php?title=CoHelper

ここから、IEControl.ahk と CoHelper.ahk を入手すれば、そのまま IEControlのページのExample の下側のコードが動くはず
ローカルファイルならURLに"file:///C:/testdir/test.html"とか指定すればいい

Ctrl+Alt/Shift+カーソルでウィンドウの移動とリサイズできるコードをどなたかお願いします。

ここってスクリプト作成依頼スレだったっけ？

前者は、>>127 のキーバインド変えればできるだろ
後者は、>>127パクった関数作って WinSet 使えばすぐだと思う。

>>229
できた！
でもこのIEControl.ahk、55行目の「Ret」でエラー吐くのですが、Returnのミスですかね。
Returnに書き換えたら動きましたけど。
表現の幅が増えそうです。ありがとうございました。

質問です。以下のスクリプトを作成しましたがうまく動きません。
やりたい事は、gvimで ^s を二連打するとgvimに ^s というキーを二回送ってからFirefoxをリロードすることです。
何がうまくいかないかというと、gvim側で
nmap <C-s><C-s> :<C-u>w<CR>
と設定することで ^s 二度続けて押すとファイルが保存されるようにしてあるんですが、
下記のスクリプトを実行中だとgvimにちゃんとControlSendされず、結果としてファイルが保存されずにFirefoxがリロードされてしまいます。
ちなみにFirefoxなど他のアプリのWindowで ^s を押すとちゃんとControlSendされているようです。
どんな原因が考えられるでしょうか？
よろしくお願いします。


;好きなエディタで保存と同時にFirefoxをリロードするAHKスクリプト - AUSGANG SOFT
;http://a-h.parfe.jp/einfach/archives/2007/0126190912.html

^s::
WinGet, active,,A
ControlSend,,^s, ahk_id %active%
ReloadFirefox(300)
return

ReloadFirefox(timeout){
if(A_PriorHotKey = A_ThisHotKey and A_TimeSincePriorHotkey < timeout){
IfWinActive ahk_class Vim
{
SetTitleMatchMode, 2
WinGet, Fx,, Firefox
ControlSend,, {F5}, ahk_id %Fx%
WinActivate, ahk_id %Fx%
}
Sleep, 500
}
}

>>230
>126

>126のアクティブ窓の移動とメタボのスクリプトはおしゃれだね。

いちおー不具合修正版
MouseGesture.ahkのツールチップをてきとー改造の説明
ttp://down11.ddo.jp/uploader/download/1221751206499859.HjTjxD?dl
mgahk

mayuと同じ設定にしようとがんばってるけど、
やればやるほどmayuが良くできてると感心しつつ挫折。

mayuは設定を、ahkは処理を書く

昔流行らせるページにあったSandSのスクリプトで、単独でスペースを押していないに
ごくたまにスペースが入ってしまうんだけど、何か良い対処法ってありませんか？

ブラウザー表示部のテキストを取得できないかな

きちんとやるなら、ブラウザ(レンダリングエンジン)のDOMパーサを使わんと無理じゃなかろうか。

Trident(IE)ならWSH、 FireFox(Gecko)なら Javascript Actions とかを呼び出したほうが良さげ。

選択しているアイコンのファイルパスを取得するにはどうしたらいいでしょうか？
このファイルは秀丸で開くとか、ショートカットキーから特定のアプリにファイルパスを渡したいのですが、

エクスプローラーの話なら
アドレスバーからフォルダーパス
ControlでListから選択ファイル名でいけるお

>>240
thx
ちょっと高度な技術がいるのか
勉強してみるか

>>242
241ではないが、同じことをしたいと思ってた。
ヘルプのどこを読めばわかるか、もうちょっと詳しく教えてplz

>>241,244
前に似たようなことを書いたような気もするけど、
適当なサンプル。

SetTitleMatchMode, RegEx
SetEnv, exp, ahk_class (Explore|Cabinet)WClass
WinGetTitle, dir, %exp%
ControlGet, item, List, Selected Col1, SysListView321, %exp%
Loop, Parse, item, `n
{
 SetEnv, fullpath%A_Index%, %dir%\%A_LoopField%
 SetEnv, num, %A_Index%
}
Loop, %num%
{
  str := str . fullpath%A_Index% . "`n"
}
MsgBox, %str%

補足
このサンプルだと、エクスプローラのタイトルバーにフルパスを表示しておかないとダメ。
>>242のようにアドレスバーから持ってきたほうが良いのかも。
マイドキュメントみたいに実パスが出ないのも×
メモ帳の開いているファイル名を取得する方法みたいに、メモリを直接参照すれば
いけるやり方もあるのかもしれない。

できた。Vista用

explorer_selectedfilepath() {
controlget currentdirectory, line, 1, Edit1, A
controlget selectedfilename, list, selected col1, SysListView321, A
if (substr(currentdirectory, -1) != ":\") {
currentdirectory .= "\"
}
return currentdirectory . selectedfilename
}

>>245-246
おっと、かぶったね。ありがとう。

> >>242のようにアドレスバーから持ってきたほうが良いのかも。
> マイドキュメントみたいに実パスが出ないのも×
たしかに。。。
俺のはアドレスバーから持ってきてるけど、やっぱデスクトップは「デスクトップ\」になる罠。
でもデスクトップに作ったフォルダの中ならちゃんと「C:\Users\ユーザ名\Desktop\フォルダ名」になるし、
まあ運用上は問題ないかな。
気になる人がいたら改良してくれ ノシ

だめだ、247は複数選択を考えてなかった orx

#IfWinActive ahk_class CabinetWClass
+Enter:: explorer_openwith("C:\Program Files\Hidemaru\Hidemaru.exe")
#IfWinActive

explorer_openwith(exepath) {
controlget currentdirectory, line, 1, Edit1, A
if (substr(currentdirectory, -1) != ":\") {
currentdirectory .= "\"
}
controlget selectedfilename, list, selected col1, SysListView321, A
loop parse, selectedfilename, `n
{
run % """" . exepath . """ """ . currentdirectory . A_LoopField . """"
}
}

参考になりました。
みなさんのお答えと重複しますが、以下のようにして
XPで無変換+eで選択ファイルを秀丸で起動できました。ありがとうございます

~vk1Dsc07B & e::
controlget currentdirectory, line, 1, Edit1, A
controlget selectedfilename, list, selected col1, SysListView321, A
if (currentdirectory == "") {
currentdirectory = C:\Documents and Settings\UserName\デスクトップ
}
if (substr(currentdirectory, -1) != ":\") {
currentdirectory .= "\"
}
run,C:\Program Files\Hidemaru\Hidemaru.exe %currentdirectory%%selectedfilename%
return

>>239
開いてるURLがわかるなら、URLDownloadToFileが使えないかな？
スレッドの更新チェックに使ってるけど結構便利なコマンドだ。

Ctrl+C押してClipboard見ればテキストでパスを得られるんじゃ

みんなけっこう悩んでるね。俺は原始的に

ブラウザ（IE、FireFoxともにOK）
　F6→ｃｔｒｌC→クリップボード見る

Explorer
　F2→ｃｔｒｌC→ESC→クリップボード見る

でやってて、ほぼ問題なく動いてるけど、なんか逃げてる気がするので、
確実に取り込める方法があったらぜひ知りたい

ウインドウ内の特定のボタン、たとえばExplorerの「上へ」を押すには、どう書けばいいでしょうか。

WinGet, ControlList, ControlList, A

上記コードを実行して、「上へ」を含むControlが「toolbarwindow322」というものに
入っているところまでは、なんとか調べられたのですが、

・そのtoolbarwindow322の「上へ」が該当する送信場所を調べかた
・調べたボタンを押したと認識させる方法

が、自分では理解を超えてしまいました。どう書いたらよいでしょうか。

ベースサンプル：
;（テンキーの1を押したら、アクティブウインドウのExplorerの「上へ」を押す）

Numpad1::
WinGet, ControlList, ControlList, A
msgbox,コントロール一覧`nControlList=%ControlList%

;(追加でコードをここに書く)

msgbox,押したよ
return

Send, {Backspace}
みたいに、単純にボタンに相当するショートカットキーを送る、
ってだけでは解決じゃ無いんだよね・・・

流行らせるページ( http://lukewarm.s101.xrea.com/myscripts/index.html)
にある "Inspecting Toolbar IDs"でいいじゃないかな。

migemo-isearch便利に使わせていただいているのですが、BackSpaceを押したままにすると「find_text failed: 0x80004005」
というエラーが出てAHK自体が固まってしまうようです。
この現象を防止することはできないでしょうか？

>>254
直接ショートカットキーで操作できるやつはショートカットキーを送る、その他はメニューバーからショートカットキー使って順にメニュー選択する、じゃダメなの？
ちなみに余談だが、もしUSBテンキーから操作するならMagicKeyPadおすすめ。
テンキー複数つないでも個別に認識できる。
俺はAHKと組み合わせて使ってる。

>>257
＞ちなみに余談だが、もしUSBテンキーから操作するならMagicKeyPadおすすめ。
＞テンキー複数つないでも個別に認識できる。

うちのUSBテンキー、公式のドライバ入れたらキーが完全にプログラム生成タイプになるんで、
if(GetKeyState(A_ThisHotKey,"P"))で分岐できちゃうからAHKだけで完結してるよ。
複数のUSBテンキー認識とか同時押しとかはちょっと無理っぽいけど、
マウスの移動とクリックしか割り当ててないのでこれで十分。

>>254ですが、明け方まで作業していたせいで、全然違う質問をしていました。

>ウインドウ内の特定のボタン、たとえばExplorerの「上へ」を押すには
じゃなくて、知りたいのは
>ウインドウ内の特定のボタン、たとえばExplorerの「上へ」が押されたかを調べるには

でした。その趣旨で出てきた質問が

>・そのtoolbarwindow322の「上へ」が該当する送信場所を調べかた
>・調べたボタンを押したと認識させる方法

につながります。せっかく答えていただいた方、ほんと申し訳ないです。

やりたいことをもっと具体的に書くと、
LButton::　で左クリを監視しておき、押したボタンが「上へ」のときに
パンくずリストをGUIで表示させ、Vistaみたいに複数階層を飛び越して
戻れるようなインターフェースを考えています。
「上へ」以外が押された際は、通常通りLButtonを送るコードを実行して終わります。

パンくずリストの作成と、GUIの表示は問題なく出来ますので、
あとは「上へ」が押されたかどうかを判別する方法を知りたくて。

ではよろしくお願いします。

>>259
そこそこ作りこんでいるようなので、どうせなら完成させて公開してもらいたいけど、
とりあえずVistaのような機能を取り込みたいだけなら、
QTAddressBarをインストールしたらどうか。

>>260
公開するのは全然かまわないですよ。汚いソースですがお約束します。

QTAddressBarありがとうございます。
http://qttabbar-ja.wikidot.com/local--files/repository/ss_address.png

まさにこのインターフェースですが、横に広げるのではなく縦にPopupで表示させることと、
「上のフォルダを別ウインドウで」という機能を追加したく、Aｈｋで作ってます。

QTAddressBarは便利だったけど結局アンインスコしたなぁ。

理由は、フルパスを表示する設定にしているアドレスバーを見て
色々と動くAHKスクリプトが動かんから。

俺も>>261のが出来たら使ってみたいな。

出来れば、表示フォントが変えられるとうれしい。
ま、無理ならgdi++使うけど。。。

IMEの入力モードをタイトルバー右上に表示(WXG風)　IME.ahk同梱
ttp://lukewarm.s101.xrea.com/up/file/088.zip

MS-IMEだとIMEのON/OFF状態がわかりづらいので作ってみた。
IME.ahkは SandSスクリプトに同梱の IME_Func.ahkを
コピペ & LIBフォルダで使いやすいよう修正したもの

>>227
ATOKはわからないけどWXGは有効、ATOK持ってるなら試してplz

>>238
Inputコマンドで横取りしきれない時にスペース挿入されるっぽいです。
取りこぼし防止にBlockInputを入れてみた。

Shift&Space + IME.ahk
ttp://lukewarm.s101.xrea.com/up/file/089.zip

自分の Shift & Space はこれ。

Space Up:: Send, % "{Shift Up}" (A_TimeSincePriorHotkey < 200 ? " " : "")
+Space:: Send, +{Space}
>+Space:: Return
Space:: RShift

CoordMode, Pixel, Screen
CoordMode, Mouse, Screen
MouseGetPos, MGPX, MGPY
PixelGetColor, PGCRGB, %MGPX%, %MGPY%, RGB
StringMid, DN1, PGCRGB, 3, 2
StringMid, DN2, PGCRGB, 5, 2
StringMid, DN3, PGCRGB, 7, 2
SetEnv, DN1, 0x%DN1%
SetEnv, DN2, 0x%DN2%
SetEnv, DN3, 0x%DN3%
SetFormat, INTEGER, D
DN1 := DN1+0x0
DN2 := DN2+0x0
DN3 := DN3+0x0
MsgBox, RGB : %PGCRGB% `n10進数 : %DN1% %DN2% %DN3%

こんな感じに作ったんですけど
演算を中継しなくても16進数から10進数に変換する方法ありますか？

>>264
そうだ今はRemapがあるんだった。今日一日助長なコードとにらめっこしてた自分ｱﾎｽ
?の条件演算子での値導入はif文使うよりスマートだね。if文ばかり使っちゃうけど行短縮できていいかも

dn1 := PGCRGB // 0x10000
dn2 := (PGCRGB // 0x100) & 0x00FF
dn3 := PGCRGB & 0x0000FF

ちなみに IME 起動はこれ。当方101キー配列で、CapsLock を IME 起動に割りあててる。
2 回押しでオン、1 回押しでオフ。
ワンキーだけどトグルでないので、より明示的でインジケーター等なくてもあまり間違えない。

SC79:: Ime(DoubleKey())

Ime(value)
{
DetectHiddenWindows, On
SendMessage, 0x283,0x006, value,, % "ahk_id "
. DllCall("imm32\ImmGetDefaultIMEWnd", UInt, WinActive("A"), UInt)
DetectHiddenWindows, Off
}

DoubleKey()
{
Return, A_PriorHotKey = A_ThisHotKey
and A_TimeSincePriorHotkey > 50 and A_TimeSincePriorHotkey < 250
}

>>267
ややや、これは凄い
こんなやり方あったんですね勉強します
ありがとう

>>268
キーを打ち込む前に必ずIME ON or OFFする癖が付いてるってことなのかな。
自分はONにしたまま別のウィンドウ操作しに行っちゃって
戻ってきた時にONになってるの忘れてそのまま打ち込んでアウチってなる。

しかし日本語OSでも101キーだと CapsLockもフックかけられるのか、知らんかった。

>>263のIMEの関数に絡めてこんなの作った。
誤作動しても知らんけど
IMEOFFでの誤入力のなんちゃて救済F12キー
IMEONでは今まで通り^tで対応。

start:
gosub, hiskey
sleep, 100
goto, start

hiskey:
IMEmode := IME_GET()
if IMEmode = 1
return
Input, hiskey,L20 T7 V, {F12}{Enter}{TAB}{UP}{DOWN}{LEFT}{RIGHT}{LShift}{RShift}{RButton}{LButton}
stringLen, hiskeylen, hiskey
if Errorlevel = ENDKey:F12
{
send, {BS %hiskeylen%}
sleep,100
send, {vkF3sc029}
send, %hiskey%
}
return

ESC::ExitApp
#ESC::Suspend
^q::
Suspend, OFF
Reload

最後のホットキーはほっといて、
スクリプト作成に使ってたｗ

if Errorlevel = ENDKey:F12
{
stringLen, hiskeylen, hiskey
send, {BS %hiskeylen%}
こう変えたほうが自然だね。あとsleepはいらないと思うけど、一応。
使うなら動作するアプリを制限したほうが良いかも。

inputの終了キーに{Space}は入れたほうが良かった。他もろもろ。

send, {BS %hiskeylen%}{vkF3sc029}%hiskey%
Sendは一行に纏めて問題ないかも。
今度からちゃんと見直してから書き込むわorz

UnicodeなテキストをFileReadで変数に読み込み、その変数をShiftJISに直したいです。

クリップボードを経由して変換する方法が「流行らせるページ」で紹介されています。
http://lukewarm.s101.xrea.com/commands/Transform.htm

が、ファイルを連続処理する用途で使うと、クリップボードの競合が出てしまい、
フォアグラウンドの作業で使っているクリップボードの内容が破壊されてしまいます。

直前に、クリップボードの控えをコピーし、変換が終わったら書き戻す方法で試しましたが、
それでもミスがでてしまいます。

クリップボードを経由しないで、unicode-shift-jis変換する方法はないでしょうか。

nkf

じゃ、qkcも。DllCallで使えそう
ttp://www.vector.co.jp/soft/win95/util/se295331.html?site=n

Sendでショートカットキー入力させるのがうまくいかなかったけど文字を小文字にしたらあっさりできた
流行らせるページにはそのこと書いてなかったけどこれって常識なのか

少し考えれば分かるよ

>>271
試してみたけど意外と面白い。自分が使うとするとこんな感じかな。

autoexecute_section:
SetTimer,HistoryKeysTimer,ON
return

HistoryKeysTimer:
Input, hiskey,L20 T7 V, {F12}{Enter}{TAB}{UP}{DOWN}{LEFT}{RIGHT}{LShift}{RShift}{RButton}{LButton}{Space}
if (Errorlevel = "ENDKey:F12") & GetKeyState("CTRL","P") ; [Ctrl]+[F12]で発動
{
IME_SET(~IME_GET() &0x01) ;IMEトグル（キーバインド変えてるので[半/全]以外でも使えるように)
send, {BS strlen(hiskey)}%hiskey%
}
return

ON/OFF双方向でも差し障りなさそうなので判定部分はカット。
ただアウチってなった瞬間に条件反射で左手がESC押しに行ってるので
救済機能あっても間に合わないかも。

>>279
やっぱsettimerでしたね。GetKeyStateはいい。
F12はやめて好みの修飾キー+[半/全]にしたらいいかも。どうせIMEのキーを押すし。
Input, hiskey,L20 T7 V, {vkF3}{vkF4}{Enter}{TAB}{UP}{DOWN}{LEFT}{RIGHT}{LShift}{RShift}{RButton}{LButton}{Space}
if (Errorlevel = "EndKey:半角/全角") & GetKeyState("CTRL","P") ; [Ctrl]+[EndKey:半角/全角]で発動

send,% "{BS "strlen(hiskey)"}"hiskeyにしないとダメっぽかった。

あと、ローマ字入力だと打ち込んだ英語分削除されちゃうんだよね。
もしかして親指シフト使ってます？
打ち込んだ後にIME判定してONだとESC送るってのもあるか…

ああ、BS送信はIMEトグルの前じゃないとシーケンス的におかしいな。
うちでは何故か問題なく動いているが

遠隔地のPCにVNCをインストールするスクリプトを書いていて
インストール途中のチェックボックスをONにする処理で躓いています。

「サービスとしてインストール」や「拡張子.vncを関連付け」等の
全部で4つあるチェックボックスを全てONにしたいのですが、
なぜか4つともClassNNが同じ(TNewCheckListBox1)で
Control, Check, , TNewCheckListBox1, ahk_id %hogehoge%　としても
まるで反応がなく、困っております。

こういった場合はどう書けばよろしいのでしょうか

>>282
Send,{Space}{Tab}{Space}…
でいいんじゃない？

exe化したものって自由に使って良いってあるけど、GPLに縛られないってことなのかなぁ

一種のコンパイラと考えるとgccで作ったものを売るのと特にかわりはないな。
いや、ちゃんとライセンス読んでないからわからんけど。

タスクトレイにあるプロセスを終了させたいのですが、
　　タスクトレイのアイコンを右クリック→終了を選択
と同じ処理をさせる方法はないでしょうか？

ときどきタスクの再起動が必要になる場合があるのですが（勝手にシフトロックかかる）、
以下のようにProcess, Closeでプロセスを殺すと、
XPごと落ちてしまうこともあるので、別の方法を探しています

~vk1Dsc07B & k::
Process, Close, mayu.exe
run,C:\apps\mayu\mayu.exe
return

>>286
つttp://appletkan.com/nshell.htm

「のどか」以外にも「窓使いの憂鬱」の終了が出来る。引数3。

>>283
返信ありがとうございます、完全新規インストールの場合はそちらの方法でいけそうです。

しかし、どうも旧バージョンがインストール済の場合はチェックボックスの初期値が
PC毎にバラバラになるようで、今のところ座標指定で背景色を調べてON/OFFをチェックした後
SPACEをSENDするかどうかを判断するしかないのかと思っています。

OSの種類や設定されているテーマに左右されそうで出来れば避けたいところなのですが・・・

なんのソフトだかわからんが管理人さんの「タスクトレイアイコン操作」じゃ無理なのか？
http://lukewarm.s101.xrea.com/myscripts/index.html

AHKスクリプトを、1台のマシンで何個か走らせてると、
タスクマネージャの表記が全部「autohotkey.exe」になって、
どのスクリプトが、どれだけリソースを食ってるのか判別しにくい。

タスクマネージャ上の実行ファイルの名称を「autohotkey.exe」以外に
変えられれば判別できるし、processコマンドで存在確認も取れるのだけど、
変える方法って、なにか無いですかね？

autohotkey.exeをコピーしてリネーム。
それぞれランチャーで起動。

そういや、トラぶった非常駐スクリプトをプロセスから殺すと
常駐のも逝ってしまうから面倒なんだよな
非常駐系は別名にして走らせると分かりやすくなるかもなあ
今はqt0で丸ごと再起動してるけど

他プロセスのコマンドラインを得る方法はある

常駐用の実行ファイル名は同フォルダにリネームしていれててもいいかもね。
どっちにしろAutoHotkey.iniを読み込むし。

autoHotkeyのemEditor定義ファイル(ahk.esy)、いまどこかダウンロードできるところないでしょうか

>>291
ありがと。こんなイイ方法があったとは。

スクリプトごとに毎回リネームするのは面倒なので、
実行ファイル名を自動的に変えるバッチを作ってみた。

スクリプトを、このバッチにD&Dさせて起動すると、自動的にAutoHotkey.exeを
（スクリプト名から.ahk拡張子を除いた名称）.exeでコピーし、
ファイル名の変わった実行ファイルからスクリプトを起動させる。

AHK実行.bat
−−−−−−−−−−−−−−−−−−−−
copy AutoHotkey.exe %~d1%~p1%~n1.exe
start "" "%~d1%~p1%~n1.exe" %1
−−−−−−−−−−−−−−−−−−−−

手間もかからず、プロセスの判別も出来てGoodな感じ。

難点は、フォルダ内に無駄なexeが増えることか。
増えたexeを清掃する方法か、そもそもexeをコピーしないで
済む方法があれば、どなたか追記お願いします。

\_AutoHotkey\Extras\Editors\EmEditor の中にあるだろ

>>297 ありがとうございます
アプリのフォルダ内に既にあったとは

FFFTPのリスト上で
----------------------------------
ControlGetFocus, NowFocus , A
Control, Choose, 3, %NowFocus%, A
----------------------------------
をやってもリストが選択されないのですが、どこか間違っていますでしょうか。

まずリストにフォーカス当てろよ

マウスクリックでフォーカスをあててから上を実行しているのですが、
うまくいかないです。Control,Disableは動作するのですが…。

試してみたがlistviewはダメなのかもな
3番目のテキストを取得とかは出来るが…

最悪
Send, {Home}{Down}{Down}

そもそもFFFTPを制御って、なにがやりたいのかな？

FFFTPは起動オプションが豊富で自動巡回も出来るし、
どんな用途でAHK制御させたいのかが気になる

>>302
その方法がありましたか。しかしできれば避けたい

>>303
ローカル側で選択しているファイルと同名のファイルがホスト側にあったら
選択にする、ということをやりたいのです。
そうすれば必要なファイルをすぐに選択状態にできて便利です。

AutoHotkey.exeをコピーしてリネームするくらいならAhk2Exe.exeでコンパイルしろっていう

自分も思ったがそれは言わないお約束なんじゃね

AHK修正するたびにコンパイルし直す方が面倒だろっていう

Ahk2Exeはコマンドライン対応してるし、batかAHKで組んじゃえばいいよ。
(待ち時間を考えるとコピー&リネームのバッチ走らせるよりは多少はもたつくかも知れんが。）
自分は秀丸マクロでやってるが編集中ファイルを即exe化できて便利だよ

exe化後に即試行したいなら、Ahk2ExeをRunWaitで実行後、できたexeを起動する処理を追加
実行後にデリートしたいなら、RunWaitでexe起動後に、FileDeleteすればいい。

exe用に少し書き換えるのも面倒だしな。
一長一短ってやつだわ。

windowsって実行中のファイル削除できないんだっけ？

バッチ中でスクリプトとexe化した方のタイムスタンプ見て、
スクリプトの方が新しいときに ahk2exe で exe を最新化。

で、いいんじゃねーの？

>>296
へぼ関数

RenameExe()
{
#SingleInstance force
StringRight, Ahkexe, A_ahkPath, 14
if Ahkexe != AutoHotkey.exe
return

StringTrimRight, A_AhkDir, A_AhkPath, 15
FileCopy, %A_AhkPath%, %A_AhkDir%\AHK-%A_ScriptName%, 1
sleep,1000
Rexe = %A_AhkDir%\AHK-%A_ScriptName%

sub:
if(FileExist(Rexe)){
run, "%A_AhkDir%\AHK-%A_ScriptName%" "%A_ScriptFullPath%" ;%1% %2% %3%
}
else{
sleep, 2000
gosub,sub
}
}

GUIのボタンを押したときにスクリプトを動かしたいのですが、どうしたら良いのですか？
検索のヒントだけでもよろしくお願いします。

>>312
ありがと。これはイイ。
正常動作を確認し、我が常設お気に入りスクリプトに追加しました。

Windowsって、拡張子をexeにしなくても、シェルにファイル名を全部渡せば
実行ファイルとして動くんだね。DOS時代から使っておきながら、はじめて知ったよ。

解決しました。ここを見てたらわかりました。
http://principia.s54.xrea.com/index.php?AutoHotkey%20%A5%E1%A5%E2

autohotkeyでcase文ってどうやって書くの？
ifのみ？

そう

あ、Gosubのラベルに変数の値を使うことで擬似的にcaseみたくできなくもない
邪道だけど、、、

Loop, 4 {
　; 変数値に該当するサブルーチンがあれば飛ぶ
　subname := "case_value_is_" . A_Index
　if (IsLabel(subname)) {
　　Gosub, %subname% 　
　} else {
　　MsgBox, 該当処理なし ; 合致するサブルーチンが無いとき
　}
}

return

case_value_is_1:
　MsgBox, 値は 1 だ
　return

case_value_is_2:
　MsgBox, the value is two
　return

case_value_is_3:
　MsgBox, value = 3.
　return

>>314
え？何か凄いセキュリティホール？

>Windowsって、拡張子をexeにしなくても、シェルにファイル名を全部渡せば
>実行ファイルとして動くんだね。

これって本当？

うん、俺もやってみたけど本当に動いた
多分ヘッダだけ見て拡張子は見てないんじゃない？
これはもの凄いセキュリティーバグだな

これは恐ろしい。本当に何でも動く。

AutoHotkey.exeをコピーし、readme.txtにリネーム。
下記の「クリックしてね.bat」を作る。

クリックしてね.batの内容
readme.txt

↑この1行だけ。

この2つを作成し、クリックしてね.bat　をexplorerでクリックしたら、
readme.txtという名前の実行ファイル（AutoHotkey.exeのコピー）を実行できてしまった。

これってMS製OSの常識なの？　使い方によっては、かなり恐ろしい気がするのだが。

タスクマネージャーにはなんて出るの

>>323
なんと「readme.txt」がタスクマネージャにいるんだぜ。
これはマジで気持ち悪すぎる。

そもそも、>>312氏が書いてくれたスクリプトをそのまま動かしたら、
「***.ahk」っていうタスクが出てきて、あれ、exeはどこだと不思議に思ったのが発端。

explorerを介さない起動なら、拡張子は問わないというのがMSの仕様なのか。

もしかして天然様やっちまった、俺？
就職できるかな？

ほんとだ。txtでもできた。拡張子なしだと無理っぽい？

unix系ならそもそも拡張子関係ないんだけど
windowsでこれができるとなんかセキュリティ上問題あるかな？

単純に>>322のクリックしてねの中身を見ると、テキストファイルを開くのかなって思うな。
まあbatなんてなかなかクリックしないだろうけど、遊び心でクリックしてしまうかもｗ
初心者限定じゃなく、ある程度知識があると逆に引っかかりそう。

これがバグっぽくて修正でもされたら、なんか感動するわｗ

拡張子が　com exe　のファイルだけウイルススキャンする環境だと、楽勝ですり抜けるね。
ある意味、キンタマウイルスよりも怖い。

うーん、あんまり悪用できそうなこと思いつかんなあ。アンチウイルスソフトだと拡張子関係なく見るだろうし。

さすがにMSも知ってそうだがな。
どうせ仕様なんだろう。
単純なだけに逆に危ないな、気を付けよう…

まあ、拡張子なんてお飾りだしね。一種の符号みたいなものか。
ダブルスタンダードっぽくなるから紛らわしいけどね。

仕様か…対応するにも根が深いかもね。

DOS shellはファイルの先頭がMZから始まるものはexeだと認識する
(詳しくは"EXEフォーマット"でwikipedia参照)
試しに先頭がMZから始まるテキストファイルa.txtを作って、コマンドプロンプトからa.txtと入力するとバイナリだと思って実行しようとする

Windows上では拡張子が優先されるので、偽装ファイルをダブルクリックしても関連付けられたアプリが起動するだけだし、
batなどの他の実行ファイル経由でないと実行されることはないので、それほど実害はないんじゃね

すれ違いな質問かもしれませんが・・・
Google Chrome で
    WinSet, Topmost, Toggle, A
としても最前面になりません。
なんとかならないものでしょうか。

>>333
どうやってそのAHKを実行してるかによる。

ところで皆さん、>>333をコピペしたらスペースが&%160;って出るんだけど･･･

間違えたw&#と160;をつなげた奴。

なんか・・・大丈夫なのか・・・？

nbspでググってください…

webページ見てるとき503になったら3秒後に自動で更新させるスクリプトはどうやって書けばいいの？
教えて

まず、なぜ503がでるのかを理解し、それでもそれをやりたいと思ったなら、自分でやれ。

>>337
おおっ、常識臭がぷんぷんしてきましたorz
>>339
回線が不安定なんじゃないかな？

>>290に軽く触発され、前スレで教授してもらった782を参考にして作りました。
タスクトレイがすっきりできると思われます。中身は汚いけど。
我ながら便利かと…使うかどうかは別として
ttp://down11.ddo.jp/uploader/download/1223098537237787.dYpvwp?dl
もうちょい改良するかな？強制終了とか

またやっちまったorz見直すの忘れた。
パスはmgahk

503は鯖が過負荷で死んでると言う悲鳴だ
そこへリロード連射したらどうなるかぐらい考えれ

CTRLキーを押している間だけF12キーを一度押された状態に保ち、
離すとF12を二回押しするようなスクリプトを作りたいのですが、
CTRLを押し続けるとF12が何度も入力されてしまい困っています。

とりあえず書いてみたのは↓なのですが、
どこをどうすれば希望の挙動になるのか、どなたか教えていただけませんか。。
LCTRL::send,{F12}
LCTRL Up::send,{F12 2}

>>343
まず希望の動作がわからん。
Ctrl押し下げで、F12を押して離すを1回。
Ctrlを離したら、F12を押して離すを2回って事？

KeyWait

Ctrl+:
でタブキーを送りたいのですが、

^:::
send,{Tab}
return

では何も起こりません。
:をエスケープする必要があるのかと思い

^`:::
も試しましたがこちらもダメでした。
動作させるにはどうすれば良いのでしょうか？

8OvGbH The glossy, reflective black fascia is technology borrowed from the more traditionally luxurious car market, http://freshmesh.cn/mariettapizzakitchenwebsite.html Marietta Pizza Kitchen Web Site
, 687328, http://freshkesh.cn/fungswayexplanation.html Fung Sway Explanation
, jfed, http://freshkesh.cn/blakemusick.html Blake Musick
, 276, http://freshmesh.cn/waverlyholidaytournament.html Waverly Holiday Tournament
, mbsmd, http://freshkesh.cn/valleycourieralamosacolo.html Valley Courier Alamosa Colo
, %DD, http://freshoesh.cn/audiovoxheadrestvideopackage.html Audiovox Headrest Video Package
, yose, http://freshmesh.cn/pongotwilightsoundagain.html Pongo Twilight Sound Again
, 473, http://freshkesh.cn/oleyvalleyhighschool.html Oley Valley High School
, :-((, http://freshmesh.cn/ginaraddatz.html Gina Raddatz
, :-D, http://freshsesh.cn/taharibyarthurlevine.html Tahari By Arthur Levine
, oqetoc, http://freshlesh.cn/powershifttransmissiontesting.html Powershift Transmission Testing
, 128, http://freshresh.cn/pocketholejoinery.html Pocket Hole Joinery
, cyqik, http://freshpesh.cn/gulfcoastbacteriaindogs.html Gulf Coast Bacteria In Dogs
, odihc, http://freshtesh.cn/taionlyrics.html Taion Lyrics
, cdqxga, http://freshpesh.cn/psbank.html Psbank
, thhzua, http://freshqesh.cn/averyberkellabels.html Avery Berkel Labels
, qimcv, http://freshsesh.cn/laurenwillig.html Lauren Willig
, xduq, http://freshresh.cn/andrewalbertpizza.html Andrew Albert Pizza
, ljl, http://freshpesh.cn/anabethgish.html Anabeth Gish
, 339,

>>344
あ、おっしゃる通りです。わかりづらくてすいません……

>>355
keywaitを拙い知識で利用してみたのですが、
やはり押し下げ時の動作がリピートされてしまうようです……
LCTRL::
keywait, LCTRL, D
send,{F12}
return

LCTRL Up::send,{F12 2}
ではダメなのでしょうか？

>>346

AutoHotkeyを流行らせるページ → キーリスト → キーコードによる指定

^sc028::
send, {TAB}
return

>>348
keywait, LCTRL, D
これだと押した瞬間一気にReturnまで進んじゃうよ。
Sendの後にに
keywait, LCTRL,もしくは
keywait, LCTRL, U
でキーアップを待って
send,{F12 2}
を送りましょう。

>>349
できました！ありがとうございます！

>>350
ありがとうございます！
複数行のスクリプトを作るのは初めてだったのですが、
アドバイス通りに
LCTRL::
keywait, LCTRL, D
send,{F12}
keywait, LCTRL
send,{F12 2}
としたら希望の挙動になりました！　ありがとうございます<(_ _)>

いちおー完成
AHKon/offスクリプト修正版
ttp://down11.ddo.jp/uploader/download/1223180574499589.MGe39U?dl
mgahk

初めまして。
同人ゲームにてワンボタンで必殺技を発動できるよう試行錯誤しています。
1に2を割り当てたいのですが

1::2
では問題なく動作するのですが

1::
send,{2 down}{2 up}
return
だと動作しません。(sleepやdelayも使ってみましたがピクリともしませんでした)
3行程程のコマンドを盛り込みたいのでsendを使って組みたいところなのですが、
なぜ後者だとダメなのか、御教授いただけませんでしょうか。

あいだにsleep入れてみたら？

テンキーの1を必死になって押してるとかいうオチじゃなくて？

レス有難うございます。
携帯より失礼します。
>>355
upとdownの間に2桁〜4桁のsleepをいくつか試して見ましたがダメでした。
>>356
1::2やメモ帳での確認ではきちんと動作するので間違えてはいないはずです。

連続で失礼します。
sleepによるディレイもメモ帳で確認済みです。

俺の出来たぽ。1.0.47.5

SendModeとかその辺じゃね？

>>358
メモ帳でってのは何を指していってんの？
1::send,{2 down}{2 up} がメモ帳では動くが 該当ソフトでは上手くいかないってことなら
自分で試行錯誤するしかないんじゃね。
そんな限定的な内容（しかも対象が同人ソフト）じゃ代わりに試してやれる奴もいないだろう

>>360
いくつか試してみようと思います。
ありがとうございます。
>>361
このような簡単なスクリプトなのに思い通りにいかないので、
何か初歩的なミスを犯しているのではと思い質問させていただきました。
ちなみにゲーム名は東方緋想天　コマンドは波動拳コマンドでした。
考え方は間違っていないようなので、引き続き試行錯誤してみます。
レスをくれた皆様、ありがとうございました。

>>354
SetKeyDelayでdelayを増やすといいかも
以前X68エミュレータでのキーの取りこぼしがこれで改善した

ToolTipやTrayTip上に画像も表示したいのですが、
拡張の方法ってないでしょうか？

Hi all!!! A fantastic site, and brilliant effort. gold Hope it will always be alive! http://farmer19.hothostcity.com/gold8593.html gold the, http://20480.myhosting247.com/gold9027.html gold, Best Wishes

凡ミスで糞だったorz
ttp://down11.ddo.jp/uploader/download/1223269173979117.NCLgW2?dl

すみません、教えてください
カレントウィンドウにOKのコマンドを送るにはどうしたらいいでしょうか？
たとえば、下のように、Ctrl+Alt+M でメッセージボックスを表示させたあと、
Ctrl+Alt+Yを押してもメッセージボックスが消えません

!^Y::PostMessage, 274, 1, 0, , A
!^M::MsgBox, OKTest

ＯＫボタンにフォーカスが当たってないような場合に、
キーボードからＯＫを送信できるようにしたいのですが・・

ControlClick, OK, 「ウインドウ名」

以上

ahkファイルをAhk2Exe.exeにドラッグしても、パラメーターつけろと怒られますが、
AutoHotKey自身で、ドラッグするとahkファイルのあるフォルダにexeを作ってくれる
ソフトは作れますか。

>>367
>PostMessage, 274, 1, 0, , A
wParamに 1なんてパラメータ設定ないみたいだけど
WM_SYSCOMMANDってこういう使い方するんだっけ？
てか数値からメッセージ名逆引きするのは大変なんだから（しかも10進表記だし)
助言が欲しいなら、定義名なり何をやろうとしてるかなり、コメントに入れてくれんか

アクティブウィンドウ限定の条件だったら
[OK] → Send,{Enter} or {ESC}
[はい(Y)] [いいえ(N)] → Send,^y
でいいんじゃないの？

>>369
password := "" ; User Setting

scrPath = %1%
StringReplace,ahk2exe,A_AhkPath,autohotkey.exe,Compiler\Ahk2Exe.exe

;カレントにスクリプトと同名のアイコンファイルがある時は指定する
StringReplace,iconPath,scrPath,.ahk,.ico
ifexist %iconPath%
opt := " /icon " . iconPath

;パスワードが有効なら指定する
if (password != "")
opt := opt . " /pass " . password

Run,%ahk2exe% /in %scrPath% %opt%
return

>>371
素晴らしい、完璧です。

exeにドロップされたファイルのパス名って、scrPathで読み込んでるんですか？

エクスプローラーで特定フォルダをフォルダツリー付きで開きたいのですが
↓のように書いても c:\ が開かれてしまうのはなぜでしょうか？

#c:: Run, explorer /e,c:\tmp

志村ー、エスケープ、エスケープ！！

,をエスケープしてないから

>>374>>375
あぁデフォルトのエスケープ文字は「`」でしたか
「\」入れて悩んでましたorz

指定のプログラムが起動しているときにWin+F8を押したら、そのプログラムをアクティブにして
ショートカットキー（F4）を押すというスクリプトを書いているのですが、たまにアクティブにならないことがあります。
日本語の解説サイトをよく見たのですが、どうにも原因が判りません。

#F8::
DetectHiddenWindows,On
Process,Exist,実行ファイル.exe
If ErrorLevel<>0
{
el:=ErrorLevel
WinActivate,ahk_pid %el%
WinWaitActive,ahk_pid %el%
Send,{F4}
}
return

とりあえず
#WinActivateForce

また、Processでも起動中なのにIDが0になることはたまにある
（こちらの環境ではオミトロンで起こる）

>>378
ｻﾝｸｽ。それを入れて試してみます。
もしくはプロセスIDがアクティブにならなかったタイミングだけ0になっている可能性ということですね。

アクティブにしなくても
WinClose使えば良いんじゃないの？

送ってるのは!{F4}じゃなくて{F4}だろ。

DetectHiddenWindowsを入れてるってことは非表示プロセスなのかな。
非表示ウィンドウをアクティブにするってできるんだっけ？
Process,ExistでPID取るより固定値(titleやahk_class)でやったほうが確実っぽい気もする。

F4送ってからアクティブにするとかどうだろう。変わらないかもしれないけども。

特定の拡張子のファイル以外を削除するっていう除外指定のコマンドが分からない

だから？

教えてくださりませんか
*.*[^(ini)]
ってやってみたんですが

loopしてifで分けろ

よく分からなかったので
loop,(file)と組み合わせて特定のファイルだけ読み取り属性に変えてからオール削除して読み取りを外す方法にしました

そのloop内で読専フラグつけるファイルはﾇﾙｰ、フラグ付けないファイルは delete で終わりじゃん。

流行らせるページにある日本語で正規表現を使うBREGEXP.ahkなのですが、どうも挙動がわかりません。

RegExpMatch(Target,"(.*)","k","Result")
として、ループを回すと

Target→Result

あいう→あいう
えおかき→えおかき

ここまではOKですが、続けると

くけこ→くけこき
さ→さけこき
と前回の分のゴミがのってしまいます。
どうすればいいんでしょうか。

それは、日本語の2バイト処理がうまくいってない症状な気がする。
2バイトに対応した改造版AutoHotkey がどっかにあるから、探して様子見するとか

ahk2exe.exeといえばコマンドラインの最後の[/NoDecompile]はどういった
もので何を指定するんだろうか？

コパパイルしたものを、スクリプトファイルに戻せなくするんじゃね？
知らんけど。

>>391
バイナリにした後、逆汗もとい逆スク禁止みたいなコマンドなんじゃないの？
実際、それをやって、どれくらい抑止に繋がるんだろうか。

>In v1.0.46.10+, the /NoDecompile switch (if present) prevents exe2ahk
>from being able to decompile the script even when the correct password is given.
>This provides an additional layer of protection that goes beyond having a long, elaborate password.

エキサイト翻訳↓
v1.0.46.10+では、/NoDecompileスイッチ(存在しているなら)は、正しいパスワードを与えるときさえ、
exe2ahkがスクリプトを逆コンパイルできるのを防ぎます。
これは長くて、精巧なパスワードを持ちながら越えられる追加層の保護を提供します。

>>394
乙。まとめると

(1)　コンパイル（ahk2exe）実行時、/pass＊＊＊　をつけると、パスワードを知らないと逆コンパイルできない
(2)　逆コンパイルプログラム（exe2ahk）に正規のパスワードを入れると、スクリプトを取り出せる（exe→ahk）
(3)　(2)を絶対にやられたくないとき、コンパイル実行時（ahk→exe）に/NoDecompileをつける。
　　　すると、(2)でデコードするとき、たとえパスワードがあっていてもデコードは不可能になる

で合ってるかな。

>>395
/NoDecompileをつけてやってみたら
Read: The following error occurred: FileNotFound
となったのでそのとおりなんだと思う
このオプションだけGUIに無いんで疑問に思ってた
ありがと

wininet.dllを使用してサーバーから時刻を取得したいと考えサンプルを探したのですが、
FTPでのファイル送信の物しか見つかりませんでした。
VBAでのサンプルなら見つかったのでEXCELで試したところ、取得出来ませんでした。
どなたかご助力お願いいたします。

VBAのサンプルもまともに動かせられないスキルで一からAHKで作るのは難しいんじゃね

Delphi 使えるならこの辺コピペするのが早いと思う
http://www.geocities.jp/teamhasebe/prgrming/delphi/tips/httpdate.htm

VABだったらこれに HttpQueryInfo足せばできる。
http://hp.vector.co.jp/authors/VA014315/vbdown.htm

HttpQueryInfoの定義方法はこの辺
http://www.happy2-island.com/access/gogo03/capter90402.shtml

どうしてもAHKでやりたいなら、DllCall()で
InternetOpen, InternetOpenUrl, HttpQueryInfo, InternetCloseHandle
あたり使えばたぶんOK、構造体はないから比較的楽にできるんじゃね

>>377ですが>>378の方法では駄目でした（なおもたまにアクティブにならないことがある）。
>>381が挙げたように固定値で試してみます。

ahkをコンパイル後、exeで配布したいのだけど、ウイルス扱いになってしまう。
渡した人の多くが「ウイルスって出た！！どーしよどーしよ」と青ざめた声で電話してくる。

たとえば反応したソフト

「ソースネクスト　ウイルスセキュリティ」
Trojan-Spy.Win32.Agent.bga

相手先のパソコンは自分のではないから、ソフトを換えてくれとは言えない。
なにかよい対策ないでしょうかね。

スクリプトで渡せばいいじゃん。
AHKのインストールくらいはさすがに出来るだろう。

中のスクリプトをさわられると困るから、ahkのまま配布は出来ないのよ。

AHKって引数渡して戻り値返す的な使い方には向いていないんですか？

無変換キーをトリガにして以下の様な記述をしているのですが、無変換キーが押し続けられてると認識する
事があります。
どういったタイミングでなるか分かりません…何が原因なのでしょうか? よろしくお願いします。

vk1Dsc07B & h::
{
if (GetKeyState("Shift","P"))
Send,+{Left}
else
Send,{Left}
return
}

vk1Dsc07B::Send,{vk1Dsc07B}

>>402
少し書き換えれば？

>>404
これだけでいいよ。
~vk1Dsc07B & h::
if (GetKeyState("Shift","P"))
Send,+{Left}
else
Send,{Left}
return

>>404 動かすなら↑の通り。
最後の行をどうしても有効化したいなら、修飾シンボル「$」を使う。

>>406,407
ありがとうございます。　助かりました !

>>405
横からお邪魔しますが、内容によってウィルス判定されたりされなかったりするの？
小物を配布してるんだけど、たまにアンチウィルスが反応したって報告が来るのよ。

昔からウィルス判定くらうって話あるから俺は気にしてないな。
気になる人はデコンパイルして見るだろう。
分からない人のためにソースも同時公開しておけば良いんじゃね。

Alt+Escでタスク切り替えする際、最小化されてるウインドウは表示されませんが、
Alt+Ecsを押す度に実際のウインドウを見ながらタスク切り替えをしたいので、最
小化されているウインドウが選択された時は元のサイズに自動的に戻して表示す
る様にしたいです。

選択されたウインドウが最小化されている場合、Alt+Escの後にEnterを押せば元
のサイズに戻るのですが、単純に下の様に書いてしまうと、最小化されていなか
ったウインドウには当然Enterが送られてしまいます。

LAlt & Esc::
send,!{Esc}{Enter}
Return


Alt+Escで選択されたウインドウの指定ができれば、最小化されている時にだけEnter
を押すとか、元のサイズに戻す様に書けばいいのでしょうが、Alt+Escを押してタスク
バー上で選択されたウインドウの情報の取得方法が判りません。
Alt+Escを押してタスクバー上で選択されたウインドウの情報は、どうやって取得すれ
ば良いのでしょうか？

選択された段階でアクティブになってるわけで、
アクティブウィンドウの情報取得したら良いんじゃないかな。

>>411
こんな感じかなぁ…
[Alt] + [Esc] 押下で切り替わったアクティブウィンドウの状態を見て最小化してたら最小化を解除。

キー押下後はタイマじゃなくて WinWaitNotActive だと思うんだけど
うまく動かんから、100ms待つようにした。


~!Esc::
　SetTimer, HOGE, 100
　return

HOGE:
　SetTimer, HOGE, off
　WinGet, state, MinMax, A
　If (state < 0) {
　　WinRestore, A
　}
　return

>>412,>>413
THXです。
Alt＋Escで切り替えた時に最小化されてないウィンドウが表示されてもタイトルバーは濃い青色にならないので、てっきりその時点でアクティブになってる訳ではないのかと思ってました。orz
後で試してみますね。

試してみたら、最小化状態ではAlt+Escで選択されない窓もあるみたいだね。
選択されたウィンドウなら操作可能だけど、違うなら全ての窓情報を取得しなきゃならないし

面倒だから一回全ての窓を元に戻してしまう案を提示。
~!Esc::WinMinimizeAllUndo

397です
VBAでのサンプルを参考に以下のものを作りましたがVBAの場合と同様に
"HttpSendRequestA"の戻り値が0(false)になります
どこがいけないのでしょうか

Server := "http://www3.nict.go.jp/cgi-bin/JST.pl"
Url := "/cgi-bin/JST.pl"
Buff =
VarSetCapacity(Buff, 4096)

Hnd0 := DllCall("wininet\InternetOpenA", "str", "", "UInt", 0, "str", "", "str", "", "uint", 0)
Hnd1 := DllCall("wininet\InternetConnectA", "uint", Hnd0, "str", Server, "uint", 80, "str", "", "str", "", "uint" , 3, "uint", 0, "uint", 0)
Hnd2 := DllCall("wininet\HttpOpenRequestA", "uint", Hnd1, "str", "GET", "str", Server, "str", "HTTP/1.1",
"str", "", "uint", 0, "uint", 0, "uint", &H80000000)
ret := DllCall("wininet\HttpSendRequestA", "uint", Hnd2, "str", "", "uint", 0, "str", "", "uint", 0)
ret := DllCall("wininet\HttpQueryInfoA", "uint", Hnd2, "uint", 9, "str", Buff, "uint", 4096, "uint", 0)
ret := DllCall("wininet\InternetCloseHandle", "uint", Hnd0)

>>415
ありがとです。
少し試してみましたが、WinMinimizeAllUndoだと元のサイズに戻らないですね。
流行らせるページ見るとWinMinimizeAllで最小化したのを元に戻すとなってるので、普通に最小化したのはダメなのかな…。
ちなみに、一旦WinMinimizeAllしてからWinMinimizeAllUndoしてみたけどグダグダでした。w
>>413をベースにタイマー無しで処理が速くてかつ確実に動く方法を模索してみます。

ntp を時刻同期以外の目的で利用する意味が分からん。
ま〜、ahkのコマンドだけでntp時刻取りたいなら、インチキくさいけど出来なくもない。
file i/o の分遅くなりそうだけど

参考) ttp://www2.nict.go.jp/w/w114/tsp/PubNtp/clients.html


ntp_url := "http://ntp-b1.nict.go.jp/cgi-bin/ntp"
tmp_file := "$$ntp." . A_Now

AutoTrim, On
URLDownloadToFile, %ntp_url%, %tmp_file%
if (ERRORLEVEL == 0) {
　FileRead, data, %tmp_file%
　Loop, READ, %tmp_file%
　{
　　if (A_Index = 4) {
　　　ntp := A_LoopReadLine
　　　break
　　}
　}
　FileDelete, %tmp_file%
}

MsgBox, %ntp%

>>416
最初の行の InternetOpenA以外全部 0が帰ってきているみたいだが？
つか InternetOpenUrl 使うのじゃあかんのか？ VBAではそれで読めていたが。

Alt+Escの件、とりあえずこんな風にしてみました。
問題無く動いてます。

Lalt & Esc::
WinGetTitle, Actvnow, A
Send,!{Esc}
WinWaitNotActive, %Actvnow%
WinGet, state, MinMax, A
If (state < 0) {
WinRestore, A
}
return

>>420
いただきﾏｽﾀ

便乗だけど、「URLDownloadToFile」を使って、ウェブサーバのデータを落とすとき、
接続先のサーバの応答がないと、スクリプト全体が、全く応答なしになっちゃうよね。

できればタイムアウト時間を指定したいのだけど、なにかうまい回避策ないですか？

ダウン用のAHKを単体で作って
EXE化でもしてプロセスを指定秒数で落とす

まぁ、スレッド殺すとかはできんしね。やろうとすると例外処理とか面倒そうだし
つか、スレッドプログラミングするなら他の言語使った方がいいわな

強いて言えば・・・

- URLDownloadToFile に第３引数をとるようにしてタイムアウトまでの ms 指定が出来るようにする
- 200(OK) 以外の HTTPのステータスコードを ERRORLEVEL にセットする

って感じの要望挙げるとかかねぇ

>>419
Hnd0-Hnd2は全て異なる８桁の整数値が戻っているので、
ここまでは成功していると思っています
引数の内容から見て問題が起きる余地がなさそうな"HttpSendRequestA"で
失敗しいているのでわけがわからないのです
>>418
時刻同期の目的で利用するつもりでした
もともとは一切非表示で時刻を修正しすぐに終了するソフトがほしかったのです
桜時計をHideを指定して起動してもウィンドウが表示されてしまうので、
自分で作ろうと思ったのです
ところが、最初に書きこんでからどこが悪いのか調べる過程で
NALTと言うソフトなら可能なことを知ってしまったので、
もう作る必要はなくなってしまいました(私が馬鹿でした)
ですが>>398さんのいわれるように、構造体も使われていないものすら
扱えないようではどうにもならないので調べ続けました
今はただ理由が知りたいだけなのです

>>421
初心者ですのではたして変数の使い方とか合ってるのかどうか…

おかしい点あれば教えてくださいませ〜。

ttp://lukewarm.s101.xrea.com/commands/ImageSearch.htmlを使おうとしたんですが
左上からの座標ってどこで調べられます？

WindowSpy(AU3_Spy.exe)ってのがついてくるし、
後はMouseGetPosのsampleも使えるだろう。

>>428
うおｗwindows spyすげえ
ありがとうございます。　

>>425
DllCall()で結果が帰ってくるまでに時間掛かるような場合はLoadLibrary/FreeLibrary使う。DllCall()の落とし穴なので注意。
（流行らせるページのDllCall()の項参照。）
あと、色々間違ってるから慌てずよく見直したほうがいい。

>>420
これいいね、いただきますた

Temporary Internet Filesのファイルを削除するにはどうすればよいかな
ファイラー等でTemporary Internet Filesを開いた状態だと削除できるんだけど
単体だとアクセスできないのか消えないんだよね

一時的にフォルダのシステム属性を解除してからとか
というか、かつてAHKでやって出来たような気がするけど…
９８の時だったからかな？

>>430
下のように直してみましたが結果は全く同じでした

Domain:="http://www3.nict.go.jp"
Url:="/cgi-bin/JST.pl"
Buff=
VarSetCapacity(Buff,1024)
hModule:=DllCall("LoadLibrary",Str,"WinInet.Dll")
Hnd0:=DllCall("wininet.dll\InternetOpenA","Int",0,"UInt",0,"Int",0,"Int",0,"UInt",0)
Hnd1:=DllCall("wininet.dll\InternetConnectA","UInt",Hnd0,"Str",Domain,"Int",80,"Int",0,"Int",0,"Int",3,"Int",0,"UInt*",0)
Hnd2:=DllCall("wininet.dll\HttpOpenRequestA","UInt",Hnd1,"Str","GET","Str",Url,"Str","HTTP/1.1","Int",0,"Int",0,"Int",0,"UInt*",0)
ret:=DllCall("wininet.dll\HttpSendRequestA","UInt",Hnd2,"Int",0,"Int",0,"Int",0,"Int",0)
ret:=DllCall("wininet.dll\HttpQueryInfoA","UInt",Hnd2,"UInt",9,"Str",Buff,"UInt",1024,"UInt",0)
ret:=DllCall("wininet.dll\InternetCloseHandle","UInt",Hnd0)
DllCall("FreeLibrary",UInt,hModule)

WindowSpy機能をつかって表示させた内容の、取得方法について質問です。

>>>>>>>>>( Now Under Mouse Cursor )<<<<<<<<
ClassNN: ToolbarWindow321
Text: あいうえお
Color: 0xC8D0D4 (Blue=C8 Green=D0 Red=D4)

ClassNNは、WinGetClassで取得できたのですが、
マウスカーソル下の「Text」を取得する方法がわかりません。

やりたいことは、マウスカーソル下のボタンに書かれたテキストを抜き出して
各種判別をしたいのですが、Textを取得するには、どのように書けばよいでしょうか。

MouseGetPos で マウスの下のコントロールのClassNN取ってControlGetText
うまくいかないなら
MouseGetPos で マウスの下のコントロールのハンドル取ってWinGetText

>>436
アドバイスありがとうございます。
ControlGetTextで取得できました。

>>434
サーバ名・バッファサイズ。


結果変わらないとか何言ってるんだと思ったら、
>>425よくみたらそっちの環境だとLoadLibraryしなくてもハンドル帰ってきてるんだ？
うちだとハンドル取得失敗するんだが。

>>438
Server := "133.243.3.34"
VarSetCapacity(Buff, 65536)
で成功しました
大変ありがとうございました
正直NALTの2倍リソースを消費するので使う意味は無いのですが、
苦労したので何か愛着が沸いてきました
ちなみにLoadLibraryの有無にかかわらずハンドルの値は同じでした

>>438
別にIPアドレスでもいいけど。http://が余計なだけ。

それとバッファサイズはそんなに要らんはず。
指摘したところはHttpQueryInfo()の引数。バッファサイズはLPDWORDで欲しがってるので、
"UInt*", BuffSizeみたいな感じで変数経由で渡す。数値そのまま渡しちゃだめ。
なんでかっつーと、そこで指定したメモリ上に値が戻ってくるから。
関数実行後にサイズが戻ってきてるはず。変数見てみると良い。

"UInt", 65536とか"UIntP", 65536とかってやって動いてるとしたらたまたまかも。
これだと、分けわからんアドレス見に行くことになると思うよ。

みすったｗ
>>440は>>439宛ｗ

Ctrl+無変換+??
みたいな組み合わせって指定できないの？
Ctrl+??で無変換の状態を調べて分岐って形になるのかな。
これに手を出すともう覚えきれなくなりそうだけどｗ

漏れは逆でやってるなぁ。

vk1Dsc07B & x::
if (GetKeyState("Ctrl", "P"))
MsgBox, Ctrlあり
else
MsgBox, そのまま
return

雑多なテキストファイルを

FileRead,data,C:\textfile.txt
Loop,Parse,data,`n,`r`n
　{
　いろいろ
　}

で回す処理をしてると、実際の改行数と、ループを回した回数が違うことがあります。

原因を調べてみたら、テキストファイルに、本来無いはずの0x00が含まれていると、
その行でLoop処理が終わってしまうようです。

これはAutoHotkeyの仕様通りと言えばそうなのですが、
AutoHotkey単独の機能で、ファイルから0x00だけを除去する方法はないでしょうか。

>変数の内容文字列としてアクセスできるのは最初のnull文字以前の部分だけだが、
>DllCallなどを使用することで全ての内容にアクセスすることができる。

ま、仕様だから諦めじゃね
つか、なぜバッファリング（Loop,READ）しないんだろう。

>>445-446
Loop,Readをつかったら0x00のあとも読み込め、とりあえず解決しました。thanxです。

dllは、こちらを見てみましたが、ファイルを新規に作成して書き出すサンプルのようで、
ファイルを読むだけの使い方を理解できませんでした。
http://lukewarm.s101.xrea.com/commands/DllCall.html

最初に変数として読んだ理由は、FileRead〜Loopの前でstringsplitをつかって`nを数えて、
その数を進捗状況表示（プログレスバー）の処理ラインの総数値として使うためでした。

Loop,Readにすると、ループ処理前に改行の数をカウントしなきゃいけないですね。
本番ループの前でこうやって逃げましたが、もっと効率のよい方法はありますか？

linecount=0
Loop, Read,%file%
　{
　linecount++
　}

Loop, Read,%file%
　{
　本番
　（プログレスバー現在値%A_Index%／総数%linecount%）
　}

ちょっと教えてください
以下のように実行したRunWaitコマンドの返値を拾ってきたいのですが、
　　　RunWait,C:\Ruby\SearchWordGoo.exe "%word%"
取得する方法はあるでしょうか？

~vk1Dsc07B & q:: ;; // 選択範囲の単語の意味をタスクバーに表示したい
clipboard=
Send,^c
ClipWait
SetEnv,word,%clipboard%
RunWait,C:\Ruby\SearchWordGoo.exe "%word%" // ネットから取得
contents= ;; // contentsに返値を渡したい
TrayTip,Goo検索,%contents%
SetTimer, RemoveTrayTip, 20000
return

普通コマンドの返値というとErrorLevelのことなんだが、それじゃないよな
そのSearchWordGoo.exeとやらの仕様が分からんから何とも言えんが、
結果が標準出力に出るんなら、ファイルにリダイレクトすれば？

>結果が標準出力に出るんなら、ファイルにリダイレクトすれば？
標準出力に出ます
一回ファイルに落とさないとダメそうですか…
ありがとうございます

>>440
>
"UInt", 65536とか"UIntP", 65536とかってやって動いてるとしたらたまたまかも。
どうもそのようです
何度も繰り返すとバッファが空の回数が多くなります
これで今まで使えなかったDLLのいくつかが使えるようになるかもしれません
ありがとうございました

>>447
固定長データ形式ならファイルサイズを指定バイト数で割る（性善説）でいいはずだけど・・・
そうでないならそのやり方でいいんじゃないかと

>>452
なるほど了解です。ありがとうございます。

進捗状況表示のためだけで同名へのファイルアクセスが
2度発生してしまうのが、ちと悔しいですが、気にしないことにします。

>>450
cmdret.dllなり流行らせるページのStdIO.zip使うなりすればおｋ。
これちょくちょく質問にあがるからテンプレ入れといたほうが良いか？

独立したahkスクリプトに対して、既にそのスクリプトがが起動していたら引数を渡すだけ、ということは可能なのでしょうか。

Run,Autohotkey.exe hoge.ahk "hogehoge"
みたいな感じで起動して、hoge.ahkが既に存在しているならhogehogeを渡したいのですが。

やりたいのは、一般的なメディアプレーヤーみたいにプレイヤーが立ち上がってたらそれでファイルを再生、そうでなければ起動＋再生みたいなことです。

引数をFileAppendでファイルに保存させ、
TimerかLoopのIfExistでファイルを監視して
それが存在するようになったらそれを読み取って変数に入れる、とか
（読み取ったら破棄する）
うまくやんないと処理中の変数を上書きするかもしれん

多分もっとム的にスマートな方法はある

AHK同士での連携、俺も知りたいな。

外部ファイルの参照以外なら、たとえばGUIコマンドで画面上に隠しウインドウを作っておき、
そのタイトル情報に交信メッセージを仕込んで参照させるとか。
ControlGetTextで受信し、返事をしたいときは返信用GUIをつくってGuicontrolで随時更新。
いわゆる半二重通信か。

複数のAHKで、俺も便乗質問。

たとえば「wheelDown」に対するアクションが入った常駐スクリプトを2つ同時に起動すると、
後に起動したスクリプトのみがwheelDownに反応して、以前から起動していたスクリプトは、
マウスをwheelDownしても無反応になってしまう。（スクリプトは動いているが、情報をとれない）

使いたい機能ごとにスクリプトを分離したものの、1つ起動なら問題ないけど
2つを同時に起動してると、この症状になってしまい、困ってます。

これを、全部反応させる方法はないですかね？

入力メッセージを透過させたいなら ~ を付ける
そもそも、ahkはある層で入力メッセージを見て何かするって訳で、
~ 付けてなきゃ次の層にわたさんって事な訳だから・・・

つか、キー・マウス系のモノは同一ファイルで定義した方がよくね？
ホットキーとかで機能切り替えするとかでさ
まぁ、お節介かもしれんが。

>>455
既に起動しているスクリプトに起動パラメータで引数渡すのはたぶん無理
やりたかったらGUIでGuiDropFilesラベル有効にしといて
cdropや管理人さんのファイルドロップ関数で渡してやるのが簡単なんじゃないかな。
それか OnMessage() か RegisterCallback() あたり使うとか。

>>459
言われてみればその通りかも。ファイル構成を再検討してみます。

AHK同士の連携は、>>460のGuiDropFiles法でいとも簡単にできました。
こんな便利な方法があったとは。

gotoはややこしくなるからなるべく避けろとよく言われますが
避けるためにたとえばどんな命令を使うことが考えられますか？

ifで分岐、関数やサブルーチンを作って呼び出す、とか。

ただ、Gotoを使った方がスマートにできる場合もあるので、絶対Goto禁止という意見には賛同しない。

なるほど。ありがとうございます。

GoToはGoSubがなかった頃の名残なので、なるべくならサブルーチン化してGoSub使うのがいいよ。
けど関数内でローカルラベルとして使えるのはいいね。VBチックでやりやすい

goto(or相当)は最早シェルスクリプトとかバッチくらいでしか使わないなぁ

try〜catchがあればgotoは不要なんだけどな

Fittleというプレイヤーを閉じたいのですが、
閉じれません。
http://hp.vector.co.jp/authors/VA039869/
--------------------------------------------------------------------------
DetectHiddenWindows,On ;非表示のウィンドウを対象に含めるようにする
ControlSend,,!{F4},ahk_class Fittle
return ;ホットキーサブルーチンを終了
--------------------------------------------------------------------------
っていうか他のアプリでも閉じれないのですが、
記述が間違っているのでしょうか？

WinCloseじゃだめなの？

>>469
できました。
さんくすです。

ImageSearchでErrorLevelが0だったら、１だった場合に実行するコマンドの前に一つコマンドを実行する
ようにする場合って、IF式で場合分けして両方のパターンを書くしかないんでしょうか？
１だった場合と同じ動作をするようにする方法ありませんか？

>>471
すみません、途中で送信してしまいました。
こういう事するのは慣れてなくて、意味不明なことや、皆さんには造作もないような事を聞いてるかもしれませんが、お願いします。

if 判定式
{
　判定が真の場合やりたいこと�@
　共通の事項�A
} else {
　共通の事項(=�A)
}

ってこと？

それなら
if 判定式
{
　判定が真の場合やりたいこと�@
}
共通事項�A

って出来るけど。

まぁ、ahkでプログラミング最初ってなら分からなくもないけど

しかし、スパゲッティな言語仕様はどうにかならんもんかねぇ。

変数に仕える文字ってよく分からんｗ

[OK]
arr[0] := 1
変数１ := "変数１の値"
MsgBox, %arr[0]%`n%変数１%

[NG]
arg(0) := 100
arg.1 := 1000
表示 := "変数「表示」の内容"

>>473
そういう事です。ありがとうございます。
画面が初期画面に戻っていた場合、やりたい操作を出来るようにするために必要でした。
これがプログラム初めてです。HTMLくらいしか触ったことなくて

ゲムとかでDirectXかなんかで全画面表示にするってのがあるけど、
その状態ってAHKで取得できるもん？

WinGet, state, MinMax じゃ無理だった・・・
A_ScreenWidth, A_ScreenHeight か SysGet で判定なのかな。

クリップボードの監視をして過去10回くらいを記憶して
無変換＋Vで履歴の新しいものから吐き出してくようなスクリプトってないですか？

クリップボード履歴はあぷろだに昔それっぽいのがあったような。
探してみたら？ 自分で書いたほうが早いような気もするが
http://lukewarm.s101.xrea.com/up/

AutoHotkey(zip版)をインストールして、起動するとMyDocumentsに「AutoHotkey.ahk」が作成されて、「AutoHotkey.ini」が作成されないんだけど、どうやったらiniが作成されるの？

右クリックから作成。
またはAutoHotkey.ahkをAutoHotkey.exeにあるフォルダにコピーして改名でもOKだよ。
ただのテキストファイルだし。

gui作るとき各コントロールの位置決めに手こずる
もっと楽に配置できないかなぁ

たしかにGUI、慣れるまでは大変だし、たとえ慣れても座標を頭で計算するのが面倒だ。

GUI,addコマンドの配置をWindows画面上で作る外部GUIツール、なんてのがあったら
最初の位置決めが大幅に楽になるのだけど、そんなツールがあったらいいのにね。

SmartGUIじゃ駄目なのか

483はｵﾋｻﾙに逝けば吉と言っている

初歩的な質問申し訳ありません、自分では原因が分からないので質問させて下さい
特定のキーを押すとそのキーが2回押されたことになるようにしたいのですが

key::
send,{key 2}

というように組むと、そのkeyを入力しても反応が無くなってしまいました
2行目のkeyを別のkeyに変えればそのkeyが2回押されたことにはなるのですが、それだと少々不便です
何かヒントのようなものは頂けないでしょうか

ここの住人はバカなので、情報無しに答えることは出来ません。
エスパースレで聞いて下さい。

SmartGUIなんてもんがあったんだな
ちょっと遊んでみたけどいい感じ

>>485
俺も馬鹿だけど
key::
Loop,2
send,{key}
これでいいんじゃね

>>483-484
さっそく使ってみた。
このソフト、俺の求めていたそのものだった。情報ありがと。

自分で自分をSendするとループにはまって抜け出せないんじゃね
何か工夫がいると思うよ

>>485
$key:: Send, {key 2}
とか
~key:: Send, {key}
とか

おしえてください
バックグラウンドのウィンドウにダブルクリックやドラッグ送りたいんですけどどう書けばいいですか

サイト丸写しのコードなんですが、

imagesearch, 502, 156,1425, 730, C:\ahk\kennsaku-top.bmp
if ErrorLevel = 2
MsgBox Could not conduct the search.
else if ErrorLevel = 1
MsgBox Icon could not be found on the screen.
else
MsgBox The icon was found at %FoundX%x%FoundY%.

これを作動させると
Line text: \ahk\kennsaku-top.bmp
the leftmost character above is illegal an expression
と言われてしまいます。ﾌｧｲﾙ名の指定の仕方が不味いのだと思うのですが、日本語のない位置にしたり、
ドライブをＦからＣにしてみたりしたりして、こうなったのですがそれでも駄目です。
何が不味いんでしょうか？

>>487,489,490
解答頂きありがとうございます
最終的に>>490のでできるようになりました

>>492
大文字で書いてるからじゃね？

>>485
解決したみたいだけど原因分かってないみたいだから一応
行分けするなら最後にreturn入れろ

>>492
OutputVarX, Yを省略してるんだから、x1,y1,x2,y2の前にカンマが2つ必要
imagesearch,,, 502, 156,1425, 730, C:\ahk\kennsaku-top.bmp

>>494
そうではなかったようです。

>>496
おお！ビンゴです。ありがとうございます。省略可はカンマの中だけだったんですね。

本体スクリプトの初期化プロセス内で、#Include でサブスクリプトを統合する際、
このサブスクリプトの初期化プロセスに return があると本体スクリプトの #Include
以下が実行されません。

ヘルプにはこの件に関して、
A script behaves as though the included file's contents are physically
present at the exact position of the #Include directive (as though a
copy-and-paste were done from the included file).
とあるので、仕様として #Include はサブルーチン的には作用しないと理解しています。

しかし結構不便なので、どなたか良いテクニックをお持ちでしたら教えて下さい。

最初にreturnを入れてから#includeする。

--- include元 ---
Autoexecute:
　　Gosub,hoge_init
return
#include hoge.ahk ; include系列挙
…

--- include先 hoge.ahk ---
hoge_init:
　　初期化処理
return
…

#IncludeLast とかあればいいのにな

ああ、また的外れなこと書いたかも。
#Include以下に処理を持ってきたい場合はこんな感じでやってる

Autoexecute:
　　Gosub,init
return
#include hoge.ahk ; include系列挙
#include …

init:
　　Gosub,hoge_init
　　…
　　…
return

Gui,Add,Text,,%A_Hour%:%A_Min%:%A_Sec%.%A_MSec%
Gui,Show
Loop
GuiControl,Text,Static1,%A_Hour%:%A_Min%:%A_Sec%.%A_MSec%

という記述で時刻をリアルタイムで表示させてみたのですが
やたらチラチラします
ご指導ください

Loop
{
now = %A_Hour%:%A_Min%:%A_Sec%.%A_MSec%
if (sav != now)
{
GuiControl,Text,Static1,%now%
sav := now
}
}

これでもまだチラ付きが気になるならHMSとmsec以下とラベルを分けるといい

>>503
おおなるほど
Msecだけ分けてやってみます
ありがとう

>>501
なるほど、最初に return を入れてから #include する方法でできました。
結局本体スクリプトから副スクリプトの初期化ルーチンを呼び出さないといけないんですね。

Gui,ShowとかWinShowでウィンドウを表示するときに、
いきなり半透明で表示ってできますか？
Gui,Show, Hideで半透明を指定してからShowしても効かないし、
スタイル指定の+E0x00000020を使っても無理っぽい。

>>506
あの、一瞬半透明じゃない表示がされるのが気にくわないのかな。
画面領域外でウィンドウを表示させてからWinSet, Transしてやって、
画面内にWinMoveさせればできると思うけど。

>>507
助かった―、ありがと。やりたいことと反して井の中の蛙だったw
仮想デスクトップで切り替えたデスクトップ番号を浮かび上がらせようとしてたんだけど、
一瞬のちらつきで雰囲気が全然違くて…

まあ、仮想デスクトップ自体あんまり使わないんだけど、
同じく使わない付箋ソフトを組み合わせるといいかもと思って。

>>364
遅レスだけど、拾い物。tooltipっぽくはなる。
CoordMode, Mouse, Screen
loop,C:\Documents and Settings\All Users\Documents\My Pictures\Sample Pictures\*.jpg,0,0
{
Image = %A_LoopFileFullPath%
MouseGetPos, X, Y
ImageX := X + 20 ;Change "20" to your own needs etc.
ImageY := Y + 20 ; Same here
SplashImage, %image%, B X%ImageX% Y%ImageY%,sub,%A_LoopFileFullPath%
sleep 1000 ; Change this value as you wish. Lower numbers = much flashing, higher numbers = slow update
}
return

Lil Builderって保存できないの？

実行中のスクリプトを途中で止める方法はありますか？

>>511
みぎくり→ぱうせ

すいませんマウス操作するスクリプトなので終わるまでマウス使えません

適当なキー（以下ではF12)に何か割り当て汁。
最後の行にでも追加すればいい

; 一時停止（トグル）
F12::Pause

; スクリプト終了
^F12::ExitApp

; 再起動
+F12::Reload

マウス制御乗っ取り系のスクリプト書いてんなら
キーボードのみでタスクマネージャ起動してプロセス終了させるくらいは
できるようになっといたほうがいいと思う。

デスクトップ作業領域の高さを一発で取得できないのか
A_ScreenHeightからahk_class Shell_TrayWndの高さ分を引いて出す方法しかないのかね

ttp://lukewarm.s101.xrea.com/test/read.cgi/bbs/1146398137/65
流行らせるページの管理人のスクリプトを関数にして
ポインティングデバイスに触れている指の数を返り値にしたいんだけど。
そっくりほぼそのまま関数にして、bbb := Thumb()で代入、ツールチップ表示をすると
最初の数秒しか指の数の取得ができない。途中からいくら指を触れても0になる。
原因がわかりますか？関数にしなきゃいいんだろうけど、libフォルダに置いて手軽に使いたくて。

Malloc(size,flag=0x40){
return DllCall("kernel32.dll\GlobalAlloc","UInt",flag,"UInt",size,"UInt")
}
Thumb(){
TP_StartData:=0
TP_DW=0x01000000

ilen:=4*4
ibuf:=Malloc(ilen)
NumPut(TP_DW | 10 ,ibuf+4*0) ; TP_DeviceHandle,
NumPut(TP_DW | 729 ,ibuf+4*1) ; TP_PacketFingerInfo,
NumPut(TP_StartData ,ibuf+4*2) ; TP_StartData,
NumPut(0xFFFFFFFE ,ibuf+4*3)

olen:=4*2
obuf:=Malloc(olen)

dev=\\.\SYNTP
hDev:=DllCall("CreateFileA",Str,dev,UInt,0xC0000000,UInt,3,UInt,0,UInt,3,UInt,80,UInt,0)

DllCall("DeviceIoControl",UInt,hDev,UInt,0x80006004,UInt,ibuf,UInt,ilen,UInt,obuf,UInt,olen,UIntP,bytes,UInt,0)
numFingers:=NumGet(obuf+4) & 0xFF
return numFingers
}

>>516
つ MonitorWorkArea

「Thumb(){」の位置が違う
解放せずに何度も初期化しちゃ駄目だろ

>>518
あれっと思ってよくリファレンス見てみたら
上のMonitorの項目のOutputVarBottomっての使うのね
うっかりOutputVarだけで指定しちゃって失敗するわけだ
ようやく気づけたよ有難う

変数に、改行付きテキストが代入されている時 (FileRead で読み込んだり clipboard など)
ある特定の1 行を抽出するにはどんな方法があるでしょうか？

>>519
どうも、助かりました。下の方の3行と他を関数で分けて解決できました。

>DllCallでは、関数実行のたびにDLLをロードして、関数終了後に開放している。
とあるんですが、ここで言う、解放せずに何度も初期化されているのは
kernel32.dll\GlobalAllocで確保されたメモリ領域ってことでしょうか？

>>521
簡単なところでは、
Loop, Parse, InputVar , `r`nで
A_LoopFieldを使って条件式で判定じゃないかな？

>>523
その方法はけっこう使ってるな。もうひとつ俺がよく使うのは
変数を全部、改行で分割する方法。

stringsplit,var,InputVar,`n

10行目を取りたければvar10を参照する。
全行数を知りたければvar0を参照する。

ほかは参照しない変数として放置。（var**を全部消す方法ってあったっけ？）

>>523の方式と、この方式とで、環境や行数によってパフォーマンスが逆転する。
適材適所で使い分けるようにしているけど、法則はあるのかな？

>>521は、単一の行だけ抜き出すなら、正規表現を使うと一行で書けるよ

正規表現のオプションm)で、^と$が行頭、行末にマッチするようになるので、

　RegExMatch( Target, "m)^ほげほげ=(.*)$", macthStr )

とすると「ほげほげ=〜」で始まる行の、〜の部分が、matchStr1に入る

>>523-525
みなさんとても有用な情報ありがとうございました。
今回は >>525 の正規表現がベストマッチでした。
RegExMatch で変数に出力するにはどうするのか良く知らなかったので
大変勉強になりました。

それにしても AHK って便利で面白いですね。

正規表現で、例えば「エラー」または「確認」を含むウィンドウタイトルを選びたい時

IfWinExist, (.*エラー.*|.*確認.*)

と書いてもうまく動きません。
どのように書けばいいんですか？

SetTitleMatchMode, RegEx
IfWinExist, (.*エラー.*|.*確認.*)
{
}
と書いたんですが・・・どこが間違えてるんでしょうか？

IfWinExist, (.*エラ\x81\x5b.*|.*確認.*)

で、どう？ 「ー」(長音)は2byte目が 0x5b '[' だからエスケープが必要

>>529
すごいです。ありがとう！
うまくいきました

こういうの見る度に思う。
sjisはもう全廃にしたい、つかunicodeに汁、と。

AutoHotKey_Lに期待してるんだけどな

Python,Ruby,Javascript(fiber入り)とかで書けるように、
誰か一から作り直してくれたらいいのに
バッチファイルに似た言語仕様はもう嫌だす

それじゃWSHだなｗ

JScriptでahk相当を実装すればいいんですね
ってなんか違うｗ

バッチファイル→ahk
WSH(JScript)→？
みたいなキー入出力に特化したのをお願い

AutoIt てのは AutoHotKey と同じことができるんでしょうか？
なんかホットキーの設定から難しそうな気がするんですけど

var ahk = WScript.createObject("Autohotkey.Application");

ahk.hotkey("^c", new function() {
　if (ahk.isWinActive("ahk_class hoge")) {
　ahk.send("hoge");
　} else {
　　ahk.send("fuga");
　}
);

めんどくせぇ・・・

相対パス取得関数を作ったんだけど、
If InputVar2 contains %InputVar1%
msgbox, 同じパス上かもね
If InputVar1 contains %InputVar2%
msgbox, 同じパス上かもね

これって、If文を一行にまとめる事って出来ます？
いまいち書き方がよくわからない。

質問の答えとは違うが関連ありそうなのを貼っとく

Path_RelativePathTo(From,atrFrom,To,atrTo)
; 相対パスを作成
; From : ベースパス
; To : 相対にするパス
; atr : ファイル属性を指定
; ディレクトリ 0x10 (FILE_ATTRIBUTE_DIRECTORY)
; ファイル 0x20 (FILE_ATTRIBUTE_ARCHIVE)
{
VarSetCapacity(t,260,0)
DllCall("SHLWAPI.DLL\PathRelativePathToA", Str,t , str,From, Uint,atrFrom, str,To, Uint,atrTo)
return t
}

Path_CommonPrefix(p1, p2)
; ２つのパス名の先頭から共通するディレクトリ名を取得する
{
VarSetCapacity(t,260,0)
DllCall("SHLWAPI.DLL\PathCommonPrefixA", Str,p1, Str,p2, str,t)
Return t
}

あと部分一致を調べたいならcontains より ifInstring使ったほうが良くね？

>>539
おおっ、ifInstringでやれば問題なさそう。でも、結局ムダで使わなかったorz

Dllでできるんだね。まあ当たり前か、皆使いそうな機能だし。
無知って怖いわ。数十行にわたって、必死こいて作ってたｗ
その分、使い勝手が良いのがせめてもの救いか。

ありがと、Path関数として永久保存させていただきます。

RButton::send,x
RButton & a::send,y

この状況下で例えばキーボードのbを押し続けながら右クリックをしても
コマンドが発動されないんだけど回避方法はありますか？

追記
一応Key history and script infoで見ると右ボタンの物理的な押し下げ、押し上げは認識してるけど
Typeの所は押し下げ、押し上げ共sになってる

＞Type s：
＞フックによってイベントが隠蔽された(あるキーにホットキーが割り当てられていて、そのキーの
押し上げイベントには何も割り当てられていない場合、押し上げイベントが隠蔽される)

レッツノートのT5のNumLockキーをChangekeyで別のキーにアサインしました。
もちろん、Numlockの機能は無効になるのですが、Numpadがキーボードに出現するのは止められず、『U』を押すと『←』が入力されてしまいます。
つまりテンキーでNumlockがoffの時と同じになります。この現象はハード固有のものでしょうか？それとも回避策が確立しているのでしょうか？

>>543
たとえば、NumLockキーにPgDnキーをアサインして、Numlockキーを無効にしたのに、Numpad自体のOnOff機能が有効になっているということです。
PgDnを押すたびにNumpadがトグルでOnOffされてしまうので、Onのときに『U』を入力しようとすると『←』が出力されてカーソルが左に動くということです。

スレ違いじゃなかろうか。

キーカスタマイズソフトスレ逝け

入力されて欲しくないキーをリマップすればいいだろ

↓の解説をみて分からなきゃ諦めだな

[Commands]
Set[Caps|Num|Scroll]LockState
SetStoreCapslockMode
GetKeyState

[KeyNames]
Numpad[0-9]/NumpadPgUp/NumpadPgDn


ところで、ファイルループの A_LoopFileName でハマったｗ
以前に 0x5C 含む文字のパス区切りが・・・なんてのを前に見た気がするが、
探すのも面倒なんで関数作った

>>543
元々インスコされてるサービスが優先的に制御してるか、ハード的に制御してるからじゃないの？

>>548
その関数、欲しい。俺も困ってた。

今は、ループ内で　ifexist,A_LoopFileName　して、
みつからなかったら飛ばす処理してごまかしてる。

わざわざ探さなくてもテンプレ入りしているが。
関数なら>1のなまず氏のmbstring.ahk
Unicode仮対応版が欲しいなら>5のAutohotkey_L

駄目文字微対策版
ttp://yak.myhome.cx/junks/
中身が古いけどこれ使ってる

まぁ、要らんのかもしれんが、1レスで終わるんで
　fileName := DirSplit(A_LoopFileLongPath)
って風に逃げるための関数。

DirSplit.ahk
-------------------------------------------------------------
return
; ShiftJIS対応 パス区切り関数
; 1) 受け取ったパスの最後の "\" 以降を返す
; 2) 第２引数に変数名を指定した場合、1)以外を返す(最後の "\" なし)
DirSplit(path, dirVarName="") {
　global
　local pos, char, name
　Loop {
　　StringGetPos, pos, path, \, R%A_Index%
　　if (pos > 0) {
　　　StringMid, char, path, %pos%, 1
　　　code := Asc(char)
　　　if ((code >= 0x81 && code < 0x9f) || (code >= 0xE0 && code <= 0xFC))
　　　　continue
　　}
　　break
　}
　if (dirVarName != "")
　　StringLeft, %dirVarName%, path, pos
　pos += 2
　StringMid, name, path, %pos%
　return name
}

あ、変数 "code" のローカル宣言してないｗ

>>553
thx。処理方法はもちろん、コーディング自体も参考になりました。

>>547
結局、そうしました。NumlockがonとOffで別のキーになるのは数字に統一しました。でも、+とかはon、Off関わらず同じキーですので、
Numpad on、Numlock　Off時に不要だからといって文字にremapするとNumlock onで記号を入力したいときに困ってしまいます。

>>548
しばらく試行錯誤してみますね。ありがとうございました。

>>542
その場合は、ホットキーよりRemap
RButton::x
x & a::send,y
で、とりあえずやりたいことは出来るだろうけど。
具体的に何をやろうとするのかで違ってくるだろうね。

単純なのは下記。
111:
keywait, RButton,D
keywait, RButton
send,x
goto,111

不特定にキーが押されているかどうかを判別するにはどうしたらよいでしょうか？
GetKeyState は特定のキー押下しか判断できないようです。
また Help の KeyName の項目には、There may be ways to detect certain keys
and buttons using techniques such as DllCall, OnMessage, and RegisterRawInputDevices.
とあるので、DllCall でできるのではないかと思うのですが、方法がまったく分かりません。

詳しい方、教えて下さい。

keywaitに複数のキーのうちのどれかが押されるのを待ちたい場合は、Inputコマンドを使う
って書いてあるよ。

>>560
Input がありましたね。ありがとうございました。

Quick Launchを階層化したいときに表示させる"＞＞"をクリックさせるか
クリックしたのと同じ結果を生じさせることは可能でしょうか

>>558
とりあえずの具体例としてはゲームで移動中に拡張ボタンに割り振ったコマンドが空ぶる
>>557はsend,yが発動しない
waitは一つのファイルで同時に二つ以上待てないなら避けたい。
下のでいけるかやってみる。

XButton1 & LButton::send,2
w & XButton1::
s & XButton1::
a & XButton1::
d & XButton1::
return
~w & XButton1 up::
~s & XButton1 up::
~a & XButton1 up::
~d & XButton1 up::
IfNotInString, A_ThisHotkey, %A_PriorHotkey%
return
XButton1::
*XButton1::
send,1
return

>>562
; x, y に >> の真ん中あたりの座標をセット(Window Spyで調べる)
CoordMode, Mouse, Screen
MouseMove, %x%,%y% 0
Send, {LButton}
return

とか

; ToolbarWindow32n は変わる可能性あり(Window Spyで調べる)
; キー送りは環境によって変える(ここでは先頭にフォーカスがあるから逆順で1個)
ControlFocus, ToolbarWindow322, ahk_class Shell_TrayWnd, Quick Launch
Send, {Left}
return

>>562
座標をセットするやりかたはタスクトレイのアイコンの数で変化してしまうので
使えないと思っていましたが、二番目のプランを参考に下の方法で成功しました。
Quick Launchは便利なのですが"＞＞"の幅が狭くて何とかしたいと思っていました。
ご協力感謝します。
(ちなみに二番目のプランでは何も起こりませんでした)

#NoTrayIcon
WinGetPos, , Y1, , , ahk_class Shell_TrayWnd
ControlGetPos, X, Y2, Width, Height, ReBarWindow321, ahk_class Shell_TrayWnd
X += Width
Y1 += Y2
Y1 += Height
MouseClick, LEFT, X, Y1, 1, 0, D

あ〜、下のはフォーカスだけ当ててるわ。
↓を先頭に追加でいけるかな。まぁ解決したからいいんだろうけど。
WinActivate, ahk_class Shell_TrayWnd

現在AutoHotKeyを流行らせるページの「何も操作をしていないときに実行」を便利に使わせてもらっています。
そこで、週に一回だけ実行する動作もさせてみたくなってきました。
これができればタスクスケジューラよりも楽にバックアップとかをさせやすくなるからです。

しかし、いろいろと試しては見たのですが、結局うまくいきませんでした。

曜日で分岐させることは可能なのでしょうか？
もし可能ならば教えていただきたいです。

>>567
A_DDDD 曜日を表す文字列(Sunday...)
A_DDD 曜日を表す3文字の省略名(Sun...)
A_WDay 曜日を表す1文字の数字(1...7)1が日曜

http://lukewarm.s101.xrea.com/Variables.html

> FormatTime, wday, %A_Now%,　WDay
で曜日(1=日曜, 2=月曜, ...)の取得が可能だけど...

タスクの実行管理の方が面倒な感じ。
たぶん、スタートアップか何かで常駐させるんだろうけど、
OSの再起動とかログオフ・ログオンで再度プロセスが走る事も考慮するとなると・・・
タスク最終実行（完了）日時を ini か何かに書いて、
再度実行しないようにするとかの仕組みが必要・・・かもしれない。

sample.ahk
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
msg=
(
| ∧ 　 　　　　　　∧
|/　ヽ 　 　 　　　./ .∧
|　　 ｀､　　　　　/ 　 ∧
|　　 　 ￣￣￣　　　　ヽ
|￣￣￣月曜日￣￣￣）
|￣￣￣￣￣￣￣￣￣.＼
|ヽ-=・=-′　ヽ-=・=-　　/ 　　やあ
|:: 　 　＼＿＿_／　　　　/　　　　週末にやり残した仕事が君を待ってるよ
|:::::::　　　 ＼／　　　　 /

)
if A_WDay=2
{
msgbox,%msg%
}
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−

いやぁぁぁああああああああああ

ホットキーのサブルーチンラベルにつける修飾シンボルで
$を最初につけるときと何もつけないときの違いはなんですか？

>>572
http://lukewarm.s101.xrea.com/Hotkeys.html

「タスクトレイアイコン操作」で特定のトレイアイコンを非表示にする方法ですが、

name=とりあえず例としてAutoHotkey.exe
cnt:=Tray_GetCount()
DetectHiddenWindows,On
Loop,%cnt%{
Tray_GetInfo(A_Index,hwnd,uid,msg,hicon)
WinGet,pn,ProcessName,ahk_id %hwnd%
if(pn=name){
Tray_HideButton(%hwnd%,%uid%,1)
}
}
DetectHiddenWindows,Off
return

で動きません。どうするべきなのでしょうか？
ちなみにTray_HideButton(%hwnd%,%uid%,1)をMsgBox,hwnd=%hwnd% uid=%uid%　に変えて値を確認し、
変数では無く確認した数値を入れたTray_HideButton()を実行するとちゃんと動きます

%

>>573
そこは見ていたのですが改めてみたらなんとなく分かってきたような気がしてきました。
#UseHockがデフォルト（OFF）のときはAutohotkeyが強制的にフックするか、レジスタホットキーで取得するかの違いでいいんですよね。

>>575
カッコの中の%は付けちゃダメなんですね
お騒がせしました

>>568-570
おおー、そんなのがあったのですか！

タスクトレイ付近にある時計辺りから取得しようとがんばってました。
全く見当外れでしたね。。。

とりあえずこれで特定の週にのみ動作するスクリプトができるようになったので
また一つ便利になりました。

> OSの再起動とかログオフ・ログオンで再度プロセスが走る事も考慮するとなると・・・
日曜日にスクリプトを実行するとして、
特定のファイル(空のテキストファイルとか)が指定されたフォルダにあるかどうかチェック
↓
なければ、作成してからスクリプト実行
あれば、なにもしない。

月〜土曜は、その判別用ファイルを削除する

こんな感じでなんとかなりそうな気がしました。
日曜以外PCを使わない人だとうまくいきませんが、
私は1週間一度もPCをつけないということはたぶん無いので大丈夫そうです。
というか素人的にはこの程度しか思いつかないです。。。

また今度時間のあるときに試してみます。

Progress とか Splash で枠なしで色透過して情報表示すると、
フォーカスも取られないし、フォントとか変えられるし、ちょっとｶｯｺｴｰｗ

Tooltipだと何か陳腐な気がしてたんで。まぁ、自己満足なんだが。

Progress, B1 P0 y%y% w%w% h%h% CB%fgColor% CT%fgColor% CW%bgColor% FS%fSize% ZH%barHeight%
Progress, Show
Progress, %value%,%subMsg%
WinGet, id, ID, ahk_class AutoHotkey2
WinSet, TransColor, %bgColor%, ahk_id %id%

ウィンドウが出現した瞬間一度だけ発動するスクリプトってどう書けばいいの？
1秒ごとにウィンドウリストを取得して比較してみたいなことをやらないと駄目なのかな。

WinWait

>>581
横からありがとう

iniファイルへの一括読み書きについて相談です。
iniwriteでセクションをSection、キーA,B,C,D,Eで5回書くと下記のようになります。

[Section]
A=なんたら
B=かんたら
C=あいう
D=えお
E=かき

ほしいkeyがわかってるとき、1つ取得したいときは、Ini,Readでkeyを指定し、
読めたらOK（＝keyがすでに存在する）で、ERRORが返却されたらkeyが存在しない、
と分岐できました。

左のKeyが数字連番のときは、Loopで回しつづけ、エラーが帰ったらBreakして全取得出来ました。

しかし、この事例のように、左のkeyが数字連番ではなくバラバラな場合、このセクションにある
キーと値を、特定のキーで指定せず全部読み出すには、どうしたらいいでしょうか。
考え方だけで十分なので、うまいコツがありましたら教えていただけると嬉しいです。

参考ページ（流行らせるページ管理人さんthx）
http://lukewarm.s101.xrea.com/commands/IniRead.html

buf=A,B,C,D,E
Loop,Pause,buf,CSV
{
IniRead,OutputVar,c:\hoge.ini,Section,%A_LoopField%
}

それともキーそのものが不定で事前にわからないってことかな
それだともうちょっと工夫する必要がある。

LOOP,READ して、
1) /^\[([\[\]]+)\]/ にマッチしたら、マッチ１($1)を現セクションにする
2) /^(\w+)\s*=\s*(.+)$/ にマッチしたら キー名=$1、値=$2

毎回読むのは面倒なので、仮想配列(ハッシュ)みたくする
　$ini_%sectionName%_%keyName% := value

※ キー名、セクション名が[0-9a-zA-Z_]でないときはエスケープしたりする

>>584,>>585
ありがとうございます。そうです、キー名がバラバラなんです。

iniR/Wコマンドに頼らず、filereadで読み込む方法でやってみます。
正規表現の指定法も参考になります。どうもありがとうございました。

>>586
自分用に作った奴をあげてみる。585の方法より多分だいぶ助長だけど。

iniファイル読込み関数群 (Section、Key一覧の取得が可能)
http://lukewarm.s101.xrea.com/up/file/090.zip

ミュートしてるときにボリューム変更しても変わらんので腹が立つ（ｗ のを解消

Volume_Mod(d, device="MASTER") {
　SoundSet, Off, %DEVICE%, Mute
　SoundGet, volume, %DEVICE%, VOLUME
　volume := volume + d
　SoundSet, %volume%, %DEVICE%, VOLUME
　return
}

Volume_Up:: Volume_Mod( 1)
Volume_Down::Volume_Mod(-1)

+Volume_Up:: Volume_Mod( 1, "WAVE")
+Volume_Down::Volume_Mod(-1, "WAVE")

>>587
すばらしいスクリプト、ありがとうございます。
一度呼んだセクションに対するキャッシュ機能まで入ってるんですね。

Ini_KeyList()ファンクションが、今回の用途にそのまま適用できそうです。

ノートPCで NumLock を殺して Ctrl+NumLock を NumLock にしよう思い、
まず、 NumLock:: Return とだけ書いたきました。
これで NumLockを押しても LEDのON/OFFはしなくりましたが、
例えば k を押すと down が入力され、
Fn キーが効いた状態になってしまっているようです。
NumLock を完全に無効にすることはできるでしょうか？

Autohotkey起動時にいくつかのWinWaitActiveを同時に待機状態にしておきたいのですがどうすればできますか？
例えば二つを待機させておきたいときにサブルーチンを二つ作りAuto-executeセクションでSetTimerを用いて二つに飛んでもうまくいきませんでした。

サブルーチンは以下のような感じです。
wait1:
WinWaitActive,hoge1
msgbox,a
return
wait2:
WinWaitActive,hoge2
msgbox,b
return

グループを使って、Waitの後で分岐する

GroupAdd, WinGroup, hoge1
GroupAdd, WinGroup, hoge2
WinWaitActive,ahk_group WinGroup
WinGetTitle,WTitle
Msgbox %WTitle%

分かりました。ありがとうございます。

なんでジョイパッドのボタンをsendで送れないんだろう
あれば便利な使い方出来そうなんだが
あとXYの判定のほかにJoyLeft::とかあれば最高だった

>>590
テンプレ>3
Lock系キーカスタマイズは地雷、更にノートは機種依存が強いので動作も不定

天麩羅に レジストリでキー入れ替えるツール (KeySwapXPとか) でも入れておいた方がいいのかねぇ
ttp://www.vector.co.jp/soft/winnt/util/se228667.html

Unicodeでエンコードされたテキストファイルを扱いたいのですが、TransformではUTF-8しか扱えないようです。
使いたいのがUTF-16のテキストなのですが、これは扱えないのでしょうか。

>>597ですが、やっているのはFileReadで読み込んで、Transformで変換という手順です。

文字コード関係はnkf使ってる

UTF-16のビット列の仕様を読んで気合で変換すればいいんじゃね

気合いで変換テーブルつくるのもめんどいし、LEとBEの判別とかもめいどいな。
つか TransFormで出来るの知らなくて、UTF-8のはつっくった事がある。捨てたけどｗ
たしかこんな感じの関数作ってバイト毎に回して参照してた

UTF8_2_SJIS(code) {
　static $E38080 = "　"
　static $E38081 = "、"
　　　： （すごく省略）
　StringUpper, c, code
　return %c%
}

先人の知恵を借りてパイプしたりリダイレクトたしたりした方が良いね。

あ゛、
　return #%c%
ね。一応。

「どこでもホイール」というフリーソフトのように

ホイール回転によるスクロールに対応していないソフトでも
スクロールできるようにしたいんですが、AHKで実現できますか？

できる

是非教えてください

AutoHotkey スレッド part5
http://pc11.2ch.net/test/read.cgi/software/1201502896/574-589

あたりを参照

>>606参照先の>>589読んでどこでもドラッグ関数作ってみたけど、
意外と便利だねこれ。
ライティングソフトのウィンドウ移動できなくてウザかったのが解消された。

コロンをremapするのに2時間かかった。
欧米の人は+`；で扱うからいいのかな？
でも、remap先にするのも大変だった。
マニュアルには何も書いてないし。。。

修飾キー（＾、!、+）の対象範囲を知りたいのですが、HELP見ても書いてありません。なんらかのリファレンスをご存知の方はいらっしゃいますか？
いろいろ試した結果、文字キー以外はShiftだけが有効だと思うのですが、正しいでしょうか？
^up::c　→　×
!up::a　→　×
+up::s　→　S（大文字）
^up::pgup　→　×
!up::pgup　→　×
+up::pgup　→　○

皆さんはAutoHotkey.ini編集する際になんのテキストエディタ使ってるんですか？
自分はTeraPadでやってるんですが色分け機能が最適化されていなくていまいちで

emEditor

xyzzyのahk-modeかな

秀丸

自力で色定義作りたくないならExtras\Editorsの中から適当なエディタ選んで使えばいい。
現状で使ってるエディタで使いたいならAHK or エディタマクロで
シンタックスファイルコンバートして使えばいい。

サクラエディタ

同じくxyzzyのahk-mode

なんでAutoHotkey.iniなんだろうな
Default.ahkとかならahkモードで認識してくれる
エディタ多そうなのに

コンビネーションキーの一つめのキーを、
コンビネーションキーとして発動した時のみ無効にするにはどうしたらいいのでしょうか？

>>616
AutoHokey.ahkにしておけばいんじゃね

>>617
a & b::Send,c
a::Send, a

>>609
多分正しくない。流行らせるページRemapの項参照。
Remapでは修飾キーの状態が残る。
^up::c ではCTRL押しながら↑を押すとCTRL+Cが入力される。
RemapじゃなくてSend使えば解決すると思う。

下記のようにファイルが置いてあるTXT全てに対して処理をしたい場合
D:\hoge\a\d.txt
D:\hoge\b\e.txt
D:\hoge\c\f.txt

下記のようにして書いてみたのですが、これだとhoge以下の全てのtxtを探しに行ってしまいます
hogeから一つ下のフォルダを探すだけでいいのですがLoopにどういう条件を書けばいいのでしょうか

dir = D:\hoge
Loop, %dir%\*.txt, 0, 1
{
msgbox,%A_LoopFileFullPath%
}

まず、ちゃんとリファレンスを声に出して上から10回読む

そこで質問だが、Loopの最後のパラメータは何だ？

・・・もしや最後を0にしてhogeのフォルダだけを探して更にループを入れ子にしてtxt探せばいいのか
すみません頭回ってませんでした
ありがとうございました

[cmd.exe]
dir /s /b *.txt

[ahk]
loop, %dir%\*.txt, 0, 1

AHK で作成したウィンドウ上でテキストのセンタリングをしたいのですが、どのようにしたら良いでしょうか。
やりたいのは、以下のスクリプトを 30 分おきにタスクスケジューラーから起動することです。
問題は下記の Gui, Add, Text の部分です。画面サイズは 1280x800 になっています。

#NoEnv
#NoTrayIcon
#SingleInstance FORCE
SetBatchLines, -1
SetTimer, Esc, 60000
WinGet, proc, ProcessName, A
CoordMode, Mouse, Screen
Gui, +LastFound +AlwaysOnTop +ToolWindow -Border
Gui, Color, FFFFFF
Gui, Font, c000000 s48, Calibri
Gui, Add, Text, x380 y200, % A_YYYY "/" A_MM "/" A_DD " " A_Hour ":" A_Min
Gui, Add, Text, x200, % """" proc """ is currently activated."
Gui, Font, s81 w600
Gui, Add, Text, x10, Review your current actions.
Gui, Show, x0 y0 w1280 h800
Return
Esc:: ExitApp

Input, I_Word, V, {enter}{escape}{space}`,
ではカンマがEndKeysにならないね。`,を{vkBC}とかにしないと使えない…
IntelliSense.ahkで軽くはまった。

>>625
ウィンドウの横幅いっぱいに textbox 広げてオートセンタリングでいいかと

　：
Gui, Add, Text, x0 w%A_ScreenWidth%, hoge hoge
　：
Gui, Show, x0 y0 w%A_ScreenWidth% h%A_ScreenHeight%

ちなみに、どう使うか知らないけど↓をやってみても面白いかも

Gui, Color, FFFFFE
Gui, +LastFound
WinSet, TransColor, FFFFFE

ttp://www.autohotkey.com/forum/topic37303.html
いろいろ方法はあるんだなーと感心

>>627
x0 w%A_ScreenWidth% Center でセンタリングできました。
ありがとうございました。

>628
これ OSD 的に使えて面白いですね。
勉強になりました。

>>619
RButton & WheelDown::のようなホットキーだったのですが
右ドラッグが出来なくなりました。
何か解決方法はあるでしょうか？
後効くソフトと、効かないゲームがありました

どなたか教えてください。
マウスで左クリック→右クリックをすると、例えば「Alt + X」を押した動作をさせたいのです。
どう記述すればいいでしょうか？
AHK入門者なもので、どこを参考にすればいいかすらさっぱりです…orz

ちなみに、その動作はX-Finderというソフト上でのみさせたいのですが、

#IfWinActive ahk_class TXFinder.UnicodeClass
LButton & RButton::send ~!x
return
#IfWinActive

と書いたら、一応希望の動作はしたのですが、なぜか他のマウス動作（クリックなど）が効かなくなりました…。

~RButton & WheelDown::
こうしたら？

>>634
ありがとうございます！
LButtonとRButtonの前に「~」を付けたらうまく動作できました。
大感謝です。

すまんw
>>631にレスしたつもりで
>>632は読んでもいなかったんだが
解決したようでなにより。

>>634
すみません元々>>617のような要望だったのですが
>>631と>>617の両方を解決するようないい方法は無いでしょうか？

昔自分もそれで悩んだが結局解決できなかった。
仕方ないのでRButtonをドラッグに使用するアプリでは
RButtonをコンビネーションに使わず、
マウスのサイドキーをコンビネーションしてごまかした。

具体的にはfirefoxでRButton & WheelupでPgUpとか
やりたかったんだけど、
画面端でwheelupするとPgUpするようにしたら
そっちの方が便利で必要なくなったのもある。

リマップしたものを更にリマップすることは可能ですか？

> XButton2::F24
> +F24::!F4
このように書いてみたのですが、Shift+マウスの拡張ボタン2を押してもAlt+F4は発動しませんでした…

Gui,Showでウィンドウを表示する時に背景だけ透明にして文字は透明にしないことって可能ですか？
背景をwhiteにした後、WinSet, TransColorでwhiteを透明にしても　背景と文字の両方ともが透明になってしまいます
SplashImage、SplashText、ProgressやToolTipでも試してみましたがうまくいきませんでした

>>640
実際に俺は>>628を試したらOSDみたいのが簡単に出来て、驚いてるんだけど、これじゃ駄目なの？

解決しまいｓた
WinSetのWinTitle指定がうまくいってなかったみたいです
ありがとうございました

; OSD TV時計もどきｗ
$_clock_gui_no := 50
$_clock_gui_pos := "tl" ; x(Left, Right, Center), y(Top, Bottom, Middle)
Gui, %$_clock_gui_no%:Default
Gui, +LastFound +AlwaysOnTop +ToolWindow -Border -Caption
Gui, Color, 000001
WinSet, TransColor, 000001
Gui, Font, cFFFFFF s48, MS Gothic ; 色・大きさ・フォントをいじるのはココ
Gui, Add, Text, x0 y0 vEdit1, 00:00
GuiControlGet, p, Pos, Edit1
gx := (InStr($_clock_gui_pos, "R", false) > 0) ? A_ScreenWidth - pw : (InStr($_clock_gui_pos, "C", false) > 0) ? (A_ScreenWidth - pw) / 2 : 0
gy := (InStr($_clock_gui_pos, "B", false) > 0) ? A_ScreenHeight - ph : (InStr($_clock_gui_pos, "M", false) > 0) ? (A_ScreenHeight - ph) / 2 : 0
Gui, Show, x%gx% y%gy% w%pw% h%ph% Hide
SetTimer, ClockGui_Timer, 500
return

ClockGui_Timer:
Gui, %$_clock_gui_no%:Default
colon := (colon == ":") ? " " : ":"
GuiControl, , Edit1, %A_Hour%%colon%%A_Min%
Gui, +LastFound
WinGetPos, wx, wy, ww, wh
CoordMode, mouse, Screen
MouseGetPos, x, y
cmd := (x >= wx && x <= (wx+ww)) && (y >= wy && y <= (wy+wh)) ? "Hide" : "Show"
Gui, %cmd%, NA
return

1クリックでいまマウスカーソルが上にある画像を保存、
ファイル名はクリップボードの中身になる、ってできますか？
出来るならやり方は自分で調べるので簡単か難しそうかだけ
教えてください。

なんか見つけたので貼っておきますね
http://yomi.bbspink.com/test/read.cgi/ascii2d/1224065348/463

もうちょい具体的な例出してくんないとアドバイスのしようもない

>>645
ぜんぜん関連性の無い板での誤爆レスを、
たった1分でAHKスレの質問に対する回答だと判別するとは・・・

中田氏好きは仕事早杉

カーソルをはやく動かしたくてキーリマップで
{UP}{UP}{UP}{UP}{UP}　を割り当てたんだけど、
動きがたまってしまい、キーを離した後もしばらく{UP}してしまいます。
キーが溜まらない方法ってありますか？

kbdacc使えば。カーソル以外も速くなるけども。
http://www.jsdlab.co.jp/~kei/download/index.html

SendMode
SetKeyDelay

windowsの設定でキーリピート速度あるていど早くできるよ。

繭スレが移転したので報告
Windows板　→　ソフトウェア板

窓使いの憂鬱 8
http://pc11.2ch.net/test/read.cgi/software/1225802237/

>>649
速度は申し分ないけどXPで^m押しっぱなしにすると
mが表示されまくって使い物にならない…

流行らすページ見れる？

http://lukewarm.s101.xrea.com/
だと見えないけど

http://lukewarm.s101.xrea.com/index.html
だと見えるね。

十分くらい前まではどっちもおｋだったんだけど…
更新中かな？

ステータスバーのテキスト取得方法について質問です。

例：フォアグラウンドのIE6のステータスバーのテキストを取得

ControlGetText,var,msctls_statusbar321,A

これで、左下の「ページが表示されました」という文字列は取得できましたが、
右に出る「印刷中」とか、ゾーンを示す「インターネット」の部分の文字を取得したいです。

たぶん、ステータスバーの左から3番目のテキストを取得みたいな順番を指示する
オプションがありそうな気がしますが発見できませんでした。

この例のとき、右下のテキストを取得するには、どうすれば可能でしょうか。

StatusBarGetText

>>657
なんと！！そんなコマンドがあったのですね。
あっさりできました。ありがとうございます。

ControlGetTextやControlSetTextを使ってコントロール上のテキストを取得したり変えたりしたいんですが　wxWindowClassNR16というClassNNからはうまくテキストを取得・変更できません(似たような見た目のEdit4というClassNNからは取得・変更できるのですが・・・)
なにか特別な取得方法があるのでしょうか？　それとも別の場所にテキストがあるのでしょうか？（名前にEditがあるClassNNは全て調べました）

誰かウインドウクラスがTApplicationなウインドウを
"左右に並べて表示"したときに二つ分のウインドウとして認識される問題を解決した
"左右に並べて表示"をAHKで作ってくれまいか？

>TApplicationなウインドウ
TApplicationコンポーネント使ってるアプリを探すところからやらせるのかよ
せめて具体的なアプリ名の一つ二つくらい提示したら？
該当アプリ使ってる奴が調べてくれるかもよ

多分デルファイで作ってるやつがそうだと思う。
Jane doe StyleとかJTrimとかXTMemoとか。

WinGet したらこうなった。ほぉ・・・

[3 / 10]
hwnd : 0x3130502
pid : 3412
Title : 『AutoHotkey スレッド part6』 にレス
Class : TWriteForm
Exe : C:\Program Files\Jane Style\Jane2ch.exe
Window : [Normal] pos(170, 129), size(642, 517)

[4 / 10]
hwnd : 0x11303f6
pid : 3412
Title : Jane Doe Style 【ソフトウェア】 - AutoHotkey スレッド part6
Class : TMainWnd
Exe : C:\Program Files\Jane Style\Jane2ch.exe
Window : [Normal] pos(3, 0), size(796, 738)

[5 / 10]
hwnd : 0x16a03c0
pid : 3412
Title : Jane
Class : TApplication
Exe : C:\Program Files\Jane Style\Jane2ch.exe
Window : [Normal] pos(512, 384), size(0, 0)

アクティブウインドウを強制終了させるahk教えてください
ありがとうございました

「無変換キーを押すとアクティブウィンドウ以外を最小化」といった動作をさせるには
どう記述をすればいいでしょうか？
ご存知の方がいらっしゃれば、ご教示頂きたいです。
よろしくお願いします。

まず自分で考えればいいのに。そうじゃなきゃ他ソフトを使えばいい。
AutoHotkeyにこだわる必要ないと思うよ。

>>664
Send,!{F4} でも WinKill でも WinClose でも好きなの使え

>>665
無変換キーのキーコード調べてLoopでアクティブウィンドウ以外をWinMinimize
http://lukewarm.s101.xrea.com/KeyList.html

ていうかお前らリファレンス嫁

ほんとだな
ご存知とか言うレベルじゃないな
ちったー考えろ

>>667
ヒントありがとうございます。
やってみます。

; アクティブ窓以外を最小化（＋戻すトグル）
; 戻す方は WinActivate なんでキモいかも
#1::HideNoActiveWindows()
#2::HideNoActiveWindows(true)

HideNoActiveWindows(toggleRestore=false) {
　static LastMinimizeList
　NG_EX_STYLE := 0x00000080 ; WS_EX_TOOLWINDOW
　if (toggleRestore && LastMinimizeList != "") {
　　Loop,PARSE, LastMinimizeList, `,
　　　WinActivate, ahk_id %A_LoopField% ; アニメ効果Onだと厳しい?
　　LastMinimizeList := ""
　　return
　}
　DetectHiddenWindows, Off
　WinGet, me, ID, A
　WinGet, list, List
　Loop, %list% {
　　hwnd := list%A_Index%
　　WinGet, MinMax, MinMax, ahk_id %hwnd% ; 最小化してたら無視
　　WinGet, ExStyle, ExStyle, ahk_id %hwnd% ; 除外対象用
　　WinGetPos, ,,w,h, ahk_id %hwnd% ; TApplication等誤爆防止?
　　if (hwnd == me) || (MinMax == -1) || (w == 0 && h == 0) || ((ExStyle & NG_EX_STYLE) > 0)
　　　continue
　　PostMessage, 0x112, 0xF020,,, ahk_id %hwnd% ; (=WinMinimize)
　　LastMinimizeList := hwnd . "," LastMinimizeList ; 逆順
　}
　LastMinimizeList := toggleRestore ? LastMinimizeList . me : ""
　Sleep, 100
　WinActivate, ahk_id %me% ; これがないと非アクティブになる...
}

質問者じゃないけど、正常に動いたよ。これは便利だな

>>670
ありがとうございます！！
早々に行き詰まっていたので、書いてくださってすごく嬉しいです。
丁寧な説明まであって感動です。いい人すぎる。

でもなぜか実行してみるとエラーが出ました…orz
>>671の方は正常に動いているようなので、きっとこちらの環境が原因だと思います。（因みにXP sp2です）
原因はこれから調べていこうと思います。判明したら報告させて頂きます。

↓一応エラーダイアログの内容をそのまま貼り付けておきます。

Error: This line does not contain a recognized action.

Specifically: 　static LastMinimizeList

Line#
---> 006: {

The program will exit.

全角スペースは消した?

>>673
ありがとうございます！まさにご指摘の通りでした！
全角スペース…真っ先に考えるべきところでしたね。でも多分自分じゃなかなか気付けなかったと思います…。
本当に助かりました。
これで完璧です。希望通りの動作です。
手助けしてくださった方々、本当にありがとうございました！

使ってるエディタで全角スペースは目立つように設定しておくといいよ
基本だ

貼ったときにインデントがあった方が見やすいけど・・・やらん方がいいのかな
Janeとかなら、アンカーとか、IDで見りゃいいんだけど...

/* チラシの裏
Guiの機能を丸々関数コンポーネント化しようとすると、どうしてもGUI番号の設定で実行時エラーになる

#NoTrayIcon
HogeGui_Init(10, "あああ", "いいい", ...)
return
HogeGui_Init(guiNo, opt1, opt2, ・・・) {
　Gui, %guiNo%:Default ; ← ここでランタイムエラー
　Gui, Add, HogeBox, %opt1%
　　：
　Gui, Show
}

結局は関数外でどうにかするわけだが、関数からGosubだけ無理だった・・・んでタイマーつかった

HogeGui_Init(guiNo, opt1, opt2, ・・・) {
　global hoge_gui_no
　hoge_gui_no := guiNo
　SetTimer, HogeGui_CreateGui, 0
}
HogeGui_CreateGui:
　SetTimer, %A_ThisLabel%, off
　Gui, %hoge_gui_no%:Default ; ← ここでランタイムエラー
　Gui, Add, HogeBox, %opt1%
　　：
　Gui, Show
　return
*/

あ、コピペ消してな。ま、チラ裏なんでｗ

ネタ。色々なアンチウィルスで調査してくれるところを他スレで見たんで

Autohotkey.exe (v1.0.47.06) を調査したやつ
Result: 2/36 (5.56%)
ttp://www.virustotal.com/analisis/ad6938129ca0d6b8c8f0c39ba9e1614c

Ahk2Exeで自作スクリプトをコンパイルした実行ファイル を調査したヤツ
Result: 7/36 (19.45%)
ttp://www.virustotal.com/analisis/423e5f6d3b6a45e155daf0ccd85f24f7


カスペ、PC-Toolsあたりで誤爆（？）か
ただ、以前こっちのノートンで消されたスクリプトを再コンパイルしたやつなんだが・・・

>>678
UPX使ってるからじゃねぇの？よく分からんが

キーの統一が出来るのが凄い便利だね。
CTL＋Cがコピーじゃないこともあるし、それを統一するのをメインに使ってる。

昔は、AHKって繭よりレスポンス悪くて、モデファイドキーの設定が
制限あると思ってたけど、
レス眺めて参考にして設定作ってったら、十分いけるわｗ　感謝感謝。
Spaceをモデファイドキーにするようになったら
CapsLocが使えなくても問題なくなったし。USBメモリから使えるのも便利だし。
こっちに移行するかな。

被ってるけど基本的には違う目的だからなー。AHKだけで出来るならその方がいいんじゃね?

他の起動中プロセスのPIDから起動時コマンドラインを得る方法って、
ReadProcessMemoryするしかないのかね？
一応気合いで実装して問題なく動いてはいるんだけど、
やり方がやり方なだけになんか不安だ…
もし他に方法知ってる人いたら、教えて欲しい…

kwsk

>>683
そんな凄いことが出来るのか。やりかたをぜひとも教えてほしい

>>684　>>685
ttp://lukewarm.s101.xrea.com/up/file/091.zip
UPしてきた。あんまり信用しないでね。俺自身不安だから。
中にコメントで書いてるけど、一応方法を。
各プロセスの0x00020044にコマンドラインが書かれてるアドレスへのオフセット、
0x00020042にバイト数が書かれてるからそれをReadProcessMemoryで読み出し、
さらにその情報からコマンドライン文字列を得る。
wcharで書かれてるからWideCharToMultiByteで変換かける、って感じかな。
仕様書とかあったの見つけて作ったわけじゃないんで、ホント信頼性が不安。
一応20個ほどのソフトで試したけど動いてるから、問題はないと思うんだけど…

ｔｈｘ。DLしました。参考にさせていただきます！

firefoxとfirebugみたいに同じahk_classのものってどうやって切り分ける？
タイトルしか方法はないのかな？

>>686
ttp://lukewarm.s101.xrea.com/test/read.cgi/bbs/1146398137/115
アドレスはkernel32.dllのバージョンによって異なるらしいから決め撃ちじゃ駄目なんじゃない

ウィンドウスタイルが異なるなら・・・
でもfirefoxだと大体同じだからなぁ・・・

firebug入れてないけど、メインウィンドウとTabMixPlusのオプション窓の違いは・・・
WS_MAXIMIZEBOX, WS_THICKFRAME の有無だった

って風にやるとか

>>689
そうだったのか、情報ありがとう。
というか、まさかMouseGesture.ahkに入ってたとは…
マウスほとんど使わないからノーチェックだった。
こんな簡単にできるなんて…
なんか危険っぽいんで>>686のファイルは削除しときました。

GuiのListViewで
選択したり追加したり消したものを
随時取得してそれらの項目をまとめて処理っていうのをやりたかったんだけど
リファレンスが難しくてついにコピペの壁にぶち当たった
一連のプログラムの例は難しいね
個別にサンプルがないとコピペしかできない素人には手がかりがなくてお手上げ

LV_* は独立してメニューにあってもいい気がするな

■ フォーカス行のmカラム目の値を取得
row := LV_GetNext(0, "F")
LV_GetText(row, value, m) ; valueに値が入る

■ 選択された行に対して何かする
row := 0
Loop
{
　row := LV_GetNext(current, "C")
　if (row == 0)
　　break
　〜 行番号変数 row で何かする〜
}

グリッドって位置を変えたり何かしてグダグダになるから、
最初に、getter, setter 作った方が後で楽かも

>>693
サンクス！
参考に組み立ててみるよ

プロセス起動して、標準出力を得るのって、流行ページの [プロセスを起動して標準出力を読み書き] みたいな方法しかない？

なんだか分からんけど、md5sum.exe 標準出力がとれずに困ってる。

GetMd5(file) {
cmd = md5sum "%file%"
pid := PRun(cmd)
out:=PRead(pid)
PWaitExit(pid)
PClosehandle(pid)
return out
}

でいけるはずなんだが、、、

cmd = md5sum
ならusageの標準出力とれる・・・。

>>695
その関数コピペして使ってみたけど普通に取れたよ。

cmd = md5sum
にすると戻ってこないで永久待ちになってしまう。
あとファイル名間違ってると内容が空。

俺のとはmd5sum.exe自体が違うみたいだから
参考にならんかもしれない…

そか。色々あるから変えてみるかな。

左Winキー + hjkl でカーソル移動はできたんだけど
左Winキー + L の時だけ、右へのカーソル移動と同時にPCロックがかかってしまう。。

このソフト内で 左Winキー + L のロックだけを無効化することはできる？

先頭に$を付ける

>>699
レスサンクス

だけどVista環境じゃできなかったぜ。。。

XPだと、下ので、Win＋Lが無効になって、Rightが効くようになるんだがなあ。

#h::left
#j::down
#k::up
#l::right

#UseHookは？

>>700
Space & j::Send,{Down}
Space & h::Send,{Left}
Space & k::Send,{Up}
Space & l::Send,{Right}
Space::return
+Space::Send,{Space}
Space up::Send,{Space}

あきらめてスペース使ってるorz
ついでにChgKey使ってスペースの左右にLCtlとRAltして、
~LCtrl up::Send,{vk1Dsc7B}
~LAlt up::Send,{vk1Csc079}
でIMEのon/offとか。難しい機能使えん・・

GUIウィンドウのコントロールの無いところをドラッグしてウィンドウを移動したい。
GUIはタイトルバーなし (-Caption)。

OnMessageで、 WM_MOUSEMOVE(0x200) 受け取る関数を作る
で、LButton押下されたら初期押下地点からの移動差分だけ WinMove してるんだが
追従性が悪くてマウスポインタが窓の外にでると駄目になるorz

こういう窓ってよくあるけど、レスポンスよく実装するにゃどうすればいいのかな。

>>703
OnMessage(0x84,"WM_NCHITTEST")
WM_NCHITTEST(){
Return 2
}
でどうだろう。

>>704
サンクス。目から鱗。まさにこれ。

自前で処理するんでなくて、タイトルバーにいるように振る舞えってことなのね。
ttp://www.winapi-database.com/Message/WM/WM_NCHITTEST.html

ahk2exeでコンパイルしてEXE化したあとのファイルについて質問です。

コンパイル前のスクリプトに戻して改造されると、困るものを制作しています。
困る理由は、ウェブアクセスを伴うので、ユーザ側でアクセス頻度を変えてしまうと、
サーバ側に迷惑がかかり、しいては配布元へのクレームが想定されるためです。

このような想定外の改造を防ぐには、コンパイル済みEXEから、元スクリプトの抽出を
防止すればよいと思いますが、ahkをパスワードつきでコンパイルしてもパスワードが
わかってしまった場合、

・完全に元のスクリプトに戻すことが可能
・一般的な逆コンパイルと一緒で、ほぼネイティブコードの抽出しか出来ない

の、どちらでしょうか。

ちなみに、ahk2exeで最弱なコンパイルを施し、exe2ahkをつかって展開したところ、

・スクリプトに書いてあった「;」や「/*・・・*/」など、実行に無関係なデータは消滅していた
・スクリプト内の変数の文字、タブ、空行の位置は、すべて元の状態が再現できていた
・一度も使われていない関数も含め、includeした内容はすべて収録されていた

ことがわかりました。とくに3番目は、　#includeなどで、関係ない関数を大量に
収録したのを一緒にコンパイルすると、無用な漏洩事故につながる恐れありですね。

> パスワードつきでコンパイルしてもパスワードがわかってしまった場合

そもそも、この想定ってどうなの。容易に分かりづらいパスワード設定すりゃいいんでないの？
パスワード生成機で512桁のパスワード作ってコマンドラインで渡したけど普通にコンパイル通ったよ。

そもそもインタプリタ型の言語の簡易コンパイルに堅牢性を期待する方が間違いのような

>>707
つ /nodecompile
参照　>>391-395
　　　　ttp://www.autohotkey.com/docs/Scripts.htm#ahk2exe
　　　　※パスワードはたぶん最初の64文字までしか見てない様子

#includeの件は、関数の動的呼び出しな可能なahkでは、
不要なincludeなのかどうかをコンパイル時に判別できないので、
全てexeに含めざるを得ない
exeを配布するのであれば、それくらいは開発者が理解しているべきかと

仕事でシビアな使い方をするつもりにしては下調べが甘い、つか
質問する前に現スレを [ahk2exe] なり [コンパイル] なりで検索するくらいするべきだと思うが。
そうすりゃ/nodecompileなんてすぐ出てくる

>>708-710
レスthx。下調べが甘いか辛いかはわからないけど、じつは俺>>395なのよ。
あのあと本家を含めて各所回ってみたけど、逆コンパイルについての情報は
解析目的で使用されることが多いためか、情報自体が少ないようで。

コンパイルしたexeには、そのexe自体に、暗号を解くコードと、鍵自身が
同梱されてるわけだから、それを簡単に解く裏ツールがあるかが気になって。

調べた範囲では、そのようなツールは見つからなかったけど、
元々がオープンソースだから、識者が作ろうと思えば簡単に出来るのだろう。

ただ、大前提として、>>708-709の言うとおり、堅牢性を必要とする場所にahkは
適さないことがわかったので、コア部分は、別の方法で再実装することにします。

コンテキストメニューってWinMenuSelectItemで選択できたりしないの？

実のところ、現在公開されているソースファイル群の中には、
ahk2exeで暗号化する部分やファイルを出力するI/O部分のソースは含まれていなかったりする
（ビルドは可能なように、ヘッダとlibは含まれているけど）
なので、どのようにエンコードしてるかなどの詳細は、バイナリから解析するしか方法が無い
exe2ahkについてもソース非公開だし、/nodecompileオプションのところのソースも何だかわざと曖昧にしてる感じもする

スクリプトアイコンだけど
タスクトレイの設定で隠す設定にしてるのに
スクリプトを一旦終了させて再度起動する度に元に戻るんだけど
これはどうしようもないのかな？

因みに使ってるスクリプトは、MouseGesuture.ahkです。

AHKで、Windows上で動いているプログラムのPIDを
一括取得するコマンドってありますか？
コマンドラインだとtasklistコマンドが該当します。

なんかPCが遅いと思っていると、特定のプログラムが暴走してCPUを
食いつぶしていることがあるので、発見したら警告を出したいと考えています。
CPU使用率は、はやらせるページ管理人さんのCPU使用率コマンドを使うとして

pid:=（全取得）
Loop,parse,pid,`n {
　pid:=（数字だけ抜き出す）
　now_usage:=GetProcessCPUState(pid,period=0)
　全調査したらbreak
　}

作るとしたらこんな感じで考えていますが、なにかよい方法ありますでしょうか。

tasklist コマンドの標準出力をパースすればいいじゃないかな

#IfWinActive, Sugar＋Spice!
{
WheelUp::LButton
}
エロゲで上みたいにテストしたら
誤動作してLButtonも出るけど不意にWheelUpもでるみたいな状態になるんだけど
どうやったら解決できますか？

{ .. } ブロックいらなくね？

alt+tabみたいに開いた順番でウインドウ変更していくんじゃなくて、
タスクバーの表示順にウインドウ変更する方法ってない？

あるサイトでwin＋tabでやるって書いてあるんだけど、win+tabだと必ず2番目のウィンドウにフォーカスが当たっちゃうし。
alt+escも開いた順番になるので同様に出来ない。

Alt+Escならタスクバー順になるだろ
それともAlt+Shift+Escのことか？

>>720
レスありがとう
いや、順番どおりにならないのだよ。
それともWINDOWSの設定か何かが必要なのかな

ttp://www.autohotkey.com/forum/topic18652.html

ここのTaskButton.ahkで、ボタンの並びや各pid、ウィンドウハンドルなどが取得できるから、
次のアプリを WinActivate , ahk_id %HWND% すれば出来そうな気がする

>>717
WheelUpとかDownって押し下げイベントしかでないから、
RemapするとLButton押し下げのままで離されなくなるんじゃない？

>>721
少なくとも俺も順番通りにはならない。
シェルがbbLeanだからかもしれないが。

やってみたわけじゃないけど
AHK側でウィンドウの増減を監視して
その順番をIDでストックしておけば
タスクバーの順番でどうにか出来そうな気もする

>>722
コレいいな

はぁ
ゲームパッド用のahk書いてるんだけど誰か手伝ってくれないかな

>>705
もう必要なさそうだけど
SetWinDelay,0 でスムースに動くようになったりしない？

パッドだけ、いまだに自作のツールでまかなってる
ahkだと面倒すぎ

>>728
どう面倒なの？
パッドの制御なら、ahkでもかなり自由度が高いと思うのだが

http://www.autohotkey.com/docs/scripts/JoystickMouse.htm
↑のをいろいろ改良して使ってた。PC買い直してパッドをつなげてないから今は使ってないけど。
カーソルの動きもスムーズでJoyAdapterやJoyToKeyより使いやすかった。

流行らせるところの BREGEXP.ahk つかうと、2度目以降でおかしな結果になる。
つか、前回の値が残っていて結果が...orz

Cとかやったことなくてよく分からんけど、文字列の終端は 0x00 らしいんで、
変数のメモリ確保のところで確保するバイト数+1でいったんゼロ埋めしてから
再度欲しいバイト数分だけ再確保したら期待通りに動いてるようなきがする。

行: 内容
**: VarSetCapacity(%name%_Match,length+1,0x00) ; ココを追加
98: VarSetCapacity(%name%_Match,length)
99: DllCall("RtlMoveMemory", Str,%name%_Match, Int,start, Int,length)

#105-#106も同様にやった。

識者の方、こんな修正でいいんでせうか？
あと、%name%_Matchってグローバル変数である必要がわからない・・・

>>727
サンクス。やってみた。ヌルヌル動くようになった。
けど、マウス素早く動かして窓から出るとNG。
そもそもマウスが窓内にあるときにメッセージが来るんで
方式としてはちと厳しかったかな、と。

>>729
ジョイスティック周りは、ほぼAPIレベルの機能しか提供されてないから、
結局、ahkでツールを再実装するのと同じ手間がかかるけど、
ahkの言語仕様ではやりたくないってことで
マウス代わりにするだけなら、上にも出てるサンプルの改良でいいんだけどさ

ボタンに割りあてるだけならいいけど
アナログスティックあたり面倒そう。

スティックじゃなくても十字がすでにめんどくさい

指定時刻に入力したコマンドを実行するタイマーで
複数同時稼動させるにはどうしたらいいかな
同じ内容のスレッドだと後から割り込まれたら前のは止まっちゃうよね

別スレッド作ればよいかと

if (条件 for Job1)
　SetTimer, Job1, 0
if (条件 for Job2)
　SetTimer, Job2, 0

　　：　

Job1:
　SetTimer, %A_ThisLabel%, Off
　job job job
　return

Job2:
　SetTimer, %A_ThisLabel%, Off
　job job job
　return

>>737
やっぱりその方法しかないかな
あらかじめ上限が決まっちゃうから微妙に不満足なんだよね

新たにAHKを書き出して実行

それだったら
#SingleInstance Off
で多重起動しちゃったほうが楽だよね