--- tags: 按鍵精靈安卓版3.7.3 --- # ROX新世代 自动钓鱼 一、[按鍵精靈安卓版3.7.3 雷電模擬器9 Windows10(簡體) 說明與載點](https://hackmd.io/@1MgXZJtMQgOudU366MROaw/SJgskwJ5A) 二、程式 1.按键精灵手机脚本_ROX自动钓鱼_1280_720_DPI240 ``` Dim CompareResults(99) Dim CompareResultsTrue(99) CompareResultsTrue(1) = true CompareResultsTrue(2) = true Dim Count = 0 Rem ContinueA Count = Count +1 If Count >= 9 Then EndScript End If CompareResults(1) = CmpColor(1058,554 , "F7F7F7", 0.9) CompareResults(2) = CmpColor(1107,517 , "F7F7F7", 0.9) CompareResults(3) = CmpColor(1112,545 , "F7EEEF", 0.9) If CompareResults(1) > -1 And CompareResults(2) > -1 And CompareResults(3) > -1 Then Tap 1087,574 CompareResultsTrue(1) = false Goto ContinueA Else If CompareResultsTrue(1) Then Goto ContinueA End If End If Count = 0 Rem ContinueB Count = Count +1 If Count >= 99 Then Count = 0 CompareResultsTrue(1) = true Goto ContinueA End If CompareResults(4) = CmpColor(1028,528 , "57EEB6", 0.9) CompareResults(5) = CmpColor(1087,470 , "60E6AD", 0.9) CompareResults(6) = CmpColor(1147,527 , "53ECB4", 0.9) If CompareResults(4) > -1 And CompareResults(5) > -1 And CompareResults(6) > -1 Then Tap 1087,574 CompareResultsTrue(2) = false Goto ContinueB Else If CompareResultsTrue(2) Then Goto ContinueB End If End If ```