2025年易语言调用大漠把血蓝内力体力转化为进度条

编程汇总 • 2025-03-10 14:21 • 阅读 10

把游戏角色的体力、血值、内力、经验通过进度条组件动态读取显示出来，并且通过api函数SendMessage来实现进度条颜色的变化，这里我们设置了血，体力，内力，经验的不同颜色，会根据游戏时时变化百分比例，调用大漠的OCR先把数值读出来，然后换算成进度调的百分比。

第18课511遇见易语言大漠内力体力判断时时显示

易语言源码：

.版本 2



.子程序 体力变化

.局部变量 str, 文本型

.局部变量 a, 双精度小数型

.局部变量 b, 双精度小数型

.局部变量 c, 双精度小数型

.局部变量 体力进度条句柄, 整数型



' 2564/2564

体力进度条句柄 ＝ _启动窗口.进度条_体力.取窗口句柄 ()

str ＝ dm.Ocr (201, 1, 292, 30, “ffffff-000000”, 1)

.如果 (取文本长度 (str) ＞ 0)

    _启动窗口.标签_体力.标题 ＝ str

    a ＝ 到数值 (取文本左边 (str, 倒找文本 (str, “/”, , 假)))

    b ＝ 到数值 (取文本右边 (str, 取文本长度 (str) － 倒找文本 (str, “/”, , 假)))

    _启动窗口.进度条_体力.位置 ＝ 1000

    .如果 (a ＝ b)

        _启动窗口.进度条_体力.位置 ＝ 1000



    .否则

        c ＝ (1 － 到数值 (a ÷ b)) × _启动窗口.进度条_体力.位置

        _启动窗口.进度条_体力.位置 ＝ _启动窗口.进度条_体力.位置 － c



    .如果结束



    发送消息 (体力进度条句柄, 1033, 真, #绿色)



.否则

.版本 2



.子程序 生命变化, , , 显示角色的血值变化，通过时钟调用

.局部变量 str, 文本型

.局部变量 s_array, 文本型, , "0"

.局部变量 a, 双精度小数型

.局部变量 b, 双精度小数型

.局部变量 c, 双精度小数型

.局部变量 血值进度条句柄, 整数型



血值进度条句柄 ＝ _启动窗口.进度条_生命.取窗口句柄 ()

.如果 (在线 ＝ 1)

    str ＝ dm.Ocr (287, 1, 384, 26, “ffffff-000000”, 1)

    .如果真 (取文本长度 (str) ＞ 0)

        _启动窗口.标签_生命.标题 ＝ str

        a ＝ 到整数 (取文本左边 (str, 倒找文本 (str, “/”, , 假)))

        b ＝ 到整数 (取文本右边 (str, 取文本长度 (str) － 倒找文本 (str, “/”, , 假)))

        _启动窗口.进度条_生命.位置 ＝ 1000

        .如果 (a ＝ b)

            _启动窗口.进度条_生命.位置 ＝ 1000



        .否则

            c ＝ (1 － 到数值 (a ÷ b)) × _启动窗口.进度条_生命.位置

            _启动窗口.进度条_生命.位置 ＝ _启动窗口.进度条_生命.位置 － c

        .如果结束



        发送消息 (血值进度条句柄, 1033, 真, #红色)

    .如果真结束





.否则

    _启动窗口.标签_生命.标题 ＝ “”

    _启动窗口.进度条_生命.位置 ＝ 0

原文:易语言大漠血蓝体力内力经验进度条显示

511遇见易语言大漠游戏外挂一键登录

2025年易语言调用大漠把血蓝内力体力转化为进度条

相关推荐