[@̨]
{
<˵½/@˵½>

[@˵½]
˵Լжڿ̨в  <ʼ̨/@ʼ˿̨>\
Ŀǰȫ߼Ϊ[<$STR(G97)>][<ˢ/@˵½>]\
\
< ͼ/@@InPutString200>[<$STR(A491)>]    <X/@@InPutInteger202>[<$STR(G101)>]    <Y/@@InPutInteger203>[<$STR(G102)>]\
< /@@InPutInteger204>[<$STR(G103)>]    < /@@InPutInteger200>[<$STR(G98)>]\
\
<ֶ½/@ȷ½>    <Զ½/@Զǻ>    </@ȷ>-ǰͼ[<$STR(A491)>]\
\
<ؼ˳ֵ/@Զֵ>    <ؼ˹ɳ/@˹ɳ>    <ֹͣ/@ֹͣ>    </@>    </@̨>

[@˹ɳ]
#IF
EQUAL G100 1
#SAY
ڼϵͳÿ5,ԶѾлļ˵\ \
ǰ˹ɳ״̬ǣ<[]>\ \ \
<ֹͣ˹ɳ/@ֹͣ˹ɳ>                         <ҳ/@˵½>
#ACT
BREAK
#ELSESAY
ڼϵͳÿ5,ԶѾлļ˵\ \
ǰ˹ɳ״̬ǣ<[ر]>\ \ \
<˹ɳ/@˹ɳ>                         <ҳ/@˵½>

[@˹ɳ]
#ACT
MOV G100 1
SENDMSG 6 ʾԶϵͳѾ[]!
GOTO @˹ɳ
BREAK

[@ֹͣ˹ɳ]
#ACT
MOV G100 0
SENDMSG 6 ʾԶϵͳѾ[ر]!
GOTO @˹ɳ
BREAK

[@Զֵ]
ؼ˳ֵϵͳɹÿ40ӳֵһΡ\
\
\
˳ֵϵͳĿǰ״̬Ϊ<$STR(A30)>\
\
\
<˳ֵϵͳ/@˳ֵϵͳ>        <رռ˳ֵϵͳ/@رռ˳ֵϵͳ>        <ҳ/@˵½>

[@˳ֵϵͳ]
#ACT
MOV A30 
SENDMSG 6 ѾԶֵ
GOTO @Զֵ
BREAK

[@رռ˳ֵϵͳ]
#ACT
MOV A30 ر
SENDMSG 6 ˳ֵѾر
GOTO @Զֵ
BREAK

[@Զǻ]
#IF
EQUAL G112 1
#SAY
ϵͳÿ20,Զ½һ\ \
ǰϵͳ״̬ǣ<[]>\ \ \
<رϵͳ/@صǻ>                         <ҳ/@˵½>
#ACT
BREAK
#ELSESAY
ϵͳÿ20,Զ½һ\ \
ǰϵͳ״̬ǣ<[ر]>\ \ \
<ϵͳ/@ǻ>                         <ҳ/@˵½>

[@ǻ]
#ACT
MOV G112 1
MOV G99 1
SENDMSG 6 ʾԶ½ϵͳѾ[]!
GOTO @Զǻ
BREAK

[@صǻ]
#ACT
MOV G112 0
SENDMSG 6 ʾԶ½ϵͳѾ[ر]!
GOTO @Զǻ
BREAK

[@ȷ]
#ACT
Gmexecute ȫ @
GOTO @˵½
SENDMSG 6 ʾͼ[<$STR(A491)>]ļѾȫ....
BREAK

[@@InPutInteger200]
#ACT
DELAYGOTO 1 @InPutInteger200
[@InPutInteger200]
#ACT
MOV G98 M200
SENDMSG 6 ʾü½Ϸǣ<$STR(G98)>
GOTO @˵½

[@@InPutString200]
#IF
True
#ACT
DELAYGOTO 1 ~InPutString200
[~InPutString200]
#ACT
MOV A491 <$STR(S200)>
SENDMSG 6 ʾ½ĵͼǣ<$STR(A491)>
GOTO @˵½

[@@InPutInteger202]
#ACT
DELAYGOTO 1 @InPutInteger202
[@InPutInteger202]
#ACT
MOV G101 M202
SENDMSG 6 ʾ½ĵͼXǣ<$STR(G101)>
GOTO @˵½

[@@InPutInteger203]
#IF
True
#ACT
DELAYGOTO 1 @InPutInteger203
[@InPutInteger203]
#ACT
MOV G102 <$STR(M203)>
SENDMSG 6 ʾ½ĵͼYǣ<$STR(G102)>
GOTO @˵½

[@@InPutInteger204]
#ACT
DELAYGOTO 1 @InPutInteger204
[@InPutInteger204]
#ACT
MOV G103 M204
SENDMSG 6 ʾ½ǣ<$STR(G103)>
GOTO @˵½

[@ȷ½]
#IF
EQUAL G98 0
#ACT
AILOGONEX <$STR(A491)> <$STR(G101)> <$STR(G102)> 1 ..\QuestDiary\ֹֽű\\б.txt ..\QuestDiary\ֹֽű\\Ӣб.txt
MESSAGEBOX [<$STR(G103)>]ڵ½ͼ[<$STR(A491)>][<$STR(G101)>][<$STR(G102)>]..\ûȷ½,Լͼ,ͼ,,\½ϷҪʱ,ӷ鿴ȫ½ٽһ
GOTO @˵½
BREAK
#IF
EQUAL G98 1
#ACT
AILOGONEX <$STR(A491)> <$STR(G101)> <$STR(G102)> 1 ..\QuestDiary\ֹֽű\\01.txt ..\QuestDiary\ֹֽű\\01Ӣ.txt
INC N11 1
SENDMSG 7 ʾ[<$STR(G98)>]½ͼ[<$STR(A491)>].[<$STR(G101)><$STR(G102)>],ε½[<$STR(N11)>]
SENDMSG 7 ʾûȷ½,Լͼ,ͼ,Ƿ
GOTO @˵½
BREAK
#IF
EQUAL G98 2
#ACT
AILOGONEX <$STR(A491)> <$STR(G101)> <$STR(G102)> 1 ..\QuestDiary\ֹֽű\\02.txt ..\QuestDiary\ֹֽű\\02Ӣ.txt
INC N12 1
SENDMSG 7 ʾ[<$STR(G98)>]½ͼ[<$STR(A491)>].[<$STR(G101)><$STR(G102)>],ε½[<$STR(N12)>]
SENDMSG 7 ʾûȷ½,Լͼ,ͼ,Ƿ
GOTO @˵½
BREAK
#IF
EQUAL G98 3
#ACT
AILOGONEX <$STR(A491)> <$STR(G101)> <$STR(G102)> 1 ..\QuestDiary\ֹֽű\\03.txt ..\QuestDiary\ֹֽű\\03Ӣ.txt
INC N13 1
SENDMSG 7 ʾ[<$STR(G98)>]½ͼ[<$STR(A491)>].[<$STR(G101)><$STR(G102)>],ε½[<$STR(N13)>]
SENDMSG 7 ʾûȷ½,Լͼ,ͼ,Ƿ
GOTO @˵½
BREAK
#IF
EQUAL G98 4
#ACT
AILOGONEX <$STR(A491)> <$STR(G101)> <$STR(G102)> 1 ..\QuestDiary\ֹֽű\\04.txt ..\QuestDiary\ֹֽű\\04Ӣ.txt
INC N14 1
SENDMSG 7 ʾ[<$STR(G98)>]½ͼ[<$STR(A491)>].[<$STR(G101)><$STR(G102)>],ε½[<$STR(N14)>]
SENDMSG 7 ʾûȷ½,Լͼ,ͼ,Ƿ
GOTO @˵½
BREAK
#IF
EQUAL G98 5
#ACT
AILOGONEX <$STR(A491)> <$STR(G101)> <$STR(G102)> 1 ..\QuestDiary\ֹֽű\\05.txt ..\QuestDiary\ֹֽű\\05Ӣ.txt
INC N15 1
SENDMSG 7 ʾ[<$STR(G98)>]½ͼ[<$STR(A491)>].[<$STR(G101)><$STR(G102)>],ε½[<$STR(N15)>]
SENDMSG 7 ʾûȷ½,Լͼ,ͼ,Ƿ
GOTO @˵½
BREAK
#IF
EQUAL G98 6
#ACT
AILOGONEX <$STR(A491)> <$STR(G101)> <$STR(G102)> 1 ..\QuestDiary\ֹֽű\\06.txt ..\QuestDiary\ֹֽű\\06Ӣ.txt
INC N16 1
SENDMSG 7 ʾ[<$STR(G98)>]½ͼ[<$STR(A491)>].[<$STR(G101)><$STR(G102)>],ε½[<$STR(N16)>]
SENDMSG 7 ʾûȷ½,Լͼ,ͼ,Ƿ
GOTO @˵½
BREAK
#IF
EQUAL G98 7
#ACT
AILOGONEX <$STR(A491)> <$STR(G101)> <$STR(G102)> 1 ..\QuestDiary\ֹֽű\\07.txt ..\QuestDiary\ֹֽű\\07Ӣ.txt
INC N17 1
SENDMSG 7 ʾ[<$STR(G98)>]½ͼ[<$STR(A491)>].[<$STR(G101)><$STR(G102)>],ε½[<$STR(N17)>]
SENDMSG 7 ʾûȷ½,Լͼ,ͼ,Ƿ
GOTO @˵½
BREAK
#IF
EQUAL G98 8
#ACT
AILOGONEX <$STR(A491)> <$STR(G101)> <$STR(G102)> 1 ..\QuestDiary\ֹֽű\\08.txt ..\QuestDiary\ֹֽű\\08Ӣ.txt
INC N18 1
SENDMSG 7 ʾ[<$STR(G98)>]½ͼ[<$STR(A491)>].[<$STR(G101)><$STR(G102)>],ε½[<$STR(N18)>]
SENDMSG 7 ʾûȷ½,Լͼ,ͼ,Ƿ
GOTO @˵½
BREAK
#IF
EQUAL G98 9
#ACT
AILOGONEX <$STR(A491)> <$STR(G101)> <$STR(G102)> 1 ..\QuestDiary\ֹֽű\\09.txt ..\QuestDiary\ֹֽű\\09Ӣ.txt
INC N19 1
SENDMSG 7 ʾ[<$STR(G98)>]½ͼ[<$STR(A491)>].[<$STR(G101)><$STR(G102)>],ε½[<$STR(N19)>]
SENDMSG 7 ʾûȷ½,Լͼ,ͼ,Ƿ
GOTO @˵½
BREAK
#IF
EQUAL G98 10
#ACT
AILOGONEX <$STR(A491)> <$STR(G101)> <$STR(G102)> 1 ..\QuestDiary\ֹֽű\\10.txt ..\QuestDiary\ֹֽű\\10Ӣ.txt
INC N19 1
SENDMSG 7 ʾ[<$STR(G98)>]½ͼ[<$STR(A491)>].[<$STR(G101)><$STR(G102)>],ε½[<$STR(N19)>]
SENDMSG 7 ʾûȷ½,Լͼ,ͼ,Ƿ
GOTO @˵½
BREAK


[@ֹͣ]
˴ѡֹͣԭزȫлصǡ\
<õͼ/@@InPutString3>[<$STR(A492)>]\
<ָͼֹͣ/@ָͼֹͣ>-ͼ[<$STR(A492)>]\
<ָͼ˲ȫصǰȫ/@ָͼֹͣس>-ͼ[<$STR(A492)>]\
\
<мֹͣ/@ȫֹͣ>\
<мֹͣȫصǰȫ/@ȫֹͣس>\
\
<ҳ/@˵½>

[@@InPutString3]
#ACT
DELAYGOTO 1 @InPutString3
[@InPutString3]
#ACT
MOV A492 S3
SENDMSG 6 ʾֹͣ˵ĵͼǣ<$STR(A492)>
GOTO @ֹͣ
[@ָͼֹͣ]
#ACT
Gmexecute ȫ @ָͼֹͣ
SENDMSG 6 ͼΪ[<$STR(A492)>]ļѾȫֹͣ
GOTO @ֹͣ
BREAK
[@ָͼֹͣس]
#ACT
Gmexecute ȫ @ָͼֹͣس
SENDMSG 6 ͼΪ[<$STR(A492)>]ļѾȫֹͣлǰȫ
GOTO @ֹͣ
BREAK
[@ȫֹͣ]
#ACT
MOV G99 0
Gmexecute ȫ @ֹͣ
SENDMSG 6 Ѿȫֹͣ
GOTO @ֹͣ
BREAK
[@ȫֹͣس]
#ACT
MOV G99 0
Gmexecute ȫ @ֹͣس
SENDMSG 6 Ѿȫֹͣлǰȫ
GOTO @ֹͣ
BREAK

[@]
˴ѡȫָͼָģʽ\
<õͼ/@@InPutString4>[<$STR(A493)>]\
<ָͼ/@ָͼ>-ͼ[<$STR(A493)>]\
<м/@ȫͼ>\
\
<ָͼ˸ı乥ģʽ/@@InPutInteger5>-ͼ[<$STR(A493)>]\
<м˸ı乥ģʽ/@@InPutInteger6>\
\
<ҳ/@˵½>\
\
<ģʽ0-7/FCOLOR=249>0-ȫ幥(,)\
           1-ƽ(PK)\
           2-޹\
           3-ʦͽ\
           4-鹥\
           5-лṥ\
           6-(ܹ󷴻)\
           7-ʦŹ
[@@InPutString4]
#ACT
DELAYGOTO 1 @InPutString4
[@InPutString4]
#ACT
MOV A493 S4
SENDMSG 6 ʾĵͼǣ<$STR(A493)>
GOTO @
[@@InPutInteger5]
#ACT
DELAYGOTO 1 @InPutInteger5
[@InPutInteger5]
#ACT
MOV G104 M5
Gmexecute ȫ @ָͼıģʽ
SENDMSG 6 ͼΪ[<$STR(A493)>]м˹ģʽΪ<$STR(G104)>
GOTO @
BREAK
[@@InPutInteger6]
#ACT
DELAYGOTO 1 @InPutInteger6
[@InPutInteger6]
#ACT
MOV G104 M6
Gmexecute ȫ @м˸ıģʽ
SENDMSG 6 м˹ģʽıΪ<$STR(G104)>
GOTO @
BREAK
[@ָͼ]
#ACT
MOV G99 1
Gmexecute ȫ @ָ
SENDMSG 6 ͼΪ[<$STR(A493)>]ļѾɹ
GOTO @
BREAK
[@ȫͼ]
#ACT
MOV G99 1
Gmexecute ȫ @ȫ
SENDMSG 6 мѾɹ
GOTO @
BREAK

[@ʼ˿̨]
#ACT
MOV G97 0
MOV G98 0
MOV G99 0
MOV G100 0
MOV G101 0
MOV G102 0
MOV G103 0
MOV G104 0
MOV A30 ر
MOV A491 0
MOV A492 0
MOV A493 0
MOV N11 0
MOV N12 0
MOV N13 0
MOV N14 0
MOV N15 0
MOV N16 0
MOV N17 0
MOV N18 0
MOV N19 0
SENDMSG 6 ʼ˿̨ϣ
GOTO @˵½
BREAK
}
