i=0
While i=0
FindPic 0,0,1024,768,"Attachment:\红药.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
i = 1
Delay 200
End If
Wend
MoveTo intX+5, intY+5
Delay 600
LeftDoubleClick 1
Delay 1000


i=0
While i=0
FindPic 0,0,1024,768,"Attachment:\蓝药.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
i = 1
Delay 200
End If
Wend
MoveTo intX+5, intY+5
Delay 600
LeftDoubleClick 1
Delay 1000

Call lqrw()
Call wcrw2()
Call wcrw2()
Call wcrw3()

i=0
While i=0
FindPic 0,0,1024,768,"Attachment:\开始战斗.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
i = 1
Delay 200
End If
Wend
MoveTo intX+30, intY+10
Delay 600
LeftClick 1
Delay 200

Call lqdjjl()  //领取20级奖励//

i=0
While i=0
FindPic 0,0,1024,768,"Attachment:\现在穿上.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
i = 1
End If
Wend
Delay 200
MoveTo intX+20, intY+10
Delay 100
LeftClick 1
Delay 100

i=0
While i=0
FindPic 0,0,1024,768,"Attachment:\确定.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
i = 1
End If
Wend
Delay 200
MoveTo intX+20, intY+10
Delay 100
LeftClick 1
Delay 100

i=0
While i=0
FindPic 0,0,1024,768,"Attachment:\马上离开.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
i = 1
End If
Wend
Delay 200
MoveTo intX+30, intY+5
Delay 200
LeftClick 1
Delay 100

Call wcrw1()

i=0
While i=0
FindPic 0,0,1024,768,"Attachment:\现在穿上.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
i = 1
End If
Wend
Delay 200
MoveTo intX+20, intY+10
Delay 100
LeftClick 1