-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy path狗粮.Q
125 lines (115 loc) · 2.06 KB
/
狗粮.Q
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
[General]
SyntaxVersion=2
BeginHotkey=121
BeginHotkeyMod=0
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=123
StopHotkeyMod=0
RunOnce=1
EnableWindow=
MacroID=7c91e2d2-a9e7-4eb8-b3c2-b55628b4dcd1
Description=狗粮
Enable=1
AutoRun=0
[Repeat]
Type=0
Number=1
[SetupUI]
Type=2
QUI=
[Relative]
SetupOCXFile=
[Comment]
[Script]
For 10000000
//点XX章
intX = 0
FindColor 668,279,668,279,"6465A4",intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
Delay 1000
End If
Delay 1000
//挑战
intX = 0
FindColor 971,499,971,499,"5FB2F4",intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
Delay 1000
End If
Delay 1000
//选
intX = 0
FindColor 1118,388,1118,388,"BB9292",intX,intY
If intX > 0 And intY > 0 Then
//找exp++
//FindColor 1036,340,1204,415,"7D6E28",intX2,intY2
//If intX2 > 0 And intY2 > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
Delay 1000
//End If
End If
Delay 1000
//准备
intX2 = 0
FindColor 1095,293,1095,293,"141E37",intX2,intY2
If intX2 > 0 And intY2 > 0 Then
MoveTo intX2, intY2
Delay 1000
LeftClick 1
Delay 1000
End If
Delay 1000
//收东西
FindColor 558,165,558,165,"111A80",intX2,intY2
If intX2 > 0 And intY2 > 0 Then
SayString 退出来
MoveTo 679, 317
Delay 2000
LeftClick 1
Delay 3000
LeftClick 1
Delay 3000
LeftClick 1
Delay 3000
LeftClick 1
Delay 3000
LeftClick 1
End If
//左上退出
intX = 0
FindColor 200,77,200,77,"81482E",intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 1000
LeftClick 1
Delay 1000
End If
Delay 1000
//确认
intX = 0
FindColor 756,391,756,391,"5FB2F4",intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 2000
LeftClick 1
Delay 2000
End If
Delay 1000
//我很忙
intX2 = 0
FindColor 543,397,632,430,"5169DD",intX2,intY2
If intX2 > 0 And intY2 > 0 Then
MoveTo intX2, intY2
Delay 2000
LeftClick 1
Delay 2000
End If
Next