GOM引擎传奇版本自定义输入数量兑换货币脚本制作教程

' V5 F1 l: v# C- ^
$ k5 R: m' n2 m  W2 a, K. i. b' U
, ~( C& t3 ]# C8 u
[@Main]
#IF
#Act
OPENMERCHANTBIGDLG 33 60 1 4 1 0 1 418 15
MOV S1 <$YEAR>-<$MONTH>-<$DAY>　<$HOUR>:<$MINUTE>:<$SECOND>分
, O. s4 o( H; f- eMOV S2 <$SERVERNAME>
& I1 O+ N2 L" e% z0 U% D#SAY
7 e( h5 ^6 Y' D$ v% Q% K\ \ \ \ \
8 }. C; y0 D- q, |2 C<>               {[<$STR(S1)>]/SCOLOR=249}　　 {[<$STR(S2)>]/SCOLOR=251}\
7 a1 V" ]) L, _9 k7 y% P1 n7 g<Img:363:1:0:4>\
* k5 Q" [' C* x<Img:363:1:0:100>\
<> {[<$Username>]/SCOLOR=154}　你好,很高兴为您服务！ <当前人民币为：/FCOLOR=249>{<$GamePoint>/FCOLOR=250} <当前元宝为：/FCOLOR=249>{<$Gamegold>/FCOLOR=250}\　\
<>            <人民币(兑换)|255#1:Rmb = 1充值点1000修罗币/FCOLOR=243>　　                <元宝(兑换)|255#20W元宝 = 1000修罗币/FCOLOR=243>\　\
9 |. b# S- K3 Q) F, m$ D- J. }- Z<>     <点击输入(RMB)兑换(充值数)|249#1:Rmb = 1充值点1000修罗币/@@InPutinteger91(当前[人民币RMB]：<$GamePoint>　请输入兑换充值的额度！)>       <点击输入(元宝)兑换(缘梦币)|249#20W元宝 = 1000修罗币/@@InPutinteger99(当前[元宝]：<$Gamegold>　请输入兑换充值的额度！)>\　\
8 I! A# g" K& I* t# e' e: ~* V
1 H+ x2 ?6 }) y* x
9 g4 U( V; X; t% E. Q8 B' f<>   　<温馨提示：如果你充值错了,可以在这里兑换，和[官方充值]一样！/FCOLOR=253>\
<>     <温馨提示：元宝只可兑换缘梦币，缘梦币不可兑换元宝，散人更好发展！/FCOLOR=254>\
) H2 g2 j8 y; O7 R: h

* P' T$ c& J9 F( a[@InPutinteger91]
7 S, G  G' g2 D3 k4 V' _#IF
CheckContainsText <$SERVERNAME> 测试
; t& Q* b2 T0 j& j# D$ |0 a) w* z#ACT
# ~4 r. z1 C: s! lmessagebox 测试区禁止使用！！！
: P9 \5 b4 d; B4 d; HBREAK

  R  s* U) ?0 o  P
#OR
LARGE N91 10000
SMALL N91 1
#ACT
) b2 z0 N. p6 G5 O7 U/ z* Q2 qMOV N91
! |4 J8 H0 l  p% q  l+ rmessagebox \【错误提示】:\\\　　　　　　请输入1-10000之间的数值，当前RMB点为：<$GamePoint>元
break
& k2 G9 T* R3 P

#IF
: l" J7 h4 y# RCheckGamePoint < <$STR(N91)>
#ACT
/ W: y8 t" o: p: l' Z% VMESSAGEBOX \【错误提示】:\\你的人民币不足<$STR(N91)>元,不能兑换这么多充值\\当前RMB点为：<$GamePoint>元
! Y' Q+ ]! }4 o0 }break
8 r; A) B" y/ y$ E$ M#Elseact
Mov N$扣除人民币数量 0
Mov N$给于火龙币数量 0
- I/ i5 A; w. e' x7 g6 W) SMov N$给于充值点数量 0
Mov N$扣除人民币数量 <$STR(N91)>
/ H. w; [( G8 n9 W" u4 jMov N$给于火龙币数量 <$STR(N91)>
+ ], V2 x2 Z1 O; o: IMov N$给于充值点数量 <$STR(N91)>
1 y7 i. k, q' B1 a" Y/ q/ PMul N$扣除人民币数量 1
Mul N$给于火龙币数量 1000
8 n  `- m. N! [7 V: ?* ]7 XMul N$给于充值点数量 1
GamePoint - <$STR(N$扣除人民币数量)>
GameDiamond + <$STR(N$给于火龙币数量)>
' v- v- {' z0 @& [+ b7 uGameGird + <$STR(N$给于充值点数量)>
4 M; n5 B7 _" |+ rGoto @Main
SENDMSG 1 玩家『<$USERNAME>』成功将『<$STR(N$扣除人民币数量)>』人民币兑换了『<$STR(N$给于火龙币数量)>』缘梦币！
Break
3 Y* R8 z. e- p# s" N& X  d* @: R
. j9 K3 K) s7 U
[@InPutinteger99]
#if
CHECKtextlist ..\QuestDiary\测试奖励\服务器状态控制.txt 测试
3 \, I/ w6 y; f0 A* A, E* i#act
MessageBox 测试区禁止使用！！
break
3 V# n# Z* U* S7 \7 q
# Y! W2 `4 f& N- E
; P* T% @! R" N( Z. H  `#IF
8 c$ H/ A3 r4 E" ]1 Y" V#ACT
DIV N99 200000
+ H  S' M! U$ `' E+ L9 r0 HMUL N99 200000
$ J' G7 R* ~6 _  z2 R% ?
/ ]5 C3 R. a. y, T! I
#OR
LARGE N99 100000000
SMALL N99 200000
#ACT
6 m/ I) y/ w- l! d) }& ~MOV N99
messagebox \【错误提示】:\\\　　　　　　请输入50000-100000000之间的数值，当前元宝为：<$GameGold>元
break
! z- c" v0 _. L7 h0 m0 U7 K8 b

#IF
CheckGameGold < <$STR(N99)>
% R  x7 Z2 ~( I' _  S! z" M#ACT
MESSAGEBOX \【错误提示】:\\你的元宝不足<$STR(N99)>,不能兑换这么多充值\\当前元宝为：<$GameGold>元
. C; r, K4 `+ l% n+ L5 m2 ^break
% r- Y/ n2 Z$ r, T. R8 l, G- {

#Elseact
& ~# u- y* g; SGameGold - <$STR(N99)>
MOV N$灵符数量 <$STR(N99)>
8 D, q$ K1 N9 |# C: \1 FDIV N$灵符数量 200000
MUL N$灵符数量 1000
+ {4 z$ f% Z& d' pGameDiamond + <$str(N$灵符数量)>
Goto @Main
7 O+ V% E: ^1 A& _SENDMSG 1 玩家『<$USERNAME>』成功将『<$STR(N99)>』元宝兑换了『<$str(N$灵符数量)>』缘梦币！
0 j6 f3 n3 V* q- HBreak
; P# ^' |9 M) i5 ?3 f9 H0 u