重要点:先调取禁用词字符串文本路径必须在QuestDiary文件内,
<$NPCINPUT(1)>是改名的常量
inc S$展示界面 <Button|x=190.0|y=510.0|color=250|size=18|nimg=public/1900000612.png|text=修改名称|link=@修改名称>
[@修改名称]
#say
<str(S展示界面)>
<Img|x=413.0|y=296.0|width=200|height=50|move=0|loadDelay=1|esc=1|reset=1|img=public/1900000678.png|bg=1|show=0>
<Input|x=451.0|y=303.0||width=145|height=25|size=18|errortips=1|mincount=6|color=255|maxcount=12|inputid=1|type=0>
<Button|x=588.0|y=373.0|color=255|mimg=p|submitInput=1|size=18|nimg=public/00000361.png|link=@改名>
[@改名]
#if
#act
mov S11 <$NPCINPUT(1)>
#IF
Equal <$NPCINPUT(1)>
#ACT
SENDMSG 6 请输入一个正确的名称<$NPCINPUT(1)>
Break
#if
CheckContainsTextList ..\QuestDiary\DenyChrName.txt <$str(s11)>
#ACT
SENDMSG 6 你输入的是违禁词!!!
break
#OR
CheckStringlength <$NPCINPUT(1)> > 20
CheckStringlength <$NPCINPUT(1)> < 4
#ACT
SENDMSG 6 输入名称长度不正确!!!
Break
#IF
#ACT
CHANGEHUMNAME <$NPCINPUT(1)>
break
<<必须放到QF触发里>>
[@QueryingHumName]
正在查询请稍后。。。\
<关闭/@exit>\
[@QueryHumNameOK]
查询成功,该名称可以使用\
<关闭/@exit>\
[@ChangeingHumName]
正在修改请稍后。。。\
<关闭/@exit>\
[@ChangeHumNameOK]
#ACT
#SAY
你的名字修改成功,旧名称:<USERNAME> 新名称:<USERNEWNAME>!\
<关闭/@exit>\
[@NameLengthFail]
名字长度不允许超过30个字符!\
<关闭/@exit>\
[@HumNameFilter]
该名字存在非法字符!\
<关闭/@exit>\
[@HumNameExists]
该名字已经被其他玩家占用,请选择其他名字\
<关闭/@exit>\
[@ChangeHumNameFail]
改名失败!\
<关闭/@exit>\