QQ三国 我怎么学不起装备打造图？_百度知道你的位置：
【QQ三国】行脚源代码（我不是标题党）【此贴必火】
17:03:09 |
来源: 按键精灵资源站
本帖最后由 ．猪﹖_| 于
15:08 编辑
不好意思 QQ三国行脚永久的代码&&不能就这样白给了& & ，希望大家看了 给我送花&&给我评分&&
作为我继续更新，继续优化的动力好吗，我相信会有更多大家满意的脚本分享给大家
求大家给我支持&&
当有 500朵献花，500个银币的时候我会把行脚的最新智能判断和附件全部上传上来
本帖隐藏的内容需要回复才可以浏览[hide=d15]
// 首先打包dm.dll和RegDll.dll到附件,当然如果你还有其它(字库，图片等)也可以一并打包
// 这个need_ver作为本脚本需要使用的版本. 如果要换插件时，记得更改这个值.
need_ver = &3.1233&
// 插件需要用到atl系统库,有些XP精简系统会把atl.dll精简掉. 为了防止注册失败，这里手动注册一下atl.dll
set ws=createobject(&Wscript.Shell&)
ws.run ®svr32 atl.dll /s&
set ws=nothing
// 释放附件&&&&&&&&&&&&&&&&&&&
// 这里选择c盘的test-_game作为插件的基本目录 也就是SetPath对应的目录。所以所有资源都释放在此目录.
PutAttachment &c:\test_game&,&*.*&
// 这里要用到RegDll来注册插件，所以必须释放到Plugin. 但是切记不能把dm.dll释放到Plugin.那会导致插件失效.
PutAttachment &.\Plugin& ,&RegDll.dll&
// 插件注册开始&&&&&&&&&&&&&&&&&&&
// 下面开始注册插件,先尝试用RegDll来注册.这里必须使用绝对路径。以免有别人把dm.dll释放在系统目录.造成版本错误.
Call Plugin.RegDll.Reg(&c:\test_game\dm.dll&)
// 这里判断是否注册成功
set dm = createobject(&dm.dmsoft&)
ver = dm.Ver()
if ver && need_ver then
// 先释放先前创建的dm
set dm = nothing
// 再尝试用regsvr32 来注册. 这里必须使用绝对路径。以免有别人把dm.dll释放在系统目录.造成版本错误.
set ws=createobject(&Wscript.Shell&)
ws.run ®svr32 c:\test_game\dm.dll /s&
set ws=nothing
Delay 1500
// 再判断插件是否注册成功
set dm = createobject(&dm.dmsoft&)
ver = dm.Ver()
if ver && need_ver then
// 这时，已经确认插件注册失败了。 弹出一些调试信息，以供分析.
messagebox &插件版本错误,当前使用的版本是:&&ver&&,插件所在目录是:&&dm.GetBasePath()
messagebox &请关闭程序,重新打开本程序再尝试&
//=========以上是每次写代码时，必须复制的，注册大漠（不用了解）=====
//====== 以下绑定窗口======
//獲取鼠標指向的窗口句柄
hwnd = dm.GetMousePointWindow()
//綁定指定的窗口,並指定這個窗口的屏幕顏色獲取方式,鼠標仿真模式,鍵盤仿真模式,以及模式設定
dm_ret = dm.BindWindow(hwnd,&dx&,&windows3&,&windows&,1)
// =====以上是后台绑定窗口模式====
UserVar E=2 &设置行脚的次数&
Rem 继续行脚
dm_ret = dm.SetWindowText(hwnd,&你设置跳&& E &&行脚&&现在是第&& D &&行脚&)
If D = E Then
Goto 结束行脚
//-------错题判断----------
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(-50,-50,800,600,&答错.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
MessageBox &答错了&
Delay 302000
Goto 等待错题
//-------错题判断----------
// -----------以下是跟---行脚商---对话过程-----
Rem 等待错题
dm.KeyPress 71
dm.KeyPress 40
dm.KeyPress 13
dm.KeyPress 13
dm.KeyPress 13
// -----------以上是跟---行脚商---对话过程-----
//-----以下是进入行脚打开地图的过程--（判断洞口，并启动)-----
Rem 重新判断
dm.KeyPress 77
Rem 继续查找
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(-50,-50,800,600,&判洞1.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 77
Call 通用()
Call 洞口1()
Delay 1000
Call 跑题中()
Delay 3000
Goto 继续行脚
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(-50,-50,800,600,&判洞2.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 77
Call 通用()
Call 洞口2()
Delay 1000
Call 跑题中()
Delay 3000
Goto 继续行脚
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(-50,-50,800,600,&判洞3.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 77
Call 通用()
Call 洞口3()
Delay 1000
Call 跑题中()
Delay 3000
Goto 继续行脚
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(-50,-50,800,600,&判洞4.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 77
Call 通用()
Call 洞口4()
Delay 1000
Call 跑题中()
Delay 3000
Goto 继续行脚
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(-50,-50,800,600,&判洞5.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 77
Call 通用()
Call 洞口5()
Delay 1000
Call 跑题中()
Delay 3000
Goto 继续行脚
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(-50,-50,800,600,&判洞6.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 77
Call 通用()
Call 洞口6()
Delay 1000
Call 跑题中()
Delay 3000
Goto 继续行脚
Goto 继续查找
//-----以上是进入行脚打开地图的过程--（判断洞口，并启动)-----
//以下是洞口-----1------的子程序打包
Sub 洞口1()
t0 = timer //計時比對用初始化
dm.KeyDown 37
If timer - t0 &= 30 Then
dm.keyup 37
Call 卡住()
Goto 结束1
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物9.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 32
Goto 人物9
dm.KeyPress 32
t0 = timer //計時比對用初始化
Rem 人物17
If timer - t0 &= 30 Then
dm.KeyUp 37
Call 卡住()
Goto 结束1
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物17.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 37
Goto 人物17
dm.KeyPress 32
dm.KeyPress 32
dm.KeyPress 32
dm.KeyDown 37
t0 = timer //計時比對用初始化
Rem 人物18
If timer - t0 &= 30 Then
dm.KeyUp 37
Call 卡住()
Goto 结束1
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物18.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 37
Goto 人物18
dm.KeyPress 32
dm.KeyDown 37
t0 = timer //計時比對用初始化
Rem 人物19
If timer - t0 &= 30 Then
dm.KeyUp 37
Call 卡住()
Goto 结束1
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物19.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 37
Goto 人物19
dm.KeyPress 32
dm.KeyPress 32
dm.KeyDown 39
t0 = timer //計時比對用初始化
Rem 人物20
If timer - t0 &= 30 Then
dm.KeyUp 39
Call 卡住()
Goto 结束1
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物20.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 32
Goto 人物20
t0 = timer //計時比對用初始化
Rem 人物21
If timer - t0 &= 30 Then
dm.KeyUp 39
Call 卡住()
Goto 结束1
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物21.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 32
Goto 人物21
dm.KeyDown 38
dm.KeyDown 39
t0 = timer //計時比對用初始化
Rem 人物22
If timer - t0 &= 30 Then
dm.KeyUp 38
dm.KeyUp 39
Call 卡住()
Goto 结束1
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物22.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 38
dm.KeyUp 39
Goto 人物22
dm.KeyDown 37
t0 = timer //計時比對用初始化
Rem 人物23
If timer - t0 &= 30 Then
dm.KeyUp 37
Call 卡住()
Goto 结束1
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物23.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 32
Goto 人物23
t0 = timer //計時比對用初始化
Rem 人物24
If timer - t0 &= 30 Then
dm.KeyUp 37
Call 卡住()
Goto 结束1
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物24.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 32
Goto 人物24
t0 = timer //計時比對用初始化
Rem 人物25
If timer - t0 &= 30 Then
dm.KeyUp 37
Call 卡住()
Goto 结束1
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物25.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 32
Goto 人物25
t0 = timer //計時比對用初始化
Rem 人物26
If timer - t0 &= 30 Then
dm.KeyUp 37
Call 卡住()
Goto 结束1
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物26.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 37
dm.KeyPress 38
Goto 人物26
//---- 一下是洞口-----5----的子程序打包
Sub 洞口5()
dm.KeyDown 39
dm.KeyDown 40
Delay 1000
dm.KeyUp 39
dm.KeyUp 40
dm.KeyPress 32
dm.KeyDown 37
t0 = timer //計時比對用初始化
Rem 人物13
If timer - t0 &= 30 Then
dm.KeyUp 37
Call 卡住()
Goto 结束5
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(-50,-50,900,700,&人物13.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 32
Goto 人物13
t0 = timer //計時比對用初始化
Rem 人物14
If timer - t0 &= 30 Then
dm.KeyUp 37
Call 卡住()
Goto 结束5
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物14.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 37
dm.KeyDown 39
Delay 3000
Goto 人物14
dm.KeyDown 37
t0 = timer //計時比對用初始化
Rem 人物15
If timer - t0 &= 30 Then
dm.KeyUp 37
Call 卡住()
Goto 结束5
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物15.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 32
Goto 人物15
t0 = timer //計時比對用初始化
Rem 人物16
If timer - t0 &= 30 Then
dm.KeyUp 37
Call 卡住()
Goto 结束5
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物16.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 37
dm.KeyPress 38
Goto 人物16
Sub 洞口2()
dm.KeyDown 37
dm.KeyDown 38
Delay 3500
dm.KeyUp 37
Delay 1500
dm.KeyDown 39
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物1.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 39
Goto 继续人物1
Goto 人物1
Rem 继续人物1
dm.KeyPress 32
dm.KeyDown 39
t0 = timer //計時比對用初始化
If timer - t0 &= 30 Then
dm.KeyUp 39
Call 卡住()
Goto 结束2
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物2.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 32
dm.KeyDown 38
Delay 3500
dm.KeyUp 39
Delay 1500
Goto 继续人物2
Goto 人物2
Rem 继续人物2
dm.KeyDown 37
t0 = timer //計時比對用初始化
Rem 继续人物3
If timer - t0 &= 30 Then
dm.KeyUp 37
Call 卡住()
Goto 结束2
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物3.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 32
Goto 人物3继续走
Goto 继续人物3
Rem 人物3继续走
t0 = timer //計時比對用初始化
If timer - t0 &= 30 Then
dm.KeyUp 37
Call 卡住()
Goto 结束2
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物4.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 32
Goto 人物4
dm.KeyDown 38
Delay 6000
dm.KeyUp 37
//---最后进洞的判断-----
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物5.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 38
dm.KeyPress 38
Goto 人物5
// ----- 以上是脚本命令-----
Sub 洞口3()
dm.KeyDown 39
dm.KeyDown 38
t0 = timer //計時比對用初始化
If timer - t0 &= 30 Then
dm.KeyUp 38
dm.KeyUp 39
Call 卡住()
Goto 结束3
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物6.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 38
dm.KeyUp 39
Goto 继续人物6
Goto 人物6
Rem 继续人物6
dm.KeyDown 37
dm.KeyDown 38
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0, 0, 800, 600, &人物7.bmp&, &000000&, 0.9, 0, intX, intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 38
dm.KeyUp 37
Goto 继续人物7
Goto 人物7
rem 继续人物7
dm.KeyDown 39
Delay 2000
dm.KeyDown 40
t0 = timer //計時比對用初始化
If timer - t0 &= 30 Then
dm.KeyUp 39
dm.KeyUp 40
Call 卡住()
Goto 结束3
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,900,700,&人物28.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 39
dm.KeyUp 40
dm.KeyPress 32
Delay 1000
dm.KeyPress 38
Goto 继续人物8
Goto 人物8
rem 继续人物8
// ----- 以上是脚本命令-----
Sub 洞口4()
// ----- 以下是4脚本命令-----
dm.KeyDown 37
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,900,700,&人物9.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyPress 32
Goto 人物9
Delay 1000
dm.KeyPress 32
dm.KeyDown 40
t0 = timer //計時比對用初始化
Rem 人物10
If timer - t0 &= 30 Then
dm.KeyUp 37
dm.KeyUp 40
Call 卡住()
Goto 结束4
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物10.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 37
dm.KeyUp 40
dm.KeyPress 38
Goto 人物10
Sub 洞口6()
dm.KeyDown 38
dm.KeyDown 39
t0 = timer //計時比對用初始化
Rem 人物11
If timer - t0 &= 30 Then
dm.KeyUp 38
dm.KeyUp 39
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,900,700,&人物11.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 38
dm.KeyUp 39
Goto 人物11
Delay 1000
dm.KeyDown 37
dm.KeyDown 40
Delay 8500
dm.KeyUp 37
dm.KeyUp 40
dm.KeyDown 39
dm.KeyDown 40
Delay 4500
dm.KeyUp 39
dm.KeyUp 40
dm.KeyDown 37
t0 = timer //計時比對用初始化
Rem 人物12
If timer - t0 &= 30 Then
dm.KeyUp 37
Call 卡住()
Goto 结束6
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&人物12.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 37
Goto 人物12
dm.KeyPress 32
dm.KeyPress 32
dm.KeyPress 32
dm.KeyPress 38
// ----- 以上是脚本命令-----
Sub 通用()
dm.KeyDown 37
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&坐标8.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 37
Goto 坐标8
dm.KeyPress 32
dm.KeyPress 32
dm.KeyPress 32
dm.KeyPress 32
dm.KeyPress 32
dm.KeyDown 37
dm.KeyPress 32
dm.KeyUp 37
dm.KeyDown 39
dm.KeyPress 32
t0 = timer //計時比對用初始化
Rem 坐标258
If timer - t0 &= 30 Then
dm.KeyUp 39
Call 卡住()
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&坐标258.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 39
dm.KeyDown 37
dm.KeyUp 37
Goto 开始走洞
dm.KeyPress 32
Goto 坐标258
Rem 开始走洞
//------以上是每个洞的必经路------（通用）--- 下面开始进2号洞口
Sub 卡住()
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(-50,-50,900,700,&卡点1.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
Call 办法1()
Goto 重新判断
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(-50,-50,900,700,&卡点2.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
Goto 重新判断
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(-50,-50,900,700,&卡点3.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyDown 39
Delay 6000
dm.KeyUp 39
Goto 重新判断
Sub 办法1()
dm.keydown 39
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&办法1.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.keyup 39
Goto 办法1
dm.KeyPress 32
dm.KeyPress 32
dm.KeyPress 32
dm.keydown 39
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(0,0,800,600,&办法2.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.keyup 39
Goto 办法2
dm.KeyPress 32
dm.keydown 39
dm.KeyPress 32
Delay 4500
dm.keyup 39
Sub 跑题中()
// ----- 以下是脚本命令-----
dm.KeyDown 39
Rem 继续跑题
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(-50,-50,800,600,&跑题.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.KeyUp 39
Goto 继续跑题
dm.KeyPress 71
dm.KeyPress 13
dm.KeyPress 13
dm.KeyPress 13
dm.KeyPress 13
Delay 1000
dm.KeyPress 71
dm.KeyPress 13
dm.KeyPress 13
dm.KeyPress 13
//----以上是进入行脚管 开始在跑去道题的路上
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(300,310,323,330,&零.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.MoveTo 312, 321
dm.LeftClick
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(300,339,323,359,&零.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.MoveTo 312, 350
dm.LeftClick
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(300,368,323,387,&零.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.MoveTo 312, 379
dm.LeftClick
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(300,281,323,307,&零.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.MoveTo 312, 292
dm.LeftClick
//------ 点击退出答题----
Delay 1000
Rem 退出答题了
dm_ret = dm.SetPath(&C:\test_game&) //设置调用路径
dm_ret = dm.FindPic(-50,-50,800,600,&退出答题.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
dm.MoveTo 422, 328
dm.LeftClick
Goto 退出答题了
// ----- 以上是脚本命令-----
dm.KeyPress 71
dm.KeyPress 13
dm.KeyPress 13
Rem 结束行脚
dm.KeyPress 123
MessageBox &行脚结束&
// 下面这是脚本结束时执行的部分
Sub OnScriptExit()
dm.UnBindWindowqq三国100级装备打造
当前位置：--qq三国100级装备打造
qq三国100级装备打造
导读： |大话西游3|QQ仙侠传|大唐无双|大话西游2|完美国际|绿色征途|三国群英传2 仙途|魔界2|新 泾河龙宫初章花果山幽冥界变身卡100级装备飞行道具 风物志法宝NPC武器装备NPC称号 6月首测 全新同人插画大赛作品公开 《天翼决》CEO：打造没有外挂和延迟的DOTA网游QQ三国2012年名校跨服大PK -赛会秩序册-选手版 跨服PK赛秩序册为本次赛会的规则指 （但军团成员数不得低于20人，否则取消资格），军团成员都可以对自己装备、副将等内就可以获得经验值和酷币， 6《QQ3国》！ 师傅和徒弟都到20后。48小时会亮图标QQ三国： 图标需要挂100小时！就可以点亮了！ （免费，可亮） 59《搜吧》！ 点亮方式说明： 1、时间过得很快，玩第一个游戏的时候还是07年，当时也是随便听妹妹谈起QQ三国，说音乐还挺有意思的，由于暑假在家闲来无事，就去玩了。那时候完全是个游戏小白，什么经验| QQ三国 | 泡泡堂 | 神泣 | 巨人 | 赛尔号 | 超级乐者 | 诛仙 | 体育帝国 | | 魔兽世界 | 完美世界 |
战争机器 | 最终幻想 | 实况足球 | 失落的星球 | | 上古卷轴4 | GTA4 | 极品飞车11 | 合金装备4&mdash；联众 QQ对战平台&&mdash；浩方对战平台 QQ团队语音&UCTalk QQ堂&&mdash；泡泡堂 QQ音速&&O2JAM QQ三国&&2011最新qq信封，qq仙侠传信封，qq号信封，qq三国免费信封，qq信封软件 交易QQ群 qq黄金信封，qq免费信封群 交易QQ群：4808887qq三国，完美国际，qq 音速，sd敢达ol，巨星，特种部队，剑网3，寻仙，征途，梦幻龙 铁拳5：黑暗复苏OL，创造职业球会OL，合金装备 online，街头霸王OL,Hello Kitty，三国 波斯王子：时之沙，波斯王子2：武者之心，白色魔法石，霸王 2,BAJA越野拉力赛1000山地自行车3D版99. 三国志关羽列传100. 闪客快打4-***林101. 连珠泡泡102. 金庸群侠传 街机三国志2无限88. 空中决战89. DNF2测试无敌版90. QQ连连看91. 阿Sue的衣橱92. 完
热门主题热榜
qq三国100级装备打造QQ三国提高装备打造熟练度有什么用？
角色装备打造熟练度可用于副职等级提升，副职等级也是打造各种高级装备的必要条件之一。
本文来源:腾讯游戏
如果您喜欢本文请分享给您的好友，谢谢！如想浏览更多更好的内容，请登录：
评论列表（网友评论仅供网友表达个人看法，并不表明本站同意其观点或证实其描述）