[@Main]
#IF
#ACT
CloseBigDialogBox
#SAY
\ \
\ <嫌自己的名字太丑？还是做了什么见不得人的事情？/SCOLOR=250> \ \
\ <好吧，给我50R点点,我给你换一个新身份！！！/SCOLOR=250><你当前拥有R点点/SCOLOR=70>：<$GAMEPOINT> <元/SCOLOR=70> \ \
\ <提示：改名前切记查询是否名字是否可以更换！！(恶意改名字超过7个字删号)/SCOLOR=250> \ \
\ <≮确认更换名字≯/@更换名字>\ \
[@更换名字]
\ \
\ <请改名之前确认名字是否可以使用，如果因你未查询清楚改名失败/SCOLOR=250>\ \
\ <官方概不负责！！/SCOLOR=250>\ \
\ <≮查询名称是否可以使用≯/@@InputString1(请输入新的名称：)>\ \
\ <≮确认改名≯/@@InputString2(请输入新的名称：)>\
[@InputString1]
#IF
Equal S1
#ACT
SENDMSG 6 请输入一个正确的名称
Break
#OR
CheckStringlength S1 > 20
CheckStringlength S1 < 4
#ACT
SENDMSG 6 输入名称长度不正确
Break
#IF
#ACT
QUERYHUMNAMEEXIST S1
[@InputString2]
#IF
Equal S2
#ACT
SENDMSG 6 请输入一个正确的名称
Break
#OR
CheckStringlength S2 > 20
CheckStringlength S2 < 4
#ACT
SENDMSG 6 输入名称长度不正确
Break
#IF
CHECKGAMEPOINT > 49
#ACT
GAMEPOINT - 50
CHANGEHUMNAME S2
MESSAGEBOX [提示]:恭喜您！名字修改成功！！！！
#ELSEACT
MESSAGEBOX [提示]:你没有50R点点还想改头换面重新做人？？？
break