- //先定义变量
- dim x,y,bx,by,lx,ly,i,hm
- dim jt(7),t(8)
- jt(0)="s":jt(1)="x":jt(2)="z":jt(3)="y":jt(4)="1":jt(5)="3":jt(6)="7":jt(7)="9"
- t(0)="1t":t(1)="2t":t(2)="3t":t(3)="4t":t(4)="5t":t(5)="6t":t(6)="7t":t(7)="8t":t(8)="9t"
- y=501:by=542
- 标记 从头开始
- //检查游戏有没有开始,不然还没有开始就执行的哟?
- 如果 (376,484) 的颜色不等于 #c4efff 则
- 跳转到标记 从头开始
- 条件结束
- //如果已经出现在了箭头,就调用找数字的子程序,以确定它的起、始位置
- 调用子程序 找数字
- bx=x+35
- 如果表达式 (bx<hm) 为真,则循环执行
- i=0
- 循环 8 遍
- //按照变量上的图片循环找色
- 调用外部VBScript子程序 在屏幕区域里查找图形(x,y,bx,by,"Attachment:\"&jt(i)&".bmp",0.7,lx,ly)
- 如果表达式 (lx>0) 为真,则
- //如果找到,就调用按箭头子程序
- 调用子程序 按箭头
- 延时30毫秒
- //为了节省再找的时间,跳出寻找
- 跳转到标记 结束按键
- 条件结束
- //如果没有找到,就再加上1,继续下找
- i=i+1
- 循环结束
- 标记 结束按键
- //再继续往下找另一个箭头
- bx=bx+35
- 循环结束
- 标记 re
- //按空格的位置,如果大约是这个颜色就跳到标记re
- 如果 (652,482) 的颜色大约等于 #f7f0e9 则
- 跳转到标记 re
- 否则
- //如果不等颜色就按空格
- 超级模拟按键<Space>
- 延时200毫秒
- 跳转到标记 从头开始
- 条件结束
- 跳转到标记 从头开始
- 子程序 按箭头
- 如果表达式 (i=0) 为真,则
- 超级模拟按键<Up>
- 否则如果(i=1)为真,则
- 超级模拟按键<Down>
- 否则如果(i=2)为真,则
- 超级模拟按键<Left>
- 否则如果(i=3)为真,则
- 超级模拟按键<Right>
- 否则如果(i=4)为真,则
- 超级模拟按键<Num 1>
- 否则如果(i=5)为真,则
- 超级模拟按键<Num 3>
- 否则如果(i=6)为真,则
- 超级模拟按键<Num 7>
- 否则如果(i=9)为真,则
- 超级模拟按键<Num 9>
- 条件结束
- 子程序结束,回到调用处
- //这个是检察出现的箭头数量
- 子程序 找数字
- 如果 (455,485) 的颜色等于 #98ff 则
- 如果 (479,485) 的颜色等于 #a1ff 则
- x=359:hm=740
- 跳转到标记 14277
- 条件结束
- 条件结束
- 如果 (455,485) 的颜色等于 #98ff 则
- 如果 (474,484) 的颜色等于 #9aff 则
- x=341:hm=765
- 跳转到标记 14277
- 条件结束
- 条件结束
- i=0
- 循环 9 遍
- 调用外部VBScript子程序 在屏幕区域里查找图形(x,y,bx,by,"Attachment:\"&jt(i)&".bmp",0.7,lx,ly)
- 如果表达式 (lx>0) 为真,则
- //如果找到就调用结果的数据
- 调用子程序 数字结果
- 跳转到标记 14277
- 条件结束
- i=i+1
- 循环结束
- 标记 14277
- 子程序结束,回到调用处
- 子程序 数字结果
- 如果表达式 (i=0) 为真,则
- //如果出再的是一个箭头,那么它的位置是如下,以此类推
- x=520:hm=561
- 否则如果(i=1)为真,则
- x=497:hm=579
- 否则如果(i=2)为真,则
- x=482:h=595
- 否则如果(i=3)为真,则
- x=466:h=613
- 否则如果(i=4)为真,则