$ y2 ] V6 M+ b1 f7 C. b }6 C% N( _, Z3 f/ p
5 M4 D4 h+ A: B6 ?7 B" g
- p/ w0 e; i: k \4 m6 V: L7 P( b5 Q C- Y) h. E& d1 T
[@main]' G$ e0 W2 J% ?- x7 g' a
#IF
+ {- `5 h+ u4 X4 E: J#ACT! g) U5 ~. a+ t# g
CloseBigDialogBox
; t P( D8 `& W- W) t+ \#SAY" J, M0 Y: H+ I5 v3 |5 H
<改名师/SCOLOR=19> <尊敬的玩家,您好/SCOLOR=151> <〖欢迎使用改名服务〗/SCOLOR=87>\
* B4 Q1 c3 F' K{禁止使用空白名字,非法符号,擦边球之内的发现直接删号永不恢复/SCOLOR=249}\* R2 |8 H- s1 m
{禁止使用空白名字,非法符号,擦边球之内的发现直接删号永不恢复/SCOLOR=249}\
! O, l* ?5 x# c1 Y* a6 Y: P{禁止使用空白名字,非法符号,擦边球之内的发现直接删号永不恢复/SCOLOR=249}\ \
; l8 y# O8 J( z6 E$ a<改名每次收费100W元宝/SCOLOR=250> <改名前先查询是否可用,如不查询,后果自负/SCOLOR=249>\; o I* U2 X. T; t e) s6 w2 l
' a; \6 A3 {# H: l0 ~3 D
4 e3 Y8 K" U l+ J<√查询名称是否被占用/@@InputString1(请输入查询的名称:)><√我要改当前人物名字/@@InputString2(请输入新的名称:)>\
# j0 o* _1 \6 Y! v9 R) d/ e0 w) {4 K% i5 _! H* j
0 {- X6 D+ T3 V/ U1 v# g* h
: Z$ t$ ~ z0 w; ~: l# G
0 r& B x* A4 X( | L[@InputString1]) v" U; D# M' v& @$ E4 B- ~5 g3 ]3 Z
#IF
# W: p, l3 P5 T; _8 ] x% FEqual S13 F9 j; I+ p; o2 q: Q( x0 ^
#ACT* ^1 s$ t9 z, a
SENDMSG 6 请输入一个正确的名称2 ~ k" l( o2 S, _5 h
Break
; H O! ?5 r# W" o/ l) b$ O' w \
0 j3 H: {' u1 \, w, D' a [
T# r0 i8 G+ q4 A' F/ j8 K#IF' X! q8 `1 h/ ~9 t. ~
CHECKTEXTLIST ..\QuestDiary\禁止修改名称.txt <$Str(S1)>; Z0 h1 ^/ i/ E9 ` S
#Act* U! d1 W2 W4 A0 h" U
MessageBox [提示:]\\该名字已被其他玩家使用!
! v7 g3 ^+ w/ n& y$ _7 iBreak. w0 C8 t8 V. j% L% H
+ J- J7 }- K" ]7 t# A6 x. T! Q! u2 v+ H
- W) ` j* _, w/ b# ~1 Q
#OR8 [0 U" r# F8 p& w! U
CheckStringlength S1 > 20
$ t8 V; t& w+ a4 q2 \# zCheckStringlength S1 < 4
J; O, P4 c+ P8 y' J' ^6 h$ ?#ACT
9 A" s0 Q, u1 v6 q" G) N! L6 v ZSENDMSG 6 输入名称长度不正确
1 D4 v) F* p* `0 O3 Y! uBreak4 f$ Z0 n* \) s
& n$ c X2 y' B* A+ O& V
3 y& S/ k% ~. a. g( U& n' n#IF
8 z' |- J) J4 l7 f" F5 H#ACT
9 h! V+ z( t) f! A3 h6 I; ]QUERYHUMNAMEEXIST S11 e0 o/ H0 k: p g. A: Q9 F2 X
4 k" T! h2 V& G3 w
- y9 A0 x9 f4 t* c
[@InputString2]
2 g( ~0 s. r* l4 E. Z#IF3 @% P/ p+ ?9 K3 A
CHECKGAMEGOLD < 1000000
( Y) @% A8 P! i' f g' k) ^#ACT, h" F: ]) Z. l7 K3 q
messagebox 你元宝不足!
! z9 X8 A* ^7 M4 |/ Z' t$ D' yBREAK
- n0 j) e1 t/ P7 ?+ T4 }* U
* s$ r4 F6 g4 Y& \ F. z# a; k2 F |
#if
' j7 c3 K& E2 c$ e# Wequal s2 <$username>- R% ]2 f) X2 j; O4 e; x
#act4 `4 L) T: e) _5 [! h' Z, d$ b
messagebox 输入的名称为现在名称.无需修改!9 R/ z( r0 N: ?* ~! _
break
, X5 \( O/ x* D#IF
g. |0 K2 m2 s. [Equal S2! R: P) f% ]8 ]7 g
#ACT& P* n) Y2 N) D' ^4 P- c
SENDMSG 6 请输入一个正确的名称
1 _' x5 h2 N1 V2 M1 S2 s% R' j6 ZBreak
6 t2 @1 S7 n* F3 ^# d+ z( f$ E+ b8 f
8 \7 n) p) n5 m3 K- I6 T! c7 G
#OR
% r. M% r# t4 h3 U/ ECheckStringlength S2 > 20
( B* G4 X4 ?# ECheckStringlength S2 < 43 z+ C# j- Z& ~% S( Y9 V
#ACT
( K- |) |1 a$ q F! f |) USENDMSG 6 输入名称长度不正确
* b( y) |/ Z+ z0 L5 }/ TBreak* E& D3 X" O& U/ Y6 y3 x! A
! R, N$ \* a' T, m F7 @+ b
7 X. x/ G: x) V$ y' k#IF$ C2 D- t# v, Q8 z+ s/ w
#ACT4 f o: c( O' u$ q) x
GAMEGOLD - 10000003 [+ _, M2 z" L9 c5 [ i
CHANGEHUMNAME S2+ B/ q, c0 j Y/ }9 d# P& D5 H1 J
8 {7 [) H/ i- \- {% C; S/ F4 M |