( @@InPutInteger @@InPutString)

[@main]
ӭ٣ǲµϷӵеͨң<$GAMEGOLD>\
ׯ<$STR(A133)>ׯұǮ<$STR(G138)>\
X[X[X[X[X[\
<鿴˵/@Help><ʼׯ/@@InPutInteger26><עѺ/@@InPutInteger27><עѺС/@@InPutInteger28><˳/@main>\
^a^a^a^a^a\
Ѻܽ<$STR(G140)>ʣʱ䣺<$STR(G139)>\
ѺСܽ<$STR(G141)>\
עע<$STR(M40)>ͨѺ<$STR(S20)><ˢ/@main>\
<ܸʾµϷֹ֣жĲΥĽҽף>\

[@InPutInteger26]
#ACT
MOV N26 N0
GOTO @cqfir
break
[@cqfir]
#IF
LARGE G139 120
#ACT
MOV N26 0
MESSAG1EBOX [ʾ]ׯʱ仹δȴʼ
Goto @ͨҶĲ
BREAK

#IF
SMALL G139 60
#ACT
MOV N26 0
MESSAG1EBOX [ʾ]ׯʱѾȴ֣
Goto @ͨҶĲ
BREAK

#IF
EQUAL A133 <$USERNAME>
#ACT
MOV N26 0
MESSAG1EBOX [ʾ]ĿǰѾׯң޷ظׯ
Goto @ͨҶĲ
BREAK

#IF
EQUAL M45 2
#ACT
MOV N26 0
MESSAG1EBOX [ʾ]ѾעѺ˴޷ׯ
Goto @ͨҶĲ
BREAK

#IF
EQUAL M45 3
#ACT
MOV N26 0
MESSAG1EBOX [ʾ]ѾעѺС޷ׯ
Goto @ͨҶĲ
BREAK

#IF
SMALL N26 100
#ACT
MESSAG1EBOX [ʾ]100ϵֵ
MOV N26 0
Goto @ͨҶĲ
BREAK

#IF
CHECKGAMEGOLD < N26
#ACT
MESSAG1EBOX [ʾ]ϵͨҲ㡣
MOV N26 0
Goto @ͨҶĲ
BREAK

#IF
EQUAL G138 0
#ACT
GAMEG1OLD - N26
MOV G138 N26
MOV G142 N26
SENDMSG 0 %sʹ<$STR(N26)>ͨׯ
MOV A133 <$USERNAME>
MESSAG1EBOX [ʾ]ʹá<$STR(N26)>ͨׯ
MOV N26 0
Goto @ͨҶĲ
BREAK

#IF
LARGE N26 G138
#ACT
GMEXECUTE ͨ A133 + G138
GAMEG1OLD - N26
MOV G138 N26
MOV G142 N26
SENDMSG 0 %sʹ<$STR(N26)>ͨׯɹ
MOV A133 <$USERNAME>
MESSAG1EBOX [ʾ]ʹá<$STR(N26)>ͨׯɹ
MOV N26 0
Goto @ͨҶĲ
BREAK
#ELSEACT
MESSAG1EBOX [ʾ]ڡ<$STR(G138)>ͨҲׯ
MOV N26 0
Goto @ͨҶĲ
BREAK

[@InPutInteger27]
#ACT
MOV N27 N0
GOTO @cqfir1
break
[@cqfir1]
#IF
LARGE G139 59
#ACT
MOV N27 0
MESSAG1EBOX [ʾ]עʱ仹ûׯʱ䡣
Goto @ͨҶĲ
BREAK

#IF
SMALL G139 5
#ACT
MOV N27 0
MESSAG1EBOX [ʾ]עʱѾȴ֣
Goto @ͨҶĲ
BREAK

#IF
EQUAL A133 <$USERNAME>
#ACT
MOV N27 0
MESSAG1EBOX [ʾ]ĿǰѾׯң޷ע
Goto @ͨҶĲ
BREAK

#IF
EQUAL M45 2
#ACT
MOV N27 0
MESSAG1EBOX [ʾ]ѾעѺ˴޷ظע
Goto @ͨҶĲ
BREAK

#IF
EQUAL M45 3
#ACT
MOV N27 0
MESSAG1EBOX [ʾ]ѾעѺС޷ظע
Goto @ͨҶĲ
BREAK

#IF
SMALL N27 10
#ACT
MOV N27 0
MESSAG1EBOX [ʾ]10ϵֵ
Goto @ͨҶĲ
BREAK

#IF
LARGE N27 G142
#ACT
MOV N27 0
MESSAG1EBOX [ʾ]ԲׯҵıǮѴﵽ޲ˡ\Ŀǰֻע<$STR(G142)>µͨң
Goto @ͨҶĲ
BREAK

#IF
CHECKGAMEGOLD > N27
#ACT
MOV M45 2
MOV S20 
GAMEG1OLD - N27
MOV M40 N27
INC G140 N27
DEC G142 N27
SENDMSG 4 %sʹ<$STR(N27)>ͨעѺ
MESSAG1EBOX [ʾ]ʹá<$STR(N27)>ͨעѺ
MOV N27 0
Goto @ͨҶĲ
#ELSEACT
MESSAG1EBOX [ʾ]ϵͨҲ㡣
MOV N27 0
Goto @ͨҶĲ
BREAK

[@InPutInteger28]
#ACT
MOV N26 N0
GOTO @cqfir2
break
[@cqfir2]
#IF
LARGE G139 59
#ACT
MOV N28 0
MESSAG1EBOX [ʾ]עʱ仹ûׯʱ䡣
Goto @ͨҶĲ
BREAK

#IF
SMALL G139 5
#ACT
MOV N28 0
MESSAG1EBOX [ʾ]עʱѾȴ֣
Goto @ͨҶĲ
BREAK

#IF
EQUAL A133 <$USERNAME>
#ACT
MOV N28 0
MESSAG1EBOX [ʾ]ĿǰѾׯң޷ע
Goto @ͨҶĲ
BREAK

#IF
EQUAL M45 2
#ACT
MOV N28 0
MESSAG1EBOX [ʾ]ѾעѺ˴޷ظע
Goto @ͨҶĲ
BREAK

#IF
EQUAL M45 3
#ACT
MOV N28 0
MESSAG1EBOX [ʾ]ѾעѺС޷ظע
Goto @ͨҶĲ
BREAK

#IF
SMALL N28 10
#ACT
MOV N28 0
MESSAG1EBOX [ʾ]10ϵֵ
Goto @ͨҶĲ
BREAK

#IF
LARGE N28 G142
#ACT
MOV N28 0
MESSAG1EBOX [ʾ]ԲׯҵıǮѴﵽ޲ˡ\Ŀǰֻע<$STR(G142)>µͨң
Goto @ͨҶĲ
BREAK

#IF
CHECKGAMEGOLD > N28
#ACT
MOV M45 3
MOV S20 С
GAMEG1OLD - N28
MOV M40 N28
INC G141 N28
DEC G142 N28
SENDMSG 4 %sʹ<$STR(N28)>ͨעѺС
MESSAG1EBOX [ʾ]ʹá<$STR(N28)>ͨעѺС
MOV N28 0
Goto @ͨҶĲ
#ELSEACT
MESSAG1EBOX [ʾ]ϵͨҲ㡣
MOV N28 0
Goto @ͨҶĲ
BREAK

[@Help]
µϷ
1)ׯׯҿעӺ֣\
ܺС11Сܺʹ10ͬ\
ӡ
2)ѺӮѺСӮСͨԣϵͳȡκ˰\
3)ׯע߽Ȩʧעͨҡ\
4)עܳׯׯͨܺ͡\
</@ͨҶĲ><뿪/@EXIT>\

[@IsInFilterList]
#ACT
MESSAG1EBOX []а˷Ƿַ±༭