修仙软件工作台-源码

林一学编程

看是什么

larmia

看看是什么

long280556182

看来又可以摸鱼了

amwpygdx

amwpygdx 发表于 2026-5-22 15:17
位置:
.版本 2
.支持库 iext

.版本 2
.支持库 iext


    .默认
        ' --------------------------------------人物已经死亡!编辑框_总血量


        通知弹窗 (“逃跑提示”, “您已受伤,请修炼提升境界后再来宣战!”)
        加入信息 (超级编辑框1, “/#橙色/ ” ＋ 标签_战_角色名.标题 ＋ “ ” ＋ “/#紫色/ ” ＋ “被 ” ＋ “/#墨绿/ ” ＋ 标签_战_对名.标题 ＋ “ ” ＋ “/#白色/ ” ＋ “击杀了” ＋ “/#橙色/ ” ＋ “ 您已经被打败~!~” ＋ #换行符 ＋ “--------------+--------------------+-------------------+-------------------+------------”)

        局_掉血量百分比 ＝ 取随机数 (10, 60)

        编辑框_剩余血量.内容 ＝ 到文本 (四舍五入 (到整数 (编辑框_总血量.内容) － 到整数 (编辑框_总血量.内容) ÷ 局_掉血量百分比, 0))


        状态条_状态.置文本 (3, 日志_写出日志 (“血量提示:被对方打落[” ＋ 到文本 (四舍五入 (到整数 (编辑框_总血量.内容) － 到整数 (编辑框_总血量.内容) ÷ 局_掉血量百分比, 0)) ＋ “]滴精血!”))

        l.进度条_模拟S (画板_血量, 到数值 (编辑框_总血量.内容), 到数值 (编辑框_剩余血量.内容), #红色, 编辑框_总血量.内容 ＋ “/” ＋ 编辑框_剩余血量.内容, 画板_经验.宽度 ÷ 2 － 20, , 真, #绿色)
        l.进度条_模拟S (画板_血量1, 到数值 (编辑框_总血量.内容), 到数值 (编辑框_剩余血量.内容), #红色, 编辑框_总血量.内容 ＋ “/” ＋ 编辑框_剩余血量.内容, 画板_经验.宽度 ÷ 2 － 20, , 真, #绿色)

        局_记录集.关闭 ()
        局_数据库链接.关闭 ()
        选择框_开始历练.标题 ＝ “开始历练”
        图片框2.播放动画 ＝ 假
        时钟_历练.时钟周期 ＝ 0
        子程序_停止修炼 ()

amwpygdx

amwpygdx 发表于 2026-5-22 15:16
[2026-05-22 14:53:48.420]修为跌落:您被天雷所伤,掉落[330000]滴精血!

位置:
.版本 2
.支持库 iext



.子程序 判断渡劫是否成功
.局部变量 渡劫_基数, 整数型
.局部变量 灵力, 整数型
.局部变量 掉落灵力值, 整数型
.局部变量 渡劫_机率, 整数型
.局部变量 增加_基数, 整数型
.局部变量 局_掉血量百分比, 整数型



渡劫_基数 ＝ 取随机数 (1, 100)  ' 修士成功率
渡劫_机率 ＝ 取随机数 (1, 100)  ' 运气

增加_基数 ＝ 到数值 (标签_总灵根属性.标题)
渡劫_基数 ＝ 渡劫_基数 ＋ 增加_基数  ' 灵根属性越高,渡劫机率越大!

' -------------------------------------渡劫成功------------------------------------------
.判断开始 (子程序_掉血机率 () ＝ 真)
    子程序_判断境界 ()

.默认
    ' -------------------------------------渡劫失败------------------------------------------

    局_掉血量百分比 ＝ 取随机数 (20, 60)

    编辑框_剩余血量.内容 ＝ 到文本 (四舍五入 (到整数 (编辑框_总血量.内容) － 到整数 (编辑框_总血量.内容) ÷ 局_掉血量百分比, 0))


    状态条_状态.置文本 (3, 日志_写出日志 (“修为跌落:您被天雷所伤,掉落[” ＋ 到文本 (四舍五入 (到整数 (编辑框_总血量.内容) － 到整数 (编辑框_总血量.内容) ÷ 局_掉血量百分比, 0)) ＋ “]滴精血!”))

    l.进度条_模拟S (画板_血量, 到数值 (编辑框_总血量.内容), 到数值 (编辑框_剩余血量.内容), #红色, 编辑框_总血量.内容 ＋ “/” ＋ 编辑框_剩余血量.内容, 画板_经验.宽度 ÷ 2 － 20, , 真, #绿色)
    l.进度条_模拟S (画板_血量1, 到数值 (编辑框_总血量.内容), 到数值 (编辑框_剩余血量.内容), #红色, 编辑框_总血量.内容 ＋ “/” ＋ 编辑框_剩余血量.内容, 画板_经验.宽度 ÷ 2 － 20, , 真, #绿色)

amwpygdx

[2026-05-22 14:53:48.420]修为跌落:您被天雷所伤,掉落[330000]滴精血!

amwpygdx

修改两处错误


局_掉血量百分比 ＝ 取随机数 (10, 60)
编辑框_剩余血量.内容 ＝ 到文本 (四舍五入 (到整数 (编辑框_总血量.内容) － 到整数 (编辑框_总血量.内容) ÷ 局_掉血量百分比, 0))

修改以上文本[可以在渡劫和人物死亡的时候少受点伤害]

lingxuhuang

66666666666666666666

1184798949

感谢分享

picc

6666666666666666666666