& _4 R4 ~4 v9 m# [, n& g8 U4 f4 R" u8 s# T" c
7 G: w* J! [: e" l: S
% D: t4 h6 J# c: _# {* d2 h& q: k
[@main]
& i" D; A" h" `. t& Z* z: o H#IF+ @8 U" A' r8 {: ~2 H% j) G
#ACT
/ a2 |4 V( g1 S/ @8 Y7 }0 e9 N1 ECloseBigDialogBox) ]2 e: e5 h& V; u
#SAY
/ E# G/ ?1 t! T7 K/ E<改名师/SCOLOR=19> <尊敬的玩家,您好/SCOLOR=151> <〖欢迎使用改名服务〗/SCOLOR=87>\0 L" f8 b! ~3 _- P
{禁止使用空白名字，非法符号，擦边球之内的发现直接删号永不恢复/SCOLOR=249}\* u: O# T3 N1 G- C* z
{禁止使用空白名字，非法符号，擦边球之内的发现直接删号永不恢复/SCOLOR=249}\
5 [3 ?& \# o% r, Y0 B4 d{禁止使用空白名字，非法符号，擦边球之内的发现直接删号永不恢复/SCOLOR=249}\ \9 p( Y) }3 f# ?. z' g! ^. q
<改名每次收费100W元宝/SCOLOR=250> <改名前先查询是否可用，如不查询，后果自负/SCOLOR=249>\
/ M% V) C4 F% j: o* u) ~) b- {- k2 k! Z# j' S
9 q) ~3 N; ^1 t2 _. s6 V$ H: h+ m: K; T
<√查询名称是否被占用/@@InputString1(请输入查询的名称：)><√我要改当前人物名字/@@InputString2(请输入新的名称：)>\
0 O$ J G" t; r; J2 N2 L! `* R$ z0 X5 J1 S
4 T0 z1 ?' i9 V* s8 c
: y! [, ^, m& h8 ]7 Z$ p0 j) u! T2 A- }) L/ v
[@InputString1]8 F' ?& S ?* _# i! {8 u
#IF
, A; U( d+ A1 G5 N1 @1 eEqual S1
3 g! ~* Y4 n: [$ w4 {* p# t; m; J#ACT8 T F/ M- C/ ?" u( u- E
SENDMSG 6 请输入一个正确的名称1 c5 R% E* V4 D* T# m+ q' S% i
Break3 ?2 x4 q- M. ]7 S. U; f1 w2 `7 l
* D9 @; t; r! V( I% c* S8 g- V3 X6 d. k1 }' U7 Q& M: f
#IF
$ c' H: D1 c2 D- w) MCHECKTEXTLIST ..\QuestDiary\禁止修改名称.txt <$Str(S1)>/ u/ ~" R$ _0 ~$ _( A! e
#Act
N# o9 F5 b( |! H) ] Z! i DMessageBox [提示:]\\该名字已被其他玩家使用!- L' s' U2 n! J! w
Break: k0 J: h& r! a( v: O7 z" x% A
+ i' ]$ V# `: ]: z5 L
6 \% N' {3 e* {& a. x#OR
0 O+ _$ K6 ]( u" ^CheckStringlength S1 > 20
. k1 _" q2 F) ^CheckStringlength S1 < 4% o4 z w. m7 o A
#ACT
( C0 Y+ G/ S F6 e. t' PSENDMSG 6 输入名称长度不正确/ x$ q8 d }9 h" _0 L6 ]1 A+ N
Break
- A5 }+ Q+ Y N9 F9 T* Q0 x i: t( n( R# Q
x# [2 o+ G! ^& s: X7 O
#IF6 G- q" f; o8 T" k9 O, {, L
#ACT
5 W0 v1 a1 n3 T! \; AQUERYHUMNAMEEXIST S1# m; S% L% y5 L, E
@; ? u$ F, A' S- V) C
& \* U% P+ \0 R$ M. S9 D' J) y
[@InputString2]
" U0 j8 v. w) `! c H' X#IF# f9 K7 ~' e7 V
CHECKGAMEGOLD < 1000000/ n& k0 |, {; v/ Q5 B- T4 w6 d
#ACT
8 I# ?6 e& U- n1 _8 `messagebox 你元宝不足!# f& n5 L& |- }+ h
BREAK% |! |* e+ T4 u) B _4 Z
* G! e/ M0 B2 T0 \$ Y0 l M* L" ]' q6 j. }3 I
#if3 s9 f% y- @1 o1 u# [4 S1 b x
equal s2 <$username>9 ^) b& [; M0 j! W$ \; @. \! G
#act
0 {: \. J/ H, s$ N9 _0 dmessagebox 输入的名称为现在名称.无需修改!
- [2 _- X! `: u* `* S4 Ebreak
9 t( R* B6 s) X+ C' _8 h0 w" r#IF
k. S9 b) U6 q8 ? ]4 f; Y$ kEqual S2
- Z' _. L8 u# r" g% P+ P#ACT- q7 r9 m, p& \6 x8 d; u- a
SENDMSG 6 请输入一个正确的名称0 Y9 z" t5 n+ N0 x
Break
$ v) h6 g4 p4 e; m- D) \% o) `+ E
* [, A. Y k4 w0 t
2 q+ j- p g! e. j( W#OR
. w; t# _5 [: S8 N' ?CheckStringlength S2 > 20
: s" H/ k$ S* `CheckStringlength S2 < 4
; V% d/ K; Q6 V( z d1 `#ACT6 @8 Q L! p3 ?( k9 Q
SENDMSG 6 输入名称长度不正确7 `8 w" @6 L! G8 Z% t8 Y( d+ o
Break" d5 p& I6 w1 Z$ [% U& m3 R7 ]: F
6 n% z0 |+ u! k6 O$ q
" B7 E- l- j( K/ n#IF
# u# \% x4 o5 i2 L% V' X4 M1 o#ACT
: J7 M. w/ |4 [# \GAMEGOLD - 1000000
( F7 N; b* c( W- w) J' j. Y& `CHANGEHUMNAME S2
" U _9 `, [7 o/ ^: Q9 T J
$ {+ {1 m# p2 U3 G) u |
发表于 2023-6-16 22:24:10
皖公网安备:34112402000394号 0.207263 second(s), 26 queries
.