* C; g% ^* l% L& r
8 S% n5 g M9 E' z* L% ^1 E0 P
" u$ C4 s* P2 J9 `! d5 d
# N+ G b0 p2 j; t. j' ]9 y[@main]& n0 Q; f1 ^9 c+ P& }. s/ }8 Q; Q* n
#IF
" Q" `1 T5 Z0 r" x1 o; n2 P#ACT
( r) w% U3 ^0 y! f# ~% {* o1 D& CCloseBigDialogBox
. }: B3 V/ V! c; K1 c6 Z' Q' s#SAY
6 t1 |8 Z$ S7 G) e' S1 I! ~$ u<改名师/SCOLOR=19> <尊敬的玩家,您好/SCOLOR=151> <〖欢迎使用改名服务〗/SCOLOR=87>\, y* l- |, B9 G
{禁止使用空白名字,非法符号,擦边球之内的发现直接删号永不恢复/SCOLOR=249}\" v1 K+ D. x% p+ i5 D+ R7 Z
{禁止使用空白名字,非法符号,擦边球之内的发现直接删号永不恢复/SCOLOR=249}\
' ~# d# ^: e) z( \ }7 T{禁止使用空白名字,非法符号,擦边球之内的发现直接删号永不恢复/SCOLOR=249}\ \2 z, K6 O+ e) [; T' {! {
<改名每次收费100W元宝/SCOLOR=250> <改名前先查询是否可用,如不查询,后果自负/SCOLOR=249>\
( f( |, ^5 X+ n/ p) g% X) m- V4 N, _/ G( C, H
, p& ` Y, r. _# I# |+ V<√查询名称是否被占用/@@InputString1(请输入查询的名称:)><√我要改当前人物名字/@@InputString2(请输入新的名称:)>\( j4 R( [7 w8 w6 s# U9 k
* O' j$ U Y6 W) P, c
: D, H9 o$ ^9 b; k
. A" r! @$ c! i2 @. f$ ?7 S2 U" l, R" w9 r1 |$ k
[@InputString1]
7 y" v+ R A2 I, B#IF
( N0 _5 F J* `0 EEqual S16 S% n9 v8 ^6 E. W( J8 B* l0 g% |
#ACT8 L% r- L' G3 f: |+ @
SENDMSG 6 请输入一个正确的名称
6 m, Z0 e' B7 k5 ?Break
}; W& L9 M: }
$ b# j$ N, T: U4 K3 P( O
8 j0 y: I) o# x& r* [#IF
$ c* N) O( q4 h1 h. e' s0 l6 VCHECKTEXTLIST ..\QuestDiary\禁止修改名称.txt <$Str(S1)>
1 I1 _: m% {/ b/ J. @5 ]; d#Act
. M; Q* S; x6 L# T( |3 H- c9 IMessageBox [提示:]\\该名字已被其他玩家使用!2 Z7 |) X0 j' D. x/ ~1 O0 O( i% D
Break+ K# L) X1 c1 j+ ^6 H5 g; T
5 e8 K. Z% T, b
3 ^7 `2 E0 z8 m) r* A; V# ]#OR0 l8 q% q) o; M* y
CheckStringlength S1 > 20/ _* m3 d; c! c& }
CheckStringlength S1 < 4
! X: n) n$ G( D1 K [$ f _#ACT
" n5 O, f, Y' w! s8 ZSENDMSG 6 输入名称长度不正确
& w* U V6 d6 d: n- S. qBreak7 k6 i* o6 ^, q+ k, C! ~, X4 ^
+ V3 J- o, M6 U! b9 ~
* Y$ W. A8 Q$ X#IF
2 J5 K- V8 U! f/ L#ACT4 P) E4 ~ ] [0 `: ~
QUERYHUMNAMEEXIST S1/ b+ p' ^) K: p
: l4 E3 L4 Z* z: X1 C
$ d* k z7 ?. d, L$ e
[@InputString2]3 Z0 P J% Y0 H4 x
#IF' t! ? i4 J+ R8 A
CHECKGAMEGOLD < 1000000
2 j5 I5 x n7 G#ACT; _" t$ _6 I0 v& c& O7 i# D
messagebox 你元宝不足!+ n; @0 ^; D' g) W) @
BREAK. R4 ]; d2 ~5 |/ ^+ i3 G
' F2 R8 r u: n0 m# g+ d
1 J t* B) A* R4 ^
#if
7 B+ H! D. n/ c3 r2 W3 ~equal s2 <$username>
. k* S" e/ M1 w3 U- ~& r! J% U#act4 U) D& K! p1 N, R- T1 E# U
messagebox 输入的名称为现在名称.无需修改!
2 [. z" r8 H% Abreak
$ f$ X' e Q( V+ J+ M# U c#IF9 G8 a W1 |6 H: [* X, F
Equal S2* T2 v. | g) l+ J. N
#ACT
# s( g3 N4 h. n' h* |% FSENDMSG 6 请输入一个正确的名称. p+ h4 N+ B2 x% n6 c
Break
, a9 H% S. w2 T3 o% ~: V" g% Q0 s8 H5 Y& F0 Y- z* E5 B
& n' [! h# y' r5 Q6 k7 ~#OR
, Y8 }2 w3 U& D( o- G; G& V3 s dCheckStringlength S2 > 20
, f7 H5 h" [& Q5 f* C9 y: pCheckStringlength S2 < 47 w: i- O! o. q' f
#ACT3 Y7 C' Q7 v6 `: t
SENDMSG 6 输入名称长度不正确
' o+ x }/ H" p, ~' \- yBreak
6 G }2 n7 Q! w [
6 s, p7 G* L$ b/ `2 t
4 u# t' C( g* W8 t* G#IF
! U. Z* e1 L4 `1 t6 g1 D& {8 k#ACT$ b- n" o& s: W0 z" r
GAMEGOLD - 1000000
& o' i: Y8 a) ~) r/ fCHANGEHUMNAME S2
+ d2 T' I: }% c2 z; I% k' {- ~' h, g' y
|