[@main]
#IF
#ACT
#say
\ \
<--------------------------------------------------------------/AUTOCOLOR=90>\
<改名服务/SCOLOR=168> <管理员/SCOLOR=19> <尊敬的贵宾玩家,您好/SCOLOR=151> <〖欢迎使用改名服务〗/SCOLOR=87>\
<--------------------------------------------------------------/AUTOCOLOR=90>\
<1.为防止游戏乱改名现象，改名服务将收取30 RMB点/SCOLOR=156> \
<2.暂时只支持因合区后游戏名重复，名字后面多了字母！/SCOLOR=155> \
<3.如名：潇洒哥a，那么改名后直可以将你的字母a去掉！/SCOLOR=145> \
<4.修改名字之前，请先输入新的游戏名，查询是否可用！/SCOLOR=147> \
<--------------------------------------------------------------/AUTOCOLOR=90>\
<(第⒈步)><查询名称是否可以使用/@@InputString1(请输入新的名称：)> <(第⒉步)><点击修改名字/@@InputString2(请输入新的名称：)> \
<--------------------------------------------------------------/AUTOCOLOR=90>\
<说明.为防止游戏乱改名现象，改名服务将收取30RMB> \
[@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
CHECKGAMEPOINT > 30
#ACT
GAMEPOINT - 30
#ELSEACT
messagebox 您的RMB不足30,无法改名！
break
#IF
Equal S2
#ACT
SENDMSG 6 请输入一个正确的名称
Break
#OR
CheckStringlength S2 > 20
CheckStringlength S2 < 4
#ACT
SENDMSG 6 输入名称长度不正确
Break
#IF
#ACT
CHANGEHUMNAME S2
Break
|
