- 延时500毫秒
- 硬件模拟弹起<Right>
- face=1
- pt=pt+500
- 跳转到标记 采矿出包
- 条件结束
- 延时1000毫秒
- 条件结束
- 条件结束
- 如果表达式 (wx>=0 or wy>=0) 为真,则
- wx=wx+6
- //moveto wx,wy-200
- 延时100毫秒
- 调用子程序 拾取动作
- 跳转到标记 采矿跳转
- 条件结束
- 循环结束
- 延时100毫秒
- 子程序结束,回到调用处
- 子程序 山林矿场1层
- 如果表达式 (l=1) 为真,则
- 硬件模拟按键<Right>
- 延时50毫秒
- 硬件模拟按住<Right>
- 延时5300毫秒
- 硬件模拟弹起<Right>
- face=1
- 延时100毫秒
- 如果表达式 (c=1) 为真,则
- wx=-1
- wy=-1
- 否则
- 调用外部VBScript子程序 在屏幕区域里查找图形(240,y1,1039,y2,"血.bmp",0.8,x,y)
- 条件结束
- 如果表达式 (wx>=0 or wy>=0) 为真,则
- 否则
- 硬件模拟按键<Left>
- 延时50毫秒
- 硬件模拟按住<Left>
- 延时1900毫秒
- 按键<Shift>
- 延时100毫秒
- 硬件模拟按住<Up>
- 硬件模拟弹起<Left>
- face=0
- 延时3000毫秒
- 硬件模拟弹起<Up>
- l=2
- pt=0
- 延时100毫秒
- 条件结束
- 否则如果(l=2)为真,则
- 如果表达式 (pt>0) 为真,则
- 硬件模拟按住<Left>
- 延时pt毫秒
- 硬件模拟弹起<Left>
- face=0
- 否则如果(pt<0)为真,则
- pt=Abs(pt)
- 硬件模拟按住<Right>
- 延时pt毫秒
- 硬件模拟弹起<Right>
- face=1
- 条件结束
- 延时500毫秒
- 按键<M>
- 延时1500毫秒
- 如果 (837,292) 的颜色大约等于 #ff55 则
- 按键<M>
- 延时1000毫秒
- 否则
- 按键<M>
- 延时1000毫秒
- 硬件模拟按键<Right>
- 延时50毫秒
- 硬件模拟按住<Right>
- 延时4500毫秒
- 硬件模拟弹起<Right>
- face=1
- 延时100毫秒
- 硬件模拟按键<Left>
- 延时50毫秒
- 硬件模拟按住<Left>
- 延时1900毫秒
- 按键<Shift>
- 延时100毫秒
- 硬件模拟按住<Up>
- 硬件模拟弹起<Left>
- face=0
- 延时3000毫秒
- 硬件模拟弹起<Up>
- l=2
- 条件结束
- 硬件模拟按键<Left>
- 延时50毫秒
- 硬件模拟按住<Left>
- 延时500毫秒
- 按键<Shift>
- 延时100毫秒
- 硬件模拟按住<Up>