过来ifs
akexis
akex0s
akeyis
akey0GameOver显示失败s
akelife1breakifs
akex055s
akex0595s
akey055s
akey0455
蛇是否撞到墙壁GameOver本次游戏结束s
akelife1蛇死ifs
akelife1以上两种判断以后，如果蛇死就跳出内循环，重新开始breakifs
akex0foodxs
akey0foody吃到食物以后setcolor0把画面上的食物去掉recta
glefoodxfoodyfoodx10foody10s
akexs
ake
ode20s
akeys
ake
ode20新的一节先放在看不见得位置，下次循环就
取前一节的位置
6
fs
ake
ode蛇的身体长一节foodyes1score10PrScore输出新的得分setcolorWHITE画出蛇fori0is
ake
odeirecta
gles
akexis
akeyis
akexi10s
akeyi10Sleepgamespeedsetcolor0用黑色去除蛇的最后一节
recta
gles
akexs
ake
ode1s
akeys
ake
ode1s
akexs
ake
ode110s
akeys
ake
ode110
ifs
akelife1如果蛇死就跳出循环
breakkeygetchar接受案件ifkeyEsc按ESC键退出
breakelseifkeyUPs
akedirectio
4
s
akedirectio
3elseifkeyRIGHTs
akedirectio
2
s
akedirectio
1elseifkeyLEFTs
akedirectio
1
s
akedirectio
2elseifkeyDOWNs
akedirectio
3
s
akedirectio
4e
dwhile1
（5）游戏结束函数GameOver（）
游戏结束，清除屏幕，输出分数，显示游戏结束信息。voidGameOver游戏结束
cleardevice
7
fPrScoresetcolorREDouttextxy100100