[@MAIN]
<$USERNAME>\ \
你好，是否觉得你的武器不够威风？是不是想让自己更加强大呢？\
没关系，我可以帮你实现你的愿望，而你只需要花费少量的元宝！\
每升一点属性需要 [1000]个元宝，100%成功喔！每件装备最高可以\
升级[7]点属性！你准备好元宝了吗？\ \
<升级攻击>  <升级魔法>  <升级道术>  <返回>

[@UPDC]
#IF
CHECKUSEITEM 1
CHECKGAMEGOLD > 999
#ACT
MOV N0 0
MOV S0 攻击力上限
GOTO @升级处理
#ELSEACT
MESSAGEBOX [警告]你手里啥都没有,升什么呢?耍我吧?!当心我惩罚你!\　\另外最起码你要给我准备1000个元宝吧?!
GOTO @MAIN

[@UPMC]
#IF
CHECKUSEITEM 1
CHECKGAMEGOLD > 999
#ACT
MOV N0 1
MOV S0 魔法力上限
GOTO @升级处理
#ELSEACT
MESSAGEBOX [警告]你手里啥都没有,升什么呢?耍我吧?!当心我惩罚你!\　\另外最起码你要给我准备1000个元宝吧?!
GOTO @MAIN

[@UPSC]
#IF
CHECKUSEITEM 1
CHECKGAMEGOLD > 999
#ACT
MOV N0 2
MOV S0 道术力上限
GOTO @升级处理
#ELSEACT
MESSAGEBOX [警告]你手里啥都没有,升什么呢?耍我吧?!当心我惩罚你!\　\另外最起码你要给我准备1000个元宝吧?!
GOTO @MAIN

[@升级处理]
#IF
CHECKITEMADDVALUE 1 <$STR(N0)> < 7
#ACT
GAMEGOLD - 1000
UPGRADEITEMEX 1 <$STR(N0)> 0 1 0
MESSAGEBOX [成功]花费[1000]元宝升级[<$WEAPON>]<$STR(S0)>成功!
GOTO @MAIN
#ELSEACT
MESSAGEBOX [失败]你的[<$WEAPON>]升级<$STR(S0)>已达到顶级!
GOTO @MAIN