)
//<>------------------------------
hwnd = dm.GetMousePointWindow()
TracePrint hwnd
//dm.MoveWindow hwnd,-540,15
Delay 1000
dm_ret = dm.BindWindow(hwnd,"dx2","windows2","dx",1)
Delay 200
If dm_ret=0 Then
    MessageBox "绑定“失败”"
    ExitScript
End If
//模拟==================================
SetSimMode 2



//大循环次
For 8
   Rem 查找赛利亚

   
    //查找赛利亚============================
    do
        dm_ret = dm.FindPic(0,0,2000,2000,"赛利亚.bmp","000000",0.9,0,intX,intY)
        If intX >= 0 and intY >= 0 Then  
            dm.MoveTo intX+275,intY+50
            Delay 200
            dm.LeftDoubleClick
            Exit Do
        End If
    loop
    //找到赛利亚点物===========================
    do
        dm_ret = dm.FindPic(0,0,2000,2000,"赛利亚2.bmp","000000",0.9,0,intX,intY)
        If intX >= 0 and intY >= 0 Then
            dm.MoveTo intX-20,intY+50
            Delay 200
            dm.LeftDoubleClick
            Exit Do
        End If
    loop
    //进入商店买腰带===============================
    For 32
        dm_ret = dm.FindPic(0,0,2000,2000,"赛利亚3.bmp","000000",0.9,0,intX,intY)
        If intX >= 0 and intY >= 0 Then
            dm.MoveTo 213,360
            Delay 200
            dm.LeftDoubleClick
        End If
    Next
    //按ESC关闭===============================
    Delay 200
    dm.KeyPress 27
    Delay 200
    //选按上===============================
    dm.KeyDown 38
    Delay 300
    dm.KeyUp 38
    //在按下===============================
    dm.KeyDown 40
    Delay 700
    dm.KeyUp 40
    //打开分解机===============================
    do
        dm_ret = dm.FindPic(0,0,2000,2000,"赛利亚4.bmp","000000",0.7,0,intX,intY)
        If intX >= 0 and intY >= 0 Then
            dm.KeyPress 84
            Delay 200
            Exit Do
        End If
    loop
    // 输入9999===============================
    do
        dm_ret = dm.FindPic(0,0,2000,2000,"赛利亚5.bmp","000000",0.9,0,intX,intY)
        If intX >= 0 and intY >= 0 Then
  
            dm.MoveTo intX,intY+55
            Delay 500
            dm.KeyPress 57
            Delay 100
            dm.KeyPress 57
            Delay 100
            dm.KeyPress 57
            Delay 100
            dm.KeyPress 57
            Delay 100
            //点确认===============================
  
            dm.  KeyPress 13

            Delay 1000
            dm.MoveTo 330,310
            Delay 200
            dm.LeftClick 

            Delay 200
            Exit Do
        End If
    loop