常見滑動命令:
1.安卓按鍵官方的滑動
Swipe 100, 100, 200, 200, 500
2.安卓按鍵官方的滑動---Touchdown touchmove touchup組合
這個滑動組合的好處是可以自由的控制 按下的時間 拖動時間 和鬆開時間
TouchDown 100, 100, 1
Delay 200
TouchMove 200, 200, 1, 500
Delay 200
TouchUp 1
3. 安卓按鍵錄製狀態下特有的滑動TouchDownEvent TouchMoveEvent TouchUpEvent的組合
用法和上面類似不多說了
4.紫貓老師的初期的滑動函數 用法在下面的註釋
'功能:紫貓老師的划動函數在你無法用swipe和touch無效的情況下使用
' 按住不放一段時間,移動到目的地後鬆開
'參數:
' arr數組:移動座標,可選參數輸入內容
' arr(0), arr(1):數值型,按住不放座標
' arr(2), arr(3):數值型,按住後移動的座標
' arr(4):數值型,可選參數,按住的時間,默認50
' arr(5):數值型,可選參數,滑動速度,越小越快,默認50
' arr(6):字符串型,可選參數,調試輸出信息
'返回:
' 無
'例子:
' Arr = Array (100,100,100,200,null,50,"滑動")
' 結果= TouchDMU (Arr)
Sub TouchDMU(arr)
Dim s,t,isPrint
isPrint=1
If IsNull(arr(4)) Then arr(4) = 50
If IsNull(arr(5)) Then arr(5) = 50
TouchDownEvent arr(0), arr(1), 0
Delay arr(5)
Do
arr(0) = CInt(arr(0) + (arr(2) - arr(0)) / 2)
arr(1) = CInt(arr(1) + (arr(3) - arr(1)) / 2)
TouchMoveEvent arr(0), arr(1), 0, arr(5)
Loop Until Sqr((arr(2) - arr(0)) ^ 2 + (arr(3) - arr(1)) ^ 2) < 20
TouchMoveEvent arr(2), arr(3), 0, arr(5)
TouchUpEvent 0
If IsNull(arr(6)) = False And isPrint = 1 Then
TracePrint "TouchDMU:",arr(6)
TracePrint "座標與時間:", arr(0), arr(1), arr(2), arr(3), arr(4), arr(5)
End If
End Sub
5.紫貓老師的精確滑動函數(推薦)
Import "zm.luae" //導入插件,只需執行一次
zm.Init //初始化插件,只需執行一次
zm.Swipe 100,100,200,200,300,0
zm.Swipe 100,100,200,200,300,1
6.嘗試使用pageup pagedown 來實現上劃一頁和下滑一頁
這個方法實用性不強 因爲基本上只適合網頁性質的界面 而且 就算是網頁性質的也難說是否支持
Keypress "pageup"
Keypress "pagedown"
常見問題和處理辦法
1. 滑動無效---》用上面的第五個函數測試 如果不行 嘗試第六個 第四個 第三個 如果還不行 嘗試 第二個 並且調整按住時間 滑動時間 鬆開時間看看
2. 滑動無法十分精確---》用上面第五個函數測試 還不行嘗試滑動後增加等待的延遲來嘗試
3無論哪個都無法滑動----》 嘗試實用第二個 第三個的辦法 增加 按住時間 滑動時間 鬆開時間來測試