Set dm = createobject("dm.dmsoft")
GLFW30 = dm.FindWindow(0, "真魂1011-5")
TracePrint subWin
dm_ret = dm.BindWindow(GLFW30, "gdi", "windows", "windows", 0)
dm_ret = dm.SetPath("C:\")
//dm_ret = dm.CaptureGif(0,0,1024,768,"C:\screen.bmp",0,0) //截图命令
dm.SendString GLFW30, "我是来测试的"
dm.keypress 27
Delay 100
dm.keypress 27
Delay 100
dm.keypress 27
Delay 500
dm_ret = dm.FindPic(0, 0, 1024, 768, "E:\cqjb\qx.bmp", "000000", 0.9, 0, X, Y)
If X > 0 Then
dm.moveTo X, Y
dm.LeftClick
End If
Delay 1000
dm_ret = dm.FindPic(0, 0, 1024, 768, "E:\cqjb\hs1.bmp", "000000", 0.9, 0, X, Y)
If X > 0 Then
dm.moveTo X, Y
dm.LeftClick
End If
Delay 1000
dm_ret = dm.FindPic(0, 0, 1024, 768, "E:\cqjb\hs2.bmp", "000000", 0.9, 0, X, Y)
If X > 0 Then
dm.moveTo X, Y
dm.LeftClick
End If
Delay 1000
dm_ret = dm.FindPic(0, 0, 1024, 768, "E:\cqjb\hs3.bmp", "000000", 0.9, 0, X, Y)
If X > 0 Then
dm.moveTo X, Y
dm.LeftClick
End If
Delay 1000
dm_ret = dm.FindPic(0, 0, 1024, 768, "E:\cqjb\sx.bmp", "000000", 0.9, 0, X, Y)
If X > 0 Then
dm.moveTo X, Y
dm.LeftClick
End If
Delay 25000
这是我正常可以后台,自动回收脚本, 只缺少一个 检测血量,使用随机道具 的命令 加到里边,求大神根据我的脚本 加进去。
血量百分之70使用随机。 ,我太笨了,麻烦大神 把命令脚本加到我的脚本中,。我直接复制可以用的。 。谢谢了
|
|