369258147纯 369258147纯
关注数: 414 粉丝数: 57 发帖数: 352 关注贴吧数: 30
大神帮忙看看 我是新手 试做了个按键 下面是我自己做的一个抓图循环 我想在这个脚本最后加个图片确认上面的抓图操作的准确性 准确无误 在继续下面的 不准确回到脚本开头让脚本从新运行一次 这个要怎么加个语句啊 i=0 While i=0 KeyPress "F4", 1 FindPic 0,0,1366,768,"Attachment:\合成.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intx, inty i=1 End If Wend Delay 100 i=0 While i=0 FindPic 0,0,1366,768,"Attachment:\圣水.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intx, inty i=1 End If Wend Delay 100 i=0 While i=0 RightClick 1 FindPic 0,0,1366,768,"Attachment:\分割.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intx, inty i=1 End If Wend Delay 100 i=0 While i=0 LeftClick 1 FindPic 0,0,1366,768,"Attachment:\确认.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intx, inty i=1 End If Wend Delay 100 i=0 While i=0 LeftClick 1 FindPic 0,0,1366,768,"Attachment:\合成1.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intx, inty i=1 End If Wend Delay 100 i=0 While i=0 LeftClick 1 FindPic 0,0,1366,768,"Attachment:\圣水确认.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then i=1 End If Wend Delay 100 i=0 While i=0 FindPic 0,0,1366,768,"Attachment:\阿拉特.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intx, inty i=1 End If Wend Delay 100 i=0 While i=0 RightClick 1 FindPic 0,0,1366,768,"Attachment:\分割.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intx, inty i=1 End If Wend Delay 100 i=0 While i=0 LeftClick 1 FindPic 0,0,1366,768,"Attachment:\确认.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intx, inty i=1 End If Wend Delay 100 i=0 While i=0 LeftClick 1 FindPic 0,0,1366,768,"Attachment:\合成2.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intx, inty i=1 End If Wend Delay 100 i=0 While i=0 LeftClick 1 FindPic 0,0,1366,768,"Attachment:\阿拉特确认.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then i=1 End If Wend Delay 100 i=0 While i=0 FindPic 0,0,1366,768,"Attachment:\铁块.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intx, inty i=1 End If Wend Delay 100 i=0 While i=0 RightClick 1 FindPic 0,0,1366,768,"Attachment:\分割.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intx, inty i=1 End If Wend Delay 100 i=0 While i=0 LeftClick 1 FindPic 0,0,1366,768,"Attachment:\确认.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intx, inty i=1 End If Wend Delay 100 i=0 While i=0 LeftClick 1 FindPic 0,0,1366,768,"Attachment:\合成3.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intx, inty i=1 End If Wend Delay 100 i=0 While i=0 LeftClick 1 FindPic 0,0,1366,768,"Attachment:\铁块确认.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then i=1 End If Wend Delay 100 i=0 While i=0 FindPic 0,0,1366,768,"Attachment:\合成确认.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intx, inty i=1 End If Wend Delay 100 LeftClick 1 Delay 1000 Delay 1000 Delay 1000
1 下一页