按键精灵如何实现后台指定坐标点击左键

给我Q 我教你做
下面是一个QQ种地游戏的后台点击源码。获取鼠标指定窗口，获取鼠标位置，并后台点击4*6=24个点。在画图软件中可以测试，仅供参考。

Hwnd = Plugin.Window.MousePoint()
//调用插件得到鼠标停留窗口句柄，结果返回给变量hwnd
Rect = Plugin.Window.GetClientRect(Hwnd)
//调用插件根据窗口句柄得到当前客户区坐标数据，结果返回给变量Rect
MyArray = Split(Rect , "|" , -1 , 1)
//以"|"这个条件来分割字符串rect，结果返回数组MyArray()
//在这里这个字符串rect分割后有4个数组元素，它们分别是：
//MyArray(0)=客户区左上角X坐标
//MyArray(1)=客户区左上角Y坐标
//MyArray(2)=客户区宽度
//MyArray(3)=客户区高度
UserVar hang=6 "种几行"
UserVar lie =4 "种几列"
NxAdd = 24.81
NyAdd = 12.95
GetCursorPos x, y
x = x - MyArray(0)
y = y - MyArray(1)
Nx = x
Ny = y
temp=0
While temp < hang
For lie
Call Plugin.Bkgnd.LeftClick(Hwnd ,Nx, Ny)
Nx = int(round(Nx + NxAdd+0.6,1))
Ny = int(round(Ny - NyAdd,1))
Next
temp = temp + 1
Nx = int(round(x + NxAdd * temp+0.4,1))
Ny = int(round(y + NyAdd * temp+0.6,1))
Wend
EndScript

//指定点后台点击的例子------------------------
点击 = WaitClick()//等待点击
Delay 10
//得到鼠标指向的窗口句柄
Hwnd = Plugin.Window.MousePoint()
GetCursorPos x, y//保存当前坐标
//下面这句是得到窗口句柄的客户区大小
sRect = Plugin.Window.GetClientRect(Hwnd)
//MsgBox "得到窗口句柄："& hwnd //显示句柄
//下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串
//dim MyArray
MyArray = Split(sRect, "|")
//下面这句将字符串转换成数值
L = Clng(MyArray(0)): T = Clng(MyArray(1))
R = Clng(MyArray(2)): B = Clng(MyArray(3))
Do//循环开始
Delay 1000//等待1秒
Call Plugin.Bkgnd.LeftClick(Hwnd, x-l, y-t)//(变量为前台坐标系)
Loop//循环结点

→_→我i只是完成个任务。你说的可能可以录制下来然后→_→