5 x- p. V& u, ]/ k, u( b8 N
9 e% w2 B1 L, p: v8 l2 \
7 K. c, F; ~( c
1 u- c ^& W1 g3 _3 c
8 x1 J5 n9 @) C; D% D1 l+ p) `[@main]* d* v5 |3 d4 b. _9 e
#IF
& J5 p2 b/ ?8 b% T#ACT
$ k9 x7 W& ]" [- o# L, oCloseBigDialogBox* Q, T. e! E. Z7 S* |
#SAY; a: i/ H( h7 @8 K2 i q
<改名师/SCOLOR=19> <尊敬的玩家,您好/SCOLOR=151> <〖欢迎使用改名服务〗/SCOLOR=87>\
- d# _& f' V; G1 `+ _& L{禁止使用空白名字,非法符号,擦边球之内的发现直接删号永不恢复/SCOLOR=249}\; T, b0 }9 e7 L6 X+ X Q; u% e
{禁止使用空白名字,非法符号,擦边球之内的发现直接删号永不恢复/SCOLOR=249}\* @3 t* ~: C8 W' d
{禁止使用空白名字,非法符号,擦边球之内的发现直接删号永不恢复/SCOLOR=249}\ \
$ G. \! N# a5 _6 r# W8 B<改名每次收费100W元宝/SCOLOR=250> <改名前先查询是否可用,如不查询,后果自负/SCOLOR=249>\8 l4 z0 x2 k1 s* ~- k# Z
4 h* t$ X! }* z
- |" S. w4 }* Y3 L0 U# b+ S) Z<√查询名称是否被占用/@@InputString1(请输入查询的名称:)><√我要改当前人物名字/@@InputString2(请输入新的名称:)>\! {7 c# f. g4 V! j8 u7 z0 ]' x
( i, q1 `* k- U+ L. M
5 i I' X; e) r! b1 @$ }7 r) K2 C! M2 f& l% d6 t) }
+ u. [# U" g2 N& E. t a2 }
[@InputString1]
+ s. G$ B0 j2 i8 D' H#IF7 ]" i, J1 T% `- n2 ]" N' j; o9 k
Equal S19 e3 X$ n! ^; y9 {: @6 x" q" D
#ACT1 v( s1 o# X9 x+ A
SENDMSG 6 请输入一个正确的名称
# |( v/ m6 } `( SBreak" R/ I* W3 X. ?" g6 o1 A" y& J
`; |4 D4 w) A1 u7 w* `( H
. Z! h$ K& U# \' @. e8 D#IF: z& v5 ^0 D& x! x! S
CHECKTEXTLIST ..\QuestDiary\禁止修改名称.txt <$Str(S1)>" ]# R! k5 \- B: I1 {& D% W
#Act
# v- G, \7 M8 G( m* m% K* V& p! ~MessageBox [提示:]\\该名字已被其他玩家使用!) m3 k9 Y/ R: A0 Z s2 W& C
Break8 A6 G$ P9 h. f+ F$ P% v6 i( D
) a6 V& h+ r+ a+ h
" z! j2 E: |; [" g9 s
#OR
* u2 ]! L8 y9 N8 ]CheckStringlength S1 > 20
2 I ^* V$ y+ r' a* l" ?3 Z, ICheckStringlength S1 < 4, o7 {+ ~5 @3 r3 p9 [" ?6 D
#ACT
' J7 E% R) S q" y# m2 uSENDMSG 6 输入名称长度不正确
& v, x7 v9 {" K: TBreak) e) i+ s- a- G/ T+ [0 n
: P3 P T6 r9 p/ E) h( u( r$ T
: `! U# P+ j: C# i( Y# G#IF
/ i& Y/ s3 s. U8 P N#ACT
$ b4 R7 V# {' M1 U8 e6 y: ?QUERYHUMNAMEEXIST S1
9 x' m. g- ^( R$ |- v
+ f! E) y& r: F, X7 O/ y- B. y& M& z! d! G8 b& B: _' B
[@InputString2]
5 p! N3 m7 S1 Y2 c8 q#IF7 Z) W1 Y8 t0 l/ c* A0 i1 Z" J. T
CHECKGAMEGOLD < 1000000! F W8 `( n% [! h! M2 z. F" J
#ACT
9 Q8 O) k, \' p) v* a& H- y1 Y fmessagebox 你元宝不足!
, L/ \1 Y& [3 q, O1 ~5 @/ u2 p) e- MBREAK" i s9 ^% T! u- p b
, @9 U' C" ?9 p5 d5 ]$ m0 A$ d6 ?; a5 O" T. y( |& u
#if
3 ?1 d6 m2 @9 n" W; qequal s2 <$username>
$ T3 X4 y9 m1 C3 W& J( h#act
0 Y, s, c, l x+ |- Smessagebox 输入的名称为现在名称.无需修改!/ @5 r2 O( j0 R8 q1 J. g1 G# T9 G1 M
break. Y: k X- ~: ?( K* o0 g! q
#IF
8 ^! V- Q* R ~% w. IEqual S2
3 a1 L! s: t5 i#ACT
: |3 {* s2 ?0 h+ a. p, WSENDMSG 6 请输入一个正确的名称: F9 [3 A' K7 L8 x5 s
Break* k- K4 q- _$ d% ^3 x. N! e6 L, l
) s- I! u* ^7 F) Z, P4 C
. L; ^6 S: c* x1 j
#OR
' O2 f U& D- F( L0 UCheckStringlength S2 > 201 M' h; C0 H, t$ B$ f4 D
CheckStringlength S2 < 4
- y% U9 p: p! c- R4 Z#ACT* k8 ?4 o* |4 R" A% ]
SENDMSG 6 输入名称长度不正确
1 ]# m/ T: a9 ]Break
# U- x. g. w4 V- f! q7 R& S3 B0 w8 v1 q" s* h3 @4 n
! a3 X; c/ q0 l#IF0 O. [/ L8 A. ]$ T) s* H" T
#ACT
7 T) `# I4 l. fGAMEGOLD - 1000000
9 B. x& y( w0 @/ K5 T, s: DCHANGEHUMNAME S2
Z$ r/ q% q7 f" t3 M0 [/ e8 ]) |# n7 @8 E4 F
|