【AHK】实现无鼠标/纯键盘操作鼠标设置

鼠标手势用多了，肩部疼痛，而且尝试了一下，发现无鼠标纯键盘操作专注度更高。
以前觉得这玩意很无聊，有鼠标干嘛要在键盘上高鼠标？？现在觉得虽然键盘确实就够操控电脑，但是如果有有点鼠标动作的加持，效率会更高。
根据个人自用的习惯设定的，特别是带音量波轮的84键。

87键-键盘方案

global start := 0

;锁定/解锁使用 ;旧方案
;设置开关
~F2::
#capslock::
if(start == 0){
	start := 1
;	MsgBox, 0, ,==锁定 鼠标区==, 0.5
	return
}
else{
	start := 0
;	MsgBox, 0, , ===== 解除 =====, 0.5
	return
}



#if start==1

{

;=============鼠标区=============


Up:: MouseMove, 0, -50, 0, R

Down:: MouseMove, 0, 50, 0, R

Left:: MouseMove, -50, 0, 0, R

Right:: MouseMove, 50, 0, 0, R


+Up:: MouseMove, 0, -10, 0, R ;按下shift，减慢速度

+Down:: MouseMove, 0, 10, 0, R

+Left:: MouseMove, -10, 0, 0, R

+Right:: MouseMove, 10, 0, 0, R



!Up:: MouseMove, 0, -100, 0, R ;按下alt，加快速度

!Down:: MouseMove, 0, 100, 0, R

!left:: MouseMove, -100, 0, 0, R

!Right:: MouseMove, 100, 0, 0, R



;就近设置左右键

rctrl:: send {lbutton}

rctrl & rshift:: send {rbutton} 



9:: ;左键，配F8调整窗口用
8:: ;左键，配F7调整窗口用
1:: ;为啥安排在1、2因为，方便有时候拖动需求
SendEvent {Blind}{lbutton down}
KeyWait 1
SendEvent {Blind}{lbutton up}
return


2:: 
SendEvent {Blind}{rbutton down}
KeyWait 2
SendEvent {Blind}{rbutton up}
return


;鼠标滚轮，home设为点击主要作用重新定位，在长文本情况下

home:: send {lbutton} 

pgup:: send {WheelUp}

pgdn:: send {Wheeldown}


;84键盘右上角的小滑轮终于派上用场了

Volume_Up::send {Wheeldown} 

Volume_Down:: send {Wheelup}


F9:: Send, {Volume_Down}

F10:: Send, {Volume_Up}

;配合网页视频加速插件专用 z x c 

F11:: Send, {x}

F12:: Send, {c}

delete:: Send, {z}



}
#if

;因为太好用了，单独设置波轮开关

global rotaswitch:=0

~F6::
if(rotaswitch == 0){
	rotaswitch := 1
	return
}
else{
	rotaswitch := 0
	return
}

#if rotaswitch==1
{

Volume_Up::send {Wheeldown} ;84键盘右上角的小滑轮终于派上用场了
Volume_Down:: send {Wheelup}

}
#if 

全键-键盘方案

牺牲数字区做鼠标，感觉也是巨好用！！

具体代码如下

global mouCtrlSwh := 0

;设置开关
pause::
if(mouCtrlSwh == 0){
	mouCtrlSwh := 1
;	MsgBox, 0, ,==锁定 鼠标区==, 0.5
	return
}
else{
	mouCtrlSwh := 0
;	MsgBox, 0, , ===== 解除 =====, 0.5
	return
}


#if mouCtrlSwh==1

{

;=============鼠标区=============


Numpad8:: MouseMove, 0, -50, 0, R

Numpad5:: MouseMove, 0, 50, 0, R

Numpad4:: MouseMove, -50, 0, 0, R

Numpad6:: MouseMove, 50, 0, 0, R

	

^Numpad8:: MouseMove, 0, -10, 0, R ;按下 ctrl，减慢速度

^Numpad5:: MouseMove, 0, 10, 0, R

^Numpad4:: MouseMove, -10, 0, 0, R

^Numpad6:: MouseMove, 10, 0, 0, R



!Numpad8:: MouseMove, 0, -100, 0, R ;按下 alt，加快速度

!Numpad5:: MouseMove, 0, 100, 0, R

!Numpad4:: MouseMove, -100, 0, 0, R

!Numpad6:: MouseMove, 100, 0, 0, R




Numpad7:: 
SendEvent {Blind}{lbutton down}
KeyWait 1
SendEvent {Blind}{lbutton up}
return

Numpad9:: 
SendEvent {Blind}{rbutton down}
KeyWait 2
SendEvent {Blind}{rbutton up}
return

;滚轮区
Numpad0::send {Wheeldown} 

Numpad1:: send {Wheelup}


Numpad2:: Send, {WheelLeft}

Numpad3:: Send, {WheelRight}


NumpadSub:: Send, {Esc}

NumpadAdd:: Send, {tab}


;比例调整

NumpadDiv:: 
Send, ^-
return

NumpadMult:: 
Send, ^=
return


;多任务

NumpadDot::
Send, ^!{tab}
return


;NumpadEnter

}
#if

		

学习感受：

快捷键，吸收的教训就是，但没想到这个快捷键竟然是安插在button的参数里面。
如果是单个冒号，在后面接东西，意思是事件，就是设按钮要触发的。刚接触时，escape:呢，就是理解错了，开始说理解成了一个函数，只要加一个这样东西就可以加加个东西，或者就会触发，多次尝试才发现，他是个escape按键的触发事件。