盟重神兵魂石洗练系统脚本，没基础别买。

147258

;=========补充部分内容==================
; 【盟重神兵】魂石洗练系统完整版
; 996M2引擎专用 | 1:1对标原版
; 所有机制、数值、细节与盛大盟重神兵完全一致
;==========================================

[@main]
#IF
#ACT
MOV S$当前日期 <$DATETIME>
STRLEFT S$今日日期 S$当前日期 10
; 每日0点重置免费次数
CHECKVAR HUMAN 魂石今日日期 <> S$今日日期
#ACT
SETVAR HUMAN 魂石今日日期 = S$今日日期
SETVAR HUMAN 每日免费白银洗练 = 1
SENDMSG 6 【系统】每日魂石洗练免费次数已重置！
#IF
#ACT
MOV N$幸运进度 <$HUMAN(魂石幸运值)>
MOV N$免费次数 <$HUMAN(每日免费白银洗练)>
CALCVAR N$幸运百分比 = N$幸运进度 * 100
CALCVAR N$幸运百分比 = N$幸运百分比 / 88
#SAY
\ \
      ╔══════════════════════════════╗
      ║        【魂石洗练系统】        ║
      ║      盛大传奇·盟重神兵原版      ║
      ╚══════════════════════════════╝
\
  ┌──────────────────────────────────┐
  │  当前幸运保底进度：<$STR(N$幸运进度)>/88次
  │  【<$STR(N$幸运百分比)%】距离红色词条还有：<$STR(88-N$幸运进度)>次
  └──────────────────────────────────┘
\
  今日剩余免费白银洗练：<$STR(N$免费次数)>次
\
  <【开始洗练装备】/@洗练选择>      <查看洗练说明/@洗练说明>
\
  <魂石升级合成/@魂石升级菜单>      <魂石提取/@提取菜单>
\
  <魂石属性转移/@转移菜单>          <魂石回收/@回收菜单>
\
  <魂石精炼功能/@精炼菜单>
\
  ──────────────────────────────────
\          铸造大师·盟重土城
\

[@洗练说明]
#SAY
\ \
      ╔══════════════════════════════╗
      ║        【魂石洗练说明】        ║
      ╚══════════════════════════════╝
\
  ◆ 洗练类型：
  【白银洗练】消耗：洗炼石×3 + 金币×5000
  【黄金洗练】消耗：洗炼石×15 + 晶铁×3 + 金币×30000
\
  ◆ 保底机制：
  累计88次洗练必出红色稀有词条
  白银&黄金洗练次数合并计算
  达到88次后幸运值清零重置
\
  ◆ 品质概率：
  白色：60%  蓝色：25%  紫色：10%
  橙色：4%   红色：1%
\
  ◆ 每日福利：
  每日1次免费白银洗练（0点重置）
\
  <返回/@main>

[@洗练选择]
#SAY
\ \
      ╔══════════════════════════════╗
      ║        【选择洗练类型】        ║
      ╚══════════════════════════════╝
\
  <【白银洗练】/@白银洗练>
  消耗：洗炼石×3 + 金币×5000
  每日免费剩余：<$HUMAN(每日免费白银洗练)>次
\
  <【黄金洗练】/@黄金洗练>
  消耗：洗炼石×15 + 晶铁×3 + 金币×30000
  更高概率出现稀有词条
\
  <返回/@main>

[@白银洗练]
#IF
CHECKVAR HUMAN 每日免费白银洗练 > 0
#ACT
SETVAR HUMAN 每日免费白银洗练 -= 1
GOTO @执行白银洗练免费
#ELSEACT
GOTO @执行白银洗练

[@执行白银洗练免费]
#IF
CHECKBOXITEMCOUNT 0 < 1
#ACT
MESSAGEBOX 请先放入需要洗练的装备！
BREAK
#IF
#ACT
; 累计幸运值
SETVAR HUMAN 魂石幸运值 += 1
; 检查是否达到保底
CHECKVAR HUMAN 魂石幸运值 >= 88
#ACT
SETVAR HUMAN 魂石幸运值 = 0
MOV N$强制红色 = 1
SENDMSG 5 【恭喜】幸运值已满，本次必出红色稀有词条！
#ELSEACT
MOV N$强制红色 = 0
; 执行洗练
GOSUB @随机生成词条
SENDMSG 6 【免费洗练成功】装备洗练完成！
GOTO @洗练结果显示

[@执行白银洗练]
#IF
CHECKBOXITEMCOUNT 0 < 1
#ACT
MESSAGEBOX 请先放入需要洗练的装备！
BREAK
#IF
CHECKITEM 洗炼石 3
CHECKGOLD 5000
#ACT
TAKE 洗炼石 3
TAKEGOLD 5000
; 累计幸运值
SETVAR HUMAN 魂石幸运值 += 1
; 检查是否达到保底
CHECKVAR HUMAN 魂石幸运值 >= 88
#ACT
SETVAR HUMAN 魂石幸运值 = 0
MOV N$强制红色 = 1
SENDMSG 5 【恭喜】幸运值已满，本次必出红色稀有词条！
#ELSEACT
MOV N$强制红色 = 0
; 执行洗练
GOSUB @随机生成词条
SENDMSG 6 【洗练成功】消耗洗炼石×3 金币×5000
GOTO @洗练结果显示
#ELSEACT
MESSAGEBOX 材料不足！需要洗炼石×3 + 金币×5000
BREAK

[@黄金洗练]
#IF
CHECKBOXITEMCOUNT 0 < 1
#ACT
MESSAGEBOX 请先放入需要洗练的装备！
BREAK
#IF
CHECKITEM 洗炼石 15
CHECKITEM 晶铁 3
CHECKGOLD 30000
#ACT
TAKE 洗炼石 15
TAKE 晶铁 3
TAKEGOLD 30000
; 累计幸运值（黄金洗练同样计入保底）
SETVAR HUMAN 魂石幸运值 += 1
; 检查是否达到保底
CHECKVAR HUMAN 魂石幸运值 >= 88
#ACT
SETVAR HUMAN 魂石幸运值 = 0
MOV N$强制红色 = 1
SENDMSG 5 【恭喜】幸运值已满，本次必出红色稀有词条！
#ELSEACT
MOV N$强制红色 = 0
; 黄金洗练提升红色概率
MOV N$品质加成 = 5
; 执行洗练
GOSUB @随机生成词条
SENDMSG 6 【黄金洗练成功】消耗洗炼石×15 晶铁×3 金币×30000
GOTO @洗练结果显示
#ELSEACT
MESSAGEBOX 材料不足！需要洗炼石×15 + 晶铁×3 + 金币×30000
BREAK

[@随机生成词条]
#ACT
; 品质判定
MOV N$随机数 = 0
MOV N$品质 = 0
RANDOM N$随机数 100
; 强制红色（保底机制）
EQUAL N$强制红色 1
#ACT
MOV N$品质 = 5
RETURN
#IF
#ACT
; 原版品质概率：白60% 蓝25% 紫10% 橙4% 红1%
SMALL N$随机数 60
#ACT
MOV N$品质 = 1 ; 白色
#ELSEACT
SMALL N$随机数 85
#ACT
MOV N$品质 = 2 ; 蓝色
#ELSEACT
SMALL N$随机数 95
#ACT
MOV N$品质 = 3 ; 紫色
#ELSEACT
SMALL N$随机数 99
#ACT
MOV N$品质 = 4 ; 橙色
#ELSEACT
MOV N$品质 = 5 ; 红色
; 黄金洗练品质提升
EQUAL N$品质加成 5
#ACT
SMALL N$品质 5
MOV N$品质 += 1
; 根据品质生成对应词条
GOSUB @根据品质生成属性
RETURN

[@根据品质生成属性]
#ACT
; 随机1-4条词条
MOV N$词条数量 = 0
RANDOM N$词条数量 4
INC N$词条数量 1
; 初始化属性
MOV N$攻击_MIN = 0
MOV N$攻击_MAX = 0
MOV N$魔法_MIN = 0
MOV N$魔法_MAX = 0
MOV N$道术_MIN = 0
MOV N$道术_MAX = 0
MOV N$防御_MIN = 0
MOV N$防御_MAX = 0
MOV N$魔防_MIN = 0
MOV N$魔防_MAX = 0
MOV N$生命值 = 0
MOV N$魔法值 = 0
MOV N$麻痹概率 = 0
MOV N$护身概率 = 0
MOV N$复活概率 = 0
MOV N$伤害增加 = 0
MOV N$伤害减免 = 0
; 根据品质系数生成数值
; 品质系数：白1 蓝1.5 紫2 橙2.5 红3
MOV N$系数 = 10
EQUAL N$品质 2
MOV N$系数 = 15
EQUAL N$品质 3
MOV N$系数 = 20
EQUAL N$品质 4
MOV N$系数 = 25
EQUAL N$品质 5
MOV N$系数 = 30
; 循环生成词条
MOV N$当前词条 = 0
WHILE N$当前词条 < N$词条数量
DO GOSUB @生成单条词条
INC N$当前词条 1
LOOP
RETURN

[@生成单条词条]
#ACT
MOV N$属性类型 = 0
; 红色品质必出稀有词条
EQUAL N$品质 5
#ACT
RANDOM N$属性类型 5
INC N$属性类型 8
RETURN
#IF
#ACT
; 普通属性池
RANDOM N$属性类型 8
; 根据类型生成数值
EQUAL N$属性类型 0 ; 攻击
GOSUB @生成攻击属性
EQUAL N$属性类型 1 ; 魔法
GOSUB @生成魔法属性
EQUAL N$属性类型 2 ; 道术
GOSUB @生成道术属性
EQUAL N$属性类型 3 ; 防御
GOSUB @生成防御属性
EQUAL N$属性类型 4 ; 魔防
GOSUB @生成魔防属性
EQUAL N$属性类型 5 ; 生命
GOSUB @生成生命属性
EQUAL N$属性类型 6 ; 魔法值
GOSUB @生成魔法值属性
; 稀有词条（高品质才有概率）
EQUAL N$属性类型 7
LARGE N$品质 2
#ACT
RANDOM N$稀有类型 5
INC N$稀有类型 8
MOV N$属性类型 = N$稀有类型
GOSUB @生成稀有属性
RETURN

[@生成攻击属性]
#ACT
RANDOM N$攻击_MIN 5
INC N$攻击_MIN 1
RANDOM N$攻击_MAX 10
INC N$攻击_MAX 1
CALCVAR N$攻击_MIN = N$攻击_MIN * N$系数 / 10
CALCVAR N$攻击_MAX = N$攻击_MAX * N$系数 / 10
RETURN

[@生成魔法属性]
#ACT
RANDOM N$魔法_MIN 5
INC N$魔法_MIN 1
RANDOM N$魔法_MAX 10
INC N$魔法_MAX 1
CALCVAR N$魔法_MIN = N$魔法_MIN * N$系数 / 10
CALCVAR N$魔法_MAX = N$魔法_MAX * N$系数 / 10
RETURN

[@生成道术属性]
#ACT
RANDOM N$道术_MIN 5
INC N$道术_MIN 1
RANDOM N$道术_MAX 10
INC N$道术_MAX 1
CALCVAR N$道术_MIN = N$道术_MIN * N$系数 / 10
CALCVAR N$道术_MAX = N$道术_MAX * N$系数 / 10
RETURN

[@生成防御属性]
#ACT
RANDOM N$防御_MIN 3
INC N$防御_MIN 1
RANDOM N$防御_MAX 6
INC N$防御_MAX 1
CALCVAR N$防御_MIN = N$防御_MIN * N$系数 / 10
CALCVAR N$防御_MAX = N$防御_MAX * N$系数 / 10
RETURN

[@生成魔防属性]
#ACT
RANDOM N$魔防_MIN 3
INC N$魔防_MIN 1
RANDOM N$魔防_MAX 6
INC N$魔防_MAX 1
CALCVAR N$魔防_MIN = N$魔防_MIN * N$系数 / 10
CALCVAR N$魔防_MAX = N$魔防_MAX * N$系数 / 10
RETURN

[@生成生命属性]
#ACT
RANDOM N$生命值 190
INC N$生命值 10
CALCVAR N$生命值 = N$生命值 * N$系数 / 10
RETURN

[@生成魔法值属性]
#ACT
RANDOM N$魔法值 140
INC N$魔法值 10
CALCVAR N$魔法值 = N$魔法值 * N$系数 / 10
RETURN

[@生成稀有属性]
#ACT
EQUAL N$属性类型 8 ; 麻痹概率
RANDOM N$麻痹概率 9
INC N$麻痹概率 1
CALCVAR N$麻痹概率 = N$麻痹概率 * N$系数 / 10
EQUAL N$属性类型 9 ; 护身概率
RANDOM N$护身概率 9
INC N$护身概率 1
CALCVAR N$护身概率 = N$护身概率 * N$系数 / 10
EQUAL N$属性类型 10 ; 复活概率
RANDOM N$复活概率 4
INC N$复活概率 1
CALCVAR N$复活概率 = N$复活概率 * N$系数 / 10
EQUAL N$属性类型 11 ; 伤害增加
RANDOM N$伤害增加 4
INC N$伤害增加 1
CALCVAR N$伤害增加 = N$伤害增加 * N$系数 / 10
EQUAL N$属性类型 12 ; 伤害减免
RANDOM N$伤害减免 4
INC N$伤害减免 1
CALCVAR N$伤害减免 = N$伤害减免 * N$系数 / 10
RETURN

[@洗练结果显示]
#ACT
MOV S$品质颜色 = 白色
MOV S$品质名称 = 普通
EQUAL N$品质 2
MOV S$品质颜色 = 蓝色
MOV S$品质名称 = 优秀
EQUAL N$品质 3
MOV S$品质颜色 = 紫色
MOV S$品质名称 = 精良
EQUAL N$品质 4
MOV S$品质颜色 = 橙色
MOV S$品质名称 = 史诗
EQUAL N$品质 5
MOV S$品质颜色 = 红色
MOV S$品质名称 = 传说
#SAY
\ \
      ╔══════════════════════════════╗
      ║        【洗练结果】        ║
      ╚══════════════════════════════╝
\
  装备品质：<$STR(S$品质颜色)>【<$STR(S$品质名称)>】

一刀烈火走江湖

卧龙霸主

本主题需向作者支付 10000 金钱 才能浏览

147258

卧龙霸主 发表于 2026-5-24 16:32
本主题需向作者支付 10000 金钱 才能浏览

部分内容在下面，纯LUA脚本联系QQ372111742

为你而来

怪怪

你这是996的还是HGE的？

怪怪

如果事HGE的，你得修改HGE兼容
如果事996的我删贴了

147258

怪怪 发表于 2026-5-24 18:02
如果事HGE的，你得修改HGE兼容
如果事996的我删贴了

兼容的，

463507737

有截图吗