- 跳转到标记 杀怪中
- 条件结束
- 调用子程序 捡东西
- 子程序结束,回到调用处
- //**********************************
- 子程序 捡东西
- 循环 6 遍
- 按住#pick
- 延时64毫秒
- 弹起#pick
- 延时8毫秒
- 循环结束
- 子程序结束,回到调用处
- //*****************************
- 子程序 定位
- //防卡信号
- i=1
- 鼠标移到 62 , 384
- 延时128毫秒
- 标记 继续定位
- //拣东西
- 循环 2 遍
- 按住#pick
- 延时64毫秒
- 弹起#pick
- 延时8毫秒
- 循环结束
- 调用外部VBScript子程序 在屏幕区域里查找颜色(daditx,dadity,daditx+539,dadity+542,coor,cox,coy)
- 如果表达式 (xx1>0) 为真,则
- xx=xx1-cox:yy=yy1-1-coy
- 如果表达式 (abs(xx)>1 or abs(yy)>2) 为真,则
- 如果表达式 (abs(yy)>1) 为真,则
- 如果表达式 (yy>0) 为真,则
- 按住<W>
- 否则如果(yy<0)为真,则
- 按住<S>
- 条件结束
- 条件结束
- 循环 2 遍
- 按住#pick
- 延时64毫秒
- 弹起#pick
- 延时8毫秒
- 循环结束
- 按住#pick
- 延时64毫秒
- 弹起#pick
- 延时320毫秒
- 如果表达式 (abs(xx)>1) 为真,则
- 如果表达式 (xx>0) 为真,则
- 按住<A>
- 否则如果(xx<0)为真,则
- 按住<D>
- 条件结束
- 条件结束
- 循环 3 遍
- 按住#pick
- 延时64毫秒
- 弹起#pick
- 延时192毫秒
- 循环结束
- 弹起<A>
- 弹起<D>
- 弹起<S>
- 弹起<W>
- //防卡住
- xx2=xx1:yy2=yy1
- 调用外部VBScript子程序 在屏幕区域里查找颜色(daditx,dadity,daditx+539,dadity+542,coor,cox,coy)
- 如果表达式 (xx2=xx1 and yy2=yy1) 为真,则
- 如果表达式 (i=1) 为真,则
- 如果表达式 (yy>0) 为真,则
- 按住<W>
- 否则如果(yy<0)为真,则
- 按住<S>
- 条件结束
- 如果表达式 (xx>0) 为真,则
- 按键<D>
- 否则如果(xx<0)为真,则
- 按键<A>
- 条件结束
- 循环 2 遍
- 按住#pick
- 延时64毫秒
- 弹起#pick
- 延时192毫秒
- 循环结束
- 否则如果(i=2)为真,则
- 如果表达式 (xx>0) 为真,则
- 按住<A>
- 否则如果(xx<0)为真,则
- 按住<D>
- 条件结束
- 如果表达式 (yy>0) 为真,则
- 按键<S>
- 否则如果(yy<0)为真,则
- 按键<W>
- 条件结束
- 循环 2 遍
- 按住#pick
- 延时64毫秒