• 新浪微博:
  • 按键公众号 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:03-18

按键精灵安卓版
立即下载

软件版本:3.7.0
软件大小:46.2M
更新时间:03-02

按键精灵iOS版
立即下载

软件版本:1.7.7
软件大小:29.2M
更新时间:12-06

按键手机助手
立即下载

软件版本:3.7.7
软件大小:262M
更新时间:08-06

快捷导航

登录 后使用快捷导航
没有帐号? 注册

发新话题 回复该主题

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

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

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


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

    已有1评分我要评分查看所有评分

    2#

    寻怪是直接找色吗?还是找血条?

    3#

    我玩仿传奇的游戏,想做个自动打怪的脚本,可惜找怪不知道该怎么弄。照官方教程的不行,小地图角色坐标会变动而不是一直在中间。找色怕找错了(不会多点找色,没学过不理解),怪物有时还会部分被遮挡住。求解决

    4#

    怪物血条通常不显示,鼠标不移上去名字不显示。小地图角色不固定。找色的话怪物转来转去或是给地形角色或其他怪遮挡到部分。。。不知道咋搞了,完全没啥好思路

    5#

    先找到怪物血条,然后鼠标移动血条的下方有名字的地方,,这个时候在我们血条下方做一个叛断,判断一下是不是我们设置好的怪物。坐标获取不准的方法,可以找冒号,冒号左边的是X轴个位数,左边第二个是X轴十数位,左边第三位就是X轴百位数了.冒号右边可以做个叛断,如果是右边第三位没有获取到数值,,,那么执行一个判断。如果第二位没有获取到数值,再做一个叛断。。

    6#

    比较简陋,如果优先查到的怪刚好被身前的怪挡住岂不是被卡住,建议增加判断,如果怪物移动比较快的 鼠标没有点中怪物的情况下,或 怪物没有杀死的情况下 等等未知的变数,如果都考虑到 加上检测就再好不过了,还有楼主的代码感觉在精简下 就最完美了

    7#

    有矿洞僵尸用的脚本吗?

    8#

    我看了你这个多点找色没有研究明白啊.还有你那个自动跟随那个脚本,我一调试为什么提示错误,是因为传奇版本不一样的事情吗?

    9#

    楼主 我想请教一下你的 找怪的思路 , 就是如果我们跑到地图死角了怎么处理,不是使用随机吧?

    10#

    lccstc 发表于 2015-1-9 12:24
    楼主 我想请教一下你的 找怪的思路 , 就是如果我们跑到地图死角了怎么处理,不是使用随机吧?


    你要了解这个地图。死角的地方总有坐标的吧,读取一下屏幕坐标,看一下自己所在的位置。知道自己的坐标,然后往自己设定好的方向移动就可以了。

    11#

    lplandss 发表于 2015-1-8 21:57
    比较简陋,如果优先查到的怪刚好被身前的怪挡住岂不是被卡住,建议增加判断,如果怪物移动比较快的 鼠标没有 ...


    如果怪被挡住,脚本先杀不被挡住的。。如果怪物没有被杀死或没有点中的话,会循环找怪的。。。

    12#

    该用户帖子内容已被屏蔽

    13#

    plutus914 发表于 2015-1-9 13:26
    你要了解这个地图。死角的地方总有坐标的吧,读取一下屏幕坐标,看一下自己所在的位置。知道自己的坐标, ...


    了解了,需要先设定路线是吗.

    我想要的是那种随机走动 防止进入死角的呢

    14#

    lccstc 发表于 2015-1-9 14:02
    了解了,需要先设定路线是吗.

    我想要的是那种随机走动 防止进入死角的呢


    随机走动也可以,,不过会出现刚刚杀完怪的地方,又去找一次怪哦。。。

    15#

    LZ,你这个改下名字可以用于别的地图吗?

    16#

    736792088 发表于 2015-1-30 13:59
    LZ,你这个改下名字可以用于别的地图吗?


    当然可以。。。

    17#

    能发发随机走动的 代码出来吗,我做不了
    :'(:'(

    18#

    这个我一直关心
    谢谢楼主

    19#

    请问楼主,如果没有血条可供使用,要怎么修改一下?谢谢了

    20#

    9335364 发表于 2015-4-9 15:21
    请问楼主,如果没有血条可供使用,要怎么修改一下?谢谢了


    怪物名字会不会显示?

    发新话题 回复该主题