帖子52&精华0&积分53&豌豆0 &阅读权限20&在线时间4 小时&注册时间&最后登录&
自己做的按键精灵道士挂机脚本
适合任何地图,适合练英雄
小号另有脚本
帖子52&精华0&积分53&豌豆0 &阅读权限20&在线时间4 小时&注册时间&最后登录&
Description=打怪v0.6
BeginHotkey=81
BeginHotkeyMod=2
[CallBack]
//大小地图比例
VBS scale=30
//小地图上的最大距离，可以保证人物与怪在一个屏幕
//人怪相邻时的距离
//纪录停步时间
//表示移动方向上的偏移,左，下，右，上
VBS dim dirt(4,2)
VBS dirt(0,0)=-30
VBS dirt(0,1)=0
VBS dirt(1,0)=0
VBS dirt(1,1)=80
VBS dirt(2,0)=30
VBS dirt(2,1)=0
VBS dirt(3,0)=0
VBS dirt(3,1)=-30
VBS dim dirt2(4,2)
VBS dirt2(0,0)=-100
VBS dirt2(0,1)=0
VBS dirt2(1,0)=0
VBS dirt2(1,1)=150
VBS dirt2(2,0)=100
VBS dirt2(2,1)=0
VBS dirt2(3,0)=0
VBS dirt2(3,1)=-100
//打怪时鼠标的偏移量，从站的位置开始,从左开始
VBS dim fight(8,2)
VBS fight(0,0)=-40
VBS fight(0,1)=-40
VBS fight(1,0)=-25
VBS fight(1,1)=25
VBS fight(2,0)=5
VBS fight(2,1)=19
VBS fight(3,0)=25
VBS fight(3,1)=25
VBS fight(4,0)=35
VBS fight(4,1)=-20
VBS fight(5,0)=30
VBS fight(5,1)=-30
VBS fight(6,0)=0
VBS fight(6,1)=-50
VBS fight(7,0)=-30
VBS fight(7,1)=-30
//定义一个随机数
VBS rand=5
//小地图上人物坐标，此坐标固定
VBS role_x0=739
VBS role_y0=59
//大地图上人物站立位置，此坐标固定，取两脚之间的一点
VBS stand_x=390
VBS stand_y=210
VBS role_x1=390
VBS role_y1=140
//小地图上表示怪物的一点颜色为#0000FF
//小地图位置:左上角680,0& && &&&左下角680,120& && &&&右下角800,120& && &&&右上角800,0
//=====================寻找身边是否有怪==========================
VBSCall Call FindCenterColor(role_x0-d,role_y0-d,role_x0+d,role_y0+d,&0000FF&,monster_x0,monster_y0)
If monster_x0&=680 and monster_y0&=0
& & //在身边直接打怪
& & //八个打怪的方向，从左开始，逆时针打过来
& & If role_x0&monster_x0 and role_y0-d&monster_y0 and role_y0+d&monster_y0
& && &&&iii=0
& & If role_x0&monster_x0 and role_y0&monster_y0
& && &&&iii=1
& & If role_x0-d&monster_x0 and role_x0+d&monster_x0 and role_y0&monster_y0
& && &&&iii=2
& & If role_x0&monster_x0 and role_y0&monster_y0
& && &&&iii=3
& & If role_x0&monster_x0 and role_y0-d&monster_y0 and role_y0+d&monster_y0
& && &&&iii=4
& & If role_x0&monster_x0 and role_y0&monster_y0
& && &&&iii=5
& & If role_x0-d&monster_x0 and role_x0+d&monster_x0 and role_y0&monster_y0
& && &&&iii=6
& & If role_x0&monster_x0 and role_y0&monster_y0
& && &&&iii=7
& & click_x=stand_x+fight(iii,0)
& & click_y=stand_y+fight(iii,1)
& & If iii=2
& && &&&click_x=stand_x
& && &&&click_y=stand_y
& & MoveTo click_x click_y
& & LeftClick 1
& & Delay 500
& & Goto 杀怪
//========================寻找小地图上怪物坐标===========================
VBSCall Call GetCursorPos(x,y)
VBSCall new_color=GetPixelColor(x,y)
VBSCall Call FindCenterColor(680,0,800,120,&0000FF&,monster_x0,monster_y0)
If monster_x0&=680 and monster_y0&=0
& & If monster_x0&role_x0 and monster_y0&=role_y0
& && &&&//朝怪方向移动，怪在左上侧
& && &&&click_x=stand_x-50
& && &&&click_y=stand_y-50
& & If monster_x0&=role_x0 and monster_y0&role_y0
& && &&&//朝怪方向移动，怪在左下侧
& && &&&click_x=stand_x-50
& && &&&click_y=stand_y+50
& & If monster_x0&=role_x0 and monster_y0&role_y0
& && &&&//朝怪方向移动，怪在右上侧
& && &&&click_x=stand_x+50
& && &&&click_y=stand_y-50
& & If monster_x0&role_x0 and monster_y0&=role_y0
& && &&&//朝怪方向移动，怪在右下侧
& && &&&click_x=stand_x+50
& && &&&click_y=stand_y+50
& & MoveTo click_x click_y
& & LeftClick 1
& & Delay 1000
& & //路径上有障碍,这样3秒之后还站在原地，随机变向
& & If t&=3
& && &&&t=0
& && &&&VBSCall Call GetCursorPos(x,y)
& && &&&VBSCall new_color=GetPixelColor(x,y)
& && &&&If new_color=old_color
& && && && &VBSCall Call rnd=Rnd
& && && && &If rnd&=0 and rnd&0.25
& && && && && & old_color=new_color
& && && && && & click_x=stand_x-50
& && && && && & click_y=stand_y-50
& && && && &EndIf
& && && && &If rnd&=0.25 and rnd&0.5
& && && && && & old_color=new_color
& && && && && & click_x=stand_x-50
& && && && && & click_y=stand_y+50
& && && && &EndIf
& && && && &If rnd&=0.5 and rnd&0.75
& && && && && & old_color=new_color
& && && && && & click_x=stand_x+50
& && && && && & click_y=stand_y-50
& && && && &EndIf
& && && && &If rnd&=0.75 and rnd&=1
& && && && && & old_color=new_color
& && && && && & click_x=stand_x+50
& && && && && & click_y=stand_y+50
& && && && &EndIf
& && && && &MoveTo click_x click_y
& && && && &RightDown 1
& && && && &Delay 1000
& && && && &RightUp 1
& && &&&EndIf
& && &&&old_color=new_color
& & //=====================没怪跑路===========================
& & click_x=stand_x+dirt2(ii,0)
& & click_y=stand_y+dirt2(ii,1)
& & MoveTo click_x click_y
& & //LeftClick 1 走方式
& & RightDown 1
& & Delay 1000
& & RightUp 1
& & tt=tt+1
& & //路上遇到障碍，随机变道
& & If tt&=2
& && &&&tt=0
& && &&&VBSCall Call GetCursorPos(x,y)
& && &&&VBSCall new_color=GetPixelColor(x,y)
& && &&&If new_color=old_color
& && && && &ii=ii+1
& && && && &If ii&=4
& && && && && & VBSCall Call rnd=Rnd
& && && && && & If rnd&=0 and rnd&0.25
& && && && && && &&&ii=0
& && && && && & EndIf
& && && && && & If rnd&=0.25 and rnd&0.5
& && && && && && &&&ii=1
& && && && && & EndIf
& && && && && & If rnd&=0.5 and rnd&0.75
& && && && && && &&&ii=2
& && && && && & EndIf
& && && && && & If rnd&=0.75 and rnd&=1
& && && && && && &&&ii=3
& && && && && & EndIf
& && && && &EndIf
& && &&&EndIf
& && &&&old_color=new_color
//==================拾取金币=============================
VBSCall Call FindColor(stand_x-100,stand_y-100,stand_x+100,stand_y+100,&00FFFF&,x,y)
If x&=0 and y&=0
& & MoveTo x y
& & LeftClick 1
& & Delay 1000
& & Goto 拾金
帖子52&精华0&积分53&豌豆0 &阅读权限20&在线时间4 小时&注册时间&最后登录&
补充一下,本脚本只适合骨膜
帖子52&精华0&积分53&豌豆0 &阅读权限20&在线时间4 小时&注册时间&最后登录&
如果朋友们测试了有疑问,请跟在贴后提出来,
帖子357&精华0&积分367&豌豆0 &阅读权限30&在线时间152 小时&注册时间&最后登录&
现在还可以用吗？怎么用 楼主说下
帖子52&精华0&积分53&豌豆0 &阅读权限20&在线时间4 小时&注册时间&最后登录&
沙发自己顶起
帖子357&精华0&积分367&豌豆0 &阅读权限30&在线时间152 小时&注册时间&最后登录&
楼主说下在哪里下载啊
帖子52&精华0&积分53&豌豆0 &阅读权限20&在线时间4 小时&注册时间&最后登录&
按键你不会用?
帖子357&精华0&积分367&豌豆0 &阅读权限30&在线时间152 小时&注册时间&最后登录&
是啊！！~！~楼主可不可以教我下啊
帖子52&精华0&积分53&豌豆0 &阅读权限20&在线时间4 小时&注册时间&最后登录&
把我上面贴的复制下来,
用文本文档也就是TXT文件形式保存到自己电脑里
然后打开按键,导入脚本,然后就按F12就可以了
就这么简单
帖子357&精华0&积分367&豌豆0 &阅读权限30&在线时间152 小时&注册时间&最后登录&
楼主不知道在哪里下载啊 可以告诉我QQ我们QQ上说吗？
帖子357&精华0&积分367&豌豆0 &阅读权限30&在线时间152 小时&注册时间&最后登录&
这个脚本怎么用是不是需要什么软件啊
帖子52&精华0&积分53&豌豆0 &阅读权限20&在线时间4 小时&注册时间&最后登录&
自己去搜索按键
baidu会用吧
帖子2&精华0&积分3&豌豆0 &阅读权限10&在线时间7 小时&注册时间&最后登录&
楼主是编成的高手吧？
我给钱的哦给我解决SQL2005的问题！
300 QQ 443023 另帮我搞个按键哈哈
帖子969&精华0&积分990&豌豆0 &阅读权限40&在线时间589 小时&注册时间&最后登录&
不太好用啊 楼主
[通过 QQ、MSN 分享给朋友]微信：doyo_game
按键精灵自动打猎脚本
　　FindPic 0,0,,"Attachment:蛇.bmp",0.9,intX,intY
　　If intX & 0 And intY & 0 Then
　　MoveTo intX, intY
　　Delay 10
　　LeftClick 1
　　End If FindPic 0,0,,"Attachment:猪.bmp",0.9,intX,intY
　　If intX & 0 And intY & 0 Then
　　MoveTo intX, intY
　　Delay 10
　　LeftClick 1
　　End If
　　FindPic 0,0,,"Attachment:鹿.bmp",0.9,intX,intY
　　If intX & 0 And intY & 0 Then
　　MoveTo intX, intY
　　Delay 10
　　LeftClick 1
　　End If FindPic 0,0,,"Attachment:兔.bmp",0.9,intX,intY
　　If intX & 0 And intY & 0 Then
　　MoveTo intX, intY
　　Delay 10
　　LeftClick 1
　　End If
　　FindPic 0,0,,"Attachment:鹰.bmp",0.9,intX,intY
　　If intX & 0 And intY & 0 Then
　　MoveTo intX, intY
　　Delay 10
　　LeftClick 1
　　End If FindPic 0,0,,"Attachment:右蛇.bmp",0.9,intX,intY
　　If intX & 0 And intY & 0 Then
　　MoveTo intX, intY
　　Delay 10
　　LeftClick 1
　　End If
　　FindPic 0,0,,"Attachment:熊.bmp",0.9,intX,intY
　　If intX & 0 And intY & 0 Then
　　MoveTo intX+13, intY+10
　　Delay 10
　　LeftClick 1
　　End If
　　以上是源文件
轻松打猎500分
　　发多一个自动吃蛇胆的，原理和打猎差不多
　　FindPic 0,0,,"Attachment:物品.bmp",0.9,intX,intY
　　If intX & 0 And intY & 0 Then
　　MoveTo intX, intY
　　LeftClick 1 Delay 100
　　End If
　　FindPic 0,0,,"Attachment:蛇胆.bmp",0.9,intX,intY
　　If intX & 0 And intY & 0 Then
　　MoveTo intX, intY
　　LeftClick 1
　　Delay 100
　　End If
　　进入第一个画面运行就行
　　要求：蛇胆在物品第一页
　　别把蛇胆吃完，留几个，
　　要不然之后打到的蛇胆位置会改变
　　蛇胆位置不在第一页的自己改改，很简单
/article/61321
阅读本文后，您的心情是：（选择后可查看结果）
人气：472499
今日关注游戏你的位置：
关于神盾和简单游的脚本保护器
13:11:53 |
来源: 按键精灵资源站
:'(& & 玩圣境传说，发现一开启游戏就会掉线，使用神盾也无效。但是在简单游的脚本库里找到的该游戏的脚本，在开启脚本保护器后可以使用。
那个脚本保护器和神盾是一个东西么？照理说简单游的脚本也是用按键精灵写的，像我这样连游戏都无法登的，那些作者是怎么写出来的脚本呢。。。不理解啊天天酷跑挂机脚本 _ 游戏脚本专区 - 按键精灵论坛
腾讯微博：
软件版本：2014.03软件大小：71.2M更新时间：10-25
软件版本：3.1.7软件大小：52.1M更新时间：12-12
软件版本：1.2.4软件大小：29.2M更新时间：10-28
软件版本：1.0.2软件大小：11.1M更新时间：10-28
查看: 28135|回复: 278
[手游脚本]
按键精灵开发者4级可通过提升认证等级来升级勋章：体验先锋勋章新版本体验先锋纪念勋章（360天）过大年勋章俩小福娃给大家拜年啦！
本帖最后由 张志鑫 于
12:58 编辑 [hide=d100]/Qaaq4F2kiqDEA （提取码：0091）[/hide]该脚本只支持手机分辨率为：540*960注意游戏的摆放画面有返回键的要在右手那边屏幕面对自己。由于高三了，今天就要回学校，在高三未来的一年多里很少再接触按键了，所以在这里发布我的开学前的一个作品。大家多多支持，祝我以后学习可以天天向上。
按键精灵开发者4级可通过提升认证等级来升级勋章：体验先锋勋章新版本体验先锋纪念勋章（360天）过大年勋章俩小福娃给大家拜年啦！
请先看下手机是否符合脚本运行的条件
龙年勋章（360天）龙年纪念勋章（360天）按键精灵开发者5级可通过提升认证等级来升级勋章：学有所成学有所成勋章，新手步入按键学堂的第一枚勋章
收徒、游戏、办公、网页脚本定制
xiahedong007
:L:L:L:L:L:L:L:L
duan3960305
**爱后即可很快就很快很快就
按键精灵开发者2级可通过提升认证等级来升级勋章：
lvlongzhen2
谢谢楼主！！！！
按键精灵开发者1级可通过提升认证等级来升级勋章：
好的额，我来学习一下
按键精灵开发者2级可通过提升认证等级来升级勋章：
学有所成学有所成勋章，新手步入按键学堂的第一枚勋章按键精灵开发者6级可通过提升认证等级来升级勋章：黄金之翼黄金之翼勋章按键明星按键明星勋章月全勤论坛自然月（如8.1-8.31）签到满勤，系统会在月底自动判断发放。单身汪勋章单身贵族的专属勋章按键15周年庆纪念勋章按键15周年庆纪念勋章（365天）剑侠勋章剑侠世界公测活动勋章
承接各类脚本
叼烟式__空白
fhjkhhhhhh
For j=1 to cint(count/5+0.4)For i=1 to 5If x(i+(j-1)*5)>=0 thenTouchup i+(j-1)*5End ifNextNextEnd sub
这个很需要!!!
按键精灵开发者2级可通过提升认证等级来升级勋章：
hhhggg ggg
mobinxiang
新手过来看看
mobinxiang
怎么没有了楼主
。。。。。。。。。。。。。。。。。。