; ======================
; 最终功能:
; F1~F6 = 分别记录 6个独立点击坐标
; 数字1~6 = 按R键 + 点击对应编号的坐标
; ======================
; 配置文件 自动保存6组坐标
IniFile := A_ScriptDir . "\6坐标配置.ini"
; 初始化6组坐标 (默认值)
Loop, 6 {
IniRead, val, %IniFile%, Pos%A_Index%, X
if (val = "ERROR")
IniWrite, 600, %IniFile%, Pos%A_Index%, X
IniRead, val, %IniFile%, Pos%A_Index%, Y
if (val = "ERROR")
IniWrite, 400, %IniFile%, Pos%A_Index%, Y
}
; ======================
; F1~F6:记录对应坐标
; ======================
F1::
MouseGetPos, x, y
IniWrite, %x%, %IniFile%, Pos1, X
IniWrite, %y%, %IniFile%, Pos1, Y
Gosub, TipMsg
return
F2::
MouseGetPos, x, y
IniWrite, %x%, %IniFile%, Pos2, X
IniWrite, %y%, %IniFile%, Pos2, Y
Gosub, TipMsg
return
F3::
MouseGetPos, x, y
IniWrite, %x%, %IniFile%, Pos3, X
IniWrite, %y%, %IniFile%, Pos3, Y
Gosub, TipMsg
return
F4::
MouseGetPos, x, y
IniWrite, %x%, %IniFile%, Pos4, X
IniWrite, %y%, %IniFile%, Pos4, Y
Gosub, TipMsg
return
F5::
MouseGetPos, x, y
IniWrite, %x%, %IniFile%, Pos5, X
IniWrite, %y%, %IniFile%, Pos5, Y
Gosub, TipMsg
return
F6::
MouseGetPos, x, y
IniWrite, %x%, %IniFile%, Pos6, X
IniWrite, %y%, %IniFile%, Pos6, Y
Gosub, TipMsg
return
; ======================
; 数字1~6:按R + 点击对应坐标
; ======================
1::
Send {r}
Sleep 50
IniRead, x, %IniFile%, Pos1, X
IniRead, y, %IniFile%, Pos1, Y
Click %x%, %y%
return