jiange=60 "偷菜间隔(分钟)"
FindPic 0,0,1024,768,"Attachment:\qqnc.bmp",0.9,x,y
If x > 0 And y > 0 Then
    MoveTo x+100, y+300
    Delay 500
    LeftClick 1
    Delay 1000
End If
Rem abc
MoveTo x+923, y+140
Delay 1000
LeftClick 1
Delay 500
Rem ab
For 10
    FindPic 0,0,1024,768,"Attachment:\111.bmp",0.9,x1,y1
    If x1 > 0 And y1 > 0 Then
        MoveTo x1, y1
        Delay 500
        LeftClick 1
        Delay 1000
        MoveTo x+293, y+250
        KeyPress "T", 1
        Delay 1000
        LeftClick 1
        Delay 5000
    End If
Next
MoveTo x+901+5, y+482+5

IfColor x+901,y+482,"FCDC6C",0 Then
    Delay 500
    LeftClick 1
    Delay 1000
    Goto ab
Else
    IfColor x+901,y+482,"FFFA8A",0 Then
        Delay 500
        LeftClick 1
        Delay 1000
        Goto ab
    Else
    End If
End If
For 600
    Delay jiange*100
Next
Goto abc