你的位置:
第20行,第1个字符:(错误码0)缺少符号。
14:18:36 |
来源: 按键精灵资源站
x0 = 1920/2 : y0 = 1080/2
x = x0 : y = y0:stepx=1920/5:stepy=1080/5
If n = 1 Then
FindPic x-stepx/2,y-stepy/2,x+stepx/2,y+stepy/2,&Attachment:\牛1.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
MoveTo intX, intY
Do While n &= 25
k1=stepx:k2=0
x = x + k1 : y = y + k2
TracePrint x & &,& & y & &,& & n
TracePrint 找多图(0, 0, , &牛1.bmp|牛2.bmp|牛3.bmp|牛4.bmp|牛5.bmp|牛6.bmp|牛7.bmp|牛8.bmp&)
Function 找多图(x1, y1, x2, y2, pic_mane)
& & 找多图=&牛1.bmp|牛2.bmp|牛3.bmp|牛4.bmp|牛5.bmp|牛6.bmp|牛7.bmp|牛8.bmp&
& & MyString = Split(pic_name, &|&, -1, 1)
& & n = UBound(MyString)
& & TracePrint n
& & For i=0 to n
& && &&&TracePrint MyString(i)
& && &&&TracePrint i
& && &&&图= &Attachment:\&&MyString(i)
& && &&&Do
& && && && &FindPic x1, y1, x2, y2,图,0.9,intX,intY
& && && && &If intX & 0 And intY & 0 Then
& && && && && & If 找多图 && && Then
& && && && && && &&&找多图=找多图&&|&
& && && && && & End If
& && && && && & 找多图=找多图&MyString(i)&&,&&intX&&,&&intY
& && && && &End If
& && &&&Loop Until intX & 0
End Function
& && && && &End If
& && &&&Loop Until intX & 0
End Function
& && && && &KeyPress &F8&, 1
& && && && &Delay 300
& && && && &RightDown 1
& && && && &Delay 3000
& && && && &RightUp 1
& && && && &Delay 200
& && && && &LeftDoubleClick 1
& && && && &Delay 4000
If n = 26 Then
k1=0:k2=stepy
i=i+1:stepx=stepx*(-1):stepy=stepy*(-1)