盛大盟重神兵魂石洗练脚本

147258

;==========================================; 【盟重神兵】魂石洗练系统完整版; 所有机制、数值、细节与盛大盟重神兵完全一致; 可以根据内容自行修改;==========================================[@main]#IF#ACTMOV S$当前日期 <$DATETIME>STRLEFT S$今日日期 S$当前日期 10; 每日0点重置免费次数CHECKVAR HUMAN 魂石今日日期 <> S$今日日期#ACTSETVAR HUMAN 魂石今日日期 = S$今日日期SETVAR HUMAN 每日免费白银洗练 = 1SENDMSG 6 【系统】每日魂石洗练免费次数已重置！#IF#ACTMOV N$幸运进度 <$HUMAN(魂石幸运值)>MOV N$免费次数 <$HUMAN(每日免费白银洗练)>CALCVAR N$幸运百分比 = N$幸运进度 * 100CALCVAR 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>[@白银洗练]#IFCHECKVAR HUMAN 每日免费白银洗练 > 0#ACTSETVAR HUMAN 每日免费白银洗练 -= 1GOTO @执行白银洗练免费#ELSEACTGOTO @执行白银洗练[@执行白银洗练免费]#IFCHECKBOXITEMCOUNT 0 < 1#ACTMESSAGEBOX 请先放入需要洗练的装备！BREAK#IF#ACT; 累计幸运值SETVAR HUMAN 魂石幸运值 += 1; 检查是否达到保底CHECKVAR HUMAN 魂石幸运值 >= 88#ACTSETVAR HUMAN 魂石幸运值 = 0MOV N$强制红色 = 1SENDMSG 5 【恭喜】幸运值已满，本次必出红色稀有词条！#ELSEACTMOV N$强制红色 = 0; 执行洗练GOSUB @随机生成词条SENDMSG 6 【免费洗练成功】装备洗练完成！GOTO @洗练结果显示[@执行白银洗练]#IFCHECKBOXITEMCOUNT 0 < 1#ACTMESSAGEBOX 请先放入需要洗练的装备！BREAK#IFCHECKITEM 洗炼石 3CHECKGOLD 5000#ACTTAKE 洗炼石 3TAKEGOLD 5000; 累计幸运值SETVAR HUMAN 魂石幸运值 += 1; 检查是否达到保底CHECKVAR HUMAN 魂石幸运值 >= 88#ACTSETVAR HUMAN 魂石幸运值 = 0MOV N$强制红色 = 1SENDMSG 5 【恭喜】幸运值已满，本次必出红色稀有词条！#ELSEACTMOV N$强制红色 = 0; 执行洗练GOSUB @随机生成词条SENDMSG 6 【洗练成功】消耗洗炼石×3 金币×5000GOTO @洗练结果显示#ELSEACTMESSAGEBOX 材料不足！需要洗炼石×3 + 金币×5000BREAK[@黄金洗练]#IFCHECKBOXITEMCOUNT 0 < 1#ACTMESSAGEBOX 请先放入需要洗练的装备！BREAK#IFCHECKITEM 洗炼石 15CHECKITEM 晶铁 3CHECKGOLD 30000#ACTTAKE 洗炼石 15TAKE 晶铁 3TAKEGOLD 30000; 累计幸运值（黄金洗练同样计入保底）SETVAR HUMAN 魂石幸运值 += 1; 检查是否达到保底CHECKVAR HUMAN 魂石幸运值 >= 88#ACTSETVAR HUMAN 魂石幸运值 = 0MOV N$强制红色 = 1SENDMSG 5 【恭喜】幸运值已满，本次必出红色稀有词条！#ELSEACTMOV N$强制红色 = 0; 黄金洗练提升红色概率MOV N$品质加成 = 5; 执行洗练GOSUB @随机生成词条SENDMSG 6 【黄金洗练成功】消耗洗炼石×15 晶铁×3 金币×30000GOTO @洗练结果显示#ELSEACTMESSAGEBOX 材料不足！需要洗炼石×15 + 晶铁×3 + 金币×30000BREAK[@随机生成词条]#ACT; 品质判定MOV N$随机数 = 0MOV N$品质 = 0RANDOM N$随机数 100; 强制红色（保底机制）EQUAL N$强制红色 1#ACTMOV N$品质 = 5RETURN#IF#ACT; 原版品质概率：白60% 蓝25% 紫10% 橙4% 红1%SMALL N$随机数 60#ACTMOV N$品质 = 1 ; 白色#ELSEACTSMALL N$随机数 85#ACTMOV N$品质 = 2 ; 蓝色#ELSEACTSMALL N$随机数 95#ACTMOV N$品质 = 3 ; 紫色#ELSEACTSMALL N$随机数 99#ACTMOV N$品质 = 4 ; 橙色#ELSEACTMOV N$品质 = 5 ; 红色; 黄金洗练品质提升EQUAL N$品质加成 5#ACTSMALL N$品质 5MOV N$品质 += 1; 根据品质生成对应词条GOSUB @根据品质生成属性RETURN[@根据品质生成属性]#ACT; 随机1-4条词条MOV N$词条数量 = 0RANDOM N$词条数量 4INC N$词条数量 1; 初始化属性MOV N$攻击_MIN = 0MOV N$攻击_MAX = 0MOV N$魔法_MIN = 0MOV N$魔法_MAX = 0MOV N$道术_MIN = 0MOV N$道术_MAX = 0MOV N$防御_MIN = 0MOV N$防御_MAX = 0MOV N$魔防_MIN = 0MOV N$魔防_MAX = 0MOV N$生命值 = 0MOV N$魔法值 = 0MOV N$麻痹概率 = 0MOV N$护身概率 = 0MOV N$复活概率 = 0MOV N$伤害增加 = 0MOV N$伤害减免 = 0; 根据品质系数生成数值; 品质系数：白1 蓝1.5 紫2 橙2.5 红3MOV N$系数 = 10EQUAL N$品质 2MOV N$系数 = 15EQUAL N$品质 3MOV N$系数 = 20EQUAL N$品质 4MOV N$系数 = 25EQUAL N$品质 5MOV N$系数 = 30; 循环生成词条MOV N$当前词条 = 0WHILE N$当前词条 < N$词条数量DO GOSUB @生成单条词条INC N$当前词条 1LOOPRETURN[@生成单条词条]#ACTMOV N$属性类型 = 0; 红色品质必出稀有词条EQUAL N$品质 5#ACTRANDOM N$属性类型 5INC N$属性类型 8RETURN#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$属性类型 7LARGE N$品质 2#ACTRANDOM N$稀有类型 5INC N$稀有类型 8MOV N$属性类型 = N$稀有类型GOSUB @生成稀有属性RETURN[@生成攻击属性]#ACTRANDOM N$攻击_MIN 5INC N$攻击_MIN 1RANDOM N$攻击_MAX 10INC N$攻击_MAX 1CALCVAR N$攻击_MIN = N$攻击_MIN * N$系数 / 10CALCVAR N$攻击_MAX = N$攻击_MAX * N$系数 / 10RETURN[@生成魔法属性]#ACTRANDOM N$魔法_MIN 5INC N$魔法_MIN 1RANDOM N$魔法_MAX 10INC N$魔法_MAX 1CALCVAR N$魔法_MIN = N$魔法_MIN * N$系数 / 10CALCVAR N$魔法_MAX = N$魔法_MAX * N$系数 / 10RETURN[@生成道术属性]#ACTRANDOM N$道术_MIN 5INC N$道术_MIN 1RANDOM N$道术_MAX 10INC N$道术_MAX 1CALCVAR N$道术_MIN = N$道术_MIN * N$系数 / 10CALCVAR N$道术_MAX = N$道术_MAX * N$系数 / 10RETURN[@生成防御属性]#ACTRANDOM N$防御_MIN 3INC N$防御_MIN 1RANDOM N$防御_MAX 6INC N$防御_MAX 1CALCVAR N$防御_MIN = N$防御_MIN * N$系数 / 10CALCVAR N$防御_MAX = N$防御_MAX * N$系数 / 10RETURN[@生成魔防属性]#ACTRANDOM N$魔防_MIN 3INC N$魔防_MIN 1RANDOM N$魔防_MAX 6INC N$魔防_MAX 1CALCVAR N$魔防_MIN = N$魔防_MIN * N$系数 / 10CALCVAR N$魔防_MAX = N$魔防_MAX * N$系数 / 10RETURN[@生成生命属性]#ACTRANDOM N$生命值 190INC N$生命值 10CALCVAR N$生命值 = N$生命值 * N$系数 / 10RETURN[@生成魔法值属性]#ACTRANDOM N$魔法值 140INC N$魔法值 10CALCVAR N$魔法值 = N$魔法值 * N$系数 / 10RETURN[@生成稀有属性]#ACTEQUAL N$属性类型 8 ; 麻痹概率RANDOM N$麻痹概率 9INC N$麻痹概率 1CALCVAR N$麻痹概率 = N$麻痹概率 * N$系数 / 10EQUAL N$属性类型 9 ; 护身概率RANDOM N$护身概率 9INC N$护身概率 1CALCVAR N$护身概率 = N$护身概率 * N$系数 / 10EQUAL N$属性类型 10 ; 复活概率RANDOM N$复活概率 4INC N$复活概率 1CALCVAR N$复活概率 = N$复活概率 * N$系数 / 10EQUAL N$属性类型 11 ; 伤害增加RANDOM N$伤害增加 4INC N$伤害增加 1CALCVAR N$伤害增加 = N$伤害增加 * N$系数 / 10EQUAL N$属性类型 12 ; 伤害减免RANDOM N$伤害减免 4INC N$伤害减免 1CALCVAR N$伤害减免 = N$伤害减免 * N$系数 / 10RETURN[@洗练结果显示]#ACTMOV S$品质颜色 = 白色MOV S$品质名称 = 普通EQUAL N$品质 2MOV S$品质颜色 = 蓝色MOV S$品质名称 = 优秀EQUAL N$品质 3MOV S$品质颜色 = 紫色MOV S$品质名称 = 精良EQUAL N$品质 4MOV S$品质颜色 = 橙色MOV S$品质名称 = 史诗EQUAL N$品质 5MOV S$品质颜色 = 红色MOV S$品质名称 = 传说#SAY\ \      ╔══════════════════════════════╗      ║        【洗练结果】        ║      ╚══════════════════════════════╝\  装备品质：<$STR(S$品质颜色)>【<$STR(S$品质名称)>】\  ──────────────────────────────────\  攻击：<$STR(N$攻击_MIN)>-<$STR(N$攻击_MAX)>  魔法：<$STR(N$魔法_MIN)>-<$STR(N$魔法_MAX)>  道术：<$STR(N$道术_MIN)>-<$STR(N$道术_MAX)>  防御：<$STR(N$防御_MIN)>-<$STR(N$防御_MAX)>  魔防：<$STR(N$魔防_MIN)>-<$STR(N$魔防_MAX)>  生命值：+<$STR(N$生命值)>  魔法值：+<$STR(N$魔法值)>\  LARGE N$麻痹概率 0  麻痹概率：+<$STR(N$麻痹概率)>.0%  LARGE N$护身概率 0  护身概率：+<$STR(N$护身概率)>.0%  LARGE N$复活概率 0  复活概率：+<$STR(N$复活概率)>.0%  LARGE N$伤害增加 0  伤害增加：+<$STR(N$伤害增加)>.0%  LARGE N$伤害减免 0  伤害减免：+<$STR(N$伤害减免)>.0%\  ──────────────────────────────────\  <确认保留属性/@确认洗练>  <放弃重新洗练/@洗练选择>\  <返回主菜单/@main>[@确认洗练]#ACT; 这里调用QFunction将属性写入装备-----------------------------