- 令 Hwnd = Window.Find(0,"地下城与勇士")
- 令 sWindow = Window.IsWindow(Hwnd)
- 如果 sWindow = 0 则
- MsgBox("请确认打开了DNF")
- 脚本停止运行
- 条件结束
- 调用 Window.Active(Hwnd)
- 调用 Window.Move(Hwnd,0,0)
- 延时 1000 毫秒
- 注释:打开拍卖行,并判断是否打开
- 标记 拍卖行
- (键盘)按 "B" 键, 1次
- 延时 1000 毫秒
- 从左上到右下查找图片 "Attachment:\拍卖行.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:640 下:477),相似度 0.9
- 如果 intX > 0 并且 intY > 0 则
- 跳转到标记 移动
- 否则
- 延时 200 毫秒
- (键盘)按 "Esc" 键, 1次
- 延时 200 毫秒
- 跳转到标记 拍卖行
- 条件结束
- 标记 移动
- (鼠标)移动到 (intX, intY)
- 延时 1000 毫秒
- (鼠标)左键按下
- 延时 1000 毫秒
- (鼠标)移动到 (324, 125)
- 延时 1000 毫秒
- (鼠标)左键弹起
- 延时 200 毫秒
- 注释:判断拍卖行是否在相应位置
- 从左上到右下查找图片 "Attachment:\(B).bmp",把找到的坐标保存到 (intX, intY),指定区域(左:356 上:118 右:384 下:148),相似度 0.9
- 如果 intX > 0 并且 intY > 0 则
- 否则
- (键盘)按 "Esc" 键, 1次
- 延时 200 毫秒
- 跳转到标记 拍卖行
- 条件结束
- 注释:搜索物品名
- (鼠标)移动到 (204, 187)
- 延时 200 毫秒
- (鼠标)左键单击, 1次
- 延时 200 毫秒
- (键盘)按 "A" 键, 1次
- 延时 200 毫秒
- (键盘)按 "A" 键, 1次
- 延时 200 毫秒
- (键盘)按 "Space" 键, 1次
- 延时 200 毫秒
- (鼠标)移动到 (507, 186)
- 延时 200 毫秒
- (鼠标)左键单击, 1次
- 延时 200 毫秒
- (鼠标)移动到 (507, 186)
- 延时 200 毫秒
- 注释:搜索结果不存在处理
- 从左上到右下查找图片 "Attachment:\公告.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
- 如果 intX > 0 并且 intY > 0 则
- (鼠标)移动到 (320, 260)
- 延时 200 毫秒
- (鼠标)左键单击, 1次
- 延时 300 毫秒
- 条件结束
- 注释:初始化搜索条件
- (鼠标)移动到 (590, 188)
- 延时 200 毫秒
- (鼠标)左键单击, 1次
- 延时 500 毫秒