[脚本源码] 热血传奇自动打怪，自动读取屏幕坐标，自动寻怪 [复制链接]

我是新手，按键图书看了三个月的基础，，高手可以略过，新手看看吧，脚本如下。。，如果大家需要的话，我可以出制作视频。。。。这是石墓阵用的脚本。。

您所在的用户组无法下载或查看附件

Rem kaishi

//中心点坐标

x=497

y=245

//设置2点间距离

v=20

//设置圈数

q=20

//开始

i=1

While i<=q

j=0

k=v

n=2

While n>0

m=i

While m>0

x=x+j

y=y+k
//检测血条

FindMultiColor x,y,x+30,y+30,&H000000,"1|0|000000,2|0|000000,-1|1|000000,0|1|0000FF,-1|2|000000,0|2|0000FF,0|3|000000,1|3|000000,2|3|000000",0,1.0,X2,Y2
If X2 > 0
MoveToEx x2+15,y2+53
Delay 100

//黑野猪
FindMultiColor x2-10,y2,x2+34,y2+65,&HFEFEFE,"8|0|FEFEFE,11|0|FEFEFE,21|0|FEFEFE,0|4|FFFFFF,8|4|FFFFFF,-1|10|FEFEFE,9|10|FEFEFE,11|10|FEFEFE,18|10|FEFEFE",0,1.0,X1,Y1
If X1 > 0
LeftClick 1
goto kaishi

End If
//黑色恶蛆
FindMultiColor x2-10,y2,x2+34,y2+65,&HFDFDFD,"9|0|222222,14|0|FDFDFD,19|3|FEFEFE,0|4|FEFEFE,8|4|FFFFFF,11|4|FDFDFD,12|6|FEFEFE,19|6|FFFFFF,21|8|FDFDFD,-1|10|FDFDFD,9|10|FDFDFD,13|10|FDFDFD",0,1.0,X1,Y1
If X1 > 0
LeftClick 1
goto kaishi
End If
//蝎蛇
FindMultiColor x2-10,y2,x2+34,y2+65,&HFDFDFD,"3|0|FDFDFD,7|0|FEFEFE,17|0|FDFDFD,18|1|FDFDFD,-2|2|FDFDFD,1|2|FEFEFE,10|3|FDFDFD,14|3|FEFEFE,20|3|FEFEFE,3|4|FEFEFE,7|4|FFFFFF,19|5|FDFDFD,14|8|FDFDFD,20|8|FDFDFD,-2|9|FDFDFD,7|10|FDFDFD,8|10|FFFFFF,10|10|FDFDFD,14|10|FEFEFE,16|10|FEFEFE,20|10|FFFFFF",0,1.0,X1,Y1
If X1 > 0
LeftClick 1
goto kaishi
End If
//蝙蝠
FindMultiColor x2-10,y2,x2+34,y2+65,&HFDFDFD,"5|0|FDFDFD,2|1|FDFDFD,8|1|FEFEFE,-2|2|FDFDFD,8|3|FFFFFF,2|5|FEFEFE,8|5|FEFEFE,-2|6|FEFEFE,8|7|FFFFFF,-2|9|FDFDFD,7|10|FDFDFD",0,1.0,X1,Y1
If X1 > 0
LeftClick 1
goto kaishi
End If
//楔蛾
FindMultiColor x2-10,y2,x2+34,y2+65,&HFDFDFD,"12|0|FDFDFD,17|0|FDFDFD,9|1|FEFEFE,15|1|FDFDFD,20|1|FEFEFE,-1|2|FDFDFD,2|2|FEFEFE,7|5|FDFDFD,8|5|FEFEFE,-1|6|FEFEFE,0|10|FEFEFE,9|10|FEFEFE,16|10|FFFFFF,21|10|FEFEFE",0,1.0,X1,Y1
If X1 > 0
LeftClick 1
goto kaishi
End If
//角蝇
FindMultiColor x2-10,y2,x2+34,y2+65,&HFDFDFD,"4|1|FEFEFE,-2|3|FDFDFD,6|3|FEFEFE,-3|4|FDFDFD,4|5|FEFEFE,-3|10|FDFDFD,2|10|FEFEFE,4|10|FDFDFD,6|10|FFFFFF",0,1.0,X1,Y1
If X1 > 0
LeftClick 1
goto kaishi
End If
//红野猪
FindMultiColor x2-10,y2,x2+34,y2+65,&HFEFEFE,"2|1|FEFEFE,5|1|FEFEFE,8|1|FEFEFE,-2|3|FEFEFE,-2|4|FFFFFF,0|4|FEFEFE,-2|7|FEFEFE,-2|10|FEFEFE,2|10|FEFEFE,8|10|FEFEFE",0,1.0,X1,Y1
If X1 > 0
LeftClick 1
goto kaishi
End If
End If
m=m-1
Wend
j=v
k=0
n=n-1
Wend
i=i+1
v=0-v
Wend
//捡钱
FindMultiColor 240,90,1040,537,&HF5CCA3,"16|0|F6CDA4,7|1|F5CCA3,-5|4|F5CCA3,-4|4|F6CDA4,4|4|F5CCA3,5|4|F6CDA4,8|9|F6CDA4,-5|10|F5CCA3,5|10|F6CDA4",0,1.0,X,Y
If X > 0
MoveToex x+10,y+6
LeftClick 1
Goto kaishi
End If
//下面这段是读取屏幕右上角坐标
//用多点找色功能，找到屏幕右上角的冒号,并定位起点坐标
FindMultiColor 872,110,888,117,&H212121,"-1|1|212121,0|1|FDFDFD,1|1|222222,0|2|222223,0|5|212122,-1|6|222222,0|6|FDFDFD,1|6|222222,0|7|222222",0,0.9,X,Y
If X > 0
qszsx=x-16
qszsy=y-3
qsyxx=x-9
qsyxy=y+8
Else
MessageBox meizhaodaomaohao

End If
a=0
b=0
i=0
//石墓阵的坐标较小,X轴和Y轴最大只有两位数，循环4次找到四位的数字，把找到的图片值存到变里4里，如果没有找到数字显示C=11
While i<4
c=11
//用多点找色，找0
FindMultiColor qszsx+a,qszsy,qsyxx+b,qsyxy,&HFDFDFD,"2|0|FEFEFE,-1|1|FDFDFD,3|1|FDFDFD,-1|4|FEFEFE,3|4|FEFEFE,-1|6|FEFEFE,0|7|FDFDFD,2|7|FEFEFE",0,0.9,X,Y
If X > 0
c=0
End If
//找1
FindMultiColor qszsx+a,qszsy,qsyxx+b,qsyxy,&HFDFDFD,"-1|1|FDFDFD,0|1|FFFFFF,0|2|FEFEFE,0|3|FEFEFE,0|5|FEFEFE,0|6|FEFEFE,-1|7|FDFDFD,0|7|FFFFFF,1|7|FEFEFE",0,0.9,X,Y
If X > 0
c=1
End If
//找2
FindMultiColor qszsx+a,qszsy,qsyxx+b,qsyxy,&HFDFDFD,"2|0|FEFEFE,-1|1|FDFDFD,-1|2|FEFEFE,2|3|FDFDFD,0|5|FDFDFD,-1|6|FDFDFD,-1|7|FEFEFE,1|7|FEFEFE,3|7|FEFEFE",0,0.9,X,Y
If X > 0
c=2
End If
//找3
FindMultiColor qszsx+a,qszsy,qsyxx+b,qsyxy,&HFDFDFD,"2|0|FEFEFE,-1|1|FDFDFD,3|1|FDFDFD,3|2|FEFEFE,1|3|FDFDFD,2|3|FEFEFE,3|4|FDFDFD,-1|6|FDFDFD,0|7|FDFDFD",0,0.9,X,Y
If X > 0
c=3
End If
//找4
FindMultiColor qszsx+a,qszsy,qsyxx+b,qsyxy,&HFDFDFD,"-1|1|FDFDFD,-2|2|FDFDFD,-2|3|FEFEFE,-3|4|FDFDFD,-2|5|FDFDFD,1|5|FEFEFE,0|6|FEFEFE,0|7|FEFEFE,1|7|FEFEFE",0,0.9,X,Y
If X > 0
c=4
End If
//找5
FindMultiColor qszsx+a,qszsy,qsyxx+b,qsyxy,&HFDFDFD,"1|0|FEFEFE,4|0|FEFEFE,0|3|FEFEFE,3|3|FEFEFE,4|4|FDFDFD,0|6|FDFDFD,4|6|FEFEFE,1|7|FDFDFD,3|7|FEFEFE",0,0.9,X,Y
If X > 0
c=5
End If
//找6
FindMultiColor qszsx+a,qszsy,qsyxx+b,qsyxy,&HFDFDFD,"2|0|FEFEFE,2|1|FEFEFE,-1|3|FEFEFE,2|3|FEFEFE,3|4|FDFDFD,-1|6|FEFEFE,3|6|FEFEFE,0|7|FDFDFD,2|7|FEFEFE",0,0.9,X,Y
If X > 0
c=6
End If

//找7
FindMultiColor qszsx+a,qszsy,qsyxx+b,qsyxy,&HFDFDFD,"3|0|FEFEFE,4|0|FEFEFE,0|1|FEFEFE,3|1|FEFEFE,3|2|FEFEFE,2|3|FDFDFD,2|4|FEFEFE,2|5|FEFEFE,2|7|FEFEFE",0,0.9,X,Y
If X > 0
c=7
End If

//找8
FindMultiColor qszsx+a,qszsy,qsyxx+b,qsyxy,&HFDFDFD,"2|0|FEFEFE,-1|1|FDFDFD,3|1|FDFDFD,0|3|FDFDFD,2|3|FEFEFE,-1|4|FDFDFD,3|4|FDFDFD,0|7|FDFDFD,2|7|FEFEFE",0,0.9,X,Y
If X > 0
c=8
End If

//找9
FindMultiColor qszsx+a,qszsy,qsyxx+b,qsyxy,&HFDFDFD,"2|0|FEFEFE,-1|2|FEFEFE,3|2|FEFEFE,-1|3|FEFEFE,3|3|FEFEFE,0|6|FDFDFD,3|6|FEFEFE,0|7|FEFEFE,2|7|FEFEFE",0,0.9,X,Y
If X > 0
c=9
End If

//第一次循环,获取十位数的值
If i=0
sx=c
endif

//因为数字中间有冒号，占了3个像数，第二次循环完以后,起始坐标左上x和起始右下x加3
If i=1
gx=c
a=a+3
b=b+3
endif
//第三次循环的值存入变量SY
If i=2
sy=c
endif
//第四次循环的值存入变量GY
If i=3
gy=c
endif
//每次循环完，坐标左上x和右下x加7
i=i+1
a=a+7
b=b+7
Wend
If sx=11
x=gx
Else
x=sx*10+gx

endif

If sy=11
y=sy
Else
y=sy*10+gy

endif


//找怪

If x<15
If y>15
If y<30
movetoex 584,173
RightClick 1
Delay 1000
Goto kaishi

endif
endif
If y>30
If y<45
movetoex 584,173
RightClick 1
Delay 1000
Goto kaishi
endif
endif
endif
If x>15
If x<30
If y<15
MoveToEx 507,407
RightClick 1
Delay 1000
Goto kaishi
endif
If y>15
If y<30
MoveToEx 503,113
RightClick 1
Delay 1000
Goto kaishi
endif
endif
If y>30
If y<45
MoveToEx 150,276
RightClick 1
Delay 1000
Goto kaishi
endif
endif

endif
endif
If x>30
If x<45
If y<15
MoveToEx 503,393
RightClick 1
Delay 1000
Goto kaishi
endif
If y>15
If y<30
MoveToEx 503,393
RightClick 1
Delay 1000
Goto kaishi
endif

endif
If y>30
If y<45
MoveToEx 400,160
RightClick 1
Delay 1000
Goto kaishi
endif
endif
endif
endif