GOM引擎最简单的货币自定义兑换脚本

[@Main]
#if
#SAY
\ \ \


<>  <元宝兑汇金币/@@InPutInteger1(输入要兑汇的【元宝】数量（数额须≤10000颗）（1元宝 = 10000金币）)>




[@InPutInteger1]
#IF
checkgold 800000000
#ACT
MOV N1 0
GOTO @main
messagebox [汇兑失败]：\.\金币超过【8亿】后，无法使用元宝兑汇！\.\可在【仓库】将金币打捆后再来兑汇！
break
#IF
LARGE N1 10000
#ACT
MOV N1 0
GOTO @main
MESSAGEBOX [错误提示]:\.\一次性最多只能兑换10000元宝！
BREAK
#IF
SMALL N1 1
#ACT
MOV N1 0
GOTO @main
MESSAGEBOX [错误提示]:\.\输入数值不得为0
BREAK
#IF
CHECKGAMEGOLD > <$STR(N1)>
#ACT
#elseact
MESSAGEBOX [错误提示]:\.\您当前持有的元宝数量不足<$STR(N1)>颗..
GOTO @main
MOV N1 0
BREAK
#IF
NOT CHECKGAMEGOLD < <$STR(N1)>
#ACT
MOV N4 <$STR(N1)>
MUL N4   10000
GAMEGOLD - <$STR(N1)>
GIVE 金币 <$STR(N4)>
SENDMSG 6 您使用了【<$STR(N1)>元宝】成功兑换了【<$STR(N4)>金币】
MOV N1 0
MOV N4 0
GOTO @main
BREAK