[@360M2űNPC]
{
#IF
CHECK [0] 0
#ACT
OPENMERCHANTBIGDLG $(Դ) $(ͼƬ0) 0 0 -35 -30 0 0 0
#SAY
<Img:$(ͼƬ1):$(Դ):782:30/@exit>\
<Img:$(ͼƬ2):$(Դ):200:50/@360M2űNPC>
<Img:$(ͼƬ3):$(Դ):250:50/@360M2ֻعűNPC>
<>              <>
<Img:$(ͼƬ5):$(Դ):300:330/@360M2ȷ>\
<PlayImg:6:92:12:300:0:-50:0:0>\

#IF
CHECK [0] 0
#ACT
DelTextList ..\..\..\..\360M2\RMBݲѯ.txt Www.360M2.Com
AddTextList ..\..\..\..\360M2\RMBݲѯ.txt Www.360M2.Com
MOV N0 9999999
GetStringPos ..\..\..\..\360M2\RMBݲѯ.txt Www.360M2.Com
#IF
EQUAL N0 9999999
#ACT
MOV N0 0
#ELSEACT
DelTextList ..\..\..\..\360M2\RMBݲѯ.txt Www.360M2.Com
#IF
CHECK [0] 0
#ACT
MOV P5 $(ÿҳ)
#IF
LARGE P5 10
#ACT
MOV P5 10
#IF
CHECK [0] 0
#ACT
MOV P4 $(ÿ)
#IF
LARGE P4 20
#ACT
MOV P4 20
#IF
CHECK [0] 0
#ACT
MOV P1 <$STR(N$ҳ)>
MOV P3 <$STR(N0)>
MOV P2 <$STR(P3)>
DEC P2 1
DIV P2 <$STR(P2)> <$STR(P5)>
INC P2 1
MOV S$S11
#IF
LARGE P1 <$STR(P2)>
#ACT
MOV P1 <$STR(P2)>
MOV N$ҳ <$STR(P1)>
#IF
SMALL P1 1
#ACT
MOV P1 1
MOV N$ҳ <$STR(P1)>
#IF
CHECK [0] 0
#ACT
MOV P8 <$STR(P1)>
DEC P8 1
MUL P8 <$STR(P8)> <$STR(P5)>
MOV P9 <$STR(P3)>
MOV P7 <$STR(P8)>
INC P7 1
INC P9 1
DEC P9 <$STR(P7)>
MOV P6 $(ģʽ)

#IF
EQUAL P6 1
#ACT
MOV P7 <$STR(P9)>
#ELSEACT
MOV P7 <$STR(P8)>
INC P7 1
#IF
SMALL P9 1
LARGE P5 0
#ACT
DEC P5 1
INC S$S11 \
#IF
LARGE P9 0
LARGE P5 0
#ACT
MOV S$S2 <ȴͷ/FCOLOR=$(ɫ3)>
MOV S$S0
SetStringBlank <$STR(S$S0)> $(1) 1
INC S$S11 <$STR(S$S0)>
MOV S$S0 .<$STR(P7)>
SetStringBlank <$STR(S$S0)> $(2) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ1)>
MOV S$S0
GetRandomText ..\..\..\..\360M2\RMBݲѯ.txt S$S0 <$STR(P8)>
MOV S$S1 <$STR(S$S0)>
DEC S$S0 1 $(볤)
SetStringBlank <$STR(S$S0)> $(3) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ2)>
#IF
LARGE P9 0
LARGE P5 0
NOT CHECKTEXTLIST ..\..\..\..\360M2\RMB.txt <$STR(S$S1)>
#ACT
MOV S$S2 <Ѿ/FCOLOR=$(ɫ4)>
#IF
LARGE P9 0
LARGE P5 0
#ACT
INC S$S11 <$STR(S$S2)>\
DEC P5 1
INC P8 1
DEC P9 1
#IF
EQUAL P6 1
#ACT
MOV P7 <$STR(P9)>
#ELSEACT
MOV P7 <$STR(P8)>
INC P7 1
#IF
SMALL P9 1
LARGE P5 0
#ACT
DEC P5 1
INC S$S11 \
#IF
LARGE P9 0
LARGE P5 0
#ACT
MOV S$S2 <ȴͷ/FCOLOR=$(ɫ3)>
MOV S$S0
SetStringBlank <$STR(S$S0)> $(1) 1
INC S$S11 <$STR(S$S0)>
MOV S$S0 .<$STR(P7)>
SetStringBlank <$STR(S$S0)> $(2) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ1)>
MOV S$S0
GetRandomText ..\..\..\..\360M2\RMBݲѯ.txt S$S0 <$STR(P8)>
MOV S$S1 <$STR(S$S0)>
DEC S$S0 1 $(볤)
SetStringBlank <$STR(S$S0)> $(3) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ2)>
#IF
LARGE P9 0
LARGE P5 0
NOT CHECKTEXTLIST ..\..\..\..\360M2\RMB.txt <$STR(S$S1)>
#ACT
MOV S$S2 <Ѿ/FCOLOR=$(ɫ4)>
#IF
LARGE P9 0
LARGE P5 0
#ACT
INC S$S11 <$STR(S$S2)>\
DEC P5 1
INC P8 1
DEC P9 1
#IF
EQUAL P6 1
#ACT
MOV P7 <$STR(P9)>
#ELSEACT
MOV P7 <$STR(P8)>
INC P7 1
#IF
SMALL P9 1
LARGE P5 0
#ACT
DEC P5 1
INC S$S11 \
#IF
LARGE P9 0
LARGE P5 0
#ACT
MOV S$S2 <ȴͷ/FCOLOR=$(ɫ3)>
MOV S$S0
SetStringBlank <$STR(S$S0)> $(1) 1
INC S$S11 <$STR(S$S0)>
MOV S$S0 .<$STR(P7)>
SetStringBlank <$STR(S$S0)> $(2) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ1)>
MOV S$S0
GetRandomText ..\..\..\..\360M2\RMBݲѯ.txt S$S0 <$STR(P8)>
MOV S$S1 <$STR(S$S0)>
DEC S$S0 1 $(볤)
SetStringBlank <$STR(S$S0)> $(3) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ2)>
#IF
LARGE P9 0
LARGE P5 0
NOT CHECKTEXTLIST ..\..\..\..\360M2\RMB.txt <$STR(S$S1)>
#ACT
MOV S$S2 <Ѿ/FCOLOR=$(ɫ4)>
#IF
LARGE P9 0
LARGE P5 0
#ACT
INC S$S11 <$STR(S$S2)>\
DEC P5 1
INC P8 1
DEC P9 1
#IF
EQUAL P6 1
#ACT
MOV P7 <$STR(P9)>
#ELSEACT
MOV P7 <$STR(P8)>
INC P7 1
#IF
SMALL P9 1
LARGE P5 0
#ACT
DEC P5 1
INC S$S11 \
#IF
LARGE P9 0
LARGE P5 0
#ACT
MOV S$S2 <ȴͷ/FCOLOR=$(ɫ3)>
MOV S$S0
SetStringBlank <$STR(S$S0)> $(1) 1
INC S$S11 <$STR(S$S0)>
MOV S$S0 .<$STR(P7)>
SetStringBlank <$STR(S$S0)> $(2) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ1)>
MOV S$S0
GetRandomText ..\..\..\..\360M2\RMBݲѯ.txt S$S0 <$STR(P8)>
MOV S$S1 <$STR(S$S0)>
DEC S$S0 1 $(볤)
SetStringBlank <$STR(S$S0)> $(3) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ2)>
#IF
LARGE P9 0
LARGE P5 0
NOT CHECKTEXTLIST ..\..\..\..\360M2\RMB.txt <$STR(S$S1)>
#ACT
MOV S$S2 <Ѿ/FCOLOR=$(ɫ4)>
#IF
LARGE P9 0
LARGE P5 0
#ACT
INC S$S11 <$STR(S$S2)>\
DEC P5 1
INC P8 1
DEC P9 1
#IF
EQUAL P6 1
#ACT
MOV P7 <$STR(P9)>
#ELSEACT
MOV P7 <$STR(P8)>
INC P7 1
#IF
SMALL P9 1
LARGE P5 0
#ACT
DEC P5 1
INC S$S11 \
#IF
LARGE P9 0
LARGE P5 0
#ACT
MOV S$S2 <ȴͷ/FCOLOR=$(ɫ3)>
MOV S$S0
SetStringBlank <$STR(S$S0)> $(1) 1
INC S$S11 <$STR(S$S0)>
MOV S$S0 .<$STR(P7)>
SetStringBlank <$STR(S$S0)> $(2) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ1)>
MOV S$S0
GetRandomText ..\..\..\..\360M2\RMBݲѯ.txt S$S0 <$STR(P8)>
MOV S$S1 <$STR(S$S0)>
DEC S$S0 1 $(볤)
SetStringBlank <$STR(S$S0)> $(3) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ2)>
#IF
LARGE P9 0
LARGE P5 0
NOT CHECKTEXTLIST ..\..\..\..\360M2\RMB.txt <$STR(S$S1)>
#ACT
MOV S$S2 <Ѿ/FCOLOR=$(ɫ4)>
#IF
LARGE P9 0
LARGE P5 0
#ACT
INC S$S11 <$STR(S$S2)>\
DEC P5 1
INC P8 1
DEC P9 1
#IF
EQUAL P6 1
#ACT
MOV P7 <$STR(P9)>
#ELSEACT
MOV P7 <$STR(P8)>
INC P7 1
#IF
SMALL P9 1
LARGE P5 0
#ACT
DEC P5 1
INC S$S11 \
#IF
LARGE P9 0
LARGE P5 0
#ACT
MOV S$S2 <ȴͷ/FCOLOR=$(ɫ3)>
MOV S$S0
SetStringBlank <$STR(S$S0)> $(1) 1
INC S$S11 <$STR(S$S0)>
MOV S$S0 .<$STR(P7)>
SetStringBlank <$STR(S$S0)> $(2) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ1)>
MOV S$S0
GetRandomText ..\..\..\..\360M2\RMBݲѯ.txt S$S0 <$STR(P8)>
MOV S$S1 <$STR(S$S0)>
DEC S$S0 1 $(볤)
SetStringBlank <$STR(S$S0)> $(3) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ2)>
#IF
LARGE P9 0
LARGE P5 0
NOT CHECKTEXTLIST ..\..\..\..\360M2\RMB.txt <$STR(S$S1)>
#ACT
MOV S$S2 <Ѿ/FCOLOR=$(ɫ4)>
#IF
LARGE P9 0
LARGE P5 0
#ACT
INC S$S11 <$STR(S$S2)>\
DEC P5 1
INC P8 1
DEC P9 1
#IF
EQUAL P6 1
#ACT
MOV P7 <$STR(P9)>
#ELSEACT
MOV P7 <$STR(P8)>
INC P7 1
#IF
SMALL P9 1
LARGE P5 0
#ACT
DEC P5 1
INC S$S11 \
#IF
LARGE P9 0
LARGE P5 0
#ACT
MOV S$S2 <ȴͷ/FCOLOR=$(ɫ3)>
MOV S$S0
SetStringBlank <$STR(S$S0)> $(1) 1
INC S$S11 <$STR(S$S0)>
MOV S$S0 .<$STR(P7)>
SetStringBlank <$STR(S$S0)> $(2) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ1)>
MOV S$S0
GetRandomText ..\..\..\..\360M2\RMBݲѯ.txt S$S0 <$STR(P8)>
MOV S$S1 <$STR(S$S0)>
DEC S$S0 1 $(볤)
SetStringBlank <$STR(S$S0)> $(3) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ2)>
#IF
LARGE P9 0
LARGE P5 0
NOT CHECKTEXTLIST ..\..\..\..\360M2\RMB.txt <$STR(S$S1)>
#ACT
MOV S$S2 <Ѿ/FCOLOR=$(ɫ4)>
#IF
LARGE P9 0
LARGE P5 0
#ACT
INC S$S11 <$STR(S$S2)>\
DEC P5 1
INC P8 1
DEC P9 1
#IF
EQUAL P6 1
#ACT
MOV P7 <$STR(P9)>
#ELSEACT
MOV P7 <$STR(P8)>
INC P7 1
#IF
SMALL P9 1
LARGE P5 0
#ACT
DEC P5 1
INC S$S11 \
#IF
LARGE P9 0
LARGE P5 0
#ACT
MOV S$S2 <ȴͷ/FCOLOR=$(ɫ3)>
MOV S$S0
SetStringBlank <$STR(S$S0)> $(1) 1
INC S$S11 <$STR(S$S0)>
MOV S$S0 .<$STR(P7)>
SetStringBlank <$STR(S$S0)> $(2) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ1)>
MOV S$S0
GetRandomText ..\..\..\..\360M2\RMBݲѯ.txt S$S0 <$STR(P8)>
MOV S$S1 <$STR(S$S0)>
DEC S$S0 1 $(볤)
SetStringBlank <$STR(S$S0)> $(3) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ2)>
#IF
LARGE P9 0
LARGE P5 0
NOT CHECKTEXTLIST ..\..\..\..\360M2\RMB.txt <$STR(S$S1)>
#ACT
MOV S$S2 <Ѿ/FCOLOR=$(ɫ4)>
#IF
LARGE P9 0
LARGE P5 0
#ACT
INC S$S11 <$STR(S$S2)>\
DEC P5 1
INC P8 1
DEC P9 1
#IF
EQUAL P6 1
#ACT
MOV P7 <$STR(P9)>
#ELSEACT
MOV P7 <$STR(P8)>
INC P7 1
#IF
SMALL P9 1
LARGE P5 0
#ACT
DEC P5 1
INC S$S11 \
#IF
LARGE P9 0
LARGE P5 0
#ACT
MOV S$S2 <ȴͷ/FCOLOR=$(ɫ3)>
MOV S$S0
SetStringBlank <$STR(S$S0)> $(1) 1
INC S$S11 <$STR(S$S0)>
MOV S$S0 .<$STR(P7)>
SetStringBlank <$STR(S$S0)> $(2) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ1)>
MOV S$S0
GetRandomText ..\..\..\..\360M2\RMBݲѯ.txt S$S0 <$STR(P8)>
MOV S$S1 <$STR(S$S0)>
DEC S$S0 1 $(볤)
SetStringBlank <$STR(S$S0)> $(3) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ2)>
#IF
LARGE P9 0
LARGE P5 0
NOT CHECKTEXTLIST ..\..\..\..\360M2\RMB.txt <$STR(S$S1)>
#ACT
MOV S$S2 <Ѿ/FCOLOR=$(ɫ4)>
#IF
LARGE P9 0
LARGE P5 0
#ACT
INC S$S11 <$STR(S$S2)>\
DEC P5 1
INC P8 1
DEC P9 1
#IF
EQUAL P6 1
#ACT
MOV P7 <$STR(P9)>
#ELSEACT
MOV P7 <$STR(P8)>
INC P7 1
#IF
SMALL P9 1
LARGE P5 0
#ACT
DEC P5 1
INC S$S11 \
#IF
LARGE P9 0
LARGE P5 0
#ACT
MOV S$S2 <ȴͷ/FCOLOR=$(ɫ3)>
MOV S$S0
SetStringBlank <$STR(S$S0)> $(1) 1
INC S$S11 <$STR(S$S0)>
MOV S$S0 .<$STR(P7)>
SetStringBlank <$STR(S$S0)> $(2) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ1)>
MOV S$S0
GetRandomText ..\..\..\..\360M2\RMBݲѯ.txt S$S0 <$STR(P8)>
MOV S$S1 <$STR(S$S0)>
DEC S$S0 1 $(볤)
SetStringBlank <$STR(S$S0)> $(3) 1
INC S$S11 <
INC S$S11 <$STR(S$S0)>
INC S$S11 /FCOLOR=$(ɫ2)>
#IF
LARGE P9 0
LARGE P5 0
NOT CHECKTEXTLIST ..\..\..\..\360M2\RMB.txt <$STR(S$S1)>
#ACT
MOV S$S2 <Ѿ/FCOLOR=$(ɫ4)>
#IF
LARGE P9 0
LARGE P5 0
#ACT
INC S$S11 <$STR(S$S2)>\
DEC P5 1
INC P8 1
DEC P9 1

#IF
CHECK [0] 0
#ACT
MOV P9 <$STR(P1)>
DEC P9 1
DIV P9 <$STR(P9)> <$STR(P4)>
MUL P9 <$STR(P9)> <$STR(P4)>
INC P9 1
MOV P8 <$STR(P4)>
INC P8 1
MOV P7 1
MOV S$S12

#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>
#IF
SMALL P7 10
#ACT
MOV S$S1 0<$STR(P7)>
#ELSEACT
MOV S$S1 <$STR(P7)>
#IF
SMALL P9 10
#ACT
MOV S$S2 0<$STR(P9)>
#ELSEACT
MOV S$S2 <$STR(P9)>
#IF
SMALL P7 <$STR(P8)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 /@360M2ҳ
INC S$S0 <$STR(S$S1)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 28 1
#IF
SMALL P7 <$STR(P8)>
EQUAL P1 <$STR(P9)>
#ACT
MOV S$S0 <
INC S$S0 <$STR(S$S2)>
INC S$S0 >
SetStringBlank <$STR(S$S0)> 6 1
#IF
SMALL P7 <$STR(P8)>
SMALL P2 <$STR(P9)>
#ACT
MOV S$S0 
SetStringBlank <$STR(S$S0)> 4 1
#IF
SMALL P7 <$STR(P8)>
#ACT
INC P7 1
INC P9 1
INC S$S12 <$STR(S$S0)>

#IF
CHECK [0] 0
#ACT
MOV P9 <$STR(P1)>
DEC P9 1
DIV P9 <$STR(P9)> <$STR(P4)>
MUL P9 <$STR(P9)> <$STR(P4)>
INC P9 1
DEC P9 <$STR(P4)>
MOV S$S13 <ײ/@360M20><һ/@360M21>
#IF
SMALL P9 1
#ACT
MOV S$S13 <
INC S$S13 ײ㡡һ/SCOLOR=1>
#IF
EQUAL P1 1
#ACT
MOV S$S13 <
INC S$S13 ײ㡡һ/SCOLOR=1>

#IF
CHECK [0] 0
#ACT
MOV P9 <$STR(P1)>
DEC P9 1
DIV P9 <$STR(P9)> <$STR(P4)>
MUL P9 <$STR(P9)> <$STR(P4)>
INC P9 1
INC P9 <$STR(P4)>
MOV S$S14 <һ/@360M22><ĩ/@360M23>
#IF
LARGE P9 <$STR(P2)>
#ACT
MOV S$S14 <
INC S$S14 һ㡡ĩ/SCOLOR=1>
#IF
EQUAL P1 <$STR(P2)>
#ACT
MOV S$S14 <
INC S$S14 һ㡡ĩ/SCOLOR=1>

#IF
LARGE N$ 0
#ACT
MOV S$S16 <֧ʺ/@@inputstring12>
MOV S$S17 <޸ΪƸͨ/@360M2>
#ELSEACT
MOV S$S16 <Ƹͨʺ/@@inputstring12>
MOV S$S17 <޸Ϊ֧/@360M2>
#IF
CHECK [0] 0
#ACT
MOV S$S15 <$STR(N$)>
SetStringBlank <$STR(S$S15)> 11 1
MOV S$S18 <$STR(S$ʺ)>
SetStringBlank <$STR(S$S18)> 28 1
MOV S$S19 <$STR(S$)>
SetStringBlank <$STR(S$S19)> 28 1
#SAY
\ \
\ \
\ \
\ \
\ \
\ \
\ \
\<$STR(S$S11)>\
\                                  <$STR(S$S13)><ҳ/FCOLOR=253><$STR(S$S12)><$STR(S$S14)>\
\ \
\                                  <ֵĽ/@@inputinteger11><$STR(S$S15)><ȫ/@360M2ȫ>     <ǰʻ/FCOLOR=243><$GAMEPOINT>\
\                                  <տ/@@inputstring13><$STR(S$S19)><ϵQQ/@@inputstring14><$STR(S$QQ)>\
\                                  <$STR(S$S16)><$STR(S$S18)><$STR(S$S17)>\
\                                  <ע⣺/FCOLOR=249><ʺ/FCOLOR=253> @ <ַ޷ģ뽫/FCOLOR=253> @ </FCOLOR=253> # <żɣ/FCOLOR=253><Ŀǰֻ֧΢.֧ пݲ֧/FCOLOR=250>\


[@360M2ҳ01]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 1
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ02]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 2
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ03]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 3
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ04]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 4
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ05]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 5
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ06]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 6
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ07]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 7
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ08]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 8
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ09]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 9
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ10]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 10
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ11]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 11
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ12]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 12
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ13]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 13
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ14]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 14
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ15]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 15
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ16]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 16
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ17]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 17
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ18]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 18
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ19]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 19
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M2ҳ20]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 20
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC

[@360M20]
#ACT
MOV N$ҳ 0
GOTO @360M2űNPC
[@360M21]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 1
DEC P9 $(ÿ)
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M22]
#ACT
MOV P9 <$STR(N$ҳ)>
DEC P9 1
DIV P9 <$STR(P9)> $(ÿ)
MUL P9 <$STR(P9)> $(ÿ)
INC P9 1
INC P9 $(ÿ)
MOV N$ҳ <$STR(P9)>
GOTO @360M2űNPC
[@360M23]
#ACT
MOV N$ҳ 2100000000
GOTO @360M2űNPC

[@360M2ȷ]
#IF
SMALL N$ $()
#ACT
MESSAGEBOX ԲÿΪ$()\\벻$()Ľ
GOTO @360M2űNPC
BREAK
#IF
CHECK [0] 0
#ACT
MOV P9 $()
MOV P6 <$STR(N$)>
#IF
LARGE P9 0
LARGE P6 20000000
#ACT
MOV P8 <$STR(P6)>
DIV P8 <$STR(P8)> 100
MUL P8 <$STR(P8)> <$STR(P9)>
#IF
LARGE P9 0
SMALL P6 20000001
#ACT
MOV P8 <$STR(P6)>
MUL P8 <$STR(P8)> <$STR(P9)>
DIV P8 <$STR(P8)> 100
#IF
LARGE P9 0
#ACT
INC P8 1
MOV P7 <$STR(P6)>
DIV P7 <$STR(P7)> 100
MUL P7 <$STR(P7)> 100
#IF
LARGE P9 0
EQUAL P7 <$STR(P6)>
#ACT
DEC P8 1
#IF
LARGE P9 0
LARGE P8 0
#ACT
INC P6 <$STR(P8)>

#IF
LARGE P9 0
CHECKGAMEPOINT <  <$STR(P6)>
#ACT
MESSAGEBOX Բǰʻ㡾<$STR(P6)>\\<$STR(N$)>Ҫ<$STR(P8)>Ԫѣ
GOTO @360M2űNPC
BREAK
#IF
CHECKGAMEPOINT <  <$STR(P6)>
#ACT
MESSAGEBOX Բǰʻ㡾<$STR(P6)>
GOTO @360M2űNPC
BREAK
#IF
EQUAL S$QQ 
#ACT
MESSAGEBOX ԲQQ룡\\QQԱ˺Ŵʱͷϵ
GOTO @360M2űNPC
BREAK
#IF
EQUAL S$ 
#ACT
MESSAGEBOX Բտ\\дȷտȷ
GOTO @360M2űNPC
BREAK
#IF
LARGE N$ 0
#ACT
MOV S$S2 ֧
#ELSEACT
MOV S$S2 Ƹͨ
#IF
EQUAL S$ʺ 
#ACT
MESSAGEBOX Բ롾<$STR(S$S2)>ʺţ\\ʺ@޷룬뽫@#żɣ
GOTO @360M2űNPC
BREAK
#IF
SMALL P9 1
#ACT
MESSAGEBOX ֵĽ<$STR(N$)>\տ<$STR(S$)>\<$STR(S$S2)>ʺţ<$STR(S$ʺ)>\QQ룺<$STR(S$QQ)>\\Ƿȷֵ<$STR(S$S2)>ʺٵȷ @360M2ȷ2 @EXIT
#ELSEACT
MESSAGEBOX ֵĽ<$STR(N$)>Ҫȡ<$STR(P9)>%<$STR(P8)>Ԫѣ\տ<$STR(S$)>\<$STR(S$S2)>ʺţ<$STR(S$ʺ)>\QQ룺<$STR(S$QQ)>\\Ƿȷֵ<$STR(S$S2)>ʺٵȷ @360M2ȷ2 @EXIT

[@360M2ȷ2]
#IF
SMALL N$ $()
#ACT
MESSAGEBOX ԲÿΪ$()\\벻$()Ľ
GOTO @360M2űNPC
BREAK

#IF
CHECK [0] 0
#ACT
MOV P9 $()
MOV P6 <$STR(N$)>
#IF
LARGE P9 0
LARGE P6 20000000
#ACT
MOV P8 <$STR(P6)>
DIV P8 <$STR(P8)> 100
MUL P8 <$STR(P8)> <$STR(P9)>
#IF
LARGE P9 0
SMALL P6 20000001
#ACT
MOV P8 <$STR(P6)>
MUL P8 <$STR(P8)> <$STR(P9)>
DIV P8 <$STR(P8)> 100
#IF
LARGE P9 0
#ACT
INC P8 1
MOV P7 <$STR(P6)>
DIV P7 <$STR(P7)> 100
MUL P7 <$STR(P7)> 100
#IF
LARGE P9 0
EQUAL P7 <$STR(P6)>
#ACT
DEC P8 1
#IF
LARGE P9 0
LARGE P8 0
#ACT
INC P6 <$STR(P8)>

#IF
LARGE P9 0
CHECKGAMEPOINT <  <$STR(P6)>
#ACT
MESSAGEBOX Բǰʻ㡾<$STR(P6)>\\<$STR(N$)>Ҫ<$STR(P8)>Ԫѣ
GOTO @360M2űNPC
BREAK
#IF
CHECKGAMEPOINT <  <$STR(P6)>
#ACT
MESSAGEBOX Բǰʻ㡾<$STR(P6)>
GOTO @360M2űNPC
BREAK
#IF
EQUAL S$QQ 
#ACT
MESSAGEBOX ԲQQ룡\\QQԱ˺Ŵʱͷϵ
GOTO @360M2űNPC
BREAK
#IF
EQUAL S$ 
#ACT
MESSAGEBOX Բտ\\дȷտȷ
GOTO @360M2űNPC
BREAK
#IF
LARGE N$ 0
#ACT
MOV S$S2 ֧
#ELSEACT
MOV S$S2 Ƹͨ
#IF
EQUAL S$ʺ 
#ACT
MESSAGEBOX Բ롾<$STR(S$S2)>ʺţ\\ʺ@޷룬뽫@#żɣ
GOTO @360M2űNPC
BREAK
#IF
CHECK [0] 0
#ACT
MOV S$S1

MOV S$S0 <$STR(N$)>Ԫ
SetStringBlank <$STR(S$S0)> 12 1
INC S$S1 <$STR(S$S0)>

MOV S$S0 տ:<$STR(S$)>
SetStringBlank <$STR(S$S0)> 22 1
INC S$S1 <$STR(S$S0)>

MOV S$S0 <$STR(S$S2)>:<$STR(S$ʺ)>
SetStringBlank <$STR(S$S0)> 36 1
INC S$S1 <$STR(S$S0)>

MOV S$S0 ϵQQ:<$STR(S$QQ)>
SetStringBlank <$STR(S$S0)> 22 1
INC S$S1 <$STR(S$S0)>

MOV S$S0 :<$USERNAME>
SetStringBlank <$STR(S$S0)> 20 1
INC S$S1 <$STR(S$S0)>

MOV S$S0 <$STR(N$)>Ԫ
SetStringBlank <$STR(S$S0)> 14 1
INC S$S1 <$STR(S$S0)>

INC S$S1 <$YEAR>-
MOV P9 <$MONTH>
#IF
SMALL P9 10
#ACT
INC S$S1 0<$STR(P9)>-
#ELSEACT
INC S$S1 <$STR(P9)>-
#IF
CHECK [0] 0
#ACT
MOV P9 <$DAY>
#IF
SMALL P9 10
#ACT
INC S$S1 0<$STR(P9)>
#ELSEACT
INC S$S1 <$STR(P9)>
#IF
CHECK [0] 0
#ACT
MOV P9 <$HOUR>
#IF
SMALL P9 10
#ACT
INC S$S1 " 0<$STR(P9)>:"
#ELSEACT
INC S$S1 " <$STR(P9)>:"
#IF
CHECK [0] 0
#ACT
MOV P9 <$MINUTE>
#IF
SMALL P9 10
#ACT
INC S$S1 "0<$STR(P9)>:"
#ELSEACT
INC S$S1 "<$STR(P9)>:"
#IF
CHECK [0] 0
#ACT
MOV P9 <$SECOND>
#IF
SMALL P9 10
#ACT
INC S$S1 "0<$STR(P9)>."
#ELSEACT
INC S$S1 "<$STR(P9)>."
#IF
CHECK [0] 0
#ACT
MOVR P9 1000
MOV S$S0 <$STR(P9)>
#IF
SMALL P9 100
#ACT
MOV S$S0 0<$STR(P9)>
#IF
SMALL P9 10
#ACT
MOV S$S0 00<$STR(P9)>
#IF
CHECK [0] 0
#ACT
INC S$S1 <$STR(S$S0)>

AddTextListEx ..\..\..\..\360M2\RMB.txt <$STR(S$S1)> 0
AddTextListEx ..\..\..\..\360M2\RMBݲѯ.txt <$STR(S$S1)> 0

GAMEPOINT - <$STR(P6)>
SENDMSG 0 ϲ<$USERNAME>ɹ֡<$STR(N$)>Ԫҡ<$STR(S$S2)>ʺš
MESSAGEBOX ϲ֡<$STR(N$)>Ԫҡɹ\\ʺ󣬽72Сʱڵʣעգ\\ǰʻ<$GAMEPOINT>
MOV N$ 0
GOTO @360M2űNPC

[@360M2]
#IF
LARGE N$ 0
#ACT
MOV N$ 0
GOTO @360M2ݱ
GOTO @360M2űNPC
#ELSEACT
MOV N$ 1
GOTO @360M2ݱ
GOTO @360M2űNPC

[@inputinteger11]
#IF
SMALL N11 $()
#ACT
MESSAGEBOX ԲÿΪ$()\\벻$()Ľ
MOV N11 0
GOTO @360M2űNPC
BREAK
#IF
CHECKGAMEPOINT <  <$STR(N11)>
#ACT
MESSAGEBOX Բǰʻ㡾<$STR(N11)>
MOV N11 0
GOTO @360M2űNPC
BREAK
#ELSEACT
MOV N$ <$STR(N11)>
MOV N11 0
GOTO @360M2űNPC
BREAK

[@360M2ȫ]
#IF
CHECKGAMEPOINT <  $()
#ACT
MOV N$ 0
MESSAGEBOX ԲÿΪ$()\\ʻ޷֣
GOTO @360M2űNPC
BREAK
#ELSEACT
MOV N$ <$GAMEPOINT>
GOTO @360M2űNPC
BREAK

[@inputstring12]
#IF
CHECKGAMEPOINT <  $()
#ACT
MESSAGEBOX ԲÿΪ$()\\ʻ޷֣
MOV S12
GOTO @360M2űNPC
BREAK
#ELSEACT
MOV S$ʺ <$STR(S12)>
DEC S$ʺ 29 5000
MOV S12
GOTO @360M2ݱ
GOTO @360M2űNPC
BREAK

[@inputstring13]
#IF
CHECKGAMEPOINT <  $()
#ACT
MESSAGEBOX ԲÿΪ$()\\ʻ޷֣
MOV S13
GOTO @360M2űNPC
BREAK
#ELSEACT
MOV S$ <$STR(S13)>
DEC S$ 15 5000
MOV S13
GOTO @360M2ݱ
GOTO @360M2űNPC
BREAK

[@inputstring14]
#IF
CHECKGAMEPOINT <  $()
#ACT
MESSAGEBOX ԲÿΪ$()\\ʻ޷֣
MOV S14
GOTO @360M2űNPC
BREAK
#ELSEACT
MOV S$QQ <$STR(S14)>
DEC S$QQ 15 5000
MOV S14
GOTO @360M2ݱ
GOTO @360M2űNPC
BREAK





[@360M2볣]
#CALL [\360M2\360M2볣.ini] @360M2볣
#CALL [\360M2\360M2ű.txt] @360M2ݱ
#CALL [\360M2ֻع\360M2ֻعűNPC.txt] @360M2ֻعűNPC


}
