A. 按键精灵 脚本找多个同样的图 依次单击！
Call注册
Call绑定
A类="a1.bmp|a2.bmp|a3.bmp|a4.bmp|a5.bmp"//如果图片多,可以再加
A类=split(A类,"|")//数组
B类="b1.bmp|b2.bmp"
C类="c1.bmp|c2.bmp"
Do//这个是无限循环,当A类的N个图片找完后,反回继续从A类第一个图片开始找,如此反复,直到你停止脚本运行
Fori=0ToUBound(A类)
Do
dm_ret=dm.FindPic(0,0,2000,2000,A类(i),"000000",0.9,0,x,y)
Ifx>=0andy>=0Then
dm.MoveTox+5,y+5
Delay100
dm.LeftClick
Delay100
ExitDo//找到A类第i个图后跳出循环,否则一直找
EndIf
Delay100
Loop
Do
dm_ret=dm.FindPic(0,0,2000,2000,图B,"000000",0.9,0,x,y)
Ifx>=0andy>=0Then
dm.MoveTox+5,y+5
Delay100
dm.LeftClick
Delay100
ExitDo//找到B类图内的任一图片后跳出循环,否则一直找
EndIf
Delay100
Loop
Do
dm_ret=dm.FindPic(0,0,2000,2000,图C,"000000",0.9,0,x,y)
Ifx>=0andy>=0Then
dm.MoveTox+5,y+5
Delay100
dm.LeftClick
Delay100
ExitDo//找到C类图内的任一图片后跳出循环,否则一直找
EndIf
Delay100
Loop
//这组找完,返回并找下一个A类图片
Next
//A类图片都找完了,如果想一直循环找,就加一个无限循环
Loop
Sub绑定
Rem绑定
hwnd=dm.GetMousePointWindow()
Delay100
dm_ret=dm.BindWindow(hwnd,"dx2","windows2","dx",0)
Delay1000
Ifdm_ret=1Then
CallPlugin.Msg.Tips("绑定成功")
Delay100
Else
Goto绑定
EndIf
EndSub
Sub注册大漠()
need_ver="3.1233"
Delay50
setws=createobject("Wscript.Shell")
Delay50
ws.run"regsvr32atl.dll/s"
Delay50
setws=nothing
PutAttachment"c: est_game","*.*"
Delay50
PutAttachment".Plugin","RegDll.dll"
Delay50
CallPlugin.RegDll.Reg("c: est_gamedm.dll")
Delay50
setdm=createobject("dm.dmsoft")
Delay50
ver=dm.Ver()
Delay50
ifver<>need_verthen
Delay50
setdm=nothing
Delay50
setws=createobject("Wscript.Shell")
Delay50
ws.run"regsvr32c: est_gamedm.dll/s"
Delay50
setws=nothing
Delay50
setdm=createobject("dm.dmsoft")
Delay50
ver=dm.Ver()
Delay50
ifver<>need_verthen
messagebox"插件版本错误,当前使用的版本是:"&ver&",插件所在目录是:"&dm.GetBasePath()
messagebox"请关闭程序,重新打开本程序再尝试"
endscript
endif
endif
dm.SetPath"c: est_game"
Delay50
dm_ret=dm.SetDict(0,"dm_soft.txt")
Delay50
EndSub
SubOnScriptExit()
dm.UnBindWindow
EndSub
如果你的大漠插件不是3.1233版本,请将注册开头的need_ver = "3.1233" 改为你用的大漠插件版本号
B. 想请教一个问题，3Dmax脚本怎么实现，在选择的已有物体上，让它们在某个轴上平均分布（间隔一样）
前和后什么意思？？如果你想要像后的那样有间隔位置的，直接使用复制命令然后给想要的数量就行了
C. 按键精灵怎么循环找两张图片点击，代码怎么写
Do
AX = Plugin.Sys.GetScRX():AY = Plugin.Sys.GetScRY()
FindPic 0, 0, AX, AY, "Attachment:\立刻购买.bmp", 0.9, intX, intY
If intX > 0 And intY > 0 Then
MoveTo intX+5,intY+5
LeftClick 1
Do
FindPic 0, 0, AX, AY, "Attachment:\立即支付.bmp", 0.9, intX1, intY1
If intX1 > 0 And intY1 > 0 Then
MoveTo intX1+5,intY1+5
LeftClick 1
Exit Do
End If
Loop
End If
Loop
复制上面代码可达成
注意事项：用按键精灵抓抓功能抓取相应图片放到脚本的附件内
D. 按键精灵的脚本中，有个动作，就是搜索多个同样的图片，并予以点击一次，脚本怎么写
设定个变量在循环外，点击之前先判断，点击之后变化。比如
点击=0
do
if 点击=0 then
MoveTo intX, intY
Delay 100
LeftClick 1
点击=1
end if
loop
E. 如何快速制作脚本间隔时间自动使用按键精灵游戏技能辅助脚本
脚本使用说明:
1. 此脚本可应用于各种网络游戏，用于自动间隔时间使用辅助技能，可自定义三个技能和间隔时间。
2. 脚本开始运行前请先在按键精灵主界面上设置自定义参数，修改后点击上方的“保存”按钮。
3. 可定义辅助技能热键：数字0～9、字母A～Z、F1～F12 ，设置技能时字母可不分大小写。
4. 如果辅助技能是F1～F12，比如技能是F12，自定义参数设置的输入格式：f12或F12
5. 输入间隔时间单位为"秒"，比如间隔180秒，自定义参数的输入格式：180
6. 如果在自定义设置中输入的数据错误，脚本将提示并停止运行。
>>具体脚本代码如下：
UserVar jn1=a 设置技能1键位
UserVar jn2=2 设置技能2键位
UserVar jn3=F11 设置技能3键位
UserVar s1=60 设置技能1施放间隔时间
UserVar s2=90 设置技能2施放间隔时间
UserVar s3=120 设置技能3施放间隔时间
//-----------------------------------------------------------------------
//---------------------------------------------------------[赋值初始变量]
//-----------------------------------------------------------------------
dim number(2),thetime(2),key(2),sj(2)
dim a,b,c,d,jn1,jn2,jn3,s1,s2,s3,t1,t2,t3,L
//声明变量
number(0)=jn1:number(1)=jn2:number(2)=jn3
thetime(0)=s1:thetime(1)=s2:thetime(2)=s3
//把自定义参数的返回值转换成数组元素
t1=now:t2=now:t3=now
//返回当前系统日期时间到变量
//-----------------------------------------------------------------------
//---------------------------------------------------------- [跳转子程序]
//-----------------------------------------------------------------------
Gosub 判断按键
Gosub 判断时间
//-----------------------------------------------------------------------
//---------------------------------------------------------- [脚本主程序]
//-----------------------------------------------------------------------
While true
//条件无限循环
If DateDiff("s",t1,now)>=sj(0)
//< DateDiff 函数：返回两个日期之间的时间间隔>
//<"s"：秒> <t1：时间变量> <now：当前系统日期和时间> <s(0)：自定义时间变量>
Delay 10
KeyPress key(0) 1
//按键 变量k(0) 1次
t1=now
//重新赋值日期时间到变量
EndIf
If DateDiff("s",t2,now)>=sj(1)
Delay 10
KeyPress key(1) 1
t2=now
EndIf
If DateDiff("s",t3,now)>=sj(2)
Delay 10
KeyPress key(2) 1
t3=now
EndIf
Delay 10
EndWhile
//-----------------------------------------------------------------------
//------------------------------------------------------ [判断键码子程序]
//-----------------------------------------------------------------------
Sub 判断按键
a=0:b=0
//赋值数组最小下标
For 3
L=Len(number(a))
//< Len 函数：返回字符串内字符的数量>
If L=1
key(b)=Asc(UCase(number(a)))
//< Asc 函数：返回字符串首字母的ASCII字符代码> < UCase 函数：返回转换为大写字母的字符>
If key(b)<48 or key(b)>90
Goto End
//超出范围跳转到脚本结束标记
ElseIf key(b)>57 and key(b)<65
Goto End
EndIf
ElseIf L>1 and L<4
If UCase(Left(number(a),1))="F"
//判断字符串首字字符 < Left 函数：返回字符串最左边的指定数量的字符>
key(b)=Asc(UCase(Left(number(a),1)))+Right(number(a),L-1)+41
//< Right 函数：返回字符串最右边的指定数量的字符>
If key(b)<112 or key(b)>123
Goto End
EndIf
Else
Goto End
EndIf
Else
Goto End
EndIf
a=a+1:b=b+1
//数组下标+1
Delay 10
EndFor
Return 判断按键
//-----------------------------------------------------------------------
//------------------------------------------------------ [判断时间子程序]
//-----------------------------------------------------------------------
Sub 判断时间
c=0:d=0
For 3
If IsNumeric(thetime(c))=True
//< IsNumeric 函数：返回布尔值指明表达式的值是否为数字>
sj(d)=cint(thetime(c))
/< CInt 函数：返回已被转换为整形子类型的变体的表达式>
Else
Goto End
EndIf
c=c+1:d=d+1
Delay 10
EndFor
Return 判断时间
//-----------------------------------------------------------------------
//-------------------------------------------------------- [脚本停止标记]
//-----------------------------------------------------------------------
Rem End
MessageBox 输入错误 脚本停止运行
EndScript
F. 按键精灵-我自己做了一个鼠标点击的脚本，如何让它1小时后重复脚本，而且反复操作！
'这样就是一小时后不断重复了。。
'如果想先执行命令在延时就把延时命令放在Goto Start之前。
'如果想先延时后执行命令。就像现在这样就行。
Rem Start
Delay 3600000
'==========以下是按键精灵录制的内容==========
MoveTo 754, 277
LeftClick 1
Delay 155
LeftClick 1
Delay 128
LeftClick 1
Delay 139
LeftDoubleClick 1
Delay 113
Delay 77
LeftDoubleClick 1
Delay 80
Delay 95
LeftDoubleClick 1
Delay 44
Delay 70
LeftClick 1
MoveTo 724, 446
Delay 2288
LeftDown 1
MoveTo 594, 352
Delay 1056
LeftUp 1
MoveTo 724, 438
Delay 784
LeftDown 1
MoveTo 508, 293
Delay 2074
LeftUp 1
MoveTo 236, 247
Delay 6727
LeftClick 1
MoveTo 183, 231
Delay 1136
LeftClick 1
MoveTo 132, 237
Delay 1456
LeftClick 1
MoveTo 95, 269
Delay 1560
LeftClick 1
MoveTo 97, 323
Delay 1536
LeftClick 1
MoveTo 147, 322
Delay 1380
LeftClick 1
MoveTo 184, 284
Delay 1260
LeftClick 1
MoveTo 237, 309
Delay 1480
LeftClick 1
MoveTo 306, 311
Delay 1466
LeftClick 1
MoveTo 289, 335
Delay 2260
LeftClick 1
MoveTo 236, 369
Delay 1955
LeftClick 1
MoveTo 185, 345
Delay 1648
LeftDown 1
MoveTo 185, 344
Delay 81
LeftUp 1
MoveTo 132, 360
Delay 1544
LeftClick 1
MoveTo 184, 391
Delay 1192
LeftClick 1
MoveTo 251, 415
Delay 1826
LeftClick 1
MoveTo 603, 446
Delay 2827
LeftClick 1
MoveTo 554, 467
Delay 2209
LeftClick 1
MoveTo 512, 488
Delay 1817
LeftClick 1
MoveTo 459, 511
Delay 1294
LeftClick 1
MoveTo 488, 523
Delay 1403
LeftClick 1
MoveTo 645, 367
Delay 4077
LeftDown 1
MoveTo 602, 345
Delay 1437
LeftUp 1
MoveTo 624, 399
Delay 3356
LeftDown 1
MoveTo 559, 357
Delay 313
LeftUp 1
MoveTo 602, 447
Delay 3010
LeftClick 1
MoveTo 670, 209
Delay 2086
LeftClick 1
'==========以上是按键精灵录制的内容==========
Goto Start
G. 按键精灵屏幕内找图，相同的图有很多，鼠标移到图上依次点击，该怎么写求代码
鼠标精灵模拟鼠标点击,任意设置点击位置、点击时间间隔及点击方式(单击/双击,顺序点/随机点击)。按键精灵是一个模拟鼠标键盘动作的软件。通过制作脚本,可以让按键精灵代替您的双手,自动执行一系列鼠标键盘动作。按键精灵简单易用,不需要任何编程知识就可以作出功能强大的脚本。只要您在电脑前用双手可以完成的动作,按键精灵都可以替您完成. 二者差不多
H. 按键精灵 脚本找多个同样的图依次点击
Hwnd=Plugin.Window.MousePoint()
Arr=Split(Plugin.Window.GetWindowRect(Hwnd),"|")
Do
Call找多图(Arr(0),Arr(1),Arr(2),Arr(3),"Attachment:1.bmp",1.0)
Loop
Function找多图(起点X,起点Y,终点X,终点Y,图片,相似度)
Dimtx,ty,tx1,ty1
找到的坐标=""
tx=起点X:ty=起点Y:tx1=终点X:ty1=终点Y
Do
FindPictx,ty,tx1,ty1,图片,相似度,intX,intY
IfintX>0andintY>0Then
找到的坐标=找到的坐标&intX&","&intY&"|"
MoveTointX,intY
Delay100
LeftClick1
Delay100
tx=intX+5
ty=intY
Else
ty=ty+5
tx=起点X
IfintX=-1andintY=-1Then
FindPictx,ty,tx1,ty1,图片,相似度,intX,intY
IfintX>0andintY>0Then
找到的坐标=找到的坐标&intX&","&intY&"|"
MoveTointX,intY
Delay100
LeftClick1
Delay100
tx=intX+5
ty=intY
Else
ExitDo
EndIf
EndIf
Endif
Loop
EndFunction
I. 求教按键精灵找相同图片脚本。要具体语句
FindPic 0,0,1600,mo,"Attachment:\农田.bmp",0.9,intX,intY
你这句是从左上解坐标0，0到右下角坐标1600。MO
但是你的变量MO值为0
所以在屏幕0.0至1600.0找你的图，所以找不到！
其实最简单的就把右下角坐标改了！
比如说改成1024*768
例：
FindPic 0,0,1024,768,"Attachment:\农田.bmp",0.9,intX,intY
你可以看看你的屏幕分辨率！然后把1024.768改成你的分辨率！
他就是全屏找图了！