人物改名

admin

[@StdModeFunc10] ；///触发ID
#ACT
GIVE 人物改名卡
MESSAGEBOX 是否需要修改当前游戏名字？\　\点击确定，打开修改人物名字窗口 @是的要修改名字

[@是的要修改名字]
#ACT
OPENMERCHANTBIGDLG 8 100 0 0 0 0 1 370 0
#SAY
　 <人物名字修改系统：/SCOLOR=254>\
　 <当前人物名字：/SCOLOR=254><$Username>\
　 <输入新的名字/@@InputString27(请输入新的名称：)>：<$str(S27)>\
　 <查询名字是否可用{SCOLOR=250}/@查询新名字可用否>\
　 <我已取好新名字，立即改名/@更名改姓>\\\\

[@更名改姓]
#IF
CHECKITEM 人物改名卡
#ACT
TAKE 人物改名卡
CHANGEHUMNAME S27
BREAK
#ELSEACT
MESSAGEBOX 你的人物改名卡呢？

[@查询新名字可用否]
#IF
Equal S27
#ACT
MESSAGEBOX 请输入一个正确的名称
Break

#OR
CheckStringlength S27 > 14
CheckStringlength S27 < 4
#ACT
MESSAGEBOX 最多只能取7个字符的名字
Break

#IF
#ACT
QUERYHUMNAMEEXIST S27

[@InputString27]
#IF
Equal S27
#ACT
MESSAGEBOX 请输入新名字
Break
#IF
CheckContainsText <$STR(S27)> @
#ACT
MESSAGEBOX 包含非法字符
BREAK
#IF
CheckContainsText <$STR(S27)> /
#ACT
MESSAGEBOX 包含非法字符
BREAK
#IF
CheckContainsText <$STR(S27)> 垃圾
#ACT
MESSAGEBOX 包含非法字符
BREAK
#IF
CheckContainsText <$STR(S27)> 私服
#ACT
MESSAGEBOX 包含非法字符
BREAK
#IF
CheckContainsText <$STR(S27)> 管理员
#ACT
MESSAGEBOX 包含非法字符
BREAK
#IF
CheckContainsText <$STR(S27)> 托
#ACT
MESSAGEBOX 包含非法字符
BREAK
#IF
CheckContainsText <$STR(S27)> 拖
#ACT
MESSAGEBOX 包含非法字符
BREAK
#IF
CheckContainsText <$STR(S27)> GM
#ACT
MESSAGEBOX 包含非法字符
BREAK
#IF
CheckContainsText <$STR(S27)> 传奇私服
#ACT
MESSAGEBOX 包含非法字符
BREAK
#IF
CheckContainsText <$STR(S27)> 　
#ACT
MESSAGEBOX 包含非法字符
BREAK
#OR
CheckStringlength S27 > 14
CheckStringlength S27 < 4
#ACT
MESSAGEBOX 输入名称长度不正确
Break
#IF
#ACT
GOTO @是的要修改名字

[@QueryingHumName]
#ACT
MESSAGEBOX 正在查询请稍后。。。

[@QueryHumNameOK]
#ACT
MESSAGEBOX 查询成功，该名称可以使用

[@ChangeingHumName]
#ACT
MESSAGEBOX 正在修改请稍后。。。

[@ChangeHumNameOK]
#ACT
CLOSE
MOV s27
MESSAGEBOX 名字修改成功：\　\旧名字：<$USERNAME>\　\新名字：<$USERNEWNAME>
BREAK

[@NameLengthFail]
#ACT
MESSAGEBOX 名字长度不允许超过7个字符

[@HumNameFilter]
#ACT
MESSAGEBOX 该名字存在非法字符

[@HumNameExists]
#ACT
MESSAGEBOX 该名字已经被其他玩家占用，请选择其他名字

[@ChangeHumNameFail]
#ACT
MESSAGEBOX 改名失败！

墨月

这贴内容不错

七玉

确实是难得好帖啊，顶先！

蔚蓝罗伦斯

路过 帮顶 嘿嘿

纵横群山

又抢到前排了。哈，不用怀疑，不用惊讶，你也没有看错！

不怕苦

不错，顶一个！

歪小鼠

不错，顶一个！

风筝

么有分，谁能送我点积分啊::>_<::

永毅伊邪那歧

路过 帮顶 嘿嘿

灵魂承载者

感谢楼主分享，2020发大财！！！