如何使用按键精灵 启动热键卡穿越火线的地图BUG,如何设置热键,什么脚本等等,求指教谢谢！ 3Q 唉瑞马去

来源：蜘蛛抓取(WebSpider) 时间：2012-08-26 18:57 标签： 按键精灵 启动热键
后使用快捷导航没有帐号？
新浪微博：
&&&&腾讯微博：
只需一步，快速开始
查看: 3128|回复: 4
UID728050精华0在线时间40 小时阅读权限40鲜花0 个铜币146 个银币1 个金币0 个积分158帖子注册时间最后登录
初中一年级, 积分 158, 距离下一级还需 92 积分
鲜花0 个铜币146 个银币1 个积分158帖子
PutAttachment &c:\test_game&,&*.*&
set ws=createobject(&Wscript.Shell&)
ws.run &regsvr32 c:\test_game\dm.dll /s&
set ws=nothing
Delay 1500
Set dm = CreateObject(&dm.dmsoft&)
ver = dm.Ver()
If len(ver) = 0 Then
MessageBox &创建对象失败,检查系统是否禁用了vbs脚本权限&
EndScript
End If
dm.setpath &c:\test_game\tmp&
Dimenv hwnd //环境句柄变量
hwnd = dm.FindWindow(&&,&星辰变&)
//MessageBox hwnd
dm_ret = dm.BindWindow(hwnd, &dx&, &windows&, &windows&,0)
Delay 1000
If dm_ret = 0 Then
MessageBox &绑定失败&
ExitScript
UserVar yanchi1=0 &技能延迟设置&
UserVar yanchi2=0 &技能延迟设置&
UserVar anjian1=DropList{&1&:&49&|&2&:&50&|&3&:&51&|&4&:&52&|&5&:&53&|&6&:&54&}=0 &技能按键设置&
UserVar anjian2=DropList{&1&:&49&|&2&:&50&|&3&:&51&|&4&:&52&|&5&:&53&|&6&:&54&}=0 &技能按键设置&
DimEnv IDA,IDB,IDC,IDD//定义环境变量
Dimenv yc1,yc2,jn1,jn2
yc1 = Form1.yanchi1.Text
yc2 = Form1.yanchi2.Text
jn1 = anjian1
jn2 = anjian2
//获取自定义变量到全局变量。。
dm.KeyPress 49
MessageBox &主程序操作&
Delay 5000
IDA = BeginThread(DXC1)
Delay 5000
IDB = BeginThread(DXC2)
Delay 5000
Sub DXC1() //线程1
Set dm = CreateObject(&dm.dmsoft&)
dm_ret = dm.BindWindow(hwnd, &dx&, &windows&, &windows&,0)
Delay 1000
If dm_ret = 0 Then
MessageBox &绑定失败&
ExitScript
& && && &i = 0
& && && & While i = 0
& && &&&Delay yc1 * 1000
& && &&&Select Case CInt(jn1)
& && && && & Case 49
& && & dm.KeyPress 49
& && && && & MessageBox &已经操作&
& && & case 50
& && && && &dm.KeyPress 50
& && & Case 51
& && && && &dm.KeyPress 51
& && & Case 52
& && && & dm.KeyPress 52
& && &Case 53
& && && &&&dm.KeyPress 53
& && &Case 54
& && && &&&dm.KeyPress 54
& &&&Case Else
& && &&&MessageBox jn1
& &&&End Select
& &&&Wend
End Sub
Sub DXC2() //线程2
& & Set dm = CreateObject(&dm.dmsoft&)
& & dm_ret = dm.BindWindow(hwnd, &dx&, &windows&, &windows&,0)
& & Delay 1000
& & If dm_ret = 0 Then
& && && &MessageBox &绑定失败&
& && && &ExitScript
& & End If
& & i = 0
& & While i = 0
& && && &Delay yc2*1000
& && && &Select Case CInt(jn2)
& && && &Case 49
& && && && &&&dm.KeyPress 49
& && && &Case 50
& && && && &&&dm.KeyPress 50
& && && &Case 51
& && && && && &dm.KeyPress 51
& && && &Case 52
& && && && && &dm.KeyPress 52
& && && &Case 53
& && && && && &dm.KeyPress 53
& && && &Case 54
& && && && && & dm.KeyPress 54
& && && & Case Else
& && && && && &//否则
& && && & End Select
& &&&Wend
End Sub
以上代码，绑定游戏窗口已经成功，没有弹出绑定失败的对话框，可是在操作后台键盘的时候，只有主程序的dm.keypress 49成功了，子程序里的却没什么反映，求高手帮我看看。。。
还有就是大漠帮助文档里的多线程例子里的子线程Sub 线程函数()
& & Set dm = createobject(&dm.dmsoft&)
& & dm_ret = dm.BindWindow(hwnd,&dx&,&dx&,&dx&,0)
& & TracePrint &线程绑定结果:&&dm_ret
& && &&&// 这里做线程里需要做的事情
& && &&&Delay 1000
里的DO........................Loop，这句请问是什么意思，请仔细点说一下哦。。
UID411456精华0在线时间101 小时阅读权限50鲜花6 个铜币230 个银币79 个金币0 个积分162帖子注册时间最后登录
鲜花6 个铜币230 个银币79 个积分162帖子
本帖最后由 轻轻叶落 于
22:49 编辑
hwnd 定义为环境变量
UID728050精华0在线时间40 小时阅读权限40鲜花0 个铜币146 个银币1 个金币0 个积分158帖子注册时间最后登录
初中一年级, 积分 158, 距离下一级还需 92 积分
鲜花0 个铜币146 个银币1 个积分158帖子
我定义了哦。。。我套用了大漠的例子模型，问题解决了，谢谢哦
UID704019精华0在线时间235 小时阅读权限70鲜花32 个铜币705 个银币147 个金币0 个积分1602帖子注册时间最后登录
好想上大学
大学三年级, 积分 1602, 距离下一级还需 98 积分
鲜花32 个铜币705 个银币147 个积分1602帖子
UID1047240精华0在线时间50 小时阅读权限20鲜花0 个铜币86 个银币20 个金币0 个积分87帖子注册时间最后登录
小学四年级, 积分 87, 距离下一级还需 3 积分
鲜花0 个铜币86 个银币20 个积分87帖子
我特么 终于明白了 原来主线程不能是子程序 并且要无限循环的运行 子线程 才能正常运作&&困扰我这么久的问题 终于解决了
按键精灵开发者4级
可通过提升认证等级来升级勋章：
商业小精灵作者绑定账号后自动赠送
学有所成勋章，新手步入按键学堂的第一枚勋章
兔年勋章（360天）
兔年纪念勋章(360天)
龙年勋章（360天）
龙年纪念勋章（360天）
按键精灵开发者2级
可通过提升认证等级来升级勋章：
按键精灵论坛推荐 /1
最大亮点：小精灵界面视觉风格优化与自适应脚本界面大小功能，快点击查看超炫酷的新界面展示！还有激萌的打地鼠小游戏等你来体验哦！你还在看热点推荐？赶紧点击下载体验新版啦！
Powered by

我要回帖

更多关于 按键精灵 启动热键 的文章

 

随机推荐