我本来想编打地鼠的，结果编着编着编歪了，不过挺搞笑的，大家笑纳。



CLS
SCREEN 12
LOCATE 12, 29
PRINT "welcome to this game!"
PRINT TAB(28); "it's a very funny game!"
PRINT TAB(30); "come on!to try this!"
PRINT TAB(35); "  start "
PRINT TAB(37); " now "
PLAY "t140o3l8eeeco2g4g4o3l8eeece4.p8ggeco2ggg4mlabo3cmned4.p8"
CLS
input n,u
DIM A$(n, u), b(n, u)
k=33
FOR I = 1 TO n
 FOR J = 1 TO u
 IF J MOD 2 = 0 THEN k=k+1:A$(I, J) = CHR$(k) 
 NEXT J
NEXT I
p = 1
k = 36: l = 14
FOR I = 1 TO n
 k = 36
 FOR J = 1 TO u
 LOCATE l, k
 PRINT A$(I, J); : BEEP: FOR sb = 1 TO 100000: NEXT sb
 b(I, J) = p
 p = p + 1
 PRINT
 k = k + 1
 NEXT J
 l = l + 1
 PRINT
NEXT I
PRINT : PRINT : PRINT : PRINT
PRINT TAB(36); "game start!"
INPUT N$
FOR I = 1 TO n
 FOR J = 1 TO u
 IF b(I, J) = VAL(LTRIM$(N$)) THEN CLS : LOCATE 17, 38: PRINT A$(I, J)
 NEXT J
NEXT I
END



游戏的意思就是：一开始“春天在哪里”，接着几个东西依次出来。你数，看看你喜欢的东西在第几个，输入他的次数，然后屏幕输出他的图案。