开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 4710|回复: 17
打印 上一主题 下一主题
收起左侧

[易语言纯源码] 大漠插件后台传奇脚本

[复制链接]
结帖率:33% (6/18)
跳转到指定楼层
楼主
发表于 2022-10-13 15:10:38 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式   辽宁省锦州市
分享源码
界面截图: -
是否带模块: -
备注说明: -
Set dm = createobject("dm.dmsoft")
GLFW30 = dm.FindWindow(0, "10-13号7区")
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 100
dm.keypress 120

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

dm.keypress 27
Delay 100
dm.keypress 27
Delay 1000
dm.keypress 120

Delay 25000




dm_ret = dm.CmpColor(48,667,"b51800-000000|b51900-000000",0.9)
If dm_ret = 1 Then
//1代表等于红色不随机   上边48.660,用大漠工具截图的鼠标位置
//
    TracePrint "相等"
        dm_ret = dm.FindPic(0, 0, 1024, 768, "E:\cqjb\sj.bmp", "000000", 0.9, 0, X, Y)
If X > 0 Then
dm.moveTo X, Y
dm.RightClick
End If


    Delay 2500
End If



======================================================
问题来了。

dm_ret = dm.CmpColor(48,667,"b51800-000000|b51900-000000",0.9)
If dm_ret = 1 Then
//1代表等于红色不随机   上边48.660,用大漠工具截图的鼠标位置
//
    TracePrint "相等"
        dm_ret = dm.FindPic(0, 0, 1024, 768, "E:\cqjb\sj.bmp", "000000", 0.9, 0, X, Y)
If X > 0 Then
dm.moveTo X, Y
dm.RightClick
End If

    Delay 2500
End If
这一段脚本是血量不足  随机,。 怎么让这一段代码,实时监测,而且不影响上边的脚本回收。 也就是 上边正常回收
这段血量检测随机脚本 试试达到检测效果??? 求大神  给个详细代码脚本、麻烦你了





结帖率:78% (14/18)

签到天数: 11 天

沙发
发表于 2022-10-13 15:34:27 | 只看该作者   安徽省滁州市
单独搞一个线程取检测 血量不就好了
回复 支持 反对

使用道具 举报

结帖率:33% (6/18)
板凳
 楼主| 发表于 2022-10-13 15:39:22 | 只看该作者   辽宁省锦州市
诺言55 发表于 2022-10-13 15:34
单独搞一个线程取检测 血量不就好了

对哦  哈哈
回复 支持 反对

使用道具 举报

结帖率:58% (11/19)

签到天数: 1 天

地板
发表于 2022-10-13 17:00:53 | 只看该作者   河北省保定市
创建监控线程 血量不足挂起任务线程
主副双线
回复 支持 反对

使用道具 举报

结帖率:100% (14/14)

签到天数: 6 天

地下
发表于 2022-10-13 19:25:13 | 只看该作者   安徽省安庆市
源码呢源码呢源码呢源码呢
回复 支持 反对

使用道具 举报

结帖率:67% (4/6)

签到天数: 8 天

6
发表于 2022-10-13 20:48:13 | 只看该作者   山东省东营市
你开个线程或者 开个时钟  实时监测
回复 支持 反对

使用道具 举报

签到天数: 2 天

7
发表于 2022-10-13 22:08:24 | 只看该作者   辽宁省葫芦岛市
#在这看到论坛里有用户问到此类问题里快速回复#
回复 支持 反对

使用道具 举报

结帖率:0% (0/1)
8
发表于 2022-10-13 22:21:50 | 只看该作者   广东省肇庆市
感谢分享
回复 支持 反对

使用道具 举报

签到天数: 18 天

9
发表于 2022-10-14 08:45:04 | 只看该作者   广东省深圳市
内存挂不好吗?
回复 支持 反对

使用道具 举报

结帖率:33% (6/18)
10
 楼主| 发表于 2022-10-15 16:57:48 | 只看该作者   辽宁省锦州市
fanfall 发表于 2022-10-13 17:00
创建监控线程 血量不足挂起任务线程
主副双线

麻烦给一个代码 完整的  谢谢你了
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 793400750,邮箱:[email protected]
网站简介:精易论坛成立于2009年,是一个程序设计学习交流技术论坛,隶属于揭阳市揭东区精易科技有限公司所有。
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表