If Q:Then
\→Str 1 Else \→Str 1
IfEnd
If R>=1 And R<=7:Then
\
_\→Str 6
Else \→Str 6
IfEnd
Menu \Lbl 1:1→T:Lbl 2
If T:Then \→Str 6 Else \→Str 6:IfEnd 1→X
Menu Str
6,\E69B__#E69D__#E69A_\C3__#E6C1_\'部分字符无法显示,请见图8
图 8
Lbl 9:X+4→X: Lbl 8:X+4→X: Lbl 7:X+4→X Lbl 6:X+4→X Lbl 5:X+4→X:Lbl 4 If T:Then
StrMid(Str 7,X,4)→Str 5:X→Mat B[6,1] Else StrMid(Str 7,X,4)→Str 4:X→Mat B[5,1]
IfEnd
Goto 0 Lbl A 1→R
Menu \_\Lbl I:R+1→R Lbl H:R+1→R Lbl G:R+1→R Lbl F:R+1→R Lbl E:R+1→R Lbl D:R+1→R Lbl C:R+1→R Lbl B Goto 0
Lbl J: Not Q→Q:Goto 0 Lbl 3
StrMid(Str 4,6,4)→Str 4 StrMid(Str 5,6,4)→Str 5 R→Mat B[3,1] Q→Mat B[4,1] [总结]
1. 贪吃蛇游戏能在图形计算器上实现最重要的基础是利用了矩阵储存数据,矩阵的作用
相当于内存和硬盘在计算机中的作用。在笔者编写的其他的较复杂的图形计算器程序中,矩阵都起到了不可或缺的作用。 2. 本程序使用了地图和矩阵一一对应的方法。利用矩阵上的信息不仅可以快速的判断蛇
头是否碰到了蛇身,还可以记录蛇头拐弯的方向,便于修改蛇尾前进方向。 3. 通过读取矩阵里的信息可以立即判断按键是否有效,同时矩阵里提供了修改变量所需
的信息。这个方法可以减少程序中的判断,加快程序的运行速度,使代码更简短,更易编写,更易读。 4.