windows 8不能用小精靈
只能用下載按鍵精靈導入腳本
- UserVar Title="BlueStacks App Player for Windows (beta-1)" "視窗標題"
- UserVar times1=30 "時間"
- UserVar times2=10 "次數"
- Hwnd = Plugin.Window.Find(0,Title)
- For times2
- Call Plugin.Bkgnd.LeftClick(Hwnd, 490, 330)
- Delay 2000
- Call Plugin.Bkgnd.LeftClick(Hwnd, 115, 300) "買衝刺
- Delay 500
- Call Plugin.Bkgnd.LeftClick(Hwnd, 500, 140)
- Delay 2000
- Call Plugin.Bkgnd.LeftClick(Hwnd, 270, 220) "買經驗
- Delay 500
- Call Plugin.Bkgnd.LeftClick(Hwnd, 500, 140)
- Delay 2000
- Call Plugin.Bkgnd.LeftClick(Hwnd, 460, 325)
- Delay 2000
- For 20
- Delay 100
- Call Plugin.Bkgnd.LeftClick(Hwnd, 325, 150)
- Next
- For times1-2
- Delay 1000
- Next
- Call Plugin.Bkgnd.LeftClick(Hwnd, 620, 15)
- Delay 1000
- Call Plugin.Bkgnd.LeftClick(Hwnd, 315, 200)
- Delay 1000
- Call Plugin.Bkgnd.LeftClick(Hwnd, 315, 200)
- Delay 1000
- Call Plugin.Bkgnd.LeftClick(Hwnd, 230, 325)
- Delay 1000
- Call Plugin.Bkgnd.LeftClick(Hwnd, 335, 350)
- Delay 2000
- Call Plugin.Bkgnd.LeftClick(Hwnd, 288, 332)
- Delay 2000
- Call Plugin.Media.Beep(262, 200)"提示聲
- Call Plugin.Media.Beep(523, 200)
- Call Plugin.Media.Beep(1046, 200)
- Next
複製代碼 |