您还未登陆，请登录后操作！
按键精灵怎么用？
帮我一直重复这句话！
发好了一句话按↑，就能再发出上次打出的字了。
如果按2下就是上上次打出的字。
玩问道要重复上次的话都是这么打的，这种方法最方便，大家都用的。
最后祝你玩得愉快！
方便的多
我收材料一只都在用
不过记得交易的时候把自动喊话关了
否则老是金钱出错
您的举报已经提交成功，我们将尽快处理，谢谢！
可以去华军软件园下载
使用方法比较简单,录制按键动作就可以了.
使用方法可以参考
大家还关注你的位置：
按键精灵和网游&问道&游戏冲突的问题
19:19:50 |
来源: 按键精灵资源站
大家好！刚来到论坛请大家多多指教。作为一个菜鸟中的菜鸟，我确实有很多问题不得其解，希望论坛的各位前辈高手不理赐教。谢谢！
在这里请教各位：
为什么只要按键精灵打开，问道就会出现非法呢？（神盾开启了）这是兼容性的问题吗？请问有什么问题可以解决！有谁会写问道抓BB炼丹的脚本_按键精灵吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
有谁会写问道抓BB炼丹的脚本收藏
按键精灵官方论坛有免费脚本专区
登录百度帐号推荐应用
为兴趣而生，贴吧更懂你。或你的位置：
问道组队单开打怪脚本-新手参考
23:06:57 |
来源: 按键精灵资源站
本帖最后由 yewen170 于
23:12 编辑
呵呵，我回来了，原来的作品大家看看，呵呵，新手参考，老鸟多批评。
UserVar zxhc=DropList{&最小化窗口&:&0&|&不最小化窗口&:&1&}=0 &设置窗口切换方式&
UserVar yssss=350 &设置窗口切换延时（毫秒）&
UserVar 游戏_JK=2 &设置游戏几开&
UserVar bjj=DropList{&机箱&:&0&|&音响&:&1&}=1 &设置报警方式&
UserVar bjcish=5 &设置报警连续响几次&
UserVar BJ_延时=20 &设置报警后延时（秒）&
UserVar XL_宠物=0 &设置是否训练宠物&
UserVar TM_数量=180 &设置宠物多少时间训练一次&
UserVar TM_单位=DropList{&分&:&0&|&秒&:&1&}=0 &设置时间单位&
UserVar JX_判断=DropList{&是&:&0&|&否&:&1&}=1 &设置是否加血&
UserVar JX_比例=DropList{&80%&:&0&|&50%&:&1&|&20%&:&2&}=0 &设置加血比例&
UserVar int_TP=DropList{&是&:&0&|&否&:&1&}=1 &设置血少自动逃跑&
UserVar TP_比例=DropList{&50%&:&0&|&30%&:&1&}=0 &设置逃跑比例&
UserVar RWG_xuemo=DropList{&不作处理&:&0&|&报警&:&1&|&逃跑&:&2&}=0 &设置遇到血魔&
UserVar RWG_bbd=DropList{&不作处理&:&0&|&报警&:&1&|&逃跑&:&2&}=0 &设置遇到宝宝丹&
UserVar RWG_whzch=DropList{&不作处理&:&0&|&报警&:&1&|&逃跑&:&2&}=0 &设置遇到为虎作伥&
UserVar FS_刷怪=DropList{&单刷&:&0&|&组队&:&1&}=0 &设置刷怪方式(组队支持5人，最大3队）&
Gosub xiuzhengchuangkou
Dim int_rw_bz,int_rw_zy
int_rw_bz = Array(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0)
/// p,几开
BJ_延时=BJ_延时*1000
//宠物训练
//窗口从0开始
//获得开始时间 Ks是毫秒单位
TM_开始 = Plugin.Sys.GetTime()
//解析时间单位
If TM_单位=0 Then
If TM_单位=1 Then
TM_现在 = Plugin.Sys.GetTime()
//获得程序运行现在的时间
VBS sjdfc=((TM_现在-TM_开始)/1000/tm)
//得到开始时间和现在时间的时间差
If TM_数量&sjdfc Then
//时间到了
dqfc1=dqfc2
If j&=1 Then
If j=1 Then
///下面这句是激活窗口
Call Plugin.Window.Active(MyArray(i))
Gosub 激活延时
//下面这句是还原窗口
Call Plugin.Window.Restore(MyArray(i))
//切换延时
Delay yssss
//鼠标移动到固定位置
Call 鼠标固定位置()
//***判，是否在移动
zdc1=GetPixelColor(10,257)
zdc3=GetPixelColor(760,122)
Call 人物状态子程序()
If PD_人物状态=0 Then
Gosub 遇到老君
//检测有没有要点击的任务
Call JCH_RW()
Call JCH_道道()
Call 宠物训练子程序()
Call 加血子程序()
If FS_刷怪=0 Then
Gosub 走动判定子程序
If FS_刷怪=1 Then
If i=0 or i=5 or i=10 Then
Gosub 走动判定子程序
Gosub 遇到老君
Call 人物状态子程序()
If PD_人物状态=1 Then
Gosub 遇到老君
Gosub 打怪状态判定子程序
If j=1 Then
Call Plugin.Window.Min(MyArray(i))
//循环控制&&
If i=j Then
//检测时间执行的命令赋初值
//当循环条件成立的时候，反复执行循环体
Sub 鼠标固定位置()
Call 防飘()
Call 防飘()
Sub 激活延时()
Sub JCH_道道()
FindColorEx 377,382,459,400,&F8B478&,0,0.9,intX,intY
If intX & 0 And intY & 0 Then
FindColorEx 368,417,460,432,&B868B0&,0,0.9,intX,intY
If intX & 0 And intY & 0 Then
FindColorEx 368,417,460,432,&C0FCE0&,0,0.9,intX,intY
If intX & 0 And intY & 0 Then
Call 防飘()
If w&180 and z&120 Then
LeftClick 1
Sub JCH_RW()
int_次数=0
Rem JCH_RW_信息
///点击任务信息
FindColorEx 320,242,452,373,&38C8E0&,0,0.8,intX,intY
If intX & 0 And intY & 0 Then
FindColorEx 309,250,464,373,&F0F4F0&,0,0.8,intX,intY
If intX & 0 And intY & 0 Then
FindColorEx 144,228,655,370,&50ECF8&,0,0.8,wxa,zya
If intX & 0 And intY & 0 Then
Call 防飘()
If w&150 and z&120 Then
LeftClick 1
Call JCH_道道()
int_次数=int_次数+1
If int_次数=4 Then
int_次数=0
Goto JCH_RW_信息
Sub 宠物训练()
int_点击计数=0
If TM_到了=1 Then
Rem XL_继续
Call 打开宠物()
Call 防飘()
LeftClick 1
int_点击计数=int_点击计数+1
//有没有到100
FindColorEx 315,283,320,295,&F8FCF8&,0,0.8,intX,intY
If intX & 0 And intY & 0 Then
If int_点击计数=6 Then
int_点击计数=0
Goto XL_继续
//有没参战
FindColorEx 208,294,223,309,&00C480&,0,0.7,intX,intY
If intX & 0 And intY & 0 Then
MoveTo 215, 301
LeftClick 1
Call 关闭宠物()
Sub 打开宠物()
Rem JCH_宠物开
FindColorEx 307,61,340,85,&38C8E0&,0,0.9,intX,intY
If intX & 0 And intY & 0 Then
KeyDown 18, 1
KeyPress 82, 1
KeyUp 18, 1
Goto JCH_宠物开
Sub 关闭宠物()
Rem JCH_宠物关
FindColorEx 307,61,340,85,&38C8E0&,0,0.9,intX,intY
If intX & 0 And intY & 0 Then
KeyDown 18, 1
KeyPress 82, 1
KeyUp 18, 1
Goto JCH_宠物关
Sub 走动时开攻击检测()
//***判是否开攻击力
FindColorEx 735,583,778,616,&00E0F8&,0,0.5,tX,tY
If tX&0 Then
KeyPress 27,1
//加血子程序
Sub 加血子程序()
//进行加血执行
If int_rw_bz（i）=1 Then
Rem 加血检测z
Call 防飘()
RightClick 1
int_rw_bz（i）=0
Sub 宠物训练子程序()
//是否进行宠物训练
If XL_宠物=1 Then
Call 宠物训练()
Sub 人物状态子程序()
//***判，不在打怪状态
PD_人物状态=0
FindColorEx 158,53,160,54,&00FCF8&,0,0.8,kX,kY
If kX&0 Then
//在打怪状态
PD_人物状态=1
PD_人物状态=0
Sub 走动判定子程序()
//检测有没有要点击的任务
Call JCH_RW()
Call 走动时开攻击检测()
zdc2=GetPixelColor(10,257)
zdc4=GetPixelColor(760,122)& &
If zdc1=zdc2 and zdc3=zdc4 Then
//***开始走动
KeyDown 18,1
KeyPress 90,1
KeyUp 18,1
If ZD_开始=0 Then
If zdc1=zdc2 or zdc3=zdc4 Then
//***开始走动
KeyDown 18,1
KeyPress 90,1
KeyUp 18,1
//***判，是否在移动
FindColorEx 10,570,42,582,&,0.7,intX,intY
If intX & 0 And intY & 0 Then
//***开始走动
KeyDown 18,1
KeyPress 90,1
KeyUp 18,1
Sub 打怪状态判定子程序()
//***判，是否进入打怪状态
FindColorEx 157,53,160,54,&00FCF8&,0,0.7,kX,kY
If kX&0 Then
& && &&&kX=0
& && &&&//
& && &&&//血魔
& && &&&If RWG_xuemo&0 Then
& && &&&Gosub 是否遇到血魔
& && &&&End If
& && &&&//宝宝丹
& && &&&If RWG_bbd&0 Then
& && &&&Call 是否遇到宝宝丹()
& && &&&End If
& && &&&//为虎作伥
& && &&&If RWG_whzch&0 Then
& && &&&Call 是否遇到为虎作伥()
& && &&&End If
& && &&&//***判，是否开自动了
& && &&&Gosub 开自动子程序
& && &&&//
& && &&&//打怪加血检测
& && &&&Call 加血检测()
& && &&&//逃跑
If int_TP=0 Then
If TP_比例=0 Then
FindColorEx 745,55,750,60,&,0.5,intX,intY
If intX & 0 And intY & 0 Then
Call 启动逃跑()
If TP_比例=1 Then
FindColorEx 735,55,740,60,&,0.5,intX,intY
If intX & 0 And intY & 0 Then
Call 启动逃跑()
& && &&&//
& && &&&//
Sub 启动逃跑()
Call JCH_RW()
//关闭自动打怪
//检测有没有处在不打怪状态
FindColorEx 690,397,728,430,&40FCF8&,0,0.6,intX,intY
If intX & 0 And intY & 0 Then
Call 关自动子程序()
Rem 执行逃跑
//执行逃跑
Call 防飘()
LeftClick 1
Call 鼠标固定位置()
//检测是否逃跑成功
FindColorEx 690,397,728,430,&40FCF8&,0,0.6,intX,intY
If intX & 0 And intY & 0 Then
int_zxtp=int_zxtp+1
If int_zxtp=6 Then
int_zxtp=0
//***判，是进入打怪状态
FindColorEx 157,53,160,54,&00FCF8&,0,0.7,kX,kY
If kX&0 Then
Goto 执行逃跑
int_zxtp=0
Sub 加血检测()
//设置是否加血
If JX_判断=0 Then
If JX_比例=0 Then
FindColorEx 764,57,766,59,&,0.6,intX,intY
If intX & 0 And intY & 0 Then
int_rw_bz（i）=0
int_rw_bz（i）=1
If JX_比例=1 Then
FindColorEx 745,57,747,59,&,0.6,intX,intY
If intX & 0 And intY & 0 Then
int_rw_bz（i）=0
int_rw_bz（i）=1
If JX_比例=2 Then
FindColorEx 723,57,725,59,&,0.6,intX,intY
If intX & 0 And intY & 0 Then
int_rw_bz（i）=0
int_rw_bz（i）=1
Sub 遇到老君()
& & //***判，是否遇到老君1
& & FindPic 164,24,596,467,&Attachment:\BJ_老君.bmp&,0.4,lX,lY
& & If lX & 0 And lY & 0 Then
& && &&&Call 报警()
& && &&&Gosub 老君延时
& & End If
& & //***判，是否遇到老君2
& & FindColorEx 448,256,458,259,&F8FC00&,0,0.6,kX,kY
& & If kX&0 Then
& && &&&kX=0
& && &&&Call 报警()
& && &&&Gosub 老君延时
& & End If
Sub 是否遇到血魔()
& & //判断是否遇到血魔
& & FindPic 9,104,330,441,&Attachment:\血魔.bmp&,0.4,lX,lY
& & If lX&0
& && &&&lX=0
& && &&&If RWG_xuemo=1 Then
& && &&&Call 报警()
& && &&&Gosub 老君延时
& && &&&End If
& && &&&If RWG_xuemo=2 Then
& && &&&Call 启动逃跑()
& && &&&End If
Sub 是否遇到宝宝丹()
& & //判断是否遇到血魔
& & FindPic 9,100,530,441,&Attachment:\RWG_宝宝丹.bmp&,0.4,lX,lY
& & If lX&0
& && &&&lX=0
& && &&&If RWG_bbd=1 Then
& && &&&Call 报警()
& && &&&Gosub 老君延时
& && &&&End If
& && &&&If RWG_bbd=2 Then
& && &&&Call 启动逃跑()
& && &&&End If
Sub 是否遇到为虎作伥()
& & //判断是否遇到血魔
& & FindPic 9,100,530,441,&Attachment:\RWG_为虎作伥.bmp&,0.4,lX,lY
& & If lX&0
& && &&&lX=0
& && &&&If RWG_whzch=1 Then
& && &&&Call 报警()
& && &&&Gosub 老君延时
& && &&&End If
& && &&&If RWG_whzch=2 Then
& && &&&Call 启动逃跑()
& && &&&End If
Sub 老君延时()
& & Delay BJ_延时
Sub 开自动子程序()
& & //***开自动
& & FindColorEx 342,165,378,175,&00E4F8&,0,0.8,kX,kY
& & If kX&0 Then
& & //第一次打怪(renwu
& & KeyDown 18,1
& & KeyPress 65,1
& & KeyUp 18,1
& & Delay 50
& & //第一次打怪(chongwu
& & KeyDown 18,1
& & KeyPress 65,1
& & KeyUp 18,1
& & Delay 50
& & //开自动
& & KeyDown 18,1
& & KeyPress 90,1
& & KeyUp 18,1
& & Delay 50
& & End If
Sub 关自动子程序()
& & //***关自动
& & FindColorEx 342,165,378,175,&00E4F8&,0,0.8,kX,kY
& & If kX&0 Then
& & //关自动
& & KeyDown 18,1
& & KeyPress 90,1
& & KeyUp 18,1
& & Delay 300
& && && && &
& & End If
If w&150 and z&120 Then
Xn = Plugin.Memory.Read32Bit(MyArray(i), &H12FB14)
Yn = Plugin.Memory.Read32Bit(MyArray(i), &H12FB18)
MoveR a , b
//***//***
Sub xiuzhengchuangkou()
& & //****************************修正窗口************************
& & //下面这句是遍历符合窗口标题(&成吉&)的句柄保存到数组(HwndEx)里
& & HwndEx =Plugin.Window.Search(&问道&)
& & //下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串
& & MyArray = Split(HwndEx, &|&)
& & If UBound(MyArray)&=0
& && &&&i=0
& && &&&For UBound(MyArray)
& && && && &//下面这句将字符串转换成数值
& && && && &Clng(MyArray(i))
& && && && &a=MyArray(i)
& && && &&&Call Plugin.Window.Move(a,0,0)
& && && && &Delay 300
& && && && &i=i+1
& && &&&EndFor
//当循环条件成立的时候，反复执行循环体
Sub 报警()
& & If bjj=0
& && &&&Gosub 机箱报警
& && &&&Gosub 音乐报警
Sub 机箱报警()
& & For bjcish
& && &&&Beep
& && &&&Delay 188
& && &&&//这里的脚本可以循环bjcish次
& & EndFor
Sub 音乐报警()
& & For bjcish
& && &&&VBS strSoundFile = &C:\WINDOWS\Media\Windows XP 启动.wav&
& && &&&VBS Set objShell = CreateObject(&Wscript.Shell&)
& && &&&VBS strCommand = &sndrec32 /play /close & & chr(34) & strSoundFile & chr(34)
& && &&&VBS objShell.Run strCommand, 0, True
& && &&&Delay 2000
& && &&&//这里的脚本可以循环bjcish次
& & EndFor求按键精灵制作问道 自动喊话 脚本。那位高手教教我，我真的一点都不会啊_百度知道
求按键精灵制作问道 自动喊话 脚本。那位高手教教我，我真的一点都不会啊
提问者采纳
你一定是在游戏中喊话，有两种办法：1、一般游戏中激活对话框是按回车键，你只要在按键精灵中定义“回车键”一次，激活对话框，然后将先前复制好的话，定义“CTRL+V”，然后再执行回车一次，中间可以加上时间延时，重复执行。2、如果你不会定义按键，可以使用按键精灵中的录制功能，直接开始录制，然后你按照正常在游戏中喊话的操作，用按键精灵录制一遍你的喊话操作，然后重复执行均可。
我听都听不懂，这位大哥你能给我源码或者直接帮我做一个...
提问者评价
按照你说的，真的成功了，好开心，谢谢你！
其他类似问题
为您推荐：
您可能关注的推广
自动喊话的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁