大话2脚本常用命令Word下载.docx
- 文档编号:18394530
- 上传时间:2022-12-16
- 格式:DOCX
- 页数:22
- 大小:19.77KB
大话2脚本常用命令Word下载.docx
《大话2脚本常用命令Word下载.docx》由会员分享,可在线阅读,更多相关《大话2脚本常用命令Word下载.docx(22页珍藏版)》请在冰豆网上搜索。
Ifform1.物品栏4.Value=1Then
\物品栏4.bmp"
0.9,物品栏4X,物品栏4Y
Call移动点击(物品栏4X-2,物品栏4Y-2)
FindPic37,327,346,388,"
\飞行棋.bmp"
0.9,飞X,飞Y
If飞X>
=0Then
Call移动右击(飞X+3,飞Y+3)
Else
MessageBox"
没有飞行棋了,快点去买吧"
送=dm.findpic(142,255,268,305,"
送我去.bmp"
"
000000"
0.8,0,送X,送Y)
If送X>
Delay300
Call移动点击(送X+8,送Y+8)
请在灵兽村做好坐标再启动脚本"
EndFunction
完整版
Global攻击次数,开始去任务
PutAttachment"
c:
\大话西游"
dm.dll"
*.txt"
.\plugin"
"
regdll.dll"
*.bmp"
CallPlugin.regdll.reg("
\大话西游\dm.dll"
)
Call注册大漠()
Sub注册大漠()
Setdm=createobject("
dm.dmsoft"
dm_ret=dm.SetShowErrorMsg(0)
ifdm.ver()="
"
then
RunApp"
regsvr32c:
\大话西游\dm.dll/s"
:
Ifdm.ver()="
Then
创建对象失败,检查系统是否禁用了vbs脚本权限"
EndScript
EndSub
hwndex=dm.EnumWindow(0,0,"
WSWINDOW"
2+4+8+16)
TracePrinthwndex
dm.SetPathdm.GetBasePath'
定义字库目录
dm.SetDict0,"
\大话西游\dhxy.txt"
dm_ret=dm.SetPath("
\大话西游\"
dm_ret=dm.SetWindowState(hwndex,1)
moshi=dm.bindwindow(hwndex,"
normal"
0)
TracePrintmoshi
dm_ret=dm.GetClientSize(hwndex,w,h)
yidong=dm.MoveWindow(hwndex,0,0)
Call任务检查
Call主线程
sub主线程
Do
If开始去任务=1Then
Call第二次查找_队伍
If队友二x<
ExitDo
Call攻击任务
Loop
Call查看任务是否完成
If经验x>
Delay6000
Call超级巫师
If灵兽村X>
=0and灵兽村Y>
Call补血蓝
Call宠物弹出对话框
Call任务检查
Delay100
Endsub
Function攻击任务
循环次数=0
Delay200
Call查找战斗状态
Call查找_灵兽村
Call取消任务
If战斗状态X<
0or灵兽村X>
=0Then
法术攻击=dm.FindPic(689,174,774,373,"
法术.bmp"
0.8,0,法术攻击X,法术攻击Y)
If法术攻击X>
=0and法术攻击y<
236Then
Ifform1.阎罗追命.Value=1orform1.魔神附身.value=1orform1.含情脉脉.value=1Then
Call移动点击(法术攻击X+8,法术攻击Y+8)
Ifform1.阎罗追命.Value=1Then
Call移动点击(527,221)
Ifform1.魔神附身.value=1Then
Call移动点击(404,221)
Ifform1.含情脉脉.value=1Then
Call移动点击(286,221)
Ifform1.物理攻击.value=1Then
dm.KeyDown18
dm.KeyPress65
dm.KeyUp18
Call移动点击(231,182)
Call移动点击(190,254)
If战斗状态x<
Call移动点击(150,328)
Call移动点击(110,416)
Call移动点击(271,90)
Call移动点击(251,370)
Call移动点击(331,216)
Call移动点击(289,295)
If战斗状态<
dm.RightClick
Call第二次攻击(289,295)
Call第二次攻击(331,216)
Call第二次攻击(251,370)
Call第二次攻击(271,90)
Call第二次攻击(110,425)
Call第二次攻击(150,328)
Call第二次攻击(190,254)
Call第二次攻击(231,182)
EndFunction
Function第二次攻击(第二次x,第二次y)
法术攻击二=dm.FindPic(689,174,774,373,"
0.8,0,法术攻击二X,法术攻击二Y)
If法术攻击二X>
=0and法术攻击二y>
236Then
Ifform1.第四个技能.Value=1orform1.第三个技能.Value=1orform1.第二个技能.Value=1orform1.第一个技能.Value=1Then
Call移动点击(法术攻击二X+8,法术攻击二Y+8)
Ifform1.第四个技能.Value=1Then
Call移动点击(309,187)
Ifform1.第三个技能.Value=1Then
Call移动点击(309,164)
Ifform1.第二个技能.Value=1Then
Call移动点击(309,140)
Ifform1.第一个技能.Value=1Then
Call移动点击(309,122)
Call移动点击(第二次x,第二次y)
Ifform1.宝宝物理攻击.value=1Then
Function自动攻击
自动=dm.FindPic(719,469,793,503,"
自动攻击.bmp"
0.8,0,自动X,自动Y)
If自动X>
Call移动点击(自动X+8,自动Y+8)
攻击次数=攻击次数+1
If灵兽村x>
Call超级巫医
Call主线程
Function查看任务是否完成
经验=dm.FindStr(205,0,582,544,"
经验"
f8fc00-101010"
1.0,经验X,经验Y)
Function超级巫医
dm.KeyPress49
Call移动点击(382,304)
Call坐标检测
Call查找_超级巫医
Function补血蓝
血=dm.CmpColor(795,17,"
f86400-101010"
0.9)
If血<
>
Call移动右击(795,17)
蓝=dm.CmpColor(795,31,"
50fce8-101010"
If蓝<
Call移动右击(795,31)
召唤血=dm.CmpColor(670,15,"
f88c18-101010"
If召唤血<
Call移动右击(670,15)
召唤蓝=dm.CmpColor(669,27,"
60fcf0-101010"
If召唤蓝<
Call移动右击(669,27)
Function移动右击(xx,yy)
dm.movetoxx,yy
Function查找_超级巫医
巫医=dm.FindStr(457,190,775,526,"
级巫医"
d8e048-505050"
0.9,巫医X,巫医Y)
If巫医x>
dm.moveto巫医x+10,巫医y-40
dm.leftclick
exitdo
伤的厉害=dm.FindStr(134,329,558,428,"
我的召唤兽宝贝伤得厉害"
f8fc00-000000|00fc00-000000"
1.0,伤的厉害X,伤的厉害Y)
If伤的厉害x>
Call移动点击(伤的厉害X+8,伤的厉害Y+8)
Call主线程
Function宠物弹出对话框
伤的厉害二=dm.FindStr(134,329,558,428,"
1.0,伤的厉害二X,伤的厉害二Y)
If伤的厉害二x>
Call移动点击(伤的厉害二X+8,伤的厉害二Y+8)
Function查找_灵兽村
灵兽村=dm.FindStr(0,0,142,27,"
灵兽村"
f8fcf8-101010|ffffff-101010"
1.0,灵兽村X,灵兽村Y)
Function查找战斗状态
战斗状态=dm.FindMultiColor(0,0,130,55,"
d2fff6-101010|dbfff6-101010|d8fcf0-101010"
0|1|d2fff6-101010|dbfff6-101010|d8fcf0-101010,1|36|d2fff6-101010|dbfff6-101010|d8fcf0-101010,73|11|d2fff6-101010|dbfff6-101010|d8fcf0-101010,56|23|d2fff6-101010|dbfff6-101010|d8fcf0-101010,75|23|d2fff6-101010|dbfff6-101010|d8fcf0-101010,50|35|d2fff6-101010|dbfff6-101010|d8fcf0-101010,83|35|d2fff6-101010|dbfff6-101010|d8fcf0-101010"
1.0,1,战斗状态X,战斗状态Y)
Function收起任务列表
Rem打开任务
dm.KeyPress81
For5
Call移动点击(359,165)
Next
For10
dm_ret=dm.FindPic(148,158,196,452,"
收起任务二.bmp|收起任务.bmp|收起任务三.bmp"
0.9,0,intX,intY)
IfintX>
=0andintY>
TracePrint"
找到图片"
打开次数=1
dm.movetointX+4,intY+4
Delay50
If打开次数<
1Then
Goto打开任务
常规玩法=dm.FindStr(147,156,352,449,"
常规玩法"
1.0,常规玩法X,常规玩法Y)
If常规玩法x>
Call移动点击(常规玩法x+8,常规玩法y+8)
dm.moveto0,0
修罗任务表=dm.FindPic(147,156,352,449,"
修罗任务表.bmp"
0.8,0,修罗任务表X,修罗任务表Y)
修罗"
&
修罗任务表
If修罗任务表X>
Call移动点击(修罗任务表x+8,修罗任务表y+8)
任务失败=dm.FindStr(371,156,648,294,"
你的任务已经失败"
1.0,任务失败X,任务失败Y)
If任务失败x>
Call移动点击(常规玩法x+439,常规玩法y+284)
确认取消=dm.FindStr(113,222,351,335,"
确定"
00fc00-101010"
1.0,确认取消X,确认取消Y)
If确认取消x>
Call移动点击(确认取消x+8,确认取消y+8)
Call申请组对
Function申请组对
Call移动点击(542,557)
附近队伍=dm.FindPic(479,443,602,541,"
附近队伍.bmp"
0.8,0,附近队伍X,附近队伍Y)
If附近队伍X>
=0and附近队伍Y>
Call移动点击(附近队伍X,附近队伍Y)
Rem组对
申请=dm.FindStrEx(437,122,528,450,"
申请"
f8fcf8-000000"
1.0)
TracePrint申请
Iflen(申请)>
0Then
ss=split(申请,"
|"
index=0
count=UBound(ss)+1
DoWhileindex<
count
TracePrintss(index)
sss=split(ss(index),"
id=int(sss(0))
x=int(sss
(1))
y=int(sss
(2))
dm.MoveTox,y
dm.leftclick
Delay800
index=index+1
TracePrintcount
Ifindex=countThen
叉=dm.FindPic(518,70,565,112,"
叉.bmp|叉二.bmp|叉三.bmp"
0.8,0,叉X,叉Y)
叉:
叉x&
叉Y
Call移动点击(叉X,叉Y)
Call查找队伍
exitdo
For2
Delay3000
Call移动点击(396,471)
Goto组对
Function查找队伍
队友=dm.FindMultiColor(311,0,563,51,"
0|1|d2fff6-101010|dbfff6-101010|d8fcf0-101010,1|0|d2fff6-101010|dbfff6-101010|d8fcf0-101010,0|41|d2fff6-101010|dbfff6-101010|d8fcf0-101010,0|42|d2fff6-101010|dbfff6-101010|d8fcf0-101010,1|42|d2fff6-101010|dbfff6-101010|d8fcf0-101010,42
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 大话 脚本 常用命令
![提示](https://static.bdocx.com/images/bang_tan.gif)