纯键盘操作者福音

sadfasdf

sfsfsf

sdfsdsf

sdf

ahk2
; 定义全局变量
global mouseMode := true
global speed := 2.0
global moveX := 0
global moveY := 0

; 每10ms执行一次MoveMouse函数，函数定义见最下方
SetTimer MoveMouse, 10

; 绑定hjkl键位，控制鼠标指针的左、下、上、右移动
#HotIf mouseMode ; 此行代码以下的键位绑定要求mouseMode == true
j:: {
    global moveX
    moveX := -10
}
j up:: {
    global moveX
    if (moveX < 0)
        moveX := 0
}

l:: {
    global moveX
    moveX := 10
}
l up:: {
    global moveX
    if (moveX > 0)
        moveX := 0
}

I:: {
    global moveY
    moveY := -10
}
I up:: {
    global moveY
    if (moveY < 0)
        moveY := 0
}

k:: {
    global moveY
    moveY := 10
}
k up:: {
    global moveY
    if (moveY > 0)
        moveY := 0
}

; 设置五级变速，当按住设定的a、s、d、f键位时会改变鼠标移动速度，
; 速度以a s d f递增，我用以下四个单词称呼他们：
; fast, dash, slow, and amble
f:: {
    global speed
    speed := 8.0
}
f up:: {
    global speed
    speed := 2.0
}

d:: {
    global speed
    speed := 4.0
}
d up:: {
    global speed
    speed := 2.0
}

s:: {
    global speed
    speed := 1.0
}
s up:: {
    global speed
    speed := 2.0
}

a:: {
    global speed
    speed := 0.5
}
a up:: {
    global speed
    speed := 2.0
}

; 控制鼠标点击操作
; left click
space:: {
    Click "Down"
}
space up:: {
    Click "Up"
}

; right click
o:: {
    Click 'R'
}

; u，i键绑定鼠标滚轮向上/向下
u:: {
    Click 'WheelUp'
}
N:: {
    Click 'WheelDown'
}

; 使用不常见的键位绑定ctrl+shift+[绑定这个鼠标模式，当按下这个键时，会切换鼠标模式
#HotIf ; 此行代码以下的任何键位绑定不需要任何要求
!space:: {
    global mouseMode
    mouseMode := !mouseMode
}

MoveMouse() {
    global moveX, moveY, mouseMode, speed
    if ((moveX or moveY) and mouseMode) {
        MouseMove(moveX * speed, moveY * speed, 0, "R")
    }
}

sdf