永发信息网

天龙八部按键脚本怎么做

答案:2  悬赏:0  手机版
解决时间 2021-02-22 14:18
  • 提问者网友:皆是孤独
  • 2021-02-22 06:25
写明
最佳答案
  • 五星知识达人网友:天凉才是好个秋
  • 2021-02-22 06:53
lz想找按键代码是吧,其实天龙八部的代码很简单。我给你个最简单的,自己去找规律
IfColor 163,58,111111,2
Gosub sub a
Sub a
MoveTo 34,61
LeftClick 1
KeyPress 114,1
Delay 3000
Return a
常识就是 当某某坐标达到什么条件 就运行什么程序 按键精灵都会写的。 去看论坛很多天龙八部打怪 种地的脚本,自己慢慢掌握,很容易上手。毕竟懒人很多。,求采纳 谢谢
全部回答
  • 1楼网友:迟山
  • 2021-02-22 07:24

系统分辨率1024*768,颜色设置16位色,主题xp,先让游戏最大化,然后再设置游戏窗口为800*600,16位色,其他都设置成最低,泛光什么效果都不要勾,可能不同显卡运行效果不一样,你可以自己根据自己机子情况做些修改,当人和宠物血低于一半时,会自动加,具体多少加我没有做很精确,该脚本有自动吃药,自动捡物,定点寻怪,挂机提示报警功能。

--------------------图片1 ----------------------------------图片2 ----------------------------------图片3 --------------------------------图片4

-----------------------------------图片5

将上面5个图片分别另存到c盘,分别命名为guaji.bmp,pixel.bmp,guai1.bmp,shiqu.bmp,wupin.bmp f1,f2,f3,f4,存放技能;f5人物药位置;f6宠物药位置,f11开始挂机,f12停止挂机 将下面脚本存储成txt文件,打开按键精灵导入这个txt文件即可, [general] description=天龙八部打怪脚本,hi.baidu.com/20794027 beginhotkey=122 beginhotkeymod=0 pausehotkey=0 pausehotkeymod=0 stophotkey=123 stophotkeymod=0 runonce=1 enablewindow= enable=1 autorun=0 [repeat] type=1 number=1 [relative] setupocxfile= [comment] content=

[script] //plugin pic.printscreen(225,150,230,155,"c:\pixel.bmp") //return //gosub 点全部拾取 uservar xs=0.7 gosub 自动加血 gosub 挂机检测 vbscall getcolor=getpixelcolor(360,107) ifcolor 360,112,"080c10",0 keydown 17,1 keypress 9,1 keyup 17,1 endif vbscall findpic(120,50,700,700,"c:\guai1.bmp",xs,intx,inty) if intx>1 gosub 技能 else keydown 17,1 keypress 9,1 keyup 17,1 endif vbscall findpic(120,180,900,600,"c:\wupin.bmp",xs-0.1,intm,intn) if intm>1 gosub 捡物品 endif sub 技能 keypress 112,1 keypress 115,1 keypress 113,1 keypress 114,1 return 技能 sub 捡物品 moveto intm,intn delay 2000 leftclick 1 delay 1000 gosub 点全部拾取 delay 1000 return 捡物品 sub 点全部拾取 vbscall findpic(120,180,900,600,"c:\shiqu.bmp",xs-0.1,intm1,intn1) if intm1>1 or intn1>1 moveto intm1,intn1 leftclick 1 endif return 点全部拾取 sub 自动加血 vbscall getcolor=getpixelcolor(220,110) ifcolor 220,110,"212021",0 keypress 116 endif vbscall getcolor=getpixelcolor(215,150) ifcolor 225,150,"0010ff",1 keypress 117 endif return 自动加血 sub 挂机检测 vbscall findpic(120,180,900,600,"c:\guaji.bmp",xs,inti,intj) if inti>1 beep 10000 endif return 挂机检测

我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯