| よく使うので、Insertとマウスホイール下回転に割り付けしています。 マイデファルトとして、エディットボックスの大きさ、回転0、スタイル名、文字列フォーカス(IME表示) 、 ;原点左中、ダイアログ外外にマウス移動を自己用に設定。
ATOKの表示、非表示を設定しているので、各項目設定後はIMEを表示。
Insertで文字記入ダイアログ表示、もう一度Insertでマイデファルトの表示。
;文字記入 Insert:: Send,text{Enter} ;文字記入 WinWaitActive,文字記入 ;文字記入がアクティブになるのを待つ MouseMove,-20,40 ;ダイアログ外外にマウス移動 Return
#IfWinActive 文字記入 ahk_class #32770 ;マイデフォルト Insert:: WinMove,,, , ,600,550 ;ダイアログの大きさ Send,!t{Right 3}0!sm+{Tab} ;回転0・スタイル名・文字列フォーカス(IME表示) MouseClick,L,315,230,1,0 ;原点左中 MouseMove,-20,40 ;ダイアログ外にマウス移動(即実行できるように) Return ;マイデフォルト #F12:: WinMove,,, , ,600,550 ;ダイアログの大きさ Send,!t{Right 3}0!sm+{Tab} ;回転0・スタイル名・文字列フォーカス (IME表示) MouseClick,L,315,230,1,0 ;原点左中 MouseMove,-20,40 ;ダイアログ外にマウス移動(即実行できるように) Return
+Insert::Send,!s!{Down}m+{Tab} ;スタイル名-MS2.5-文字列フォーカス(IME表示) ^Insert::Send,!s!{Down}mm+{Tab} ;スタイル名-MS4-文字列フォーカス(IME表示) #Insert::Send,!s!{Down}{Home}+{Tab} ;スタイル名-個別設定選択-字列フォーカス(IME表示) +Enter::Send,!zd ;サイズ図面から ^Enter::Send,!gd ;文字列図面から !Enter::Send,!r ;置換記入 ^h::Send,{BS} ;ATOKのCtrl+Hの一部が機能しないので
;角度取得 図面から ^+LButton:: MouseClick,L,490,315,1,0 ;角度図面からボタンクリック Return
;背景色で塗りつぶし !F11:: Send,!s!{Down}{Home} ;スタイル名-個別設定選択 Send,!1 ;背景色で塗りつぶし選択 MouseClick,L,50,150,1,0 ;エディットボックスアクティブでIMEバー表示(ATOKでIMEバーを表示、非表示設定している為) Return
;以下は原点を設定 ^Numpad1:: MouseClick,L,315,255,1,0 ;原点左下 MouseMove,-20,40 ;ダイアログ外にマウス移動 Return ^Numpad2:: MouseClick,L,335,255,1,0 ;原点中下 MouseMove,-20,40 ;ダイアログ外にマウス移動 Return ^Numpad3:: MouseClick,L,355,255,1,0 ;原点右下 MouseMove,-20,40 ;ダイアログ外にマウス移動 Return ^Numpad4:: MouseClick,L,315,230,1,0 ;原点左中 MouseMove,-20,40 ;ダイアログ外にマウス移動 Return ^Numpad5:: MouseClick,L,335,230,1,0 ;原点中中 MouseMove,-20,40 ;ダイアログ外にマウス移動 Return ^Numpad6:: MouseClick,L,355,230,1,0 ;原点右中 MouseMove,-20,40 ;ダイアログ外にマウス移動 Return ^Numpad7:: MouseClick,L,315,210,1,0 ;原点左上 MouseMove,-20,40 ;ダイアログ外にマウス移動 Return ^Numpad8:: MouseClick,L,335,210,1,0 ;原点中上 MouseMove,-20,40 ;ダイアログ外にマウス移動 Return ^Numpad9:: MouseClick,L,355,210,1,0 ;原点右上 MouseMove,-20,40 ;ダイアログ外にマウス移動 Return #IfWinActive ;文字記入ここまで
|