Dim x, y, time

Randomize

x = Int((30 – (-30) + 1) * Rnd + (-30))

y = Int((10 – (- 10 ) + 1) * Rnd + (- 10 ))

time = Int((200 – (- 1 ) + 1) * Rnd + (- 1 ))

IfColor 1200, 50, “ffffff", 0 Then

MoveTo 200, 180

LeftClick 1

End If

IfColor 226, 287, “7800eb", 0 Then

MoveTo 357 + x, 485 + y

LeftClick 1

Delay 1000 + time

End If

IfColor 1228, 89, “ff7a00″, 0 Then

MoveTo 1228 + y, 89 + y

LeftClick 1

End If

IfColor 720, 59, “ff7a00″, 0 Then

Delay 2000 + time

MoveTo 174 + x, 147 + y

LeftClick 1

Delay 3000 + time

IfColor 331, 388, “ffffff", 0 Then

MoveTo 1057 + x, 629 + y * 2

LeftClick 1

Delay 3000 + time

End If

End If

IfColor 723, 192, “fe7900″, 0 Then

IfColor 764, 192, “fefefe", 0 Then

IfColor 678, 192, “fefefe", 0 Then

MoveTo 809 + x, 365 + y * 5

LeftClick 1

Delay 3000 + time

End If

End If

End If

IfColor 404, 126, “2f3bff", 0 Then

Delay 1000 + time

IfColor 206, 195, “ffffff", 0 Then

MoveTo 206 + x, 195 + y

LeftClick 1

Delay 2000 + time

MoveTo 96 + x, 312 + y

LeftClick 1

Delay 3000 + time

MoveTo 747 + x, 186 + y

LeftClick 1

Delay 3000 + time

End If

IfColor 30, 615, “FFFFFF", 0 Then

MoveTo 30 + x, 545 + y

LeftClick 1

Else

MoveTo 639 + x, 545 + y

LeftClick 1

End If

Delay 2000 + time

MoveTo 1111 + x, 717 + y

LeftClick 1

Delay 6000 + time

MoveTo 639 + x, 450 + y

LeftClick 1

Delay 2000 + time

MoveTo 156 + x, 717 + y

LeftClick 1

End If

IfColor 260,211,"2f3bff",0 Then

Delay 2001 + time

IfColor 837, 208, “2f3bff", 0 Then

MoveTo 803 + x, 255 + y*3

LeftClick 1

Delay 213 + time

MoveTo 803 + x, 407 + y*3

LeftClick 1

Delay 209 + time

MoveTo 803 + x, 559 + y*3

LeftClick 1

Delay 230 + time

End If

MoveTo 454 + x, 254 + y*3

LeftClick 1

Delay 231 + time

MoveTo 454 + x, 406 + y*3

LeftClick 1

Delay 210 + time

MoveTo 454 + x, 558 + y*3

LeftClick 1

Delay 224 + time

MoveTo 745 + x, 713 + y

LeftClick 1

Delay 2012 + time

MoveTo 627 + x, 245 + y

LeftClick 1

Delay 2052 + time

MoveTo 512 + x, 414 + y

LeftClick 1

Delay 2031 + time

MoveTo 716 + x, 446 + y

LeftClick 1

Delay 6047 + time

MoveTo 716 + x, 537 + y

LeftClick 1

Delay 2013 + time

MoveTo 1113 + x, 719 + y

LeftClick 1

Delay 2087 + time

End If

IfColor 1091,710,"fd7900″,0 Then

MoveTo 1107 + x * 4, 717 + y * 3

LeftClick 1

Delay 2001 + time

End If

IfColor 705,605,"f1decb",0 Then

MoveTo 705 + x, 605 + y

LeftClick 1

Delay 102 + time

End If

IfColor 37,117,"472344″,2 Then

MoveTo 1091 + x + x, 710 + y

LeftClick 1

Delay 102 + time

End If

IfColor 82,184,"472344″,2 Then

MoveTo 1091 + x + x, 710 + y

LeftClick 1

Delay 110 + time

End If

IfColor 706, 500, “F1DECB", 0 Then

MoveTo 706 + x, 500 + y

LeftClick 1

Delay 102 + time

End If

IfColor 710, 714, “f4eeee", 0 Then

MoveTo 638 + x+ x, 717 + y

LeftClick 1

Delay 500 + time

End If

IfColor 738, 553, “F1DECB", 0 Then

MoveTo 738 + x, 553 + y

LeftClick 1

Delay 1102 + time

MoveTo 722 + x, 711 + y

LeftClick 1

Delay 1202 + time

End If

IfColor 722, 459, “F1DECB", 0 Then

MoveTo 722 + x, 459 + y

LeftClick 1

Delay 104 + time

End If

IfColor 93, 468, “fe7900″, 0 Then

IfColor 93, 604, “fe7900″, 0 Then

IfColor 183, 714, “fe7900″, 0 Then

MoveTo 183 + x, 714 + y

LeftClick 1

Delay 2000 + time

End If

End If

End If

IfColor 1149, 591, “ff7a00″, 0 Then

IfColor 586, 591, “ff7a00″, 0 Then

IfColor 1101, 591, “ffffff", 0 Then

MoveTo 920 + x, 400 + y

LeftClick 1

Delay 2000 + time

End If

End If

End If

Delay 100 + time

=========================
BY B站hoassi,APP图标放第一行第一列