浪漫庄园挖矿脚本 急求~QQ66296588~

373271567 我加你 顺便给你

我有，我QQ364233080，加你，绝对可以用。还能自动钓鱼，种植等

UserVar t=6800
//自定义的用户变量，表示挖一次用的时间
//当然，首先是获取窗口句柄，注意2种方式获得的句柄的区别：
Plugin hwnd1=window.foreground()
//上面这句获得的窗口句柄可以移动窗口，但是无法在窗口点击鼠标
Plugin hwnds1=window.mousepoint()
//现在用这句得到的句柄，可以在窗口内点击鼠标，但是无法移动这个窗口
//所以，如果你需要移动窗口，使用的句柄应该是hwnd1，而点击使用的是hwnds1
//当然，这2种方式取得的窗口，大小是一样的，所以坐标的计算就无所谓了
//获得鼠标位置，并转换为窗口坐标
VBSCall GetCursorPos(xget,yget)
Plugin clixy=BGKM5.ScrToCli(hwnds1,xget,yget)
VBSCall MyArray1=split(clixy,"|",-1,1)
VBSCall x=CInt(MyArray1(0))
VBSCall y=CInt(MyArray1(1))
//脚本开始寻找精确的挖矿点
LockMouse
MoveR 60,0
//锁定鼠标，并将鼠标移动开，防止矿锄的颜色、“挖矿”这样的字眼影响取色判断
Plugin wkxy=BkgndColor.FindColor(hwnds1,x,y,x+4,y+32,"000000")
//以鼠标最开始的点为左上角，在 4x32的范围内寻找黑色
//这么做的目的是找到地块格子的第一个黑色点，所以要求打开地块显示
wkxyarray=Split(wkxy,"|",-1,1)
hsx=wkxyarray(0)
hsy=wkxyarray(1)
Rem 寻找挖矿点
//在找到黑色的点之后，分别取这个点的左、