[@Main]
\ \
<你是否觉得你的名字不够霸气？/FCOLOR=254>\
<你是否厌倦了现在的名字,想换个心情？/FCOLOR=254>\
<你是否想逃避仇家的追杀？/SCOLOR=250>\
<我可以帮你解决这些问题，但是你要付出30RMB的代价/SCOLOR=249>\
　　　　　　　　　\
　　　<查询名称是否可以使用{FCOLOR=251}/@@InputString17(请输入新的名称：)>    <我要改名{FCOLOR=251}/@@InputString18(请输入新的名称：)>\
　　　　　　　　　\\

[@InputString17]
#IF
Equal S17
#ACT
SENDMSG 6 请输入一个正确的名称
Break

#OR
CheckStringlength S17 > 20
CheckStringlength S17 < 4
#ACT
SENDMSG 6 输入名称长度不正确
Break

#IF
#ACT
QUERYHUMNAMEEXIST S17

[@InputString18]
#IF
Equal S18
#ACT
SENDMSG 6 请输入一个正确的名称
Break

#OR
CheckStringlength S18 > 20
CheckStringlength S18 < 4
#ACT
SENDMSG 6 输入名称长度不正确
Break

#IF
CHECKGAMEDIAMOND < 30
#ACT
MESSAGEBOX 你的RMB点不足！
Break

#IF
#ACT
GAMEDIAMOND - 30
CHANGEHUMNAME S18