[@Main]
<查询名称是否可以使用/@@InputString1(请输入新的名称:)>\
<我要改名/@@InputString2(请输入新的名称:)>>\
[@InputString1]
#IF
EqualS1
#ACT
SENDMSG6请输入一个正确的名称
Break
#OR
CheckStringlengthS1>14
CheckStringlengthS1<4
#ACT
SENDMSG6输入名称长度不正确
Break
;无需检测名字是否可用
;#IF
;CheckHumNameCanUseS1
;#SAY
;<$STR(S1)>可以使用
;#ELSESAY
;<$STR(S1)>不能使用!!!
[@InputString2]
#IF
EqualS2
#ACT
SENDMSG6请输入一个正确的名称
Break
#OR
CheckStringlengthS2>14
CheckStringlengthS2<4
#ACT
SENDMSG6输入名称长度不正确
Break
#IF
#ACT
CHANGEHUMNAMES2
<查询名称是否可以使用/@@InputString1(请输入新的名称:)>\
<我要改名/@@InputString2(请输入新的名称:)>>\
[@InputString1]
#IF
EqualS1
#ACT
SENDMSG6请输入一个正确的名称
Break
#OR
CheckStringlengthS1>14
CheckStringlengthS1<4
#ACT
SENDMSG6输入名称长度不正确
Break
;无需检测名字是否可用
;#IF
;CheckHumNameCanUseS1
;#SAY
;<$STR(S1)>可以使用
;#ELSESAY
;<$STR(S1)>不能使用!!!
[@InputString2]
#IF
EqualS2
#ACT
SENDMSG6请输入一个正确的名称
Break
#OR
CheckStringlengthS2>14
CheckStringlengthS2<4
#ACT
SENDMSG6输入名称长度不正确
Break
#IF
#ACT
CHANGEHUMNAMES2

