传奇自定义输入数量兑换货币

无聊公子

游戏里货币兑换脚本一般都是固定兑换的。有的时候比较不方便。所以分享一个自定义输入数量兑换的脚本

[@货币兑换]
#IF
#ACT
close
CLOSEMERCHANTBIGDLG
#SAY
<> \ \
<> <钻石换元宝/fcolor=253>\ \
<> <元宝(兑换)|255#1钻石 = 1000元宝/FCOLOR=243>     <点击输入(钻石)兑换(元宝)|249#1:钻石 = 1000元宝/@@InPutinteger91(当前[钻石]：<$GAMEDIAMOND>　请输入兑换充值的额度！)> \ \


[@InPutinteger91]
#IF
SMALL N91 1
LARGE N91 10000
#ACT
MOV N91
messagebox \【错误提示】:\\\　　　　　　请输入1-10000之间的数值，当前钻石为：<$GAMEDIAMOND>
break


#IF
CheckGAMEDIAMOND < <$STR(N91)>
#ACT
MESSAGEBOX \【错误提示】:\\你的钻石不足<$STR(N91)>,不能兑换这么多元宝\\当前钻石为：<$GAMEDIAMOND>
break
#Elseact
Mov N$扣除钻石数量 0
Mov N$给于元宝数量 0
Mov N$扣除钻石数量 <$STR(N91)>
Mov N$给于元宝数量 <$STR(N91)>
Mul N$扣除钻石数量 1          ;这里是兑换比例
Mul N$给于元宝数量 1000     ;这里是兑换比例
GAMEDIAMOND - <$STR(N$扣除钻石数量)>
GAMEGOLD + <$STR(N$给于元宝数量)>
Goto @Main
messagebox 提示：兑换成功，扣除钻石【<$STR(N$扣除钻石数量)>】，给予元宝【<$STR(N$给于元宝数量)>】
Break

有网友说不能金币兑换元宝。那我就再加一个金币兑换元宝的吧其实是一样的。
高手勿喷，有什么错误请指正。

[@InPutinteger91]
#IF
SMALL N91 1
LARGE N91 10000
#ACT
MOV N91
messagebox \【错误提示】:\\\　　　　　　请输入 1-10000 之间的数值，当前金币为：<$GOLDCOUNT>
break

#IF
Check 金币 <$STR(N91)>
#ACT
MESSAGEBOX \【错误提示】:\\你的金币不足<$STR(N91)>,不能兑换这么多元宝\\当前金币为：<$GOLDCOUNT>
break
#Elseact
Mov N$扣除钻石数量 0
Mov N$给于元宝数量 0
Mov N$扣除钻石数量 <$STR(N91)>
Mov N$给于元宝数量 <$STR(N91)>
Mul N$扣除钻石数量 1
Mul N$给于元宝数量 10000
TAKE 金币 - <$STR(N91)>
GAMEGOLD + <$STR(N$给于元宝数量)>
GOTO @Main
MESSAGEBOX 提示：兑换成功，扣除金币【<$STR(N$扣除钻石数量)>】，给予元宝【<$STR(N$给于元宝数量)>】
Break

白白果

顶一个，免费分享的东西都应该赞一个。

seed

学习一下哈