Hwnd = Plugin.Window.Find(0, "地下城与勇士")
 Call Plugin.Window.Move(Hwnd, 0, 0)
 Call Plugin.Window.Active(Hwnd)
 
'打开赛丽亚商店
 Rem 商店
 MoveTo 450, 300
 Delay 200
 LeftClick 1
 Delay 200
 MoveTo 500, 350
 Delay 200
 LeftClick 1
 Delay 200
 
'购买装备
 Rem 购买
         MoveTo 355, 422 //物品坐标
         Delay 200
 For 32
         LeftClick 1
         Delay 100
         LeftClick 1
         Delay 100
 Next
'离开赛丽亚房间
 Rem 离开
 KeyPress "Esc", 1
 KeyDownS "Down", 1
 Delay 2500
 KeyUpS "Down", 1
 
'打开分解机
// BackSpace分解机打开按键可自己设置
 Rem 打开
 Delay 200
 KeyPress "BackSpace", 1
 Delay 1000
//手续费
KeyPress "Num 9", 1
 Delay 100
KeyPress "Num 9", 1
 Delay 100
KeyPress "Num 9", 1
 Delay 100
KeyPress "Enter", 1
 Delay 200
 MoveTo 360, 440
 Delay 200
 LeftClick 1
 Delay 200
 MoveTo 350, 280
 Delay 200
 LeftClick 1
 Delay 200
 
'分解装备
 Rem 分解
                 MoveTo 280, 350
                 Delay 200
                 LeftClick 1
                 Delay 200
 Dim x, y
 x = 473
 y = 306
 For j = 0 To 3
         For i = 0 To 7
                 MoveTo x + 30 * i, y + 30 * j
                 Delay 200
                 LeftClick 1
                 Delay 200
                 LeftClick 1
                 Delay 2500
          KeyPress "Enter", 1
           Delay 200
         Next
 Next
 
'收起分解机
 Rem 收起
 KeyPress "Esc", 1
 Delay 200
 KeyPress "Esc", 1
 Delay 200
 LeftClick 1
 Delay 200
 MoveTo 416, 321
 Delay 200
 LeftClick 1
 
'进入赛丽亚房间
 Rem 进入
 KeyDownS "Up", 1
 Delay 4000
 KeyUpS "Up", 1
 
Goto 商店