00
KeyDown 91,1
KeyPress 77,1
KeyUp 91,1
Delay 2000
KeyPress "F5", 1
Delay 1000
i=0
While i=0
FindPic 0,0,1024,768,"Attachment:\QQ.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
i=1
End If
Wend
Delay 1000
 MoveTo intX,intY
Delay 3000
LeftDoubleClick 1
Delay 3000
FindPic 0,0,1024,768,"Attachment:\denglu.bmp",0.9,intX,intY
MoveTo intX, intY
Delay 2000
LeftClick 1
Delay 3000
Call FindPic(0,0,800,800,"Attachment:\hbwz.bmp",0.9,intX,intY) //找到寒冰王座游戏区
MoveTo intX,intY
Delay 1000
LeftClick 1
Delay 3000
FindPic 0,0,1024,768,"Attachment:\hbwz++.bmp",0.9,intX,intY
MoveTo intX+60, intY+90
Delay 1000
LeftClick 1
Delay 3000
MessageBox "请在确认对话框后，8秒内把鼠标移动到要进去的房间上面"
Delay 8000
For i=1 To 10000
LeftClick 1
KeyPress "Enter", 1
KeyPress "Enter", 1	//这里的脚本可以循环10000次
Next