01.c,d,i,j,k    
02.dim x,y,x1,y1,x2,y2,x3,y3,x4,y4    
03.UserVar a="F2" "设置第一技能键(F2)。"   
04.UserVar b="F3" "固定设置第一使用怒气技能键(F3)。"   
05.UserVar c="F4" "设置第二技能键(F4)。"   
06.UserVar d="F5" "设置打坐回血蓝键(F5)。"   
07.Delay 200    
08.i=0    
09.j=0    
10.While true    
11.    x=0    
12.    y=0    
13.    Delay 200    
14.    Call FindColorEx(100,100,870,510,"0000FD",0,0.8,x,y)    
15.    If x>=10 and y>=10 Then   
16.        MoveTo x+8,y+25    
17.        LeftClick 1    
18.        Delay 200    
19.        Call 技能()    
20.        Call 杀怪()    
21.    ElseIf x<10 and y<10 Then   
22.        Delay 200    
23.        k=1    
24.        KeyPress 116,1    
25.        Delay 3000    
26.    End if    
27.Wend    
28.Sub 技能()    
29.    Delay 200    
30.    If k=1 Then   
31.        MoveTo 767,35    
32.        Delay 350    
33.        RightClick 1    
34.        Delay 350    
35.        k=0    
36.    End if    
37.    Call FindColorEx(172,42,172,42,"D5FFFF",0,0.9,x3,y3)    
38.    If x3=172 and y3=42 Then   
39.        Delay 200    
40.        KeyPress 114,1    
41.        x3=0    
42.        y3=0    
43.    End if    
44.    Delay 200    
45.    Call FindColorEx(187,37,187,37,"FF5C5D",0,0.9,x4,y4)    
46.    If x4=187 and y4=37 Then   
47.        Delay 200    
48.        KeyPress 115,1    
49.        x4=0    
50.        y4=0    
51.    End if    
52.    Delay 200    
53.End Sub   
54.Sub 杀怪()    
55.    Delay 200    
56.    While true    
57.        x1=0    
58.        y1=0    
59.        Delay 200    
60.        Call FindColorEx(221,29,224,29,"080810",0,0.9,x1,y1)    
61.        If x1>=221 and y1>=29 Then   
62.            Delay 200    
63.            Goto 怪已死    
64.        End if    
65.        Delay 200    
66.        Call FindColorEx(221,29,224,29,"3E4DFD",0,0.8,x2,y2)    
67.        If x2<=221 and y2<=29 Then   
68.            i=(x+5)-510    
69.            j=(y+25)-400    
70.            MoveTo ABS(i-510),ABS(j-400)    
71.            Delay 200    
72.            LeftClick 1    
73.            Delay 200    
74.            Goto 怪已死    
75.        End if    
76.    Wend    
77.    Rem 怪已死    
78.    Delay 200    
79.End Sub  |