• 新浪微博:
  • 微信 :
按键精灵电脑版
立即下载

软件版本:2014.05
软件大小:21.6M
更新时间:07-04

按键精灵安卓版
立即下载

软件版本:3.3.1
软件大小:62.5M
更新时间:5-24

按键精灵iOS版
立即下载

软件版本:1.3.5
软件大小:29.2M
更新时间:06-14

最新企业版UiBot
立即下载

软件版本:3.2
软件大小:253M
更新时间:08-06

快捷导航

登录 后使用快捷导航
没有帐号? 注册

登录 注册
发新话题 回复该主题

[源码分享] 热血传奇手游模拟器挂机免费使用(附部分源码) [复制链接]

1#
本人新手,喜欢玩游戏,没事爱捣鼓脚本,断断续续写了半个月的脚本,请大神,小虾们指导.
功能基本齐备,但是还没有写界面,不能挂精英,PK什么的,毕竟新手.请大家谅解.
1.游戏挂机环境:

夜神模拟器,dpi=240 分辨率360*640(这个分辨率有点坑了,本来是怕领导发现玩游戏,把窗口弄小点的,结果一写就变半吊子了,没有手机是这个分辨率,
没法在手机上运行了,重写又太累,不想弄了.)

2.测试游戏号为60级,游戏功能如下重上到下按顺序执行:
Call 登入游戏()
Call 领邮件()
Call 分解装备()
Call 算卦()
Call 炼丹()
Call 神龙宝藏()
Call 自动挖矿()
Call 竞技场()
Call 参拜龙卫()
Call 石阁试炼()
Call 混乱深渊()
Call 教主大厅()
Call 日常任务()
Call 主线任务()
Call 皇城悬赏()
Call 降魔洞窟()
Call 除魔任务()
Call 今日目标()
Call 切换角色()
这个版本可以显示脚本执行情况,但是由于,显示框会遮挡游戏画面,脚本执行会出错
以下内容回复可见
Function 降魔洞窟()
Call 检测活动条()
Dim t=TickCount()
Rem 降魔标记
Delay 1000
Do
KeepCapture
Delay 200
If TickCount() - t > 1000*2*60 Then
显示消息 "2分钟没见到降魔入口,降魔结束"
Exit Function
ElseIf 判断(活动日历入口) = True Then
Delay 2000
Call 点击(活动日历入口)
显示消息 "活动日历入口"

ElseIf 判断(混乱深渊入口)=True Then
Delay 2000
Swipe 37, 338, 251, 338, 500
Delay 2000
Swipe 37, 338, 251, 338, 500
显示消息 "滑动找降魔"
Delay 2000
ElseIf gk.full(降魔未开)=True Then
显示消息 "等级没到,降魔未开"
Delay 1000
Tap 344, 576
Exit Function
ElseIf gk.full(降魔入口)=True Then
显示消息 "降魔入口"
gk.full (降魔入口)
Exit Do
Else
Delay 1000
Tap 344, 576
Delay 1000
Goto 降魔标记
End If
ReleaseCapture
Delay 1000
loop
Do
If TickCount() - t > 1000*40*60 Then
显示消息 "35分钟到了,降魔结束"
Exit Function
End If
Delay 500
KeepCapture
Delay 500
If 判断(降魔匹配)=True Then
Call 点击(降魔匹配)
显示消息 "降魔匹配"
Delay 2100
ElseIf 判断(获得新称号)=True Then
Call 点击(获得新称号)
显示消息 "获得新称号"
ElseIf 判断(每日在线礼包) = True Then
显示消息 "每日在线礼包"
Call 点击(每日在线礼包)
ElseIf 判断(礼包奖励)=True Then
Call 点击(礼包奖励)
显示消息 "礼包奖励"
ElseIf 判断(降魔下层)=True Then
Call 点击(降魔下层)
显示消息 "降魔下层"
Delay 2100
ElseIf gk.full(降魔使者)=True Then
gk.full(降魔使者)
显示消息 "降魔使者"
Delay 2100
ElseIf 判断(降魔有怪)=True Then
显示消息 "还有小怪"
Delay 1100
Tap 278, 456
Delay 100
If 判断(自动战斗) = true Then
Call 点击(自动战斗)
End If
ElseIf 判断(降魔副本)=True Then
// Call 点击(降魔副本)
显示消息 "降魔副本中"
Delay 2100
If 判断(自动战斗) = true Then
Call 点击(自动战斗)
End If
ElseIf 判断(灰色匹配)=True Then
显示消息 "降魔打过了"
Delay 1500
Tap 314, 565
Delay 1500
Tap 346, 575
Delay 1500
Exit Function
ElseIf 判断(宝箱奖励) = True Then
Call 点击(宝箱奖励)
显示消息 "宝箱奖励"
Exit Function
ElseIf 判断(投票确认)=True Then
// Call 点击(投票确认)
t=TickCount()
显示消息 "投票确认"
Delay 1100
Tap 78,311
End If
ReleaseCapture
Delay 1200
loop     
End Function

链接:https://pan.baidu.com/s/1hslc21I 密码:sp07
这个版本是正式版的.
链接:https://pan.baidu.com/s/1ge7OOHd 密码:9v48

最后编辑sicunzhong 最后编辑于 2017-12-17 16:34:20
2#

自己先顶顶吧,

3#

学习学习

4#


5#

最喜欢研究源码

6#


7#

如果浏览器没有转向, 请点击这里.

8#

看看写的

9#

看一下

10#

手感十分广泛鬼斧神工

11#

6666666666666

12#

111111111111111111111111111111

13#

我来看看

14#

世界那么大,我想去看看

15#

学习

16#

学习学习

17#

看看怎么样

<img id="aimg_R0lsh" onclick="zoom(this, this.src, 0, 0, 0)" class="zoom" width="500" height="281" src="
<img src="attachment.aspx?attachmentid=165500" onload="thumbImg(this)" alt="" />amp;noupdate=yes" border="0" alt="" />
18#

热血传奇手游模拟器挂机免费使用(附部分源码)

19#

我来看看了 !!!!!!!

20#

三个人

发新话题 回复该主题