大话2脚本常用命令Word下载.docx

资源描述

大话2脚本常用命令Word下载.docx

《大话2脚本常用命令Word下载.docx》由会员分享，可在线阅读，更多相关《大话2脚本常用命令Word下载.docx（22页珍藏版）》请在冰豆网上搜索。

大话2脚本常用命令Word下载.docx

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"

\大话西游"

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主线程

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"

1.0,1,战斗状态X,战斗状态Y）

Function收起任务列表

Rem打开任务

dm.KeyPress81

For5

Call移动点击（359,165）

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,"

展开阅读全文