xxx = intx:yyyy = inty //找到壹幅圖 那麽就把坐標賦值給 變量XXX yyyy 把這個坐標保存到DDD這個變量裏面
上面這句怎麽是4個y?
修改後腳本:
yss = 0 : cw = 0 : DDD = "" : yyy = 0 : xxx = 0
Do
FindPic xxx,yyy,1440,900,"Attachment:\1.bmp",1.0,intX,intY
If intX > 0 And intY > 0 Then
yss=0
yyy = inty + 6
Call 點鏈接()
Else
yss = yss + 1
Call 換詞()
Exit Do
End If
Loop
Sub 點鏈接()
MoveTo intX,intY
LeftClick 1
Delay 1000
MoveTo 0,0
Delay 1000
KeyDown 18, 1
KeyPress 115, 1
KeyUp 18, 1
Delay 1000
End Sub
Sub 換詞()
MessageBox "請寫換詞程序,聯系Q88619117"
End Sub
//如果不能正常工作,可以嘗試把FindPic xxx,yyy,1440,900,"Attachment:\1.bmp",1.0,intX,intY改成FindPic xxx,yyy,1440,900,"Attachment:\1.bmp",0.8,intX,intY