设为首页收藏本站提交工单

 找回密码
 立即注册
折翼天使社区»论坛首页 › 折翼天使服务中心 › 交流探讨 › 脚本求助，本人笨！求大神给改下！
返回列表 发新帖
查看: 198|回复: 6

脚本求助，本人笨！求大神给改下！

[复制链接]
阳光小鸟

215

主题

501

回帖

768

积分

高级会员

积分
768
发表于 2026-3-29 18:35:38 | 显示全部楼层 |阅读模式
我是想先检测升级框里的物品是极品才能重新洗，
然后洗这个物品总属性最高就是+3，可能是单属性+3也可能是 分开有+1 +2 的，或者3个都+1
[@main]
#IF
EQUAL U0 1
#ACT
#SAY
欢迎您来到“<$SERVERNAME>”最具特色的小极品体验不一样的\\
游戏感觉！<极品重铸/FCOLOR=250>：<发掘装备潜力属性，让它的属性再次被发现/FCOLOR=251>\\
<出来！/FCOLOR=250>  此极品重铸功能充满了未知性！<建议/FCOLOR=250>：<打造前先洗澡更衣/FCOLOR=254>\\
<烧香拜佛！/FCOLOR=254>想想各种极品属性附加为单独一项........\\ \\
<武器属性/FCOLOR=250>：单极品属性点数不大于3点！（攻击 魔法 道术随机）\\
<衣服属性/FCOLOR=250>：单极品属性点数不大于3点！（防御魔御攻魔道随机）\\
<其他装备/FCOLOR=250>：单极品属性点数不大于3点！（<装备幸运属性可保留/FCOLOR=250>）\\
<注意/FCOLOR=251>：<装备原有的极品属性将会被清除！/FCOLOR=250>〖<现在开始打造大极品/@进入重塑>〗\\
BREAK
[@进入重塑]
#IF
#ACT
#SAY
衣服武器打造费用： 50万金币  其他装备打造费用： 50万金币 \\
<说明/FCOLOR=251>：极品属性有可能点数全加到一种属性上，当然也有可能分散\\
在几种属性上，可谓变幻无穷.乐趣无边！\\
其中奥秘也只有您自己才能探索发现！<建议/FCOLOR=250>：<打造前先洗澡更衣烧/FCOLOR=254>\\
<香拜佛！/FCOLOR=254> <注意/FCOLOR=251>：<原有极品属性将被清除/FCOLOR=254>\\
<提示/FCOLOR=251>：<人品爆发的玩家甚至可以打破极品点数哦！/FCOLOR=250><如遇见、请珍惜/FCOLOR=254>\\
<开始打造极品/@开始重塑>     \\
[@开始重塑]
#IF
checkgold 500000
#ACT
OPENUPGRADEDLG 放入要打造的装备
break
#ELSEACT
MessageBox 错误提示：你放入洞不是极品装备或者你的金币不足，不能进行打造！
break
[@UpgradeDlgItem]
#OR
EQUAL <$DLGITEM.STDMODE> 5
EQUAL <$DLGITEM.STDMODE> 6
#Act
take 金币  500000
CHANGEITEMADDVALUE -1 0 = 0
CHANGEITEMADDVALUE -1 1 = 0
CHANGEITEMADDVALUE -1 2 = 0
MOVR M3 3
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
MOVR M3 3
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
MOVR M3 3
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
GETITEMADDVALUE  -1 0 M2
MOV S3 攻击<$STR(M2)>点，
GETITEMADDVALUE  -1 1 M3
INC S3 魔法<$STR(M3)>点，
GETITEMADDVALUE  -1 2 M4
INC S3 道术<$STR(M4)>点，
INC M2 1
INC M3 1
INC M4 1
MOV M90 <$STR(M2)>
INC M90 <$STR(M3)>
MOV M91 <$STR(M4)>
MOV M7 <$STR(M91)>
INC M7 <$STR(M90)>
DEC M7 3
SENDMSG 0 恭喜“%s”对“<$DLGITEM.NAME>”成功进行了极品重铸，共发掘出潜力属性“<$STR(M7)>”点，分别增加“<$STR(S3)>”........ 251 249
RECLAIMITEM
DELAYCALL 10 @开始重塑
BREAK
#OR
EQUAL <$DLGITEM.STDMODE> 19
EQUAL <$DLGITEM.STDMODE> 20
EQUAL <$DLGITEM.STDMODE> 21
#Act
take 金币  500000
CHANGEITEMADDVALUE -1 2 = 0
CHANGEITEMADDVALUE -1 3 = 0
CHANGEITEMADDVALUE -1 4 = 0
MOVR M3 3
INC M3 2
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
MOVR M3 3
INC M3 2
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
MOVR M3 3
INC M3 2
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
GETITEMADDVALUE -1 2 M2
MOV S3 攻击<$STR(M2)>点，
GETITEMADDVALUE -1 3 M3
INC S3 魔法<$STR(M3)>点，
GETITEMADDVALUE -1 4 M4
INC S3 道术<$STR(M4)>点，
INC M2 1
INC M3 1
INC M4 1
MOV M90 <$STR(M2)>
INC M90 <$STR(M3)>
MOV M91 <$STR(M4)>
MOV M7 <$STR(M91)>
INC M7 <$STR(M90)>
DEC M7 3
SENDMSG 0 恭喜“%s”对“<$DLGITEM.NAME>”成功进行了极品重铸，共发掘出潜力属性“<$STR(M7)>”点，分别增加“<$STR(S3)>”........ 251 249
RECLAIMITEM
DELAYCALL 10 @开始重塑
BREAK
#OR
EQUAL <$DLGITEM.STDMODE> 10
EQUAL <$DLGITEM.STDMODE> 11
#Act
take 金币  500000
CHANGEITEMADDVALUE -1 0 = 0
CHANGEITEMADDVALUE -1 1 = 0
CHANGEITEMADDVALUE -1 2 = 0
CHANGEITEMADDVALUE -1 3 = 0
CHANGEITEMADDVALUE -1 4 = 0
MOVR M3 3
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
MOVR M3 3
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
MOVR M3 3
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
MOVR M3 3
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
MOVR M3 3
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
GETITEMADDVALUE -1 0 M2
MOV S3 防御<$STR(M2)>点，
GETITEMADDVALUE -1 1 M3
INC S3 魔法防御<$STR(M3)>点，
GETITEMADDVALUE -1 2 M4
INC S3 攻击<$STR(M4)>点，
GETITEMADDVALUE -1 3 M5
INC S3 魔法<$STR(M5)>点，
GETITEMADDVALUE -1 4 M6
INC S3 道术<$STR(M6)>点，
INC M2 1
INC M3 1
INC M4 1
INC M5 1
INC M6 1
MOV M90 <$STR(M2)>
INC M90 <$STR(M3)>
MOV M91 <$STR(M4)>
INC M91 <$STR(M5)>
MOV M92 <$STR(M6)>
INC M92 <$STR(M90)>
MOV M7 <$STR(M91)>
INC M7 <$STR(M92)>
DEC M7 3
SENDMSG 0 恭喜“%s”对“<$DLGITEM.NAME>”成功进行了极品重铸，共发掘出潜力属性“<$STR(M7)>”点，分别增加“<$STR(S3)>”........ 251 249
RECLAIMITEM
DELAYCALL 10 @开始重塑
BREAK
#ELSEACT
take 金币  500000
CHANGEITEMADDVALUE -1 0 = 0
CHANGEITEMADDVALUE -1 1 = 0
CHANGEITEMADDVALUE -1 2 = 0
CHANGEITEMADDVALUE -1 3 = 0
CHANGEITEMADDVALUE -1 4 = 0
MOVR M3 3
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
MOVR M3 3
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
MOVR M3 3
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
MOVR M3 3
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
MOVR M3 3
MOVR M4 3
CHANGEITEMADDVALUE -1 <$STR(M3)> = <$STR(M4)>
GETITEMADDVALUE -1 0 M2
MOV S3 防御<$STR(M2)>点，
GETITEMADDVALUE -1 1 M3
INC S3 魔法防御<$STR(M3)>点，
GETITEMADDVALUE -1 2 M4
INC S3 攻击<$STR(M4)>点，
GETITEMADDVALUE -1 3 M5
INC S3 魔法<$STR(M5)>点，
GETITEMADDVALUE -1 4 M6
INC S3 道术<$STR(M6)>点，
INC M2 1
INC M3 1
INC M4 1
INC M5 1
INC M6 1
MOV M90 <$STR(M2)>
INC M90 <$STR(M3)>
MOV M91 <$STR(M4)>
INC M91 <$STR(M5)>
MOV M92 <$STR(M6)>
INC M92 <$STR(M90)>
MOV M7 <$STR(M91)>
INC M7 <$STR(M92)>
DEC M7 3
SENDMSG 0 恭喜“%s”对“<$DLGITEM.NAME>”成功进行了极品重铸，共发掘出潜力属性“<$STR(M7)>”点，分别增加“<$STR(S3)>”........ 251 249
RECLAIMITEM
DELAYCALL 10 @开始重塑
BREAK
回复

举报

帅气小狗

253

主题

583

回帖

255

积分

中级会员

积分
255
发表于 2026-3-29 18:35:38 | 显示全部楼层
    [@main]
    #IF
    ; EQUAL U0 1
    #ACT
    #SAY
    欢迎您来到“<$SERVERNAME>”最具特色的小极品体验不一样的\\
    游戏感觉！<极品重铸/FCOLOR=250>：<发掘装备潜力属性，让它的属性再次被发现/FCOLOR=251>\\
    <出来！/FCOLOR=250>  此极品重铸功能充满了未知性！<建议/FCOLOR=250>：<打造前先洗澡更衣/FCOLOR=254>\\
    <烧香拜佛！/FCOLOR=254>想想各种极品属性附加为单独一项........\\ \\
    <武器属性/FCOLOR=250>：单极品属性点数不大于3点！（攻击 魔法 道术随机）\\
    <衣服属性/FCOLOR=250>：单极品属性点数不大于3点！（防御魔御攻魔道随机）\\
    <其他装备/FCOLOR=250>：单极品属性点数不大于3点！（<装备幸运属性可保留/FCOLOR=250>）\\
    <注意/FCOLOR=251>：<装备原有的极品属性将会被清除！/FCOLOR=250>〖<现在开始打造大极品/@进入重塑>〗\\

    [@进入重塑]
    #IF
    #ACT
    #SAY
    衣服武器打造费用： 50万金币  其他装备打造费用： 50万金币 \\
    <说明/FCOLOR=251>：极品属性有可能点数全加到一种属性上，当然也有可能分散\\
    在几种属性上，可谓变幻无穷.乐趣无边！\\
    其中奥秘也只有您自己才能探索发现！<建议/FCOLOR=250>：<打造前先洗澡更衣烧/FCOLOR=254>\\
    <香拜佛！/FCOLOR=254> <注意/FCOLOR=251>：<原有极品属性将被清除/FCOLOR=254>\\
    <提示/FCOLOR=251>：<人品爆发的玩家甚至可以打破极品点数哦！/FCOLOR=250><如遇见、请珍惜/FCOLOR=254>\\
    <开始打造极品/@开始重塑>     \\
    [@开始重塑]
    #IF
    checkgold 500000
    #ACT
    OPENUPGRADEDLG 放入要打造的装备
    break
    #ELSEACT
    MessageBox 错误提示：你放入洞不是极品装备或者你的金币不足，不能进行打造！
    break

    [@UpgradeDlgItem]
    #OR
    CheckItemAddValue -1 0 > 0
    CheckItemAddValue -1 1 > 0
    CheckItemAddValue -1 2 > 0
    CheckItemAddValue -1 3 > 0
    CheckItemAddValue -1 4 > 0
    #ACT
    #ELSEACT
    RECLAIMITEM
    messagebox 极品装备才能重新洗！
    bREAK

    #OR
    EQUAL <$DLGITEM.STDMODE> 5
    EQUAL <$DLGITEM.STDMODE> 6
    #Act
    take 金币  500000
    CHANGEITEMADDVALUE -1 0 = 0
    CHANGEITEMADDVALUE -1 1 = 0
    CHANGEITEMADDVALUE -1 2 = 0
    MOV N$总点数 4

    MOVR M4 4
    CHANGEITEMADDVALUE -1 0 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 1 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 2 = <$STR(M4)>

    GETITEMADDVALUE  -1 0 M2
    MOV S3 攻击<$STR(M2)>点，
    GETITEMADDVALUE  -1 1 M3
    INC S3 魔法<$STR(M3)>点，
    GETITEMADDVALUE  -1 2 M4
    INC S3 道术<$STR(M4)>点，
    INC M2 1
    INC M3 1
    INC M4 1
    MOV M90 <$STR(M2)>
    INC M90 <$STR(M3)>
    MOV M91 <$STR(M4)>
    MOV M7 <$STR(M91)>
    INC M7 <$STR(M90)>
    DEC M7 3
    SENDMSG 0 恭喜“%s”对“<$DLGITEM.NAME>”成功进行了极品重铸，共发掘出潜力属性“<$STR(M7)>”点，分别增加“<$STR(S3)>”........ 251 249
    RECLAIMITEM
    DELAYCALL 10 @开始重塑
    BREAK
    #OR
    EQUAL <$DLGITEM.STDMODE> 19
    EQUAL <$DLGITEM.STDMODE> 20
    EQUAL <$DLGITEM.STDMODE> 21
    #Act
    take 金币  500000
    CHANGEITEMADDVALUE -1 2 = 0
    CHANGEITEMADDVALUE -1 3 = 0
    CHANGEITEMADDVALUE -1 4 = 0
    MOV N$总点数 4

    MOVR M4 4
    CHANGEITEMADDVALUE -1 2 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 3 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 4 = <$STR(M4)>

    GETITEMADDVALUE -1 2 M2
    MOV S3 攻击<$STR(M2)>点，
    GETITEMADDVALUE -1 3 M3
    INC S3 魔法<$STR(M3)>点，
    GETITEMADDVALUE -1 4 M4
    INC S3 道术<$STR(M4)>点，
    INC M2 1
    INC M3 1
    INC M4 1
    MOV M90 <$STR(M2)>
    INC M90 <$STR(M3)>
    MOV M91 <$STR(M4)>
    MOV M7 <$STR(M91)>
    INC M7 <$STR(M90)>
    DEC M7 3
    SENDMSG 0 恭喜“%s”对“<$DLGITEM.NAME>”成功进行了极品重铸，共发掘出潜力属性“<$STR(M7)>”点，分别增加“<$STR(S3)>”........ 251 249
    RECLAIMITEM
    DELAYCALL 10 @开始重塑
    BREAK
    #OR
    EQUAL <$DLGITEM.STDMODE> 10
    EQUAL <$DLGITEM.STDMODE> 11
    #Act
    take 金币  500000
    CHANGEITEMADDVALUE -1 0 = 0
    CHANGEITEMADDVALUE -1 1 = 0
    CHANGEITEMADDVALUE -1 2 = 0
    CHANGEITEMADDVALUE -1 3 = 0
    CHANGEITEMADDVALUE -1 4 = 0
    MOV N$总点数 4

    MOVR M4 4
    CHANGEITEMADDVALUE -1 0 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 1 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 2 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 3 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 4 = <$STR(M4)>

    GETITEMADDVALUE -1 0 M2
    MOV S3 防御<$STR(M2)>点，
    GETITEMADDVALUE -1 1 M3
    INC S3 魔法防御<$STR(M3)>点，
    GETITEMADDVALUE -1 2 M4
    INC S3 攻击<$STR(M4)>点，
    GETITEMADDVALUE -1 3 M5
    INC S3 魔法<$STR(M5)>点，
    GETITEMADDVALUE -1 4 M6
    INC S3 道术<$STR(M6)>点，
    INC M2 1
    INC M3 1
    INC M4 1
    INC M5 1
    INC M6 1
    MOV M90 <$STR(M2)>
    INC M90 <$STR(M3)>
    MOV M91 <$STR(M4)>
    INC M91 <$STR(M5)>
    MOV M92 <$STR(M6)>
    INC M92 <$STR(M90)>
    MOV M7 <$STR(M91)>
    INC M7 <$STR(M92)>
    DEC M7 3
    SENDMSG 0 恭喜“%s”对“<$DLGITEM.NAME>”成功进行了极品重铸，共发掘出潜力属性“<$STR(M7)>”点，分别增加“<$STR(S3)>”........ 251 249
    RECLAIMITEM
    DELAYCALL 10 @开始重塑
    BREAK
    #ELSEACT
    take 金币  500000
    CHANGEITEMADDVALUE -1 0 = 0
    CHANGEITEMADDVALUE -1 1 = 0
    CHANGEITEMADDVALUE -1 2 = 0
    CHANGEITEMADDVALUE -1 3 = 0
    CHANGEITEMADDVALUE -1 4 = 0
    MOV N$总点数 4

    MOVR M4 4
    CHANGEITEMADDVALUE -1 0 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 1 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 2 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 3 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 4 = <$STR(M4)>

    GETITEMADDVALUE -1 0 M2
    MOV S3 防御<$STR(M2)>点，
    GETITEMADDVALUE -1 1 M3
    INC S3 魔法防御<$STR(M3)>点，
    GETITEMADDVALUE -1 2 M4
    INC S3 攻击<$STR(M4)>点，
    GETITEMADDVALUE -1 3 M5
    INC S3 魔法<$STR(M5)>点，
    GETITEMADDVALUE -1 4 M6
    INC S3 道术<$STR(M6)>点，
    INC M2 1
    INC M3 1
    INC M4 1
    INC M5 1
    INC M6 1
    MOV M90 <$STR(M2)>
    INC M90 <$STR(M3)>
    MOV M91 <$STR(M4)>
    INC M91 <$STR(M5)>
    MOV M92 <$STR(M6)>
    INC M92 <$STR(M90)>
    MOV M7 <$STR(M91)>
    INC M7 <$STR(M92)>
    DEC M7 3
    SENDMSG 0 恭喜“%s”对“<$DLGITEM.NAME>”成功进行了极品重铸，共发掘出潜力属性“<$STR(M7)>”点，分别增加“<$STR(S3)>”........ 251 249
    RECLAIMITEM
    DELAYCALL 10 @开始重塑
    BREAK

复制代码
测试无误，应当是你要的效果
回复

举报

快乐月亮

0

主题

534

回帖

0

积分

新手上路

积分
0
发表于 2026-3-29 18:35:38 | 显示全部楼层
    [@main]
    #IF
    EQUAL U0 1
    #ACT
    #SAY
    欢迎您来到“<$SERVERNAME>”最具特色的小极品体验不一样的\\
    游戏感觉！<极品重铸/FCOLOR=250>：<发掘装备潜力属性，让它的属性再次被发现/FCOLOR=251>\\
    <出来！/FCOLOR=250>  此极品重铸功能充满了未知性！<建议/FCOLOR=250>：<打造前先洗澡更衣/FCOLOR=254>\\
    <烧香拜佛！/FCOLOR=254>想想各种极品属性附加为单独一项........\\ \\
    <武器属性/FCOLOR=250>：单极品属性点数不大于3点！（攻击 魔法 道术随机）\\
    <衣服属性/FCOLOR=250>：单极品属性点数不大于3点！（防御魔御攻魔道随机）\\
    <其他装备/FCOLOR=250>：单极品属性点数不大于3点！（<装备幸运属性可保留/FCOLOR=250>）\\
    <注意/FCOLOR=251>：<装备原有的极品属性将会被清除！/FCOLOR=250>〖<现在开始打造大极品/@进入重塑>〗\\

    [@进入重塑]
    #IF
    #ACT
    #SAY
    衣服武器打造费用： 50万金币  其他装备打造费用： 50万金币 \\
    <说明/FCOLOR=251>：极品属性有可能点数全加到一种属性上，当然也有可能分散\\
    在几种属性上，可谓变幻无穷.乐趣无边！\\
    其中奥秘也只有您自己才能探索发现！<建议/FCOLOR=250>：<打造前先洗澡更衣烧/FCOLOR=254>\\
    <香拜佛！/FCOLOR=254> <注意/FCOLOR=251>：<原有极品属性将被清除/FCOLOR=254>\\
    <提示/FCOLOR=251>：<人品爆发的玩家甚至可以打破极品点数哦！/FCOLOR=250><如遇见、请珍惜/FCOLOR=254>\\
    <开始打造极品/@开始重塑>     \\
    [@开始重塑]
    #IF
    checkgold 500000
    #ACT
    OPENUPGRADEDLG 放入要打造的装备
    break
    #ELSEACT
    MessageBox 错误提示：你放入洞不是极品装备或者你的金币不足，不能进行打造！
    break

    [@UpgradeDlgItem]
    #OR
    CheckItemAddValue -1 0 > 0
    CheckItemAddValue -1 1 > 0
    CheckItemAddValue -1 2 > 0
    CheckItemAddValue -1 3 > 0
    CheckItemAddValue -1 4 > 0
    #ACT
    #ELSEACT
    messagebox 极品装备才能重新洗！
    bREAK

    #OR
    EQUAL <$DLGITEM.STDMODE> 5
    EQUAL <$DLGITEM.STDMODE> 6
    #Act
    take 金币  500000
    CHANGEITEMADDVALUE -1 0 = 0
    CHANGEITEMADDVALUE -1 1 = 0
    CHANGEITEMADDVALUE -1 2 = 0
    MOV N$总点数 3

    MOVR M4 3
    CHANGEITEMADDVALUE -1 0 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 1 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 2 = <$STR(M4)>

    GETITEMADDVALUE  -1 0 M2
    MOV S3 攻击<$STR(M2)>点，
    GETITEMADDVALUE  -1 1 M3
    INC S3 魔法<$STR(M3)>点，
    GETITEMADDVALUE  -1 2 M4
    INC S3 道术<$STR(M4)>点，
    INC M2 1
    INC M3 1
    INC M4 1
    MOV M90 <$STR(M2)>
    INC M90 <$STR(M3)>
    MOV M91 <$STR(M4)>
    MOV M7 <$STR(M91)>
    INC M7 <$STR(M90)>
    DEC M7 3
    SENDMSG 0 恭喜“%s”对“<$DLGITEM.NAME>”成功进行了极品重铸，共发掘出潜力属性“<$STR(M7)>”点，分别增加“<$STR(S3)>”........ 251 249
    RECLAIMITEM
    DELAYCALL 10 @开始重塑
    BREAK
    #OR
    EQUAL <$DLGITEM.STDMODE> 19
    EQUAL <$DLGITEM.STDMODE> 20
    EQUAL <$DLGITEM.STDMODE> 21
    #Act
    take 金币  500000
    CHANGEITEMADDVALUE -1 2 = 0
    CHANGEITEMADDVALUE -1 3 = 0
    CHANGEITEMADDVALUE -1 4 = 0
    MOV N$总点数 3

    MOVR M4 3
    CHANGEITEMADDVALUE -1 2 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 3 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 4 = <$STR(M4)>

    GETITEMADDVALUE -1 2 M2
    MOV S3 攻击<$STR(M2)>点，
    GETITEMADDVALUE -1 3 M3
    INC S3 魔法<$STR(M3)>点，
    GETITEMADDVALUE -1 4 M4
    INC S3 道术<$STR(M4)>点，
    INC M2 1
    INC M3 1
    INC M4 1
    MOV M90 <$STR(M2)>
    INC M90 <$STR(M3)>
    MOV M91 <$STR(M4)>
    MOV M7 <$STR(M91)>
    INC M7 <$STR(M90)>
    DEC M7 3
    SENDMSG 0 恭喜“%s”对“<$DLGITEM.NAME>”成功进行了极品重铸，共发掘出潜力属性“<$STR(M7)>”点，分别增加“<$STR(S3)>”........ 251 249
    RECLAIMITEM
    DELAYCALL 10 @开始重塑
    BREAK
    #OR
    EQUAL <$DLGITEM.STDMODE> 10
    EQUAL <$DLGITEM.STDMODE> 11
    #Act
    take 金币  500000
    CHANGEITEMADDVALUE -1 0 = 0
    CHANGEITEMADDVALUE -1 1 = 0
    CHANGEITEMADDVALUE -1 2 = 0
    CHANGEITEMADDVALUE -1 3 = 0
    CHANGEITEMADDVALUE -1 4 = 0
    MOV N$总点数 3

    MOVR M4 3
    CHANGEITEMADDVALUE -1 0 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 1 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 2 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 3 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 4 = <$STR(M4)>

    GETITEMADDVALUE -1 0 M2
    MOV S3 防御<$STR(M2)>点，
    GETITEMADDVALUE -1 1 M3
    INC S3 魔法防御<$STR(M3)>点，
    GETITEMADDVALUE -1 2 M4
    INC S3 攻击<$STR(M4)>点，
    GETITEMADDVALUE -1 3 M5
    INC S3 魔法<$STR(M5)>点，
    GETITEMADDVALUE -1 4 M6
    INC S3 道术<$STR(M6)>点，
    INC M2 1
    INC M3 1
    INC M4 1
    INC M5 1
    INC M6 1
    MOV M90 <$STR(M2)>
    INC M90 <$STR(M3)>
    MOV M91 <$STR(M4)>
    INC M91 <$STR(M5)>
    MOV M92 <$STR(M6)>
    INC M92 <$STR(M90)>
    MOV M7 <$STR(M91)>
    INC M7 <$STR(M92)>
    DEC M7 3
    SENDMSG 0 恭喜“%s”对“<$DLGITEM.NAME>”成功进行了极品重铸，共发掘出潜力属性“<$STR(M7)>”点，分别增加“<$STR(S3)>”........ 251 249
    RECLAIMITEM
    DELAYCALL 10 @开始重塑
    BREAK
    #ELSEACT
    take 金币  500000
    CHANGEITEMADDVALUE -1 0 = 0
    CHANGEITEMADDVALUE -1 1 = 0
    CHANGEITEMADDVALUE -1 2 = 0
    CHANGEITEMADDVALUE -1 3 = 0
    CHANGEITEMADDVALUE -1 4 = 0
    MOV N$总点数 3

    MOVR M4 3
    CHANGEITEMADDVALUE -1 0 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 1 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 2 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 3 = <$STR(M4)>
    DEC N$总点数 <$STR(M4)>

    MOVR M4 <$str(N$总点数)>
    CHANGEITEMADDVALUE -1 4 = <$STR(M4)>

    GETITEMADDVALUE -1 0 M2
    MOV S3 防御<$STR(M2)>点，
    GETITEMADDVALUE -1 1 M3
    INC S3 魔法防御<$STR(M3)>点，
    GETITEMADDVALUE -1 2 M4
    INC S3 攻击<$STR(M4)>点，
    GETITEMADDVALUE -1 3 M5
    INC S3 魔法<$STR(M5)>点，
    GETITEMADDVALUE -1 4 M6
    INC S3 道术<$STR(M6)>点，
    INC M2 1
    INC M3 1
    INC M4 1
    INC M5 1
    INC M6 1
    MOV M90 <$STR(M2)>
    INC M90 <$STR(M3)>
    MOV M91 <$STR(M4)>
    INC M91 <$STR(M5)>
    MOV M92 <$STR(M6)>
    INC M92 <$STR(M90)>
    MOV M7 <$STR(M91)>
    INC M7 <$STR(M92)>
    DEC M7 3
    SENDMSG 0 恭喜“%s”对“<$DLGITEM.NAME>”成功进行了极品重铸，共发掘出潜力属性“<$STR(M7)>”点，分别增加“<$STR(S3)>”........ 251 249
    RECLAIMITEM
    DELAYCALL 10 @开始重塑
    BREAK

复制代码
试试看，不知道MOVR M4 3 是不是最大值3点，如果不是
所有的 MOVR M4 3 改成 4
所有的DEC N$总点数 <$STR(M4)>下面加个 INC N$总点数 1
记得备份
回复

举报

勇敢小鹿

230

主题

519

回帖

246

积分

中级会员

积分
246
发表于 2026-3-29 18:35:38 | 显示全部楼层
holgo 发表于 2020-12-18 20:20 试试看，不知道MOVR M4 3 是不是最大值3点，如果不是
所有的 MOVR M4 3 改成 4
所有的DEC N$总点数 下 ...
还是不对，总属性都能洗出各个属性总共+8，还有升级框不是能升级的物品哪个命令是返回背包啊！还是用OK框比较合适！
回复

举报

机智小鹿

0

主题

581

回帖

442

积分

中级会员

积分
442
发表于 2026-3-29 18:35:38 | 显示全部楼层
#IF
CheckItemAddValueEx -1 > 3
#ACT
MessageBox 极品值总和不得超过+3。
break
#IF
CheckItemAddValueEx -1 = 0
#ACT
MessageBox 不是极品不可升级。
break
回复

举报

大方小狗

0

主题

554

回帖

0

积分

新手上路

积分
0
发表于 2026-3-29 18:35:38 | 显示全部楼层
#IF
checkgold 500000
#ACT
OPENUPGRADEDLG 放入要打造的装备
break
#ELSEACT
MessageBox 错误提示：你放入洞不是极品装备或者你的金币不足，不能进行打造！
break
[@UpgradeDlgItem]
#IF
NOT CheckItemAddValueEx -1 < 3
#ACT
MessageBox 你的<$DLGITEM.NAME>已经有3点极品属性了
RECLAIMITEM
break
#OR
EQUAL <$DLGITEM.STDMODE> 5
EQUAL <$DLGITEM.STDMODE> 6
#Act
MOV P0 13
MOV P1 0
Loopgoto @清除装备附加属性 <$str(P0)>
GetMultiRandomNumber 0 2 3 N1 M1
MOV P0 4
MOV P1 3
MOV S1
Loopgoto @开始装备附加属性 <$str(M1)>
SENDMSG 0 恭喜“%s”对“<$DLGITEM.NAME>”成功进行了极品重铸，共发掘出潜力属性“<$STR(S1)>”. 251 249
[@清除装备附加属性]
#IF
NOT EQUAL P0 0
#ACT
CHANGEITEMADDVALUE -1 <$str(P1)> = 0
INC P1 1
DEC P0 0
#ELSEACT
endloop
break
[@开始装备附加属性]
#IF
EQUAL M1 0
#ACT
endloop
break
#IF
NOT EQUAL P1 0
#ACT
MOVR P2 1 <$str(P0)>
CHANGEITEMADDVALUE -1 <$str(N1)> = <$str(P2)>
DEC P1 <$str(P2)>
DEC M1 1
#ELSEACT
endloop
break
#IF
EQUAL N1 0
#ACT
INC S1 防御+<$str(P2)>点,
#IF
EQUAL N1 1
#ACT
INC S1 魔御+<$str(P2)>点,
#IF
EQUAL N1 2
#ACT
INC S1 攻击+<$str(P2)>点,
#IF
EQUAL N1 3
#ACT
INC S1 0属性+<$str(P2)>点,
#IF
EQUAL N1 4
#ACT
INC S1 魔法+<$str(P2)>点,
#IF
EQUAL N1 5
#ACT
INC S1 道术+<$str(P2)>点,
检测类型，然后设置一下属性代码即可
回复

举报

勤奋小鹿

237

主题

580

回帖

238

积分

中级会员

积分
238
发表于 2026-3-29 18:35:38 | 显示全部楼层
呃，来晚了。。
回复

举报

返回列表 发新帖

© 2026 折翼天使社区 版权所有