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