按键精灵安卓版项目实战：清理背包

免责声明

本视频内容纯属个人爱好，目的仅限于学习交流之用，对使用视频内的信息随之而来的风险与本人无关。本人不作任何承诺。也不为视频所提供的信息错误、残缺、延时或因依靠此类信息或文件所采取的任何行动负责。访问者可将本视频提供的内容或服务用于个人学习、研究或欣赏，以及其他非商业性或非盈利性用途，但同时应遵守著作权法及其他相关法律的规定，不得侵犯本人及相关权利人的合法权利。

相关视频链接：

https://www.bilibili.com/video/BV1DT4y1L7oC

源代码：

Sub 清理背包()
//我习惯右下角往左上角的顺序丢弃
//右下角第一个坐标1650,850
//横向间距115
//纵向间距110
	ShowMessage "开始清理背包"
    Dim m,n
    m = 1650
    n = 850
    Tap 105, 800 //点击背包
    Delay 1000
    For i = 1 To 4
        For i = 1 To 5              	
            Tap m, n //点击右下角格子
            Delay 300
            Tap 1800, 780 //点击丢弃
            Delay 300
            Tap 750, 680 //稀有道具点否
            m = m - 115
            Delay 500
        Next
        m = 1650
        n = n - 110
        Delay 500
    Next
    tap 1850,1015 //退出背包
    ShowMessage "清理完成"
End Sub