(@@InPutInteger)
[@MAIN]
<$USERNAME>\ \
反正闲着也是闲着，不知道你有没有兴趣来和我玩个智力游戏呢？\
我会在一秒钟内随机给你九个数字，如果你能正确记住他们的顺序\
并且告诉我，我就会给你元宝奖励哟！不过每次开始之前你必须得\
给我[10]个元宝的押金喔！\ \
<我是记忆天才/@Game1>  <我脑子不好使/@exit>

[@Game1]
#IF
CHECKGAMEGOLD > 9
#ACT
GAMEGOLD － 10
DELAYGOTO 2000 @GAME2
#SAY
\ \ \ \
　　　　　　　【请你注意咯！我要开始出题咯！】
#ELSESAY
我不是说了吗？开始之前你必须得给我[10]个元宝的押金啊！\ \ \
<重新开始/@MAIN>

[@GAME2]
#IF
#ACT
MOVR N1 20 100
MOVR N2 20 100
MOVR N3 20 100
MOVR N4 20 100
MOVR N5 20 100
MOVR N6 20 100
MOVR N7 20 100
MOVR N8 20 100
MOVR N9 20 100
DELAYGOTO 3000 @GAME3
#SAY
<$USERNAME>，这次的数字顺序是：\ \
　　<$STR(N1)>　<$STR(N2)>　<$STR(N3)>　<$STR(N4)>　<$STR(N5)>　<$STR(N6)>　<$STR(N7)>　<$STR(N8)>　<$STR(N9)>\ \
请开动脑筋，迅速记下这组数字，三秒钟后开始回答！\

[@GAME3]
好了，现在发挥你的记忆天才，告诉我第一位数是什么吧：\ \
<请输入第一位数字/@@InPutInteger21>

[@InPutInteger21]
#ACT
MOV N11 <$STR(N21)>
#SAY
你的答案是这样的：\ \
　　<$STR(N11)>\ \
好了，现在发挥你的记忆天才，告诉我第二位数是什么吧：\ \
<请输入第二位数字/@@InPutInteger22>

[@InPutInteger22]
#ACT
MOV N12 <$STR(N22)>
#SAY
你的答案是这样的：\ \
　　<$STR(N11)>　<$STR(N12)>\ \
好了，现在发挥你的记忆天才，告诉我第三位数是什么吧：\ \
<请输入第三位数字/@@InPutInteger23>

[@InPutInteger23]
#ACT
MOV N13 <$STR(N23)>
#SAY
你的答案是这样的：\ \
　　<$STR(N11)>　<$STR(N12)>　<$STR(N13)>\ \
好了，现在发挥你的记忆天才，告诉我第四位数是什么吧：\ \
<请输入第四位数字/@@InPutInteger24>

[@InPutInteger24]
#ACT
MOV N14 <$STR(N24)>
#SAY
你的答案是这样的：\ \
　　<$STR(N11)>　<$STR(N12)>　<$STR(N13)>　<$STR(N14)>\ \
好了，现在发挥你的记忆天才，告诉我第五位数是什么吧：\ \
<请输入第五位数字/@@InPutInteger25>

[@InPutInteger25]
#ACT
MOV N15 <$STR(N25)>
#SAY
你的答案是这样的：\ \
　　<$STR(N11)>　<$STR(N12)>　<$STR(N13)>　<$STR(N14)>　<$STR(N15)>\ \
好了，现在发挥你的记忆天才，告诉我第六位数是什么吧：\ \
<请输入第六位数字/@@InPutInteger26>

[@InPutInteger26]
#ACT
MOV N16 <$STR(N26)>
#SAY
你的答案是这样的：\ \
　　<$STR(N11)>　<$STR(N12)>　<$STR(N13)>　<$STR(N14)>　<$STR(N15)>　<$STR(N16)>\ \
好了，现在发挥你的记忆天才，告诉我第七位数是什么吧：\ \
<请输入第七位数字/@@InPutInteger27>

[@InPutInteger27]
#ACT
MOV N17 <$STR(N27)>
#SAY
你的答案是这样的：\ \
　　<$STR(N11)>　<$STR(N12)>　<$STR(N13)>　<$STR(N14)>　<$STR(N15)>　<$STR(N16)>　<$STR(N17)>\ \
好了，现在发挥你的记忆天才，告诉我第八位数是什么吧：\ \
<请输入第八位数字/@@InPutInteger28>

[@InPutInteger28]
#ACT
MOV N18 <$STR(N28)>
#SAY
你的答案是这样的：\ \
　　<$STR(N11)>　<$STR(N12)>　<$STR(N13)>　<$STR(N14)>　<$STR(N15)>　<$STR(N16)>　<$STR(N17)>　<$STR(N18)>\ \
好了，现在发挥你的记忆天才，告诉我最后一位数是什么吧：\ \
<请输入第九位数字/@@InPutInteger29>

[@InPutInteger29]
#ACT
MOV N19 <$STR(N29)>
DELAYGOTO 3000 @FINAL
#SAY
你的答案是这样的：\ \
　　<$STR(N11)>　<$STR(N12)>　<$STR(N13)>　<$STR(N14)>　<$STR(N15)>　<$STR(N16)>　<$STR(N17)>　<$STR(N18)>　<$STR(N19)>\ \
好了，输入结束了，三秒钟后为你揭晓胜负信息，请不要走开！\ \

[@FINAL]
#IF
EQUAL N11 N1
EQUAL N12 N2
EQUAL N13 N3
EQUAL N14 N4
EQUAL N15 N5
EQUAL N16 N6
EQUAL N17 N7
EQUAL N18 N8
EQUAL N19 N9
#ACT
GameGold + 11
#SAY
正确的数字排列顺序是这样的：\
　　<$STR(N1)>　<$STR(N2)>　<$STR(N3)>　<$STR(N4)>　<$STR(N5)>　<$STR(N6)>　<$STR(N7)>　<$STR(N8)>　<$STR(N9)>\ \
你的答案是这样的：\
　　<$STR(N11)>　<$STR(N12)>　<$STR(N13)>　<$STR(N14)>　<$STR(N15)>　<$STR(N16)>　<$STR(N17)>　<$STR(N18)>　<$STR(N19)>\ \
所以你赢得了胜利，除了还你押金之外再送你[1]个元宝！\ \
<再来一次/@GAME1>  <不想玩了/@exit>
#ELSESAY
正确的数字排列顺序是这样的：\
　　<$STR(N1)>　<$STR(N2)>　<$STR(N3)>　<$STR(N4)>　<$STR(N5)>　<$STR(N6)>　<$STR(N7)>　<$STR(N8)>　<$STR(N9)>\ \
你的答案是这样的：\
　　<$STR(N11)>　<$STR(N12)>　<$STR(N13)>　<$STR(N14)>　<$STR(N15)>　<$STR(N16)>　<$STR(N17)>　<$STR(N18)>　<$STR(N19)>\ \
所以你输掉了游戏，你的押金[10]个元宝我就不能退还给你咯！\ \
<再来一次/@GAME1>  <不想玩了/@exit>