- Import "GK.luae"
- SetRowsNumber (0)
- TracePrint SetDictEx(0,"Attachment:字库1.txt")
- TracePrint UseDict(0)
- //激活贵族
- Delay 5000
- Do
- If GK.Find("72|372|2971F7,60|264|F7F3AD") Then
- Delay 2000
- GK.Find("456|1749|B58E5A,166|1752|9CF7F7,73|224|C5FFFF")
- Delay 2000
- Tap 826,1578
- Delay 2000
- If GK.Find("918|366|1065CE,819|983|A4DFE6,454|1755|9CFBF7") Then
- Delay 60000
- 退出
- ElseIf GK.Find("715|1572|EFB684,813|1088|63F384,459|1754|9CF7F7") Then
- Delay 2000
- If GK.Find("918|366|1065CE,819|983|A4DFE6,454|1755|9CFBF7") Then
- Delay 60000
- 退出
- ElseIf GK.Find("605|1576|735942,813|1088|63F384,459|1754|9CF7F7") Then
- Delay 2000
- If GK.Find("918|366|1065CE,819|983|A4DFE6,454|1755|9CFBF7") Then
- Delay 60000
- 退出
- ElseIf GK.Find("498|1582|422D21,813|1088|63F384,459|1754|9CF7F7") Then
- Delay 2000
- If GK.Find("918|366|1065CE,819|983|A4DFE6,454|1755|9CFBF7") Then
- Delay 60000
- 退出
- ElseIf GK.Find("393|1583|423121,813|1088|63F384,459|1754|9CF7F7") Then
- Delay 2000
- If GK.Find("918|366|1065CE,819|983|A4DFE6,454|1755|9CFBF7") Then
- Delay 60000
- 退出
- ElseIf GK.Find("285|1586|423129,813|1088|63F384,459|1754|9CF7F7") Then
- Delay 2000
- If GK.Find("918|366|1065CE,819|983|A4DFE6,454|1755|9CFBF7") Then
- Delay 60000
- 退出
- ElseIf GK.Find("69|225|BDFFF7,813|1088|63F384,459|1754|9CF7F7") Then
- Delay 2000
- Exit Do
- End If
- End If
- End If
- End If
- End If
- End If
- Else
- Exit Do
- End If
- Loop
- Do
- //熔岩地宫
- If GK.FindWord(110,1593,164,1661,"11","000000", False ) Then
- 进地宫
- 打1
- ElseIf GK.FindWord(110,1593,164,1661,"12","000000", False ) Then
- 进地宫
- 打2
- //地宫二层
- ElseIf GK.FindWord(110,1593,164,1661,"21","000000", False ) Then
- 进地宫
- Tap 339, 1557
- 打1
- ElseIf GK.FindWord(110,1593,164,1661,"22","000000", False ) Then
- 进地宫
- Tap 339, 1557
- 打2
- //地宫三层
- ElseIf GK.FindWord(110,1593,164,1661,"31","000000", False ) Then
- 进地宫
- Tap 469,1541
- 打1
- ElseIf GK.FindWord(110,1593,164,1661,"32","000000", False ) Then
- 进地宫
- Tap 469,1541
- 打2
- //地宫四层
- ElseIf GK.FindWord(110,1593,164,1661,"41","000000", False ) Then
- 进地宫
- Tap 604,1541
- 打1
- ElseIf GK.FindWord(110,1593,164,1661,"42","000000", False ) Then
- 进地宫
- Tap 604,1541
- 打2
- //熔岩洞窟
- ElseIf GK.FindWord(110, 1593, 164, 1661, "51", "000000", False) Then
- 进熔岩洞窟
- Tap 456,1600
- Delay 2000
- Tap 456, 1600
- Delay 120000
- 打
- 退出
- ElseIf GK.FindWord(110, 1593, 164, 1661, "52", "000000", False) Then
- 进熔岩洞窟
- Tap 548,1589
- Delay 2000
- Tap 548,1589
- Delay 120000
- 打
- 退出
- ElseIf GK.FindWord(110,1593,164,1661,"53","000000", False ) Then
- 进熔岩洞窟
- Tap 641,1605
- Delay 2000
- Tap 641,1605
- Delay 120000
- 打
- 退出
- ElseIf GK.FindWord(110,1593,164,1661,"54","000000", False ) Then
- 进熔岩洞窟
- Tap 526,1604
- Delay 2000
- Swipe 625,1590, 435,1590
- Delay 2000
- Tap 526,1604
- Delay 120000
- 打
- 退出
- ElseIf GK.FindWord(110,1593,164,1661,"55","000000", False ) Then
- 进熔岩洞窟
- Tap 632,1608
- Delay 2000
- Swipe 625,1590, 435,1590
- Delay 2000
- Tap 632,1608
- Delay 120000
- 打
- 退出
- ElseIf GK.FindWord(110,1593,164,1661,"56","000000", False ) Then
- 进熔岩洞窟
- Tap 523,1609
- Delay 2000
- Swipe 625,1590, 435,1590
- Delay 2000
- Swipe 625,1590, 435,1590
- Delay 2000
- Tap 523,1609
- Delay 120000
- 打
- 退出
- ElseIf GK.FindWord(110,1593,164,1661,"57","000000", False ) Then
- 进熔岩洞窟
- Tap 621,1608
- Delay 2000
- Swipe 625,1590, 435,1590
- Delay 2000
- Swipe 625,1590, 435,1590
- Delay 2000
- Tap 621,1608
- Delay 120000
- 打
- 退出
- End If
- //枭雄·首领·贵族
- If GK.FindWord(709,500,747,563,"查看","FFFBFF-333333") Then
- Delay 2000
- If GK.Find("922|367|1055BD-333333,458|1749|9CFBFF") Then
- Delay 10000
- 打
- Swipe 625,1590, 435,1590
- Delay 2000
- 打
- 退出
- ElseIf GK.Find("898|375|1965CE-333333,602|1751|9CFBF7,185|285|9CB2BD") Then
- Delay 60000
- 退出
- ElseIf GK.Find("898|375|1965CE-333333,602|1751|9CFBF7,185|285|9CB2BD") Then
- Delay 180000
- End If
- End If
- //天降红包
- If GK.FindWord(707,497,750,630,"前往参加","FFFBFF-333333") Then
- Delay 2000
- If GK.Find("412|534|84BEE6,931|874|2145F7,1007|1700|C5FFFF") Then
- Delay 10000
- Do
- If GK.Find("412|534|84BEE6,931|874|2145F7,1007|1700|C5FFFF") Then
- Delay 60000
- ElseIf GK.Find("1007|1698|C5FFFF,454|432|E6E3DE,451|501|F7F7F7,442|539|DEDFDE,464|602|FFFFFF,440|163|4A79BD,747|1439|3A8AC5") Then
- Exit Do
- End If
- Loop
- //帮会首领
- ElseIf GK.Find("167|1407|6BAACE,180|1351|F7FBFF,161|1372|EFF3FF,157|1399|EFF3F7,165|1386|FFFFFF,177|1431|E6EFF7,157|1467|EFF7FF,188|1499|2141F7,335|1199|CECAC5,350|1420|BDB694")
- Delay 15000
- Do
- If GK.Find("1008|1701|C5FFFF,1014|886|DEFBF7,1006|880|94AAAD,991|936|BDEBEF,995|986|526D6B,1009|1021|B5D2DE,989|1023|ADBEBD,431|330|B54D31,538|327|CE7DD6,653|295|C5FBFF") Then
- Exit Do
- End If
- Loop
- Else
- Delay 2000
- Tap 72,224
- End If
- ElseIf GK.FindWord(711,496,748,628,"立即前往","E6E7E6-333333",False ) Then
- Delay 2000
- Tap 436,421
- End If
- Loop
- Sub 进地宫
- Delay 2000
- Tap 306,1608
- Delay 2000
- GK.Find ("64|1363|C5C6CE,70|372|2145F7")
- Delay 1000
- GK.Find ("336|1775|B58E5A,160|1769|5281B5,184|1768|8CF3F7,916|802|104DAD")
- Delay 2000
- End Sub
- Sub 进熔岩洞窟
- Delay 2000
- Tap 306,1608
- Delay 2000
- GK.Find ("64|1363|C5C6CE,70|372|2145F7")
- Delay 2000
- GK.Find ("904|791|2165CE,79|943|B5EBF7,230|1256|F7FBFF")
- Delay 15000
- End Sub
- Sub 打
- Do
- If GK.Find(410,1596,663,1645,"00EB08",0,0.9) Then
- Delay 60000
- Else
- Exit Do
- End If
- Loop
- End Sub
- Sub 打1
- Delay 2000
- GK.Find ("904|791|2165CE,79|943|B5EBF7,230|1256|F7FBFF")
- Delay 15000
- Tap 456,1600
- Delay 2000
- Tap 456, 1600
- Delay 120000
- 打
- 退出
- End Sub
- Sub 打2
- Delay 2000
- GK.Find ("904|791|2165CE,79|943|B5EBF7,230|1256|F7FBFF")
- Delay 15000
- Tap 548,1589
- Delay 2000
- Tap 548,1589
- Delay 120000
- 打
- 退出
- End Sub
- Sub 退出
- Tap 54,337
- Delay 2000
- Tap 710,763
- Delay 15000
- End Sub
复制代码
|