[@ϲ]
{
#IF
True
#ACT
ASSIGNDLG 1 7 607 0 1 0 20 18
ADDDLGLIST <BTN=8,233,390,-14,233,234,255,255,255,NULL,NULL/@_close(1)>\
ADDDLGLIST <BTN=6,282,-3,-20,282,282,$C6E8FF,$C6E8FF,$C6E8FF,ͨ,NULL>
ADDDLGLIST <BTN=6,281,-3,-20,281,281,$C6E8FF,$C6E8FF,$C6E8FF,Ф,NULL/@Фϲֿ>\
;ADDDLGLIST <BTN=6,281,-3,-20,281,282,$C6E8FF,$C6E8FF,$C6E8FF,,NULL>\

ADDDLGLIST <SHOWITEM2=ᾧ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger1|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=սʿʱװһ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger3|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=ʦʱװһ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger5|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=ʿʱװһ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger7|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=̿ʱװһ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger9|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger11|ҪȡƷ>\
ADDDLGLIST " \ \"
ADDDLGLIST <BTN=11,2464,4,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U0)>,Ʒ/@@InPutInteger2|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,0,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U1)>,Ʒ/@@InPutInteger4|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-2,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U2)>,Ʒ/@@InPutInteger6|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-6,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U3)>,Ʒ/@@InPutInteger8|ҪƷ>#32#32
ADDDLGLIST <BTN=11,2464,-2,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U4)>,Ʒ/@@InPutInteger10|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-4,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U5)>,Ʒ/@@InPutInteger12|ҪƷ>\

ADDDLGLIST " \ \"
ADDDLGLIST <SHOWITEM2=װ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger13|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=汦ʯ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger15|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=м汦ʯ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger17|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=ؼ汦ʯ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger19|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=ҳ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger21|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=ħƾ֤,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger23|ҪȡƷ>\
ADDDLGLIST " \ \"
ADDDLGLIST <BTN=11,2464,4,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U6)>,Ʒ/@@InPutInteger14|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,0,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U7)>,Ʒ/@@InPutInteger16|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-2,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U8)>,Ʒ/@@InPutInteger18|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-6,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U9)>,Ʒ/@@InPutInteger20|ҪƷ>#32#32
ADDDLGLIST <BTN=11,2464,-2,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U10)>,Ʒ/@@InPutInteger22|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-4,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U11)>,Ʒ/@@InPutInteger24|ҪƷ>\
ADDDLGLIST " \"

#IF
CHECK [1999] 1
#ACT
ADDDLGLIST "<CHK=7,229,228,0,0,0,0,1,clLtGray,255,249,ʰȡԶ,ѡԶ/@лԶ><һҳ><һҳ/@ϲֵڶҳ>\"
#ELSEACT
ADDDLGLIST "<CHK=7,229,228,0,0,0,0,0,clLtGray,255,249,ʰȡԶ,ѡԶ/@лԶ><һҳ><һҳ/@ϲֵڶҳ>\"

#IF
True
#ACT
OUTDLGLIST 1

[@ϲֵڶҳ]

#IF
True
#ACT
ASSIGNDLG 1 7 607 0 1 0 20 18
ADDDLGLIST <BTN=8,233,390,-14,233,234,255,255,255,NULL,NULL/@_close(1)>\
ADDDLGLIST <BTN=6,282,-3,-20,282,282,$C6E8FF,$C6E8FF,$C6E8FF,ͨ,NULL>
ADDDLGLIST <BTN=6,281,-3,-20,281,281,$C6E8FF,$C6E8FF,$C6E8FF,Ф,NULL/@Фϲֿ>\
;ADDDLGLIST <BTN=6,281,-3,-20,281,282,$C6E8FF,$C6E8FF,$C6E8FF,,NULL>\

ADDDLGLIST <SHOWITEM2=ʯ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger25|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=籦,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger27|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=ѩ˪,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger29|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=ҩ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger31|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=ǿЧҩ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger33|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=ᾧ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger35|ҪȡƷ>\
ADDDLGLIST " \ \"
ADDDLGLIST <BTN=11,2464,4,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U12)>,Ʒ/@@InPutInteger26|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,0,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U13)>,Ʒ/@@InPutInteger28|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-2,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U14)>,Ʒ/@@InPutInteger30|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-6,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U15)>,Ʒ/@@InPutInteger32|ҪƷ>#32#32
ADDDLGLIST <BTN=11,2464,-2,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U16)>,Ʒ/@@InPutInteger34|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-4,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U17)>,Ʒ/@@InPutInteger36|ҪƷ>\

ADDDLGLIST " \ \"
ADDDLGLIST <SHOWITEM2=,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger37|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=鵤,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger39|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger41|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=޾鵤,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger43|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=޵,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger45|ҪȡƷ>#32#32\
;ADDDLGLIST <SHOWITEM2=,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger47|ҪȡƷ>\
ADDDLGLIST " \ \"
ADDDLGLIST <BTN=11,2464,4,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U18)>,Ʒ/@@InPutInteger38|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,0,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U19)>,Ʒ/@@InPutInteger40|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-2,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U20)>,Ʒ/@@InPutInteger42|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-6,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U21)>,Ʒ/@@InPutInteger44|ҪƷ>#32#32
ADDDLGLIST <BTN=11,2464,-2,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U22)>,Ʒ/@@InPutInteger46|ҪƷ>#32#32#32\
;ADDDLGLIST <BTN=11,2464,-4,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U23)>,Ʒ/@@InPutInteger48|ҪƷ>\
;ADDDLGLIST " \<һҳ/@ϲ><һҳ>\"
ADDDLGLIST " \"

#IF
CHECK [1999] 1
#ACT
ADDDLGLIST "<CHK=7,229,228,0,0,0,0,1,clLtGray,255,249,ʰȡԶ,ѡԶ/@лԶ1><һҳ/@ϲ><һҳ>\"
#ELSEACT
ADDDLGLIST "<CHK=7,229,228,0,0,0,0,0,clLtGray,255,249,ʰȡԶ,ѡԶ/@лԶ1><һҳ/@ϲ><һҳ>\"

#IF
True
#ACT
OUTDLGLIST 1


[@Фϲֿ]
#IF
True
#ACT
ASSIGNDLG 1 7 607 0 1 0 20 18
ADDDLGLIST <BTN=8,233,390,-14,233,234,255,255,255,NULL,NULL/@_close(1)>\
ADDDLGLIST <BTN=6,281,-3,-20,281,281,$C6E8FF,$C6E8FF,$C6E8FF,ͨ,NULL/@ϲ>
ADDDLGLIST <BTN=6,282,-3,-20,282,282,$C6E8FF,$C6E8FF,$C6E8FF,Ф,NULL>\
;ADDDLGLIST <BTN=6,281,-3,-20,281,282,$C6E8FF,$C6E8FF,$C6E8FF,,NULL>\

ADDDLGLIST <SHOWITEM2=,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger49|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=ţ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger51|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=绢,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger53|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger55|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=ھ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger57|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=߿,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger59|ҪȡƷ>\
ADDDLGLIST " \ \"
ADDDLGLIST <BTN=11,2464,4,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U24)>,Ʒ/@@InPutInteger50|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,0,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U25)>,Ʒ/@@InPutInteger52|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-2,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U26)>,Ʒ/@@InPutInteger54|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-6,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U27)>,Ʒ/@@InPutInteger56|ҪƷ>#32#32
ADDDLGLIST <BTN=11,2464,-2,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U28)>,Ʒ/@@InPutInteger58|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-4,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U29)>,Ʒ/@@InPutInteger60|ҪƷ>\

ADDDLGLIST " \ \"
ADDDLGLIST <SHOWITEM2=,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger61|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger63|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=ɸ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger65|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=𼦱,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger67|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=칷ػ,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger69|ҪȡƷ>#32#32
ADDDLGLIST <SHOWITEM2=,11,1461,2,-8,#92-#92#60ȡƷ|c=250#62/@@InPutInteger71|ҪȡƷ>\
ADDDLGLIST " \ \"
ADDDLGLIST <BTN=11,2464,4,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U30)>,Ʒ/@@InPutInteger62|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,0,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U31)>,Ʒ/@@InPutInteger64|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-2,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U32)>,Ʒ/@@InPutInteger66|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-6,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U33)>,Ʒ/@@InPutInteger68|ҪƷ>#32#32
ADDDLGLIST <BTN=11,2464,-2,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U34)>,Ʒ/@@InPutInteger70|ҪƷ>#32#32#32
ADDDLGLIST <BTN=11,2464,-4,-2,2464,2465,$C6E8FF,$C6E8FF,$C6E8FF,<$STR(U35)>,Ʒ/@@InPutInteger72|ҪƷ>\

ADDDLGLIST " \"

#IF
CHECK [1999] 1
#ACT
ADDDLGLIST "<CHK=7,229,228,0,0,0,0,1,clLtGray,255,249,ʰȡԶ,ѡԶ/@лԶ2>\"
#ELSEACT
ADDDLGLIST "<CHK=7,229,228,0,0,0,0,0,clLtGray,255,249,ʰȡԶ,ѡԶ/@лԶ2>\"

#IF
True
#ACT
OUTDLGLIST 1

;===================================ȡ============================
[@@InPutInteger71]
#IF
TRUE
#ACT
MOV M71 0
DelayGoto 1 ~InPutInteger71

[~InPutInteger71]
#OR
LARGE <$STR(M71)> 999
SMALL <$STR(M71)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U35)> <$STR(M71)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle  <$STR(M71)>
Dec U35 <$STR(M71)>
goto @Фϲֿ
BREAK

;===============================================================
[@@InPutInteger72]
#IF
TRUE
#ACT
MOV M72 0
DelayGoto 1 ~InPutInteger72

[~InPutInteger72]
#OR
LARGE <$STR(M72)> 999
SMALL <$STR(M72)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U35)>
INC D0 <$STR(M72)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle  <$STR(M72)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle  <$STR(M72)>
Inc U35 <$STR(M72)>
goto @Фϲֿ

;===================================ȡ칷ػ============================
[@@InPutInteger69]
#IF
TRUE
#ACT
MOV M69 0
DelayGoto 1 ~InPutInteger69

[~InPutInteger69]
#OR
LARGE <$STR(M69)> 999
SMALL <$STR(M69)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U34)> <$STR(M69)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle 칷ػ <$STR(M69)>
Dec U34 <$STR(M69)>
goto @Фϲֿ
BREAK

;===================================칷ػ============================
[@@InPutInteger70]
#IF
TRUE
#ACT
MOV M70 0
DelayGoto 1 ~InPutInteger70

[~InPutInteger70]
#OR
LARGE <$STR(M70)> 999
SMALL <$STR(M70)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U34)>
INC D0 <$STR(M70)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle 칷ػ <$STR(M70)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle 칷ػ <$STR(M70)>
Inc U34 <$STR(M70)>
goto @Фϲֿ

;===================================ȡ𼦱============================
[@@InPutInteger67]
#IF
TRUE
#ACT
MOV M67 0
DelayGoto 1 ~InPutInteger67

[~InPutInteger67]
#OR
LARGE <$STR(M67)> 999
SMALL <$STR(M67)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U33)> <$STR(M67)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle 𼦱 <$STR(M67)>
Dec U33 <$STR(M67)>
goto @Фϲֿ
BREAK

;===================================𼦱============================
[@@InPutInteger68]
#IF
TRUE
#ACT
MOV M68 0
DelayGoto 1 ~InPutInteger68

[~InPutInteger68]
#OR
LARGE <$STR(M68)> 999
SMALL <$STR(M68)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U33)>
INC D0 <$STR(M68)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle 𼦱 <$STR(M68)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle 𼦱 <$STR(M68)>
Inc U33 <$STR(M68)>
goto @Фϲֿ

;===================================ȡɸ============================
[@@InPutInteger65]
#IF
TRUE
#ACT
MOV M65 0
DelayGoto 1 ~InPutInteger65

[~InPutInteger65]
#OR
LARGE <$STR(M65)> 999
SMALL <$STR(M65)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U32)> <$STR(M65)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ɸ <$STR(M65)>
Dec U32 <$STR(M65)>
goto @Фϲֿ
BREAK

;===================================ɸ============================
[@@InPutInteger66]
#IF
TRUE
#ACT
MOV M66 0
DelayGoto 1 ~InPutInteger66

[~InPutInteger66]
#OR
LARGE <$STR(M66)> 999
SMALL <$STR(M66)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U32)>
INC D0 <$STR(M66)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ɸ <$STR(M66)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ɸ <$STR(M66)>
Inc U32 <$STR(M66)>
goto @Фϲֿ

;===================================ȡ============================
[@@InPutInteger63]
#IF
TRUE
#ACT
MOV M63 0
DelayGoto 1 ~InPutInteger63

[~InPutInteger63]
#OR
LARGE <$STR(M63)> 999
SMALL <$STR(M63)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U31)> <$STR(M63)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle  <$STR(M63)>
Dec U31 <$STR(M63)>
goto @Фϲֿ
BREAK

;===============================================================
[@@InPutInteger64]
#IF
TRUE
#ACT
MOV M64 0
DelayGoto 1 ~InPutInteger64

[~InPutInteger64]
#OR
LARGE <$STR(M64)> 999
SMALL <$STR(M64)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U31)>
INC D0 <$STR(M64)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle  <$STR(M64)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle  <$STR(M64)>
Inc U31 <$STR(M64)>
goto @Фϲֿ

;===================================ȡ============================
[@@InPutInteger61]
#IF
TRUE
#ACT
MOV M61 0
DelayGoto 1 ~InPutInteger61

[~InPutInteger61]
#OR
LARGE <$STR(M61)> 999
SMALL <$STR(M61)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U30)> <$STR(M61)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle  <$STR(M61)>
Dec U30 <$STR(M61)>
goto @Фϲֿ
BREAK

;===============================================================
[@@InPutInteger62]
#IF
TRUE
#ACT
MOV M62 0
DelayGoto 1 ~InPutInteger62

[~InPutInteger62]
#OR
LARGE <$STR(M62)> 999
SMALL <$STR(M62)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U30)>
INC D0 <$STR(M62)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle  <$STR(M62)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle  <$STR(M62)>
Inc U30 <$STR(M62)>
goto @Фϲֿ

;===================================ȡ߿============================
[@@InPutInteger59]
#IF
TRUE
#ACT
MOV M59 0
DelayGoto 1 ~InPutInteger59

[~InPutInteger59]
#OR
LARGE <$STR(M59)> 999
SMALL <$STR(M59)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U29)> <$STR(M59)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ߿ <$STR(M59)>
Dec U29 <$STR(M59)>
goto @Фϲֿ
BREAK

;===================================߿============================
[@@InPutInteger60]
#IF
TRUE
#ACT
MOV M60 0
DelayGoto 1 ~InPutInteger60

[~InPutInteger60]
#OR
LARGE <$STR(M60)> 999
SMALL <$STR(M60)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U29)>
INC D0 <$STR(M60)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ߿ <$STR(M60)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ߿ <$STR(M60)>
Inc U29 <$STR(M60)>
goto @Фϲֿ

;===================================ȡھ============================
[@@InPutInteger57]
#IF
TRUE
#ACT
MOV M57 0
DelayGoto 1 ~InPutInteger57

[~InPutInteger57]
#OR
LARGE <$STR(M57)> 999
SMALL <$STR(M57)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U28)> <$STR(M57)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ھ <$STR(M57)>
Dec U28 <$STR(M57)>
goto @Фϲֿ
BREAK

;===================================ھ============================
[@@InPutInteger58]
#IF
TRUE
#ACT
MOV M58 0
DelayGoto 1 ~InPutInteger58

[~InPutInteger58]
#OR
LARGE <$STR(M58)> 999
SMALL <$STR(M58)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U28)>
INC D0 <$STR(M58)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ھ <$STR(M58)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ھ <$STR(M58)>
Inc U28 <$STR(M58)>
goto @Фϲֿ

;===================================ȡ============================
[@@InPutInteger55]
#IF
TRUE
#ACT
MOV M55 0
DelayGoto 1 ~InPutInteger55

[~InPutInteger55]
#OR
LARGE <$STR(M55)> 999
SMALL <$STR(M55)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U27)> <$STR(M55)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle  <$STR(M55)>
Dec U27 <$STR(M55)>
goto @Фϲֿ
BREAK

;===============================================================
[@@InPutInteger56]
#IF
TRUE
#ACT
MOV M56 0
DelayGoto 1 ~InPutInteger56

[~InPutInteger56]
#OR
LARGE <$STR(M56)> 999
SMALL <$STR(M56)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U27)>
INC D0 <$STR(M56)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle  <$STR(M56)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle  <$STR(M56)>
Inc U27 <$STR(M56)>
goto @Фϲֿ


;===================================ȡ绢============================
[@@InPutInteger53]
#IF
TRUE
#ACT
MOV M53 0
DelayGoto 1 ~InPutInteger53

[~InPutInteger53]
#OR
LARGE <$STR(M53)> 999
SMALL <$STR(M53)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U26)> <$STR(M53)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle 绢 <$STR(M53)>
Dec U26 <$STR(M53)>
goto @Фϲֿ
BREAK

;===================================绢============================
[@@InPutInteger54]
#IF
TRUE
#ACT
MOV M54 0
DelayGoto 1 ~InPutInteger54

[~InPutInteger54]
#OR
LARGE <$STR(M54)> 999
SMALL <$STR(M54)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U26)>
INC D0 <$STR(M54)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle 绢 <$STR(M54)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle 绢 <$STR(M54)>
Inc U26 <$STR(M54)>
goto @Фϲֿ

;===================================ȡţ============================
[@@InPutInteger51]
#IF
TRUE
#ACT
MOV M51 0
DelayGoto 1 ~InPutInteger51

[~InPutInteger51]
#OR
LARGE <$STR(M51)> 999
SMALL <$STR(M51)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U25)> <$STR(M51)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ţ <$STR(M51)>
Dec U25 <$STR(M51)>
goto @Фϲֿ
BREAK

;===================================ţ============================
[@@InPutInteger52]
#IF
TRUE
#ACT
MOV M52 0
DelayGoto 1 ~InPutInteger52

[~InPutInteger52]
#OR
LARGE <$STR(M52)> 999
SMALL <$STR(M52)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U25)>
INC D0 <$STR(M52)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ţ <$STR(M52)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ţ <$STR(M52)>
Inc U25 <$STR(M52)>
goto @Фϲֿ

;===================================ȡ============================
[@@InPutInteger49]
#IF
TRUE
#ACT
MOV M49 0
DelayGoto 1 ~InPutInteger49

[~InPutInteger49]
#OR
LARGE <$STR(M49)> 999
SMALL <$STR(M49)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U24)> <$STR(M49)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle  <$STR(M49)>
Dec U24 <$STR(M49)>
goto @Фϲֿ
BREAK

;===============================================================
[@@InPutInteger50]
#IF
TRUE
#ACT
MOV M50 0
DelayGoto 1 ~InPutInteger50

[~InPutInteger50]
#OR
LARGE <$STR(M50)> 999
SMALL <$STR(M50)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U24)>
INC D0 <$STR(M50)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle  <$STR(M50)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle  <$STR(M50)>
Inc U24 <$STR(M50)>
goto @Фϲֿ




;========================================================================================================================================================




;===================================ȡ޵============================
[@@InPutInteger45]
#IF
TRUE
#ACT
MOV M45 0
DelayGoto 1 ~InPutInteger45

[~InPutInteger45]
#OR
LARGE <$STR(M45)> 999
SMALL <$STR(M45)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U22)> <$STR(M45)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ޵ <$STR(M45)>
Dec U22 <$STR(M45)>
goto @ϲֵڶҳ
BREAK

;===================================泬޵============================
[@@InPutInteger46]
#IF
TRUE
#ACT
MOV M46 0
DelayGoto 1 ~InPutInteger46

[~InPutInteger46]
#OR
LARGE <$STR(M46)> 999
SMALL <$STR(M46)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U22)>
INC D0 <$STR(M46)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ޵ <$STR(M46)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ޵ <$STR(M46)>
Inc U22 <$STR(M46)>
goto @ϲֵڶҳ

;===================================ȡ޾鵤============================
[@@InPutInteger43]
#IF
TRUE
#ACT
MOV M43 0
DelayGoto 1 ~InPutInteger43

[~InPutInteger43]
#OR
LARGE <$STR(M43)> 999
SMALL <$STR(M43)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U21)> <$STR(M43)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ޾鵤 <$STR(M43)>
Dec U21 <$STR(M43)>
goto @ϲֵڶҳ
BREAK

;===================================޾鵤============================
[@@InPutInteger44]
#IF
TRUE
#ACT
MOV M44 0
DelayGoto 1 ~InPutInteger44

[~InPutInteger44]
#OR
LARGE <$STR(M44)> 999
SMALL <$STR(M44)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U21)>
INC D0 <$STR(M44)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ޾鵤 <$STR(M44)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ޾鵤 <$STR(M44)>
Inc U21 <$STR(M44)>
goto @ϲֵڶҳ

;===================================ȡ============================
[@@InPutInteger41]
#IF
TRUE
#ACT
MOV M41 0
DelayGoto 1 ~InPutInteger41

[~InPutInteger41]
#OR
LARGE <$STR(M41)> 999
SMALL <$STR(M41)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U20)> <$STR(M41)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle  <$STR(M41)>
Dec U20 <$STR(M41)>
goto @ϲֵڶҳ
BREAK

;===================================泬============================
[@@InPutInteger42]
#IF
TRUE
#ACT
MOV M42 0
DelayGoto 1 ~InPutInteger42

[~InPutInteger42]
#OR
LARGE <$STR(M42)> 999
SMALL <$STR(M42)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U20)>
INC D0 <$STR(M42)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle  <$STR(M42)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle  <$STR(M42)>
Inc U20 <$STR(M42)>
goto @ϲֵڶҳ

;===================================ȡ鵤============================
[@@InPutInteger39]
#IF
TRUE
#ACT
MOV M39 0
DelayGoto 1 ~InPutInteger39

[~InPutInteger39]
#OR
LARGE <$STR(M39)> 999
SMALL <$STR(M39)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U19)> <$STR(M39)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle 鵤 <$STR(M39)>
Dec U19 <$STR(M39)>
goto @ϲֵڶҳ
BREAK

;===================================鵤============================
[@@InPutInteger40]
#IF
TRUE
#ACT
MOV M40 0
DelayGoto 1 ~InPutInteger40

[~InPutInteger40]
#OR
LARGE <$STR(M40)> 999
SMALL <$STR(M40)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U19)>
INC D0 <$STR(M40)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle 鵤 <$STR(M40)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle 鵤 <$STR(M40)>
Inc U19 <$STR(M40)>
goto @ϲֵڶҳ

;===================================ȡ============================
[@@InPutInteger37]
#IF
TRUE
#ACT
MOV M37 0
DelayGoto 1 ~InPutInteger37

[~InPutInteger37]
#OR
LARGE <$STR(M37)> 999
SMALL <$STR(M37)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U18)> <$STR(M37)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle  <$STR(M37)>
Dec U18 <$STR(M37)>
goto @ϲֵڶҳ
BREAK

;===============================================================
[@@InPutInteger38]
#IF
TRUE
#ACT
MOV M38 0
DelayGoto 1 ~InPutInteger38

[~InPutInteger38]
#OR
LARGE <$STR(M38)> 999
SMALL <$STR(M38)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U18)>
INC D0 <$STR(M38)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle  <$STR(M38)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle  <$STR(M38)>
Inc U18 <$STR(M38)>
goto @ϲֵڶҳ



;===================================ȡᾧ============================
[@@InPutInteger35]
#IF
TRUE
#ACT
MOV M35 0
DelayGoto 1 ~InPutInteger35

[~InPutInteger35]
#OR
LARGE <$STR(M35)> 999
SMALL <$STR(M35)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U17)> <$STR(M35)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
NOT CHECKBAGSIZE <$STR(M35)>
#ACT
MESSAGEBOX ռ䲻㣡
BREAK

#IF
True
#ACT
GiveKimNeedle ᾧ <$STR(M35)>
Dec U17 <$STR(M35)>
goto @ϲֵڶҳ
BREAK

;===================================ᾧ============================
[@@InPutInteger36]
#IF
TRUE
#ACT
MOV M36 0
DelayGoto 1 ~InPutInteger36

[~InPutInteger36]
#OR
LARGE <$STR(M36)> 999
SMALL <$STR(M36)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U17)>
INC D0 <$STR(M36)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ᾧ <$STR(M36)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ᾧ <$STR(M36)>
Inc U17 <$STR(M36)>
goto @ϲֵڶҳ



;===================================ȡǿЧҩ============================
[@@InPutInteger33]
#IF
TRUE
#ACT
MOV M33 0
DelayGoto 1 ~InPutInteger33

[~InPutInteger33]
#OR
LARGE <$STR(M33)> 999
SMALL <$STR(M33)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U16)> <$STR(M33)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ǿЧҩ <$STR(M33)>
Dec U16 <$STR(M33)>
goto @ϲֵڶҳ
BREAK

;===================================ǿЧҩ============================
[@@InPutInteger34]
#IF
TRUE
#ACT
MOV M34 0
DelayGoto 1 ~InPutInteger34

[~InPutInteger34]
#OR
LARGE <$STR(M34)> 999
SMALL <$STR(M34)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U16)>
INC D0 <$STR(M34)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ǿЧҩ <$STR(M34)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ǿЧҩ <$STR(M34)>
Inc U16 <$STR(M34)>
goto @ϲֵڶҳ


;===================================ȡҩ============================
[@@InPutInteger31]
#IF
TRUE
#ACT
MOV M31 0
DelayGoto 1 ~InPutInteger31

[~InPutInteger31]
#OR
LARGE <$STR(M31)> 999
SMALL <$STR(M31)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U15)> <$STR(M31)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ҩ <$STR(M31)>
Dec U15 <$STR(M31)>
goto @ϲֵڶҳ
BREAK

;===================================ҩ============================
[@@InPutInteger32]
#IF
TRUE
#ACT
MOV M32 0
DelayGoto 1 ~InPutInteger32

[~InPutInteger32]
#OR
LARGE <$STR(M32)> 999
SMALL <$STR(M32)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U15)>
INC D0 <$STR(M32)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ҩ <$STR(M32)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ҩ <$STR(M32)>
Inc U15 <$STR(M32)>
goto @ϲֵڶҳ


;===================================ȡѩ˪============================
[@@InPutInteger29]
#IF
TRUE
#ACT
MOV M29 0
DelayGoto 1 ~InPutInteger29

[~InPutInteger29]
#OR
LARGE <$STR(M29)> 999
SMALL <$STR(M29)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U14)> <$STR(M29)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ѩ˪ <$STR(M29)>
Dec U14 <$STR(M29)>
goto @ϲֵڶҳ
BREAK

;===================================ѩ˪============================
[@@InPutInteger30]
#IF
TRUE
#ACT
MOV M30 0
DelayGoto 1 ~InPutInteger30

[~InPutInteger30]
#OR
LARGE <$STR(M30)> 999
SMALL <$STR(M30)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U14)>
INC D0 <$STR(M30)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ѩ˪ <$STR(M30)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ѩ˪ <$STR(M30)>
Inc U14 <$STR(M30)>
goto @ϲֵڶҳ


;===================================ȡ籦============================
[@@InPutInteger27]
#IF
TRUE
#ACT
MOV M27 0
DelayGoto 1 ~InPutInteger27

[~InPutInteger27]
#OR
LARGE <$STR(M27)> 999
SMALL <$STR(M27)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U13)> <$STR(M27)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
NOT CHECKBAGSIZE <$STR(M27)>
#ACT
MESSAGEBOX ռ䲻㣡
BREAK

#IF
True
#ACT
GiveKimNeedle 籦 <$STR(M27)>
Dec U13 <$STR(M27)>
goto @ϲֵڶҳ
BREAK

;===================================籦============================
[@@InPutInteger28]
#IF
TRUE
#ACT
MOV M28 0
DelayGoto 1 ~InPutInteger28

[~InPutInteger28]
#OR
LARGE <$STR(M28)> 999
SMALL <$STR(M28)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U13)>
INC D0 <$STR(M28)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle 籦 <$STR(M28)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle 籦 <$STR(M28)>
Inc U13 <$STR(M28)>
goto @ϲֵڶҳ

;===================================ȡʯ============================
[@@InPutInteger25]
#IF
TRUE
#ACT
MOV M25 0
DelayGoto 1 ~InPutInteger25

[~InPutInteger25]
#OR
LARGE <$STR(M25)> 999
SMALL <$STR(M25)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U12)> <$STR(M25)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ʯ <$STR(M25)>
Dec U12 <$STR(M25)>
goto @ϲֵڶҳ
BREAK

;===================================ʯ============================
[@@InPutInteger26]
#IF
TRUE
#ACT
MOV M26 0
DelayGoto 1 ~InPutInteger26

[~InPutInteger26]
#OR
LARGE <$STR(M26)> 999
SMALL <$STR(M26)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U12)>
INC D0 <$STR(M26)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ʯ <$STR(M26)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ʯ <$STR(M26)>
Inc U12 <$STR(M26)>
goto @ϲֵڶҳ



;===================================ȡħƾ֤============================
[@@InPutInteger23]
#IF
TRUE
#ACT
MOV M23 0
DelayGoto 1 ~InPutInteger23

[~InPutInteger23]
#OR
LARGE <$STR(M23)> 999
SMALL <$STR(M23)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U11)> <$STR(M23)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ħƾ֤ <$STR(M23)>
Dec U11 <$STR(M23)>
goto @ϲ
BREAK

;===================================ħƾ֤============================
[@@InPutInteger24]
#IF
TRUE
#ACT
MOV M24 0
DelayGoto 1 ~InPutInteger24

[~InPutInteger24]
#OR
LARGE <$STR(M24)> 999
SMALL <$STR(M24)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U11)>
INC D0 <$STR(M24)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ħƾ֤ <$STR(M24)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ħƾ֤ <$STR(M24)>
Inc U11 <$STR(M24)>
goto @ϲ


;===================================ȡҳ============================
[@@InPutInteger21]
#IF
TRUE
#ACT
MOV M21 0
DelayGoto 1 ~InPutInteger21

[~InPutInteger21]
#OR
LARGE <$STR(M21)> 999
SMALL <$STR(M21)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U10)> <$STR(M21)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ҳ <$STR(M21)>
Dec U10 <$STR(M21)>
goto @ϲ
BREAK

;===================================ҳ============================
[@@InPutInteger22]
#IF
TRUE
#ACT
MOV M22 0
DelayGoto 1 ~InPutInteger22

[~InPutInteger22]
#OR
LARGE <$STR(M22)> 999
SMALL <$STR(M22)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U10)>
INC D0 <$STR(M22)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ҳ <$STR(M22)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ҳ <$STR(M22)>
Inc U10 <$STR(M22)>
goto @ϲ




;===================================ȡؼ汦ʯ============================
[@@InPutInteger19]
#IF
TRUE
#ACT
MOV M19 0
DelayGoto 1 ~InPutInteger19

[~InPutInteger19]
#OR
LARGE <$STR(M19)> 999
SMALL <$STR(M19)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U9)> <$STR(M19)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ؼ汦ʯ <$STR(M19)>
Dec U9 <$STR(M19)>
goto @ϲ
BREAK

;===================================ؼ汦ʯ============================
[@@InPutInteger20]
#IF
TRUE
#ACT
MOV M20 0
DelayGoto 1 ~InPutInteger20

[~InPutInteger20]
#OR
LARGE <$STR(M20)> 999
SMALL <$STR(M20)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U9)>
INC D0 <$STR(M20)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ؼ汦ʯ <$STR(M20)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ؼ汦ʯ <$STR(M20)>
Inc U9 <$STR(M20)>
goto @ϲ


;===================================ȡм汦ʯ============================
[@@InPutInteger17]
#IF
TRUE
#ACT
MOV M17 0
DelayGoto 1 ~InPutInteger17

[~InPutInteger17]
#OR
LARGE <$STR(M17)> 999
SMALL <$STR(M17)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U8)> <$STR(M17)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle м汦ʯ <$STR(M17)>
Dec U8 <$STR(M17)>
goto @ϲ
BREAK

;===================================м汦ʯ============================
[@@InPutInteger18]
#IF
TRUE
#ACT
MOV M18 0
DelayGoto 1 ~InPutInteger18

[~InPutInteger18]
#OR
LARGE <$STR(M18)> 999
SMALL <$STR(M18)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U8)>
INC D0 <$STR(M18)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle м汦ʯ <$STR(M18)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle м汦ʯ <$STR(M18)>
Inc U8 <$STR(M18)>
goto @ϲ


;===================================ȡ汦ʯ============================
[@@InPutInteger15]
#IF
TRUE
#ACT
MOV M15 0
DelayGoto 1 ~InPutInteger15

[~InPutInteger15]
#OR
LARGE <$STR(M15)> 999
SMALL <$STR(M15)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U7)> <$STR(M15)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle 汦ʯ <$STR(M15)>
Dec U7 <$STR(M15)>
goto @ϲ
BREAK

;===================================汦ʯ============================
[@@InPutInteger16]
#IF
TRUE
#ACT
MOV M16 0
DelayGoto 1 ~InPutInteger16

[~InPutInteger16]
#OR
LARGE <$STR(M16)> 999
SMALL <$STR(M16)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U7)>
INC D0 <$STR(M16)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle 汦ʯ <$STR(M16)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle 汦ʯ <$STR(M16)>
Inc U7 <$STR(M16)>
goto @ϲ


;===================================ȡװ============================
[@@InPutInteger13]
#IF
TRUE
#ACT
MOV M13 0
DelayGoto 1 ~InPutInteger13

[~InPutInteger13]
#OR
LARGE <$STR(M13)> 999
SMALL <$STR(M13)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U6)> <$STR(M13)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle װ <$STR(M13)>
Dec U6 <$STR(M13)>
goto @ϲ
BREAK

;===================================װ============================
[@@InPutInteger14]
#IF
TRUE
#ACT
MOV M14 0
DelayGoto 1 ~InPutInteger14

[~InPutInteger14]
#OR
LARGE <$STR(M14)> 999
SMALL <$STR(M14)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U6)>
INC D0 <$STR(M14)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle װ <$STR(M14)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle װ <$STR(M14)>
Inc U6 <$STR(M14)>
goto @ϲ

;===================================ȡ============================
[@@InPutInteger11]
#IF
TRUE
#ACT
MOV M11 0
DelayGoto 1 ~InPutInteger11

[~InPutInteger11]
#OR
LARGE <$STR(M11)> 999
SMALL <$STR(M11)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U5)> <$STR(M11)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle  <$STR(M11)>
Dec U5 <$STR(M11)>
goto @ϲ
BREAK

;===================================澫============================
[@@InPutInteger12]
#IF
TRUE
#ACT
MOV M12 0
DelayGoto 1 ~InPutInteger12

[~InPutInteger12]
#OR
LARGE <$STR(M12)> 999
SMALL <$STR(M12)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U5)>
INC D0 <$STR(M12)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle  <$STR(M12)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle  <$STR(M12)>
Inc U5 <$STR(M12)>
goto @ϲ


;===================================ȡ̿ʱװ============================
[@@InPutInteger9]
#IF
TRUE
#ACT
MOV M9 0
DelayGoto 1 ~InPutInteger9

[~InPutInteger9]
#OR
LARGE <$STR(M9)> 999
SMALL <$STR(M9)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U4)> <$STR(M9)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ̿ʱװһ <$STR(M9)>
Dec U4 <$STR(M9)>
goto @ϲ
BREAK

;===================================̿ʱװ============================
[@@InPutInteger10]
#IF
TRUE
#ACT
MOV M10 0
DelayGoto 1 ~InPutInteger10

[~InPutInteger10]
#OR
LARGE <$STR(M10)> 999
SMALL <$STR(M10)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U4)>
INC D0 <$STR(M10)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ̿ʱװһ <$STR(M10)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ̿ʱװһ <$STR(M10)>
Inc U4 <$STR(M10)>
goto @ϲ


;===================================ȡʿʱװ============================
[@@InPutInteger7]
#IF
TRUE
#ACT
MOV M7 0
DelayGoto 1 ~InPutInteger7

[~InPutInteger7]
#OR
LARGE <$STR(M7)> 999
SMALL <$STR(M7)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U3)> <$STR(M7)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ʿʱװһ <$STR(M7)>
Dec U3 <$STR(M7)>
goto @ϲ
BREAK

;===================================ʿʱװ============================
[@@InPutInteger8]
#IF
TRUE
#ACT
MOV M8 0
DelayGoto 1 ~InPutInteger8

[~InPutInteger8]
#OR
LARGE <$STR(M8)> 999
SMALL <$STR(M8)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U3)>
INC D0 <$STR(M8)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ʿʱװһ <$STR(M8)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ʿʱװһ <$STR(M8)>
Inc U3 <$STR(M8)>
goto @ϲ
BREAK

;===================================ȡʦʱװ============================
[@@InPutInteger5]
#IF
TRUE
#ACT
MOV M5 0
DelayGoto 1 ~InPutInteger5

[~InPutInteger5]
#OR
LARGE <$STR(M5)> 999
SMALL <$STR(M5)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U2)> <$STR(M5)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ʦʱװһ <$STR(M5)>
Dec U2 <$STR(M5)>
goto @ϲ
BREAK

;===================================淨ʦʱװ============================
[@@InPutInteger6]
#IF
TRUE
#ACT
MOV M6 0
DelayGoto 1 ~InPutInteger6

[~InPutInteger6]
#OR
LARGE <$STR(M6)> 999
SMALL <$STR(M6)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U2)>
INC D0 <$STR(M6)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ʦʱװһ <$STR(M6)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ʦʱװһ <$STR(M6)>
Inc U2 <$STR(M6)>
goto @ϲ
BREAK


;===================================ȡսʿʱװ============================
[@@InPutInteger3]
#IF
TRUE
#ACT
MOV M3 0
DelayGoto 1 ~InPutInteger3

[~InPutInteger3]
#OR
LARGE <$STR(M3)> 999
SMALL <$STR(M3)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U1)> <$STR(M3)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle սʿʱװһ <$STR(M3)>
Dec U1 <$STR(M3)>
goto @ϲ
BREAK

;===================================սʿʱװ============================
[@@InPutInteger4]
#IF
TRUE
#ACT
MOV M4 0
DelayGoto 1 ~InPutInteger4

[~InPutInteger4]
#OR
LARGE <$STR(M4)> 999
SMALL <$STR(M4)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U1)>
INC D0 <$STR(M4)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle սʿʱװһ <$STR(M4)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle սʿʱװһ <$STR(M4)>
Inc U1 <$STR(M4)>
goto @ϲ
BREAK

;===================================ȡᾧ============================
[@@InPutInteger1]
#IF
TRUE
#ACT
MOV M1 0
DelayGoto 1 ~InPutInteger1

[~InPutInteger1]
#OR
LARGE <$STR(M1)> 999
SMALL <$STR(M1)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
SMALL <$STR(U0)> <$STR(M1)>
#ACT
MESSAGEBOX ֿûôƷ
BREAK

#IF
True
#ACT
GiveKimNeedle ᾧ <$STR(M1)>
Dec U0 <$STR(M1)>
goto @ϲ
BREAK

;===================================ᾧ============================
[@@InPutInteger2]
#IF
TRUE
#ACT
MOV M2 0
DelayGoto 1 ~InPutInteger2

[~InPutInteger2]
#OR
LARGE <$STR(M2)> 999
SMALL <$STR(M2)> 1
#ACT
MESSAGEBOX ȷ룡
BREAK

#IF
True
#ACT
MOV D0 <$STR(U0)>
INC D0 <$STR(M2)>

#IF
LARGE <$STR(D0)> 99999
#ACT
MESSAGEBOX ֿ޷ôƷ
BREAK

#IF
NOT CheckKimNeedle ᾧ <$STR(M2)>
#ACT
MESSAGEBOX Ʒ㣡
BREAK

#IF
True
#ACT
TakeKimNeedle ᾧ <$STR(M2)>
Inc U0 <$STR(M2)>
goto @ϲ
BREAK

[@лԶ]
#IF
True
#ACT
InvertFlag [1999]
goto @ϲ

[@лԶ1]
#IF
True
#ACT
InvertFlag [1999]
goto @ϲֵڶҳ

[@лԶ2]
#IF
True
#ACT
InvertFlag [1999]
goto @Фϲֿ

}
