- 从左上到右下查找图片 "Attachment:\图标.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.7
- 如果 intX > 0 并且 intY > 0 则
- (鼠标)移动到 (intX, intY)
- (鼠标)左键单击, 1次
- 条件结束
- 定义变量 StandX, StandY
- 定义变量 a(7), nPic, nSeach
- 从左上到右下查找颜色 "84D0D9",把找到的坐标保存到 (PointX, PointY),指定区域(左:0 上:0 右:1280 下:1024)
- 如果 PointX > 0 并且 PointY > 0 则
- 令 StandX = PointX
- 令 StandY = PointY
- (鼠标)移动到 (PointX + 444, PointY + 195)
- (鼠标)左键单击, 1次
- 条件结束
- 延时 50 毫秒
- 循环 k 从 0 到 9
- 循环 j 从 0 到 6
- 令 a(j) = 0
- 循环结束
- 令 PointX = StandX
- 定义变量 h
- 令 h = 0
- 如果 k > 0 则
- 循环当 h = 0 时
- 如果点 (StandX,StandY) 的颜色不等于 "3F9CCA" 则
- 延时 10 毫秒
- 否则
- 令 h = 1
- 条件结束
- 循环结束
- 条件结束
- 定义变量 hh
- 令 hh = 0
- 循环当 hh = 0 时
- 如果点 (StandX,StandY) 的颜色不等于 "84D0D9" 则
- 延时 10 毫秒
- 否则
- 令 hh = 1
- 条件结束
- 循环结束
- 定义变量 hhh
- 令 hhh = 0
- 循环当 hhh = 0 时
- 如果点 (StandX,StandY) 的颜色不等于 "3F9CCA" 则
- 延时 10 毫秒
- 否则
- 令 hhh = 1
- 条件结束
- 循环结束
- 令 nPic = 0
- 令 nSeach = 0
- 循环当 nSeach <> 7 时
- 令 nSeach = 0
- 令 PointX = StandX + nPic * (64 + 8)
- 从左上到右下查找图片 "Attachment:\橙子.bmp",把找到的坐标保存到 (X1, Y1),指定区域(左:PointX 上:PointY 右:PointX + 64 下:PointY + 83),相似度 0.7
- 如果 X1 > 0 并且 Y1 > 0 则
- 令 a(nPic) = 1
- 令 nPic = nPic + 1
- 否则
- 令 nSeach = nSeach + 1
- 条件结束
- 延时 50 毫秒
- 从左上到右下查找图片 "Attachment:\樱桃.bmp",把找到的坐标保存到 (X2, Y2),指定区域(左:PointX 上:PointY 右:PointX + 64 下:PointY + 83),相似度 0.7
- 如果 X2 > 0 并且 Y2 > 0 则
- 令 a(nPic) = 2
- 令 nPic = nPic + 1
- 否则
- 令 nSeach = nSeach + 1
- 条件结束
- 延时 50 毫秒
- 从左上到右下查找图片 "Attachment:\香蕉.bmp",把找到的坐标保存到 (X3, Y3),指定区域(左:PointX 上:PointY 右:PointX + 64 下:PointY + 83),相似度 0.7
- 如果 X3 > 0 并且 Y3 > 0 则
- 令 a(nPic) = 3
- 令 nPic = nPic + 1
- 否则
- 令 nSeach = nSeach + 1
- 条件结束
- 延时 50 毫秒
- 从左上到右下查找图片 "Attachment:\西瓜.bmp",把找到的坐标保存到 (X4, Y4),指定区域(左:PointX 上:PointY 右:PointX + 64 下:PointY + 83),相似度 0.7
- 如果 X4 > 0 并且 Y4 > 0 则
- 令 a(nPic) = 4
- 令 nPic = nPic + 1
- 否则
- 令 nSeach = nSeach + 1
- 条件结束
- 延时 50 毫秒
- 从左上到右下查找图片 "Attachment:\西红柿.bmp",把找到的坐标保存到 (X5, Y5),指定区域(左:PointX 上:PointY 右:PointX + 64 下:PointY + 83),相似度 0.7
- 如果 X5 > 0 并且 Y5 > 0 则
- 令 a(nPic) = 5
- 令 nPic = nPic + 1
- 否则
- 令 nSeach = nSeach + 1
- 条件结束
- 延时 50 毫秒
- 从左上到右下查找图片 "Attachment:\柠檬.bmp",把找到的坐标保存到 (X6, Y6),指定区域(左:PointX 上:PointY 右:PointX + 64 下:PointY + 83),相似度 0.7
- 如果 X6 > 0 并且 Y6 > 0 则
- 令 a(nPic) = 6
- 令 nPic = nPic + 1
- 否则
- 令 nSeach = nSeach + 1