- 延时 50 毫秒
- dm.MoveTo(X + 36,Y + 72)
- 延时 50 毫秒
- dm.RightClick()
- 延时 50 毫秒
- dm.MoveTo(X + 72,Y + 72)
- 延时 50 毫秒
- dm.RightClick()
- 延时 50 毫秒
- dm.MoveTo(X + 108,Y + 72)
- 延时 50 毫秒
- dm.RightClick()
- 延时 50 毫秒
- dm.MoveTo(X + 144,Y + 72)
- 延时 50 毫秒
- dm.RightClick()
- 延时 50 毫秒
- dm.MoveTo(X,Y + 108)
- 延时 50 毫秒
- dm.RightClick()
- 延时 50 毫秒
- dm.MoveTo(X + 36,Y + 108)
- 延时 50 毫秒
- dm.RightClick()
- 延时 50 毫秒
- dm.MoveTo(X + 72,Y + 108)
- 延时 50 毫秒
- dm.RightClick()
- 延时 50 毫秒
- dm.MoveTo(X + 108,Y + 108)
- 延时 50 毫秒
- dm.RightClick()
- 延时 50 毫秒
- dm.MoveTo(X + 144,Y + 108)
- 延时 50 毫秒
- dm.RightClick()
- 延时 50 毫秒
- dm.MoveTo(X,Y + 144)
- 延时 50 毫秒
- dm.RightClick()
- 延时 50 毫秒
- dm.MoveTo(X + 36,Y + 144)
- 延时 50 毫秒
- dm.RightClick()
- 延时 50 毫秒
- dm.MoveTo(X + 72,Y + 144)
- 延时 50 毫秒
- dm.RightClick()
- 延时 50 毫秒
- dm.MoveTo(X + 108,Y + 144)
- 延时 50 毫秒
- dm.RightClick()
- 延时 50 毫秒
- dm.MoveTo(X + 144,Y + 144)
- 延时 50 毫秒
- dm.RightClick()
- 延时 50 毫秒
- 注释:ESC 一次
- 延时 200 毫秒
- dm.KeyPress(27)
- 延时 500 毫秒
- 子程序结束
- 注释:====================交还影票脚本======================
- 子程序 交还银票()
- 调用 找财政官员()
- 延时 100 毫秒
- 注释:交还银票
- 标记 交还银票(子程序 交还银票)
- 令 dm_ret = dm.FindStr(10,100,400,600,"交还银票","ffd555-000000",1.0,intX,intY)
- 如果 intX > 0 并且 intY > 0 则
- dm.MoveTo(intX + 15,intY + 8)
- 延时 100 毫秒
- dm.LeftClick()
- 延时 100 毫秒
- dm.LeftClick()
- 延时 100 毫秒
- 否则
- 跳转到标记 交还银票(子程序 交还银票)
- 条件结束
- 注释:ESC 一次
- 延时 200 毫秒
- dm.KeyPress(27)
- 延时 500 毫秒
- 子程序结束
- 注释:====================音乐报警脚本======================
- 注释:选择MP3文件路径
- 定义变量 MP3
- (语句无法识别,可能有错误): MP3 = Plugin.File.SelectFile() //打开选择文件对话框
- 如果 UCase(Right(MP3,4)) = ".MP3" 或者 UCase(Right(MP3,4)) = ".WAV" 则
- 令 Form1.路径.Text = MP3
- 否则
- 如果 MP3 <> "" 则
- MsgBox("请选择“.mp3或者.wav”音乐格式的文件!")
- 条件结束
- 条件结束
- 注释:播放音乐测试
- 调用 Media.Play(Form1.路径.Text)
- Event(Form1.UnLoad)
- 调用 Media.Stop()
- (语句无法识别,可能有错误): End Event