[@Mir2m2Žű]
#CALL [\Mir2m2Žű(ѽűȺ.347979)\Mir2m2Žű.txt] @Mir2m2Žű
#CALL [\Mir2m2(ѽűȺ.347979)\Mir2m2.txt] @Mir2m2ݱ


#DEFINE $(ʱ)		60	λ


[@main]
#ACT
MOV P9 <$HUMAN(ʱ)>
DIV P9 60
#SAY
<COLOR=clLime Ҫ>2¾ܿ<COLOR=clLime ʱ>$(ʱ)<COLOR=clLime >\
<COLOR=clLime СʧۼƿʱҲۼ>\
<COLOR=clLime ֳ><COLOR=clFuchsia ɫ><COLOR=clLime ,:ħ5>\ \
<2¾꿪/@Mir2m2> <COLOR=clRed ǰʣʱ䣺><$STR(P9)><COLOR=clRed >\ \
<һ¾/@Mir2m2װȡ> <COLOR=clRed ÿ¾Ҫһװһ>

[@Mir2m2]
#IF
checkitem ¾ 2
#ACT
take ¾ 2
MOV P9 $(ʱ)
MUL P9 60
CALCVAR HUMAN ʱ + <$STR(P9)>
GOTO @Mir2m2ݱ
;Gmexecute TestStatus 4 <$HUMAN(ʱ)>
SetScTimer 7 10
MOV P9 <$HUMAN(ʱ)>
DIV P9 60
MESSAGEBOX ϲɹۼʣࣺ<$STR(P9)>ӣ
SENDMSG 6 ϲɹۼʣࣺ<$STR(P9)>ӣ
SENDMSG 0 %sɹۼƣ<$STR(P9)>ӣ 0 253
DELAYGOTO 1 @Mir2m2Žű
#ELSEACT
MESSAGEBOX Բû2¾꡿
break

;#IF 
;CHECKTITLE  < 1
;#ACT
;CONFERTITLE 

[@Mir2m2װȡ]
1Իȡ1¾꣬ÿҪ2¾\ \
<ʥսͷ/@ʥսͷ><ʥս/@ʥս><ʥս/@ʥս><ʥսָ/@ʥսָ>\ \
<ͷ/@ͷ></@></@><ָ/@ָ>\ \
<ͷ/@ͷ></@></@><ָ/@ָ>\
</@main>

[@ʥսͷ]
#IF
checkitem ʥսͷ 1
#ACT
take ʥսͷ 1
give ¾ 1
SENDMSG 6 ϲȡɹ
goto @Mir2m2װȡ
#ELSEACT
MESSAGEBOX ԲûСʥսͷ
[@ʥս]
#IF
checkitem ʥս 1
#ACT
take ʥս 1
give ¾ 1
SENDMSG 6 ϲȡɹ
goto @Mir2m2װȡ
#ELSEACT
MESSAGEBOX ԲûСʥս
[@ʥս]
#IF
checkitem ʥս 1
#ACT
take ʥս 1
give ¾ 1
SENDMSG 6 ϲȡɹ
goto @Mir2m2װȡ
#ELSEACT
MESSAGEBOX ԲûСʥս
[@ʥսָ]
#IF
checkitem ʥսָ 1
#ACT
take ʥսָ 1
give ¾ 1
SENDMSG 6 ϲȡɹ
goto @Mir2m2װȡ
#ELSEACT
MESSAGEBOX ԲûСʥսָ
[@ͷ]
#IF
checkitem ͷ 1
#ACT
take ͷ 1
give ¾ 1
SENDMSG 6 ϲȡɹ
goto @Mir2m2װȡ
#ELSEACT
MESSAGEBOX ԲûСͷ
[@]
#IF
checkitem  1
#ACT
take  1
give ¾ 1
SENDMSG 6 ϲȡɹ
goto @Mir2m2װȡ
#ELSEACT
MESSAGEBOX ԲûС
[@]
#IF
checkitem  1
#ACT
take  1
give ¾ 1
SENDMSG 6 ϲȡɹ
goto @Mir2m2װȡ
#ELSEACT
MESSAGEBOX ԲûС
[@ָ]
#IF
checkitem ָ 1
#ACT
take ָ 1
give ¾ 1
SENDMSG 6 ϲȡɹ
goto @Mir2m2װȡ
#ELSEACT
MESSAGEBOX ԲûСָ
[@ͷ]
#IF
checkitem ͷ 1
#ACT
take ͷ 1
give ¾ 1
SENDMSG 6 ϲȡɹ
goto @Mir2m2װȡ
#ELSEACT
MESSAGEBOX ԲûСͷ
[@]
#IF
checkitem  1
#ACT
take  1
give ¾ 1
SENDMSG 6 ϲȡɹ
goto @Mir2m2װȡ
#ELSEACT
MESSAGEBOX ԲûС
[@]
#IF
checkitem  1
#ACT
take  1
give ¾ 1
SENDMSG 6 ϲȡɹ
goto @Mir2m2װȡ
#ELSEACT
MESSAGEBOX ԲûС
[@ָ]
#IF
checkitem ָ 1
#ACT
take ָ 1
give ¾ 1
SENDMSG 6 ϲȡɹ
goto @Mir2m2װȡ
#ELSEACT
MESSAGEBOX ԲûСָ