[@ŵ]
{
#IF
True
#ACT
MOV D5 0
MOV D50 0
MOV D51 0

#IF
ISCASTLEMASTER 0
NOT ISCASTLEMASTER 1
#ACT
;ɳͿ˳
MOV D50 1

#IF
ISCASTLEMASTER 1
NOT ISCASTLEMASTER 0
#ACT
;ǳ
MOV D50 2

#IF
ISCASTLEMASTER 0
ISCASTLEMASTER 1
#ACT
;˫ǳ
MOV D50 3

;˫ǳʾ
#IF
EQUAL D50 3
#ACT
SETICON <$STR(D5)> <$STR(D50)>
INC D5 1

#IF
checknamelist ..\QuestDiary\ļ\µһ\սʿ.txt
#ACT
;4
MOV D51 4

#IF
checknamelist ..\QuestDiary\ļ\µһ\зʦ.txt
#ACT
;6
MOV D51 6

#IF
checknamelist ..\QuestDiary\ļ\µһ\зʿ.txt
#ACT
;8
MOV D51 8

#IF
checknamelist ..\QuestDiary\ļ\µһ\д̿.txt
#ACT
;10
MOV D51 10

#IF
checknamelist ..\QuestDiary\ļ\µһ\Ůսʿ.txt
#ACT
;5
MOV D51 5

#IF
checknamelist ..\QuestDiary\ļ\µһ\Ůʦ.txt
#ACT
;7
MOV D51 7

#IF
checknamelist ..\QuestDiary\ļ\µһ\Ůʿ.txt
#ACT
;9
MOV D51 9

#IF
checknamelist ..\QuestDiary\ļ\µһ\Ů̿.txt
#ACT
;11
MOV D51 11

;˫⣬µһʾ
#IF
LARGE D51 0
#ACT
SETICON <$STR(D5)> <$STR(D51)>
INC D5 1

;
#IF
NOT EQUAL D50 3
LARGE D50 0
#ACT
SETICON <$STR(D5)> <$STR(D50)>
INC D5 1


#IF
checknamelist ..\QuestDiary\\Ա.txt
#ACT
mov s20 ʺš
mov D4 1
#IF
equal D4 1
#ACT
SETRANKLEVELNAME %s\<$STR(S20)>
#ELSEACT
SETRANKLEVELNAME %s
}
