图片的截图的位置坐标（5,312）
下面开始滑动方式，我们从简到难的介绍，涉及到的滑动命令：
TouchDown x1, y1, 1
TouchDown x2, y2, 1, 100
TouchUp 1
（一）固定值滑动
先计算出每一个点的绝对坐标，然后从1开始滑动3次。
Dim x0=5,y0=312 //截图对应的左上角坐标
Dim 返回值="183,74|342,177|205,223|332,76"
Dim 点数组=split(返回值,"|")
Dim 点1=split(点数组(0),",")
Dim 点1x=点1(0) x0
Dim 点1y=点1(1) y0
Dim 点2=split(点数组(1),",")
Dim 点2x=点2(0) x0
Dim 点2y=点2(1) y0
Dim 点3=split(点数组(2),",")
Dim 点3x=点3(0) x0
Dim 点3y=点3(1) y0
Dim 点4=split(点数组(3),",")
Dim 点4x=点4(0) x0
Dim 点4y=点4(1) y0
TouchDown 点1x, 点1y, 1
TouchMove 点2x, 点2y, 1, 1000
TouchMove 点3x, 点3y, 1, 1000
TouchMove 点4x, 点4y, 1, 1000
TouchUp 1
（二）循环滑动
上面的方法虽然直观，但是代码看着略显臃肿，并且每个点具有规律性，所以可以用循环来写。
Dim x0=5,y0=312
Dim 返回值="183,74|342,177|205,223|332,76"
Dim 点数组=split(返回值,"|")
For i = 0 To UBOUND(点数组)
Dim 坐标=split(点数组(i),",")
If i = 0 Then
TouchDown 坐标(0) x0, 坐标(1) y0, 1
Else
TouchMove 坐标(0) x0, 坐标(1) y0, 1, 1000
End If
Next
（三）固定分段滑动
所谓分段滑动，就是把两点之间加几个点，并且点不在一条直线上，形成折线的效果。
