3
3

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?

More than 5 years have passed since last update.

私用AHKメモ

Posted at

;2Joy1::send,^v
;2Joy2::send,^f
;2Joy3::send,^s

vkF4sc029::Send {Del}

;AHK編集用
;sc03A::Reload

sc03A::
ifWinActive,ahk_class AcrobatSDIWindow
Send,^+r
else
ifWinActive,ahk_class WindowsForms10.Window.8.app.0.2bf8098_r15_ad1
Send,^s
else
Reload
return

#h::
Run, C:\Programme\TeraPad\TeraPad.exe
WinActivate, ahk_class TTeraPadMainForm
WinWait, ahk_class TTeraPadMainForm
Send, !fo
Clipbackup:=ClipboardAll
Clipboard=D:\Users\L\Documents\macro\Root.ahk
Sleep, 500
Send, ^v
Send, !o
Clipcoard:=Clipbackup
return

;HTML編集
:oc:p::
Clipbackup:=ClipboardAll
Clipboard=


Send ^v{Left 4}{Enter}
Clipcoard:=Clipbackup
return

:oc:flag_br::
Clipbackup:=ClipboardAll
Clipboard=

Send ^v{Enter}
Clipcoard:=Clipbackup
return

:oc:flag_cc::
Clipbackup:=ClipboardAll
Clipboard=

柏手返信

Send ^v{Enter}
Clipboard=

Send ^v{Enter}
Clipboard=


Send ^v{Enter}
Clipboard=

Send ^v{Enter}
Clipboard=


Send ^v{Enter}
Clipcoard:=Clipbackup
return

;ディスプレイ関連
RCtrl::#+Right
F10::#+Right

;割当変更
Ins::
Send,+{Del}
return

Appskey::Run, C:\Program Files (x86)\Opera\opera.exe /notrayicon

XButton2::MButton

#a::
WinActivate, ahk_class iTunes
Send, ^m
return

$Esc::
KeyWait, Esc, T0.8
if ErrorLevel
{
WinActivate, ahk_class iTunes
Send, ^m
}
else
{
send,{Esc}
}
keywait, Esc
return

;AA編集;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
^q::
Run, C:\Programme\TeraPad\TeraPad.exe
WinActivate, ahk_class TTeraPadMainForm
WinWait, ahk_class TTeraPadMainForm
Send, ^v
Send, ^{Home}
Send, !sr
WinWait, 置換
Send, {}n{TAB}
{}n
Send, !a
WinWait, 確認
Send, a
WinWait, ahk_class TTeraPadMainForm
Send, ^a
Send, ^x
Send, ^a
Send, ^c
WinWait, ahk_class TTeraPadMainForm
WinKill
Winwait,,内容が変更
Send, n
return

;IME;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
#Include IME_Func.ahk
vk1Csc079::
ret := IME_CHECK("A")
if( !ret ){
IME_ON("A")
IME_SetConvMode( "A", 25 ) ; R漢
}
return
vk1Dsc07B::IME_OFF("A")
return

;マウスジェスチャ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
RButton::
ifWinNotActive,ahk_class OperaWindowClass ;Operaがアクティブなときは無効
ifWinNotActive,ahk_class ahk_class MozillaWindowClass
ifWinNotActive,ahk_class TFormMain
ifWinNotActive,ahk_class SideBar_HTMLHostWindow
ifWinNotActive,ahk_class IMWindowClass
ifWinNotActive,ahk_class sfl_window_class
ifWinNotActive,ahk_class Chrome_WidgetWin_0
ifWinNotActive,ahk_class tn01tnmse
{
mg_active=1
mg_executed=0
mg_rheld=0
mg_str=
mg_dir1=
mg_idletime=0
MouseGetPos,px,py
px2=%px%
py2=%py%
loop
{
GetKeyState,st,RButton,P ;マウス右ボタンを押し下げている場合
if st=U
{
if mg_rheld=0
{
mg_active=0
if mg_executed=0 ;movement action(s)
if mg_str=L ;マウスを左に動かすと
{
Send,!{Left} ;Alt+Leftを送る
}
else
if mg_str=R ;マウスを右に
{
Send,!{Right} ;Alt+Right
}
else
if mg_str=U ;マウスを上
Send,!{Space}{n}
else
if mg_str=D ;マウスを下
{
;Send,!{F4} ;Alt+F4(閉じる)
MouseGetPos, , , id,
PostMessage, 0x112, 0xF060,,, ahk_id %id%, ; 0x112 = WM_SYSCOMMAND, 0xF060 = SC_CLOSE
}
else
MouseClick,R
}
else
MouseClick,R,,,,,U
return
}
else
if mg_idletime<30 ;timeout
{
MouseGetPos,dx,dy
dx-=%px2%
dy-=%py2%
powx=%dx%
powx*=%dx%
powy=%dy%
powy*=%dy%
pow=%powx%
pow+=%powy%
if pow>3600 ;sensitivity
{
if powx>%powy%
if dx>0
mg_dir2=R
else
mg_dir2=L
else
if dy>0
mg_dir2=D
else
mg_dir2=U
if mg_dir2<>%mg_dir1%
{
mg_str=%mg_str%%mg_dir2%
mg_dir1=%mg_dir2%
}
MouseGetPos,px2,py2
mg_idletime=0
}
else
mg_idletime++
}
else
if mg_rheld=0
if mg_executed=0
{
MouseGetPos,px2,py2
if px2<>%px%
if py2<>%py%
{
MouseClick,R,%px%,%py%,,,D
MouseMove,%px2%,%py2%
mg_rheld=1
mg_active=0
}
}
Sleep,10
}
}
MouseClick,R,,,,,D
loop
{
GetKeyState,st,RButton,P
if st=U
break
Sleep,10
}
MouseClick,R,,,,,U
return

3
3
0

Register as a new user and use Qiita more conveniently

  1. You get articles that match your needs
  2. You can efficiently read back useful information
  3. You can use dark theme
What you can do with signing up
3
3

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?