[@]
{
#IF
#ACT
#SAY
<$STR(A52)>\ 
<$STR(A53)>\ 
<$STR(A54)>\ 
<$STR(A55)>\ 
<$STR(A56)>\ 
<$STR(A57)>\ 
<$STR(A58)>\ 
<$STR(A59)>\ 
<ɳͿ˻᳤ʾ/@@InPutString1>ֻʾ8ԡ\ 

[@InPutString1] 
#IF
ISCASTLEMASTER
#ACT
GOTO @liuyan
#ELSEACT
MessAgeBox 㲻ɳͿ˻᳤޷ʹá

[@liuyan] 
#IF 
EQUAL S1 
#ACT 
Messagebox [ʧ]Ҫܷ֡Ϣ 
GOTO @ 
BREAK 
#IF  
#ACT  
MOV S4 <$USERNAME>
MOV S5 < 
INC S5 S4 
INC S5 /AUTOCOLOR= 
GetRandomName ..\QuestDiary\\ɫ.txt S50 
INC S5 <$STR(S50)> 
INC S5 >˵< 
INC S5 <$STR(S1)> 
INC S5 /AUTOCOLOR= 
GetRandomName ..\QuestDiary\\ɫ.txt S50 
INC S5 <$STR(S50)> 
INC S5 > 
MOV A59 <$STR(A58)> 
MOV A58 <$STR(A57)> 
MOV A57 <$STR(A56)> 
MOV A56 <$STR(A55)> 
MOV A55 <$STR(A54)> 
MOV A54 <$STR(A53)> 
MOV A53 <$STR(A52)> 
MOV A52 <$STR(S5)> 
MOV S5 
MOV S1 
MOV S1 
GOTO @ 
BREAK 
#ELSEACT 
Messagebox [ʧ]ϵͳϣԺٳԡ 
GOTO @ 
BREAK
}