GOM引擎改人物名脚本
[@改名系统]{
\
\
<查询名称是否可以使用/@@InputString11(请输入新的名称：)>\ \
<我要改名/@@InputString21(请输入新的名称：)>\ \ \
<关闭/@exit>\
[@InputString11]
#IF
Equal S11
#ACT
SENDMSG 6 请输入一个正确的名称
Break
#OR
CheckStringlength S11 > 14
CheckStringlength S11 < 3
#ACT
SENDMSG 6 输入名称长度不正确
Break
#IF
#ACT
QUERYHUMNAMEEXIST S11
[@InputString21]
#IF
Equal S21
#ACT
SENDMSG 6 请输入一个正确的名称
Break
#OR
CheckStringlength S21 > 14
CheckStringlength S21 < 3
#ACT
SENDMSG 6 输入名称长度不正确
Break
#IF
CHECKGAMEGOLD > 4999
#ACT
CHANGEHUMNAME S21
close
break
#ELSEACT
MessageBox 提示：你的会员币不足！
break
[@土豪更换]
#if
equal A8 <$USERNAME>
#act
mov A8 <$USERNEWNAME>
break
#if
equal A9 <$USERNAME>
#act
mov A9 <$USERNEWNAME>
break
#if
equal A10 <$USERNAME>
#act
mov A10 <$USERNEWNAME>
break
}