教你如何制作游戏外挂)_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
教你如何制作游戏外挂)
&&教你如何制作游戏外挂
阅读已结束，下载文档到电脑
想免费下载本文？
定制HR最喜欢的简历
下载文档到电脑，方便使用
还剩7页未读，继续阅读
定制HR最喜欢的简历
你可能喜欢需求发布后1小时内收到服务商响应每个需求平均有10个服务商参与95%以上的需求得到了圆满解决所有需求不向雇主收取任何佣金双11电商狂欢 爆款服务超乎你想像
求以下传奇私服全自动打YB挂机脚本
有相似问题想解决?专业顾问来帮助您
匹配服务商
选择服务商，签单
服务商工作
验收并付款
已投标服务商
综合评分：5颗星
速度：4.80
服务：4.60
态度：4.30
好评率：100%
共有2个服务商参与报价，查看更多服务商报价
参与报价,开始赚钱
提交你的报价和方案
中标后交付作品
获得任务赏金
极速：10分钟急速响应
高品质：精选服务商提供服务
放心：不满意可退款
企业管理系统
软件1天速成
CRM客户管理开发
OA办公系统开发
根据浏览的需求为您推荐
交易成功的需求
软件插件开发相关需求
关注猪八戒微信传奇SF挂机脚本 - 简书
传奇SF挂机脚本
好像现在外挂都过不了登陆器，包括找罗楠拿的收费挂也不行，只好自己写一个挂机脚本。
按键精灵+大漠插件制作，职业：战士、道士，挂机位置尸魔洞一层，打开小地图为全图，分辨率为800×600。自动打怪、自动捡取、自动买药、自动修装备。测试6个小时正常挂机，初学写出来的感觉应该还能优化。不过写出来后也没兴致再玩游戏了。。。毕竟还要吃饭呢。
//PutAttachment "c:\test_game","*.*"
//PutAttachment ".\Plugin", "RegDll.dll"
//call Plugin.Regdll.reg("c:\test_game\dm.dll")
//注册大漠
//设置大漠路径以及字库名
Set dm = createobject("dm.dmsoft")
dm.SetPath ("d:")
dm_ret = dm.SetDict(0,"lanhuo.txt")
//绑定窗口和模式
hwnd = dm.GetMousePointWindow()
dm_ret = dm.BindWindow(hwnd, "dx2", "windows", "windows", 0)
//初始化跑图路径,和人物点
Dim nn,myx, myy
dm_ret = dm.FindStr(230,58,575,331, "宝箱", "ffffff-000000", 1.0, intX, intY)
If intX &= 0 and intY &= 0 Then
TracePrint "打宝箱"&intX&":"&intY
dm.MoveTo intX + 1, intY + 32
dm.LeftClick
Delay 2000
dm.MoveToEx 390, 230, 100, 100
dm.MoveToEx 390, 230, 100, 100
dm.MoveToEx 390, 230, 100, 100
dm_ret = dm.FindMultiColor(321, 124, 462, 213, "ff0000", "0|1|9c||3|-|3|-|6|-101010", 1.0, 0, intX, intY)
If intX &= 0 and intY &= 0 Then
TracePrint "打恶灵"&intX&":"&intY
dm.MoveTo intX + 15, intY + 45
dm.LeftClick
dm.MoveToEx 390, 230, 100, 100
dm.MoveToEx 390, 230, 100, 100
dm.MoveToEx 390, 230, 100, 100
Rem 捡东西
//判断身边是否有怪，有怪就先打怪，没怪就捡东西
dm_ret = dm.FindMultiColor(321,124,462,213,"ff0000","0|1|9c||3|-|3|-.0,0,intX,intY)
If dm_ret = 1 Then
//捡神开头的物品
dm_ret = dm.FindStrFast(0, 0, 800, 438, "神", "ff|ffffff-ddee-000000", 1.0, intX, intY)
If intX &= 0 and intY &= 0 Then
TracePrint "捡神"&intX&":"&intY
intX = intX + 25
intY = intY + 13
If intX & myx and intY & myy Then
Call 走左上角()
ElseIf intX & myx and intY & myy Then
Call 走左下角()
ElseIf intX & myx and intY & myy Then
Call 走右上角()
ElseIf intX & myx and intY & myy Then
Call 走右下角()
ElseIf intX = myx and intY & myy Then
Call 走下()
ElseIf intX = myx and intY & myy Then
Call 走上()
ElseIf intX & myx and intY = myy Then
Call 走右()
ElseIf intX & myx and intY = myy Then
Call 走左()
Delay 1000
Goto 捡东西
//捡金或强开头的物品
dm_ret = dm.FindStrFast(0, 0, 800, 438, "金|强", "ff|ffffff-ddee-000000", 1.0, intX, intY)
If intX &= 0 and intY &= 0 Then
TracePrint "捡金或强"&intX&":"&intY
intX = intX + 13
intY = intY + 18
If intX & myx and intY & myy Then
Call 走左上角()
ElseIf intX & myx and intY & myy Then
Call 走左下角()
ElseIf intX & myx and intY & myy Then
Call 走右上角()
ElseIf intX & myx and intY & myy Then
Call 走右下角()
ElseIf intX = myx and intY & myy Then
Call 走下()
ElseIf intX = myx and intY & myy Then
Call 走上()
ElseIf intX & myx and intY = myy Then
Call 走右()
ElseIf intX & myx and intY = myy Then
Call 走左()
Delay 1000
Goto 捡东西
Rem 买东西
hong = dm.Ocr(304, 425, 318, 440, "ffffff-000000", 1.0)
lan = dm.Ocr(346, 423, 366, 439, "ffffff-000000", 1.0)
TracePrint "红:" & hong
TracePrint "蓝:" & lan
If hong = 0 Then
TracePrint "买红药"
dm.MoveTo 766,566
Delay 2000
dm.LeftClick
dm.MoveTo 166, 22
Delay 2000
dm.LeftClick
dm.MoveTo 574, 83
Delay 2000
dm.LeftClick
dm.MoveTo 50, 205
Delay 2000
dm.LeftClick
dm.KeyPress 48
dm.MoveTo 88, 266
Delay 2000
dm.LeftClick
dm.MoveTo 344, 318
Delay 2000
dm.LeftClick
dm.MoveTo 692, 400 //打开背包
Delay 2000
dm.LeftClick
Delay 2000
//解开红药
dm_ret = dm.FindMultiColor(0, 0, 800, 600, "7b3118", "1|0|6b|6b|7b|942918", 1.0, 0, intX, intY)
If intX &= 0 and intY &= 0 Then
dm.MoveTo intX, intY
Delay 2000
dm.RightClick
Delay 2000
//使用修复水
dm_ret = dm.FindMultiColor(0, 0, 800, 600, "d6c6ad", "1|0|bda57b,2|0|efc68c,3|0|f7f7de,4|0|b5a594", 1.0, 0, intX, intY)
If intX &= 0 and intY &= 0 Then
dm.MoveTo intX, intY
Delay 2000
dm.RightClick
Delay 2000
dm.KeyPress 120
Delay 2000
dm.KeyPress 27
Delay 2000
If lan = 0 Then
TracePrint "买蓝药"
dm.MoveTo 766,566
Delay 2000
dm.LeftClick
dm.MoveTo 166, 22
Delay 2000
dm.LeftClick
dm.MoveTo 574, 147
Delay 2000
dm.LeftClick
dm.MoveTo 50, 205
Delay 2000
dm.LeftClick
dm.KeyPress 48
dm.MoveTo 88, 266
Delay 2000
dm.LeftClick
dm.MoveTo 344, 318
Delay 2000
dm.LeftClick
dm.MoveTo 692, 400 //打开背包
Delay 2000
dm.LeftClick
Delay 2000
//解开蓝药
dm_ret = dm.FindMultiColor(0, 0, 800, 600, "104284", "1|0||0||0|215aa5,4|0|738cff", 1.0, 0, intX, intY)
If intX &= 0 and intY &= 0 Then
dm.MoveTo intX, intY
Delay 2000
dm.RightClick
Delay 2000
//使用修复水
dm_ret = dm.FindMultiColor(0, 0, 800, 600, "d6c6ad", "1|0|bda57b,2|0|efc68c,3|0|f7f7de,4|0|b5a594", 1.0, 0, intX, intY)
If intX &= 0 and intY &= 0 Then
dm.MoveTo intX, intY
Delay 2000
dm.RightClick
Delay 2000
dm.KeyPress 120
Delay 2000
dm.KeyPress 27
dm_ret = dm.FindStr(80,39,744,355,"恶|灵","ffffff-.0,intX,intY)
If intX &= 0 and intY &= 0 Then
TracePrint "屏幕范围找恶灵："&intX&":"&intY
dm.MoveTo intX+25, intY+5
dm.LeftClick
dm.MoveToEx 100, 100, 100, 100
dm.MoveToEx 100, 100, 100, 100
dm.MoveToEx 100, 100, 100, 100
dm_ret = dm.FindStr(80,39,744,355, "宝|箱", "ffffff-000000", 1.0, intX, intY)
If intX &= 0 and intY &= 0 Then
TracePrint "屏幕范围找宝箱："&intX&":"&intY
dm.MoveTo intX+4, intY+51
dm.LeftClick
dm.MoveToEx 390, 230, 100, 100
dm.MoveToEx 390, 230, 100, 100
dm.MoveToEx 390, 230, 100, 100
dm_ret = dm.FindMultiColor(672,0,800,128,"ff0000","0|1|ff|ff|ff|ff,0,intX,intY)
If intX &= 0 and intY &= 0 Then
TracePrint "小地图找怪："&intX&":"&intY
dm.MoveTo intX + i, intY + i
dm.RightClick
zuobiao = dm.Ocr(68,583,129,599, "ffffff-000000", 1.0)
zuobiaox = mid(zuobiao,1,instr(zuobiao, ":")-1)
zuobiaoy = mid(zuobiao,instr(zuobiao, ":")+1,3)
TracePrint "跑图中，当前坐标：" & zuobiaox & ":" & zuobiaoy
If 170 & zuobiaox & 164 and 128 & zuobiaoy & 120 Then
165 & zuobiaox & 150 and 30 & zuobiaoy & 20 Then
ElseIf 28 & zuobiaox & 18 and 80 & zuobiaoy & 70 Then
ElseIf 65 & zuobiaox & 55 and 180 & zuobiaoy & 170 Then
Select case nn
dm.MoveTo 770, 100
dm.RightClick
dm.MoveTo 760, 20
dm.RightClick
dm.MoveTo 630, 60
dm.RightClick
dm.MoveTo 666, 140
dm.RightClick
End Select
//随机走路的子程序，打算用于多线程判断是不是卡住了，后来发现用不到。
Sub 随机走()
TmpRnd = Int(rnd * 8 + 1)
TracePrint "随机走路:" & TmpRnd
Select Case TmpRnd
Call 走左()
Call 走右()
Call 走上()
Call 走下()
Call 走左上角()
Call 走右上角()
Call 走左下角()
Call 走右下角()
End Select
Sub 走左()
dm.MoveTo myx - 90, myy
dm.LeftClick
Sub 走右()
dm.MoveTo myx + 90, myy
dm.LeftClick
Sub 走上()
dm.MoveTo myx, myy - 90
dm.LeftClick
Sub 走下()
dm.MoveTo myx, myy + 90
dm.LeftClick
Sub 走左上角()
dm.MoveTo myx - 90, myy - 90
dm.LeftClick
Sub 走右上角()
dm.MoveTo myx + 90, myy - 90
dm.LeftClick
Sub 走左下角()
dm.MoveTo myx - 90, myy + 90
dm.LeftClick
Sub 走右下角()
dm.MoveTo myx + 90, myy + 90
dm.LeftClick
Sub OnScriptExit()
dm_ret = dm.UnBindWindow()
提取码：s4mi
AFF$神$0.0.56$12
FC30A7F2C0$恶$0.0.48$11
2A895E2A08$灵$0.0.45$11
A48CFCC00$宝$0.0.50$12
6AA9553F8$箱$0.0.64$12
10$2$0.0.16$8
411FE.0.11$8
0$7$0.0.11$8
E0$3$0.0.15$8
7EE0$0$0.0.18$8
0C0$4$0.0.18$8
C0$9$0.0.18$8
6EE0$8$0.0.19$8
3EE0$6$0.0.18$8
FAE0$5$0.0.19$8
840$:$0.0.2$6
911FD00$金$0.0.45$12
7EE0$6$0.0.19$8
FE0$5$0.0.18$8
50$4$0.0.16$8
C800$7$0.0.13$8
E0$9$0.0.19$8
4FE91E0$强$0.0.63$12
用简书的md来做一些笔记的记录，如有错误的地方。希望大家帮忙提醒指正。文字广告100/月
文字广告100/月文字广告100/月&
&&&&&全站 说: 露脸
11天前全站 说: 没用过这个。。。。。。。。。。。
13天前全站 说: 22天前全站 说: 求高手做传奇私服辅助脚本,必有酬谢,巴豆或是红包都可以,加我扣扣详说27天前全站 说: 升级中。。。
全站 说: 全站 说: 请解封我，谢了~全站 说:
全站 说: 全站 说: 管理再弄些测试卡呀，都己经领没了全站 说: 传奇GEE模式怎么无限刷物品？求指教！全站 说:
查看: 7893|回复: 528
给大家分享一个出刀插件脚本,配合加速器非常流弊
在线时间45 小时
主题帖子积分
在线时间45 小时
登陆后可以查看更多资源
才可以下载或查看，没有帐号？
回复可下载,
不错支持下: 5 脚本怎么插入都游戏里啊&
支持我请给我 加分~~~感谢你
在线时间12 小时
主题帖子积分
在线时间12 小时
支持我请给我 加分~~~感谢你
在线时间45 小时
主题帖子积分
在线时间45 小时
一楼啊啊啊啊爱谁谁
支持我请给我 加分~~~感谢你
在线时间1 小时
主题帖子积分
在线时间1 小时
支持我请给我 加分~~~感谢你
在线时间1 小时
主题帖子积分
在线时间1 小时
支持我请给我 加分~~~感谢你
在线时间1 小时
主题帖子积分
在线时间1 小时
我没看到啊
支持我请给我 加分~~~感谢你
在线时间5 小时
主题帖子积分
在线时间5 小时
支持我请给我 加分~~~感谢你
在线时间1 小时
主题帖子积分
在线时间1 小时
支持我请给我 加分~~~感谢你
在线时间2 小时
主题帖子积分
在线时间2 小时
小手一抖，巴豆拿走
支持我请给我 加分~~~感谢你
在线时间2275 小时
&成长值: 31845主题帖子积分
在线时间2275 小时
在线时间56 小时
主题帖子积分
在线时间56 小时
dwqd单位签订
支持我请给我 加分~~~感谢你
在线时间56 小时
主题帖子积分
在线时间56 小时
低洼的洼地
支持我请给我 加分~~~感谢你
在线时间0 小时
主题帖子积分
在线时间0 小时
支持我请给我 加分~~~感谢你
在线时间0 小时
主题帖子积分
在线时间0 小时
支持我请给我 加分~~~感谢你
在线时间0 小时
主题帖子积分
在线时间0 小时
我回复了怎么看不到
支持我请给我 加分~~~感谢你
在线时间5 小时
主题帖子积分
在线时间5 小时
不错支持下
支持我请给我 加分~~~感谢你
新人进步奖
发帖超过200才可以申请此勋章哦~~有效期：永久
注册时间365天即可领取
注册100天奖
注册满100天可以领取
淘气MM奖励
咱们社区的美眉哦！需要发帖达到300才可以申请哦~
该帐号已经进行QQ绑定
论坛QQ绑定勋章
板凳达达奖 ：板凳板凳520地板地板886 哦哇
板凳板凳520！地板地板886
地板达人奖 ：地板地板886沙发沙发520 哦NO
晕了个头 每次都抢到地板
千贴成就奖
发帖1000即可申请
在线时间王
在线时间达到500小时才可以申请此勋章，有效期：永久
发帖大师奖
发帖超过2000帖 可申请此勋章，有效期：永久
VIP至尊会员
VIP会员，只有VIP会员才有权利得到此勋章
经常无私的帮助社区的人，需要发帖 860才可申请此勋章，有效期：永久
淘气GG奖励
这小子是社区小闹闹，很有人气哦~需要发帖达到 300才可以申请
特殊贡献奖
此勋章只奖励那些为社区做出不少贡献的人！
资源发布奖
资源发布奖版块的代表人物~主题超过200即可申请此勋章，有效期：永久
最佳帅锅奖
这小子是个帅锅！（需要发帖400有照片的才能那个得到）
每逢年过节、搞活的的时候送出的奖品.
我在社区都快成了老头儿了~不信去看看我的在线时间。
贴图大师奖
帖图高手,堪称大师! 在贴图区发表主题在600以上才可以申请，有效期：永久
5000贴成就奖
发帖5000即可申请
这个勋章代表了社区的荣誉 只发帖超过5000即可申请此勋章，有效期：永久
万贴终身成就奖
发帖10000即可申请
超强人气奖
论坛巴豆达到18600，即可申请此勋章，有效期：永久
系统公告 /1
Powered by}