|
马上注册,下载996引擎,与更多游戏开发者交流。
您需要 登录 才可以下载或查看,没有账号?注册
×
;================================================================================
; UI开始洗练 - 安全的入口点
;================================================================================
[@UI_开始洗练]
#IF
; 检查是否佩戴了宝物
CHECKUSEITEM <$cfg_宝物洗练(<$STR(N$宝物当前行号)>_2)>
#ACT
; 生成一次性操作指纹
MOVR N$随机值 100 999
MOV S$操作指纹 <$STR(S$会话指纹)><$STR(N$随机值)>
; 跳转到执行函数
goto @开始洗练
#ELSEACT
sendmsg 9 请先佩戴宝物!
break
;================================================================================
; 开始洗练执行 - 核心逻辑
;================================================================================
[@开始洗练]
#IF
; 第一步:验证操作指纹是否有效
NOT EQUAL S$操作指纹 <$STR(S$操作指纹)>
#ACT
MESSAGEBOX 非法请求,请从界面正常操作!
BREAK
#IF
; 第二步:再次验证宝物佩戴状态(防止中途取下)
NOT CHECKUSEITEM <$cfg_宝物洗练(<$STR(N$宝物当前行号)>_2)>
#act
MESSAGEBOX 请保持宝物佩戴状态!
; 清除无效指纹
MOV S$操作指纹
BREAK
#if
; 第三步:检查金币是否足够
CheckBindMoney 绑定<$cfg_宝物洗练(<$GetTypeBRow(cfg_宝物洗练,0,<$str(S$宝物洗练等级)>)>_2)> ? <$cfg_宝物洗练(<$GetTypeBRow(cfg_宝物洗练,0,<$str(S$宝物洗练等级)>)>_3)>
#act
MOVR N$第1条值 1 6
MOVR N$第2条值 1 6
MOVR N$第3条值 1 6
MOVR N$第4条值 1 6
MOVR N$第5条值 1 6
;获取部位标识
MOV N$部位标识 <$cfg_宝物洗练(<$STR(N$宝物当前行号)>_2)>
#elseact
;清除无效指纹
MOV S$操作指纹
sendmsg 9 您缺少货币:<$cfg_宝物洗练(<$GetTypeBRow(cfg_宝物洗练,0,<$str(S$宝物洗练等级)>)>_2)>x<$cfg_宝物洗练(<$GetTypeBRow(cfg_宝物洗练,0,<$str(S$宝物洗练等级)>)>_3)>!
break
#if
equal S$宝物洗练等级 [洗练等级]:传说
#act
MOV S$品质名称 [洗练等级]:传说
goto @添加属性
break
; 传说品质 - 5%
#IF
RANDOMEX 5 100
#ACT
MOV S$品质名称 [洗练等级]:传说
goto @添加属性
break
; 史诗品质 - 10%
#IF
RANDOMEX 10 100
#ACT
MOV S$品质名称 [洗练等级]:史诗
MOV N$第5条值 0
goto @添加属性
break
; 精品品质 - 15%
#IF
RANDOMEX 15 100
#ACT
MOV S$品质名称 [洗练等级]:极品
MOV N$第4条值 0
MOV N$第5条值 0
goto @添加属性
break
; 稀有品质 - 20%
#IF
RANDOMEX 25 100
#ACT
MOV S$品质名称 [洗练等级]:稀有
MOV N$第3条值 0
MOV N$第4条值 0
MOV N$第5条值 0
goto @添加属性
break
#elseact
;普通品质-100%
MOV S$品质名称 [洗练等级]:普通
MOV N$第2条值 0
MOV N$第3条值 0
MOV N$第4条值 0
MOV N$第5条值 0
goto @添加属性
break
[@添加属性]
#IF
; 验证操作指纹有效性
NOT EQUAL S$操作指纹 <$STR(S$操作指纹)>
#ACT
MESSAGEBOX 操作已过期,请重新开始!
BREAK
#if
;再次验证货币
CheckBindMoney 绑定<$cfg_宝物洗练(<$GetTypeBRow(cfg_宝物洗练,0,<$str(S$宝物洗练等级)>)>_2)> ? <$cfg_宝物洗练(<$GetTypeBRow(cfg_宝物洗练,0,<$str(S$宝物洗练等级)>)>_3)>
#act
;扣除金币
ChangeBindMoney 绑定<$cfg_宝物洗练(<$GetTypeBRow(cfg_宝物洗练,0,<$str(S$宝物洗练等级)>)>_2)> <$cfg_宝物洗练(<$GetTypeBRow(cfg_宝物洗练,0,<$str(S$宝物洗练等级)>)>_3)>
;添加自定义属性
goto @宝物洗练界面
break
|
最后回复时间:2025-09-03 17:28:08官方回复了此贴
|