烈焰遮天脚本私服怎么做跑图打怪的脚本啊
点击联系发帖人
时间：2017-04-09 14:04
你的位置：
想做个传奇si服的自动打怪和拣指定装备的脚本，求优化
23:50:49 |
来源: 按键精灵资源站
问题1：本来想直接找怪色打怪的，结果很多怪色在另外的地图就像地板色，只好找怪血条打怪。厉害的怪血条没打完去打下一个怪了，其他怪打完，半血的就不认识了
问题2：宝宝的血条如何和怪区分开，人物可以开高亮变绿
问题3：拾取装备的判断感觉太死板不先进，找装备也不很准确，如何根据装备显示的字找（我个人不会）弄了会大漠，没搞清楚杂用，什么注册的，太老火了
问题4：如何判断有人来PK，好飞
//将附件中图片释放到下行指定路径
//PutAttachment &D:\软件安装\9\screen&,&*.bmp&
//人物中心坐标
//centerx = 500
//centery = 260
//人物走动的相对量
//stepx = 60
//stepy = 40
//KeyPress &F8&, 1
//Delay 2000
//KeyPress &F8&, 1
//Delay 500
Call 会员超级打宝海岸城
Call 会员超级打宝海岸城
Rem 主循环
If m = 1 Then
Call 普通地图中超级地图的金子塔选择进入
Elseif m=2 then
Call 普通地图中超级地图的暗夜幽谷选择进入
ElseIf m = 3 Then
//Call 选择地图
ElseIf m = 4 Then
//call 选择地图
ElseIf m = 5 Then
//Call 选择地图
ElseIf m = 6 Then
//call 选择地图
ElseIf m = 7 Then
//Call 选择地图
ElseIf m = 8 Then
//call 选择地图
ElseIf m = 9 Then
//Call 选择地图
ElseIf m = 10 Then
//call 选择地图
ElseIf m = 11 Then
//Call 选择地图
ElseIf m = 12 Then
//call 选择地图
//call 用修复油
Call 找怪物血条打怪
Rem 继续跑
Call 随机跑动
sh=Plugin.GetSysInfo.GetTime
If Plugin.GetSysInfo.GetTime - sh & 30000 Then
Goto 继续跑
Goto 主循环
Sub 普通地图中超级地图的暗夜幽谷选择进入()
& & //本子程序为进入暗夜幽谷
& & Call 使用回城
& & Call 回城后跑到接近传送天神
& & call 点击盟重传送天神
& & Call 点击超级地图
& & Call 点击暗夜幽谷
Sub 普通地图中超级地图的金子塔选择进入()
& & Call 使用回城
& & Call 回城后跑到接近传送天神
& & call 点击盟重传送天神
& & call 点击中级地图
& & call 点击金字塔
Sub 使用回城()
& & Delay 2000
& & ux = 15
& & uy = 15
& & FindPic 0,0,,&Attachment:\回城卷.bmp&,0.9,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&MoveTo intx + ux, inty + uy
& && &&&LeftDoubleClick 1
& && &&&Delay 1000
& && &&&KeyPress &F9&, 1
& && &&&KeyPress &F9&, 1
& && &&&FindPic 0, 0, , &Attachment:\回城卷.bmp&, 0.9, intX, intY
& && &&&If intX & 0 And intY & 0 Then
& && && && &KeyPress &F9&, 1
& && && && &Exit sub
& && &&&else
& && && && &MoveTo intx + ux, inty + uy
& && && && &LeftClick 2
& && && && &Delay 300
& && && && &KeyPress &F9&, 1
& && &&&End If
& & Delay 5000
& & End if
Sub 回城后跑到接近传送天神()
& & Delay 1000
& & MoveTo 980, 350
& & Delay 1000
& & RightClick 1
& & Delay 500
Sub 点击盟重传送天神()
& & FindPic 0,0,,&Attachment:\盟重传送天神.bmp&,0.9,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&MoveTo intx + 20, inty + 40
& && &&&LeftClick 2
& && &&&Delay 1000
& && &&&LeftClick 1
& && &&&Delay 1000
& & End if
Sub 点击中级地图()
& & FindPic 0,0,,&Attachment:\中级地图.bmp&,0.9,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&MoveTo intx + 35, inty + 20
& && &&&LeftClick 2
& && &&&Delay 1000
& & End If
Sub 点击超级地图()
& & FindPic 0,0,,&Attachment:\超级地图.bmp&,0.95,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&MoveTo intx + 30, inty + 12
& && &&&LeftClick 2
& && &&&Delay 1000
& & End If
Sub 点击金字塔()
& & FindPic 0,0,,&Attachment:\金子塔.bmp&,0.9,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&Delay 1000
& && &&&MoveTo intx +50, inty +15
& && &&&LeftClick 2
& && &&&Delay 1000
& & End If
Sub 点击暗夜幽谷()
& & FindPic 0,0,,&Attachment:\暗夜幽谷.bmp&,0.9,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&MoveTo intx + 30, inty + 10
& && &&&LeftClick 2
& && &&&Delay 2000
& & End If
Sub 会员打宝()
& & Delay 1350
& & KeyDown &Enter&, 1
& & Delay 79
& & KeyUp &Enter&, 1
& & Delay 500
& & SayString &@会员&
& & Delay 300
& & Delay 700
& & KeyDown &Enter&, 1
& & Delay 79
& & KeyUp &Enter&, 1
& & Delay 1000
& & // 启用会员打宝位置的查找，并点击和关闭
& & FindPic 0,0,,&Attachment:\会员打宝.bmp&,0.95,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&MoveTo intX + 20, intY + 10
& && &&&LeftClick 2
& && &&&Delay 1000
& & End If
& & // 如果进入地图后会员功能不关闭需在后面加入关闭界面的指令&&
Sub 会员超级打宝海岸城()
& & Delay 1350
& & KeyDown &Enter&, 1
& & Delay 79
& & KeyUp &Enter&, 1
& & Delay 500
& & SayString &@会员&
& & Delay 300
& & Delay 700
& & KeyDown &Enter&, 1
& & Delay 79
& & KeyUp &Enter&, 1
& & Delay 1000
'==========以下是按键精灵录制的内容==========
'==========以下是按键精灵录制的内容==========
MoveTo 681, 468
Delay 1163
LeftClick 1
MoveTo 244, 140
Delay 1341
LeftClick 1
MoveTo 289, 138
Delay 1507
LeftClick 1
'==========以上是按键精灵录制的内容==========
'==========以上是按键精灵录制的内容==========
Sub 会员回收装备()
& & //启用会员在线回收的查找，并一一回收，再查找和关闭
& & Delay 1350
& & KeyDown &Enter&, 1
& & Delay 79
& & KeyUp &Enter&, 1
& & Delay 500
& & SayString &@会员&
& & Delay 300
& & Delay 700
& & KeyDown &Enter&, 1
& & Delay 79
& & KeyUp &Enter&, 1
& & Delay 1000
& & MoveTo 360, 106
& & Delay 3352
& & LeftClick 1
& & MoveTo 106, 105
& & Delay 1496
& & LeftClick 1
& & MoveTo 114, 138
& & Delay 722
& & LeftClick 1
& & MoveTo 114, 166
& & Delay 720
& & LeftClick 1
& & MoveTo 110, 199
& & Delay 794
& & LeftClick 1
& & MoveTo 119, 232
& & Delay 570
& & LeftClick 1
& & MoveTo 116, 265
& & Delay 592
& & LeftClick 1
& & MoveTo 115, 296
& & Delay 560
& & LeftDown 1
& & MoveTo 116, 298
& & Delay 120
& & LeftUp 1
& & MoveTo 118, 330
& & Delay 644
& & LeftClick 1
& & MoveTo 115, 361
& & Delay 572
& & LeftClick 1
& & MoveTo 98, 91
& & Delay 1356
& & LeftClick 1
& & MoveTo 100, 121
& & Delay 695
& & LeftClick 1
& & MoveTo 102, 158
& & Delay 650
& & LeftClick 1
& & MoveTo 101, 185
& & Delay 565
& & LeftClick 1
& & MoveTo 103, 219
& & Delay 583
& & LeftClick 1
& & MoveTo 106, 251
& & Delay 667
& & LeftClick 1
& & MoveTo 96, 282
& & Delay 806
& & LeftClick 1
& & MoveTo 104, 319
& & Delay 684
& & LeftClick 1
& & MoveTo 98, 345
& & Delay 620
& & LeftClick 1
& & MoveTo 102, 378
& & Delay 660
& & LeftClick 1
& & MoveTo 108, 89
& & Delay 974
& & LeftClick 1
& & MoveTo 97, 125
& & Delay 599
& & LeftClick 1
& & MoveTo 98, 155
& & Delay 599
& & LeftClick 1
& & MoveTo 279, 349
& & Delay 2228
& & LeftClick 1
& & MoveTo 274, 346
& & Delay 4178
& & KeyDown &Esc&, 1
& & Delay 150
& & KeyUp &Esc&, 1
Sub 找怪物血条打怪()
& & //存入怪物血条到附件，点击的偏移量根据怪物大小调整
& & ux = 30
& & uy = 30
& & tp = &Attachment:\& & &怪血条.bmp&
& & Rem cxxh
& & For k = 1 To 6
//& & areatopx = 500 - 60 * k
//& & areatopy = 260 - 40 * k
//& & areadownx = 500 + 60 * k
//& & areadowny = 260 + 40 * k
//& & If areatopx & 1 or areatopy & 1 Then
//& &&&areatopx = 0
//& &&&areatopy = 0
//& & End If
//& & If areadownx &800 or areadowny &500 Then
//& &&&areatopx = 1024
//& &&&areatopy = 550
//& & End If
& & areatopx = 369
& & areatopy =145
& & areadownx =659
& & areadowny =352
& & Rem xhjc
& & FindPic areatopx,areatopy,areadownx,areadowny,tp,0.9,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&MoveTo intX + ux, intY + uy
& && &&&//& & 加入打怪子程序
& && &&&Call 直接砍怪
& && &&&Goto xhjc
& && &&&Call 拾取装备
& && &&&Call 会员回收装备
& & End If
& & FindPic 0,0,,tp,0.9,intX,intY
If intX & 0 And intY & 0 Then
& && &&&MoveTo intX + ux, intY + uy
& && &&&Call 直接砍怪
& && &&&Goto cxxh
Sub 直接砍怪()
& & LeftClick 1
& & Delay 7000
Sub 拾取装备()
& & //人物中心坐标
& & centerx = 500
& & centery = 260
& & //人物走动的相对量
& & stepx = 60
& & stepy = 40
& & leftpoint = centerx - stepx
& & rightpoint = centerx + stepx
& & toppoint = centery - stepy
& & downpoint = centery + stepy
& & Rem 将要拾取的装备存入附件并命名为ZB1，ZB2
& & Rem K等于在附件中已经加入的图片数量
& & For k=1 to 8
& && &&&ZB = &Attachment:\ZB& & k & &.bmp&
& && &&&FindPic 369,145,660,425,ZB,0.9,intX,intY
& && &&&If intX & 0 And intY & 0 Then
& && && && && & Rem 找到装备进行判断
& && && && && & intx = intx + 30
& && && && && & inty = inty + 14& && && && &
& && && && && & numa = int((intX - centerx)/stepx)
& && && && && & numb = int((inty - centery)/stepy)
& && && && && & If numa = 0 and numb = 0 Then
& && && && && &&&Delay 500& && && && &
& && && && && & End If
& && && && && & If numa & 0 Then
& && && && && &&&Rem 左走
& && && && && &&&MoveTo leftpoint, centery
& && && && && &&&numa = Abs(numa)
& && && && && &&&For numa
& && && && && &&&If numa&0 then
& && && && && &&&LeftClick numa - (numa - 1)
& && && && && &&&delay 300& && && && && &
& && && && && &&&End If
& && && && && &&&numa=numa-1
& && && && && &&&next& && && && && && && &
& && && && && & End If
& && && && && & If numa & 0 Then
& && && && && &&&Rem 右走
& && && && && &&&MoveTo rightpoint, centery
& && && && && &&&numa = Abs(numa)
& && && && && &&&For numa
& && && && && &&&If numa&0 then
& && && && && &&&LeftClick numa - (numa - 1)
& && && && && &&&delay 300& && && && && &&&
& && && && && &&&End If
& && && && && &&&numa=numa-1
& && && && && &&&next& && && && && && && &
& && && && && & End If& && && && && &
& && && && && & If numb & 0 Then
& && && && && && &Rem 上走& && && && && &&&
& && && && && &&&MoveTo&¢erx,toppoint
& && && && && &&&numb = Abs(numb)
& && && && && &&&For numb
& && && && && &&&If numb&0 then
& && && && && &&&LeftClick numb - (numb - 1)
& && && && && &&&delay 300& && && && && &
& && && && && &&&End If
& && && && && &&&numb=numb-1
& && && && && &&&next& && && && && && &
& && && && && & End If
& && && && && & If numb & 0 Then
& && && && && && &Rem 下走& && && && && &&&
& && && && && &&&MoveTo&¢erx,downpoint
& && && && && &&&numb = Abs(numb)
& && && && && &&&For numb
& && && && && &&&If numb&0 then
& && && && && &&&LeftClick numb - (numb - 1)
& && && && && &&&delay 300& && && && && &
& && && && && &&&End If
& && && && && &&&numb=numb-1
& && && && && &&&next& && && && && && &
& && && && && & End If& && &&&
& && &&&End If
Sub 随机跑动()
& & Randomize
& & n = Int(rnd * 7)
& & If n = 0 Then
& && &&&MoveTo 383, 18
& && &&&RightDown 1
& && &&&Delay 2000
& && &&&call 找怪物血条打怪
& & End if
& & If n = 1Then
& && &&&MoveTo 608,65
& && &&&Delay 100
& && &&&Delay 2000
& && &&&RightDown 1
& && &&&Delay 1000
& && &&&call 找怪物血条打怪
& & End If
& & If n = 2 Then
& && &&&MoveTo 718,193
& && &&&Delay 100
& && &&&Delay 2000
& && &&&RightDown 1
& && &&&Delay 2000
& && &&&call 找怪物血条打怪
& & End If
& & If n = 3 Then
& && &&&MoveTo 636,334
& && &&&Delay 100
& && &&&Delay 2000
& && &&&RightDown 1
& && &&&Delay 2000
& && &&&call 找怪物血条打怪
& & End If
& & If n = 4 Then
& && &&&MoveTo 391,348
& && &&&Delay 100
& && &&&Delay 2000
& && &&&RightDown 1
& && &&&Delay 2000
& && &&&call 找怪物血条打怪
& & End If
& & If n = 5 Then
& && &&&MoveTo 223,298
& && &&&Delay 100
& && &&&Delay 2000
& && &&&RightDown 1
& && &&&Delay 2000
& && &&&call 找怪物血条打怪
& & End If
& & If n = 6 Then
& && &&&MoveTo 143,190
& && &&&Delay 100
& && &&&Delay 2000
& && &&&RightDown 1
& && &&&Delay 2000
& && &&&call 找怪物血条打怪
& & End If
& & If n = 7 Then
& && &&&MoveTo 213,58
& && &&&Delay 100
& && &&&Delay 2000
& && &&&RightDown 1
& && &&&Delay 2000
& && &&&call 找怪物血条打怪
& & End if
& & Delay 10000
Sub 自动跑图测试()
& & Call 找怪物血条打怪
& & Rem 定义h为每次按下鼠标键时间
& & Rem 右下跑
& & MoveTo 480, 256
& & RightDown 1
& & Delay h
& & Rem 下跑
& & MoveTo 395,390
& & RightDown 1
& & Delay h
& & Rem 左下跑
& & MoveTo 230,390
& & RightDown 1
& & Delay h
& & Rem 左跑
& & MoveTo 214,201
& & RightDown 1
& & Delay h
& & Rem 左上跑
& & MoveTo 252,115
& & RightDown 1
& & Delay h
& & Rem 上跑
& & MoveTo 390,77
& & RightDown 1
& & Delay h
& & Rem 右上跑
& & MoveTo 550,83
& & RightDown 1
& & Delay h
& & Rem 右跑
& & MoveTo 495,199
& & RightDown 1
& & Delay h打怪脚本1_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
上传于|0|0|文档简介
&&水上漂打怪脚本
你可能喜欢传奇私服刷怪房间脚本_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
传奇私服刷怪房间脚本
上传于|0|0|文档简介
&&常见的传奇私服,自动刷怪房间,由于手动过于费事,此脚本能为你提供自动刷怪。无限循环。
你可能喜欢网页私服游戏烈焰地图触发脚本教程--网页私服
网页私服游戏烈焰地图触发脚本教程
发布人：发布时间：
&网页私服游戏烈焰地图触发脚本教程
player:set_timer(7,5); &加到MapEnter.lua里，地图12的
--------player---定时器
if index == 7 then
& if player:GetMapId() == 12 then
& & &if player:GetX() &= 99 and player:GetX() &= 133 and player:GetY() &= 98 and player:GetY() &= 132 then
& & & & & & &player:add_gamemoney_bind(1);
player:alert(10,0,0,&你泡点获得元宝+ 1,经验 + &..(100000*playerleveltimes[player:get_level()])..&&);
player:set_timer(8,5);
& & player:set_timer(8,5);
if index == 8 then
& if player:GetMapId() == 12 then
& & &if player:GetX() &= 99 and player:GetX() &= 133 and player:GetY() &= 98 and player:GetY() &= 132 then
& & & & & & &player:add_gamemoney_bind(1);
player:alert(10,0,0,&你泡点获得元宝+ 1,经验 + &..(100000*playerleveltimes[player:get_level()])..&&);
player:set_timer(7,5);
& & player:set_timer(7,5);
叫到 对应脚本里面就可以了
技术支持： 站点备案登记号：浙ICP备1000008号
打击盗版支持正版游戏，任何组织或个人未经同意，不得使用和传播盗版游戏，如有侵犯利益请来电告知说明，本站72小时内删除！
特别注意：本站所有信息为自动采集互联网，信息真实性无从验证，请自行判断，谨防上当受骗，所引发的一切法律后果本站不负责！
Rights Reserved}
想做个传奇si服的自动打怪和拣指定装备的脚本，求优化
23:50:49 |
来源: 按键精灵资源站
问题1：本来想直接找怪色打怪的，结果很多怪色在另外的地图就像地板色，只好找怪血条打怪。厉害的怪血条没打完去打下一个怪了，其他怪打完，半血的就不认识了
问题2：宝宝的血条如何和怪区分开，人物可以开高亮变绿
问题3：拾取装备的判断感觉太死板不先进，找装备也不很准确，如何根据装备显示的字找（我个人不会）弄了会大漠，没搞清楚杂用，什么注册的，太老火了
问题4：如何判断有人来PK，好飞
//将附件中图片释放到下行指定路径
//PutAttachment &D:\软件安装\9\screen&,&*.bmp&
//人物中心坐标
//centerx = 500
//centery = 260
//人物走动的相对量
//stepx = 60
//stepy = 40
//KeyPress &F8&, 1
//Delay 2000
//KeyPress &F8&, 1
//Delay 500
Call 会员超级打宝海岸城
Call 会员超级打宝海岸城
Rem 主循环
If m = 1 Then
Call 普通地图中超级地图的金子塔选择进入
Elseif m=2 then
Call 普通地图中超级地图的暗夜幽谷选择进入
ElseIf m = 3 Then
//Call 选择地图
ElseIf m = 4 Then
//call 选择地图
ElseIf m = 5 Then
//Call 选择地图
ElseIf m = 6 Then
//call 选择地图
ElseIf m = 7 Then
//Call 选择地图
ElseIf m = 8 Then
//call 选择地图
ElseIf m = 9 Then
//Call 选择地图
ElseIf m = 10 Then
//call 选择地图
ElseIf m = 11 Then
//Call 选择地图
ElseIf m = 12 Then
//call 选择地图
//call 用修复油
Call 找怪物血条打怪
Rem 继续跑
Call 随机跑动
sh=Plugin.GetSysInfo.GetTime
If Plugin.GetSysInfo.GetTime - sh & 30000 Then
Goto 继续跑
Goto 主循环
Sub 普通地图中超级地图的暗夜幽谷选择进入()
& & //本子程序为进入暗夜幽谷
& & Call 使用回城
& & Call 回城后跑到接近传送天神
& & call 点击盟重传送天神
& & Call 点击超级地图
& & Call 点击暗夜幽谷
Sub 普通地图中超级地图的金子塔选择进入()
& & Call 使用回城
& & Call 回城后跑到接近传送天神
& & call 点击盟重传送天神
& & call 点击中级地图
& & call 点击金字塔
Sub 使用回城()
& & Delay 2000
& & ux = 15
& & uy = 15
& & FindPic 0,0,,&Attachment:\回城卷.bmp&,0.9,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&MoveTo intx + ux, inty + uy
& && &&&LeftDoubleClick 1
& && &&&Delay 1000
& && &&&KeyPress &F9&, 1
& && &&&KeyPress &F9&, 1
& && &&&FindPic 0, 0, , &Attachment:\回城卷.bmp&, 0.9, intX, intY
& && &&&If intX & 0 And intY & 0 Then
& && && && &KeyPress &F9&, 1
& && && && &Exit sub
& && &&&else
& && && && &MoveTo intx + ux, inty + uy
& && && && &LeftClick 2
& && && && &Delay 300
& && && && &KeyPress &F9&, 1
& && &&&End If
& & Delay 5000
& & End if
Sub 回城后跑到接近传送天神()
& & Delay 1000
& & MoveTo 980, 350
& & Delay 1000
& & RightClick 1
& & Delay 500
Sub 点击盟重传送天神()
& & FindPic 0,0,,&Attachment:\盟重传送天神.bmp&,0.9,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&MoveTo intx + 20, inty + 40
& && &&&LeftClick 2
& && &&&Delay 1000
& && &&&LeftClick 1
& && &&&Delay 1000
& & End if
Sub 点击中级地图()
& & FindPic 0,0,,&Attachment:\中级地图.bmp&,0.9,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&MoveTo intx + 35, inty + 20
& && &&&LeftClick 2
& && &&&Delay 1000
& & End If
Sub 点击超级地图()
& & FindPic 0,0,,&Attachment:\超级地图.bmp&,0.95,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&MoveTo intx + 30, inty + 12
& && &&&LeftClick 2
& && &&&Delay 1000
& & End If
Sub 点击金字塔()
& & FindPic 0,0,,&Attachment:\金子塔.bmp&,0.9,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&Delay 1000
& && &&&MoveTo intx +50, inty +15
& && &&&LeftClick 2
& && &&&Delay 1000
& & End If
Sub 点击暗夜幽谷()
& & FindPic 0,0,,&Attachment:\暗夜幽谷.bmp&,0.9,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&MoveTo intx + 30, inty + 10
& && &&&LeftClick 2
& && &&&Delay 2000
& & End If
Sub 会员打宝()
& & Delay 1350
& & KeyDown &Enter&, 1
& & Delay 79
& & KeyUp &Enter&, 1
& & Delay 500
& & SayString &@会员&
& & Delay 300
& & Delay 700
& & KeyDown &Enter&, 1
& & Delay 79
& & KeyUp &Enter&, 1
& & Delay 1000
& & // 启用会员打宝位置的查找，并点击和关闭
& & FindPic 0,0,,&Attachment:\会员打宝.bmp&,0.95,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&MoveTo intX + 20, intY + 10
& && &&&LeftClick 2
& && &&&Delay 1000
& & End If
& & // 如果进入地图后会员功能不关闭需在后面加入关闭界面的指令&&
Sub 会员超级打宝海岸城()
& & Delay 1350
& & KeyDown &Enter&, 1
& & Delay 79
& & KeyUp &Enter&, 1
& & Delay 500
& & SayString &@会员&
& & Delay 300
& & Delay 700
& & KeyDown &Enter&, 1
& & Delay 79
& & KeyUp &Enter&, 1
& & Delay 1000
'==========以下是按键精灵录制的内容==========
'==========以下是按键精灵录制的内容==========
MoveTo 681, 468
Delay 1163
LeftClick 1
MoveTo 244, 140
Delay 1341
LeftClick 1
MoveTo 289, 138
Delay 1507
LeftClick 1
'==========以上是按键精灵录制的内容==========
'==========以上是按键精灵录制的内容==========
Sub 会员回收装备()
& & //启用会员在线回收的查找，并一一回收，再查找和关闭
& & Delay 1350
& & KeyDown &Enter&, 1
& & Delay 79
& & KeyUp &Enter&, 1
& & Delay 500
& & SayString &@会员&
& & Delay 300
& & Delay 700
& & KeyDown &Enter&, 1
& & Delay 79
& & KeyUp &Enter&, 1
& & Delay 1000
& & MoveTo 360, 106
& & Delay 3352
& & LeftClick 1
& & MoveTo 106, 105
& & Delay 1496
& & LeftClick 1
& & MoveTo 114, 138
& & Delay 722
& & LeftClick 1
& & MoveTo 114, 166
& & Delay 720
& & LeftClick 1
& & MoveTo 110, 199
& & Delay 794
& & LeftClick 1
& & MoveTo 119, 232
& & Delay 570
& & LeftClick 1
& & MoveTo 116, 265
& & Delay 592
& & LeftClick 1
& & MoveTo 115, 296
& & Delay 560
& & LeftDown 1
& & MoveTo 116, 298
& & Delay 120
& & LeftUp 1
& & MoveTo 118, 330
& & Delay 644
& & LeftClick 1
& & MoveTo 115, 361
& & Delay 572
& & LeftClick 1
& & MoveTo 98, 91
& & Delay 1356
& & LeftClick 1
& & MoveTo 100, 121
& & Delay 695
& & LeftClick 1
& & MoveTo 102, 158
& & Delay 650
& & LeftClick 1
& & MoveTo 101, 185
& & Delay 565
& & LeftClick 1
& & MoveTo 103, 219
& & Delay 583
& & LeftClick 1
& & MoveTo 106, 251
& & Delay 667
& & LeftClick 1
& & MoveTo 96, 282
& & Delay 806
& & LeftClick 1
& & MoveTo 104, 319
& & Delay 684
& & LeftClick 1
& & MoveTo 98, 345
& & Delay 620
& & LeftClick 1
& & MoveTo 102, 378
& & Delay 660
& & LeftClick 1
& & MoveTo 108, 89
& & Delay 974
& & LeftClick 1
& & MoveTo 97, 125
& & Delay 599
& & LeftClick 1
& & MoveTo 98, 155
& & Delay 599
& & LeftClick 1
& & MoveTo 279, 349
& & Delay 2228
& & LeftClick 1
& & MoveTo 274, 346
& & Delay 4178
& & KeyDown &Esc&, 1
& & Delay 150
& & KeyUp &Esc&, 1
Sub 找怪物血条打怪()
& & //存入怪物血条到附件，点击的偏移量根据怪物大小调整
& & ux = 30
& & uy = 30
& & tp = &Attachment:\& & &怪血条.bmp&
& & Rem cxxh
& & For k = 1 To 6
//& & areatopx = 500 - 60 * k
//& & areatopy = 260 - 40 * k
//& & areadownx = 500 + 60 * k
//& & areadowny = 260 + 40 * k
//& & If areatopx & 1 or areatopy & 1 Then
//& &&&areatopx = 0
//& &&&areatopy = 0
//& & End If
//& & If areadownx &800 or areadowny &500 Then
//& &&&areatopx = 1024
//& &&&areatopy = 550
//& & End If
& & areatopx = 369
& & areatopy =145
& & areadownx =659
& & areadowny =352
& & Rem xhjc
& & FindPic areatopx,areatopy,areadownx,areadowny,tp,0.9,intX,intY
& & If intX & 0 And intY & 0 Then
& && &&&MoveTo intX + ux, intY + uy
& && &&&//& & 加入打怪子程序
& && &&&Call 直接砍怪
& && &&&Goto xhjc
& && &&&Call 拾取装备
& && &&&Call 会员回收装备
& & End If
& & FindPic 0,0,,tp,0.9,intX,intY
If intX & 0 And intY & 0 Then
& && &&&MoveTo intX + ux, intY + uy
& && &&&Call 直接砍怪
& && &&&Goto cxxh
Sub 直接砍怪()
& & LeftClick 1
& & Delay 7000
Sub 拾取装备()
& & //人物中心坐标
& & centerx = 500
& & centery = 260
& & //人物走动的相对量
& & stepx = 60
& & stepy = 40
& & leftpoint = centerx - stepx
& & rightpoint = centerx + stepx
& & toppoint = centery - stepy
& & downpoint = centery + stepy
& & Rem 将要拾取的装备存入附件并命名为ZB1，ZB2
& & Rem K等于在附件中已经加入的图片数量
& & For k=1 to 8
& && &&&ZB = &Attachment:\ZB& & k & &.bmp&
& && &&&FindPic 369,145,660,425,ZB,0.9,intX,intY
& && &&&If intX & 0 And intY & 0 Then
& && && && && & Rem 找到装备进行判断
& && && && && & intx = intx + 30
& && && && && & inty = inty + 14& && && && &
& && && && && & numa = int((intX - centerx)/stepx)
& && && && && & numb = int((inty - centery)/stepy)
& && && && && & If numa = 0 and numb = 0 Then
& && && && && &&&Delay 500& && && && &
& && && && && & End If
& && && && && & If numa & 0 Then
& && && && && &&&Rem 左走
& && && && && &&&MoveTo leftpoint, centery
& && && && && &&&numa = Abs(numa)
& && && && && &&&For numa
& && && && && &&&If numa&0 then
& && && && && &&&LeftClick numa - (numa - 1)
& && && && && &&&delay 300& && && && && &
& && && && && &&&End If
& && && && && &&&numa=numa-1
& && && && && &&&next& && && && && && && &
& && && && && & End If
& && && && && & If numa & 0 Then
& && && && && &&&Rem 右走
& && && && && &&&MoveTo rightpoint, centery
& && && && && &&&numa = Abs(numa)
& && && && && &&&For numa
& && && && && &&&If numa&0 then
& && && && && &&&LeftClick numa - (numa - 1)
& && && && && &&&delay 300& && && && && &&&
& && && && && &&&End If
& && && && && &&&numa=numa-1
& && && && && &&&next& && && && && && && &
& && && && && & End If& && && && && &
& && && && && & If numb & 0 Then
& && && && && && &Rem 上走& && && && && &&&
& && && && && &&&MoveTo&¢erx,toppoint
& && && && && &&&numb = Abs(numb)
& && && && && &&&For numb
& && && && && &&&If numb&0 then
& && && && && &&&LeftClick numb - (numb - 1)
& && && && && &&&delay 300& && && && && &
& && && && && &&&End If
& && && && && &&&numb=numb-1
& && && && && &&&next& && && && && && &
& && && && && & End If
& && && && && & If numb & 0 Then
& && && && && && &Rem 下走& && && && && &&&
& && && && && &&&MoveTo&¢erx,downpoint
& && && && && &&&numb = Abs(numb)
& && && && && &&&For numb
& && && && && &&&If numb&0 then
& && && && && &&&LeftClick numb - (numb - 1)
& && && && && &&&delay 300& && && && && &
& && && && && &&&End If
& && && && && &&&numb=numb-1
& && && && && &&&next& && && && && && &
& && && && && & End If& && &&&
& && &&&End If
Sub 随机跑动()
& & Randomize
& & n = Int(rnd * 7)
& & If n = 0 Then
& && &&&MoveTo 383, 18
& && &&&RightDown 1
& && &&&Delay 2000
& && &&&call 找怪物血条打怪
& & End if
& & If n = 1Then
& && &&&MoveTo 608,65
& && &&&Delay 100
& && &&&Delay 2000
& && &&&RightDown 1
& && &&&Delay 1000
& && &&&call 找怪物血条打怪
& & End If
& & If n = 2 Then
& && &&&MoveTo 718,193
& && &&&Delay 100
& && &&&Delay 2000
& && &&&RightDown 1
& && &&&Delay 2000
& && &&&call 找怪物血条打怪
& & End If
& & If n = 3 Then
& && &&&MoveTo 636,334
& && &&&Delay 100
& && &&&Delay 2000
& && &&&RightDown 1
& && &&&Delay 2000
& && &&&call 找怪物血条打怪
& & End If
& & If n = 4 Then
& && &&&MoveTo 391,348
& && &&&Delay 100
& && &&&Delay 2000
& && &&&RightDown 1
& && &&&Delay 2000
& && &&&call 找怪物血条打怪
& & End If
& & If n = 5 Then
& && &&&MoveTo 223,298
& && &&&Delay 100
& && &&&Delay 2000
& && &&&RightDown 1
& && &&&Delay 2000
& && &&&call 找怪物血条打怪
& & End If
& & If n = 6 Then
& && &&&MoveTo 143,190
& && &&&Delay 100
& && &&&Delay 2000
& && &&&RightDown 1
& && &&&Delay 2000
& && &&&call 找怪物血条打怪
& & End If
& & If n = 7 Then
& && &&&MoveTo 213,58
& && &&&Delay 100
& && &&&Delay 2000
& && &&&RightDown 1
& && &&&Delay 2000
& && &&&call 找怪物血条打怪
& & End if
& & Delay 10000
Sub 自动跑图测试()
& & Call 找怪物血条打怪
& & Rem 定义h为每次按下鼠标键时间
& & Rem 右下跑
& & MoveTo 480, 256
& & RightDown 1
& & Delay h
& & Rem 下跑
& & MoveTo 395,390
& & RightDown 1
& & Delay h
& & Rem 左下跑
& & MoveTo 230,390
& & RightDown 1
& & Delay h
& & Rem 左跑
& & MoveTo 214,201
& & RightDown 1
& & Delay h
& & Rem 左上跑
& & MoveTo 252,115
& & RightDown 1
& & Delay h
& & Rem 上跑
& & MoveTo 390,77
& & RightDown 1
& & Delay h
& & Rem 右上跑
& & MoveTo 550,83
& & RightDown 1
& & Delay h
& & Rem 右跑
& & MoveTo 495,199
& & RightDown 1
& & Delay h打怪脚本1_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
上传于|0|0|文档简介
&&水上漂打怪脚本
你可能喜欢传奇私服刷怪房间脚本_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
传奇私服刷怪房间脚本
上传于|0|0|文档简介
&&常见的传奇私服,自动刷怪房间,由于手动过于费事,此脚本能为你提供自动刷怪。无限循环。
你可能喜欢网页私服游戏烈焰地图触发脚本教程--网页私服
网页私服游戏烈焰地图触发脚本教程
发布人：发布时间：
&网页私服游戏烈焰地图触发脚本教程
player:set_timer(7,5); &加到MapEnter.lua里，地图12的
--------player---定时器
if index == 7 then
& if player:GetMapId() == 12 then
& & &if player:GetX() &= 99 and player:GetX() &= 133 and player:GetY() &= 98 and player:GetY() &= 132 then
& & & & & & &player:add_gamemoney_bind(1);
player:alert(10,0,0,&你泡点获得元宝+ 1,经验 + &..(100000*playerleveltimes[player:get_level()])..&&);
player:set_timer(8,5);
& & player:set_timer(8,5);
if index == 8 then
& if player:GetMapId() == 12 then
& & &if player:GetX() &= 99 and player:GetX() &= 133 and player:GetY() &= 98 and player:GetY() &= 132 then
& & & & & & &player:add_gamemoney_bind(1);
player:alert(10,0,0,&你泡点获得元宝+ 1,经验 + &..(100000*playerleveltimes[player:get_level()])..&&);
player:set_timer(7,5);
& & player:set_timer(7,5);
叫到 对应脚本里面就可以了
技术支持： 站点备案登记号：浙ICP备1000008号
打击盗版支持正版游戏，任何组织或个人未经同意，不得使用和传播盗版游戏，如有侵犯利益请来电告知说明，本站72小时内删除！
特别注意：本站所有信息为自动采集互联网，信息真实性无从验证，请自行判断，谨防上当受骗，所引发的一切法律后果本站不负责！
Rights Reserved}
我要回帖
更多关于 烈焰脚本 的文章
更多推荐
- ·万事兴集成灶官网能够和橱柜完美搭配吗？
- ·谁知道浙派集成灶和美多集成灶排名第几哪个好？
- ·哪些品牌是中国十大集成灶品牌排行榜十大品牌？？？
- ·2024款iPad Air M2芯片玩和平精英改画质60帧和90帧时画质最高分别能开到多少？不修改的情况下。
- ·什么是模块化多功能沙发一体两用？
- ·饥饿龙1000000金币钻石使用攻略 钻石，饥饿龙1000000金币钻石买什么好
- ·lol有多少英雄被lol重做英雄名单2020
- ·龙之谷手游平民如何提升战力高战力怎么提升 高战力有什么作用
- ·160马力电感发动机与变速箱连接没力换八速变速箱可以吗
- ·怎样dnf怎么才能打安图恩玩日股DNF
- ·新手选择火，还是费罗伊德切比较好
- ·山西有什么好玩的八宝泉好玩吗？
- ·2000年以后的所有2000年的网络游戏戏大全
- ·在英雄联盟六级徽章里，想把英雄升到六级要怎么做呢？
- ·我“你想怎么玩” 女孩子说“可以说是饥寒交迫的近义词啊555” 什么意思呀
- ·这配置玩cf FPS只有80-100 要换什么配件才能达到150+ 求fps大神的鼠标握法推荐
- ·光明大陆战士职业转职转职处刑人拿什么武器
- ·龙之谷手游魔法师专职平民玩什么好
- ·fate grand order日服o陨蹄铁怎么刷，我在国服，日服的那些点都没法刷
- ·烈焰遮天脚本私服怎么做跑图打怪的脚本啊
- ·一款建设类的游戏人物Q版 派矿工挖模拟城市5边界扩张mod 一个兵营只有五十人
- ·女性脱发偏方有哪些 治疗脱发生发的偏方偏方
- ·美白效果好的护肤品润肤隔离晚上能用吗
- ·会动的清明上河图 北宋生活，来看看北宋到底有多繁荣
- ·并州豪杰知谁在， 登彼九疑什么意思历玉门。 贺兰山下阵如云， 犹堪一战取功勋。 保岗：玉门 打一动物 急
- ·春秋战国君主列表早期里面 是不是所有的地君主直辖最好
- ·丰苹果肌用玻尿酸好还是自体脂肪移植苹果肌好
- ·我想要一个钻石戒指品牌排行,他不买给我是不是不够爱我呢
- ·肚子上女人左侧小腹有刀疤疤可以再买线吗
- ·净致抽油兰蔻保湿舒缓啫喱怎么用啫喱有什么作用
- ·斯拉面膜 在脸上不干怎么回事
- ·文学名著，理由是“那都是闲书，没什么用”
- ·神奇的警犬文章类别是什么
- ·清清美容减肥养生美容店取店名怎么样，好不好的默认点
- ·深空灰和银色哪个好看，大家感觉
