|
VB 贪吃蛇 单人版游戏 （原作）(1)
本文介绍编制贪吃蛇游戏的一般方法， 其中不含什么高深的算法，只使用了初级的VB编程方法，通俗易懂。 各位如有任何见解，请不吝赐教。 本人QQ ： 190317890 (请在身份验证里面写上“CSDN”) 邮箱 bugs1984@126.com 需要本程序VB源码文件的朋友，请留下你的 E-mail，我会尽快寄出。 ＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝ 设计思路：
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
（一）开始新游戏
1.1 获取并应用各个参数（当前级别，控制键等），初始化随机数（Randomize）。
1.2 清除地图上的所有物品，各个统计数值置零。
1.3 初始化地图：布置食物，炸弹，蛇身位置以及蛇头的移动方向——在PictureBox上绘画图像 并修改对应的地图格属性值（MapProperty()数组）。
1.4 启动Timer定时器，游戏开始。
（二）游戏操作
2.1 暂停\恢复——
修改表示游戏状态的Boolean型变量值；
显示\隐藏 表示游戏状态的Label；
暂停\恢复 Timer定时器。
2.2 控制方向（根据Nokia贪吃蛇的操作方式）——
由于蛇头只能朝上下左右4个方向移动，但是方向键有8个，所以“斜线方向”的控制键和水平，垂直方向的控制键编码上有点不同 2.2.1 斜线方向键（以“右上”方向键为例）——
如果当前蛇头朝着左边（水平方向）运动，则将水平方向的分量变为0，再将垂直方向的分量变为-1（向上运动）；
如果当前蛇头朝着上方（垂直方向）运动，则将垂直方向的分量变为0，再将水平方向的分量变为 1（向右运动）。
其余“左上，左下，右下”的方向键编码与上述雷同。 2.2.2“水平，垂直”方向键——
当蛇以 水平 方向移动时，“左”和“右”的按键无效；（即不处理按键事件）
当蛇以 垂直 方向移动时，“上”和“下”的按键无效。 （三）移动蛇身
3.1 根据运动方向，找出蛇头的新坐标；
3.2 判断蛇头新坐标下的 地图属性——
（1）如果蛇头的新坐标 和当前 蛇尾 的坐标重合，那不算GameOver－－因为随着蛇头的移动，蛇身各个节点都会向前跟进，使得当前 蛇尾 坐标下的网格在移动之后会变成 空白地。
（2）如果当前蛇头位置的地图属性是“食物”——增加蛇身长度，统计玩家吃进的食物数量，增加分数，补充地图上的食物，记录（累加）当前吃进的物品，如果吃进的物品（curEatCount） 达到一定数量（EatCountPerShowPrize）就在地图上显示奖品。
（3）如果当前蛇头位置的地图属性是“炸弹“（陷阱）——统计玩家吃进的炸弹数量，扣分（如果分数小于0，就GameOver），补充地图上的炸弹，记录（累加）当前吃进的物品，如果吃进的物品达到一定数量就显示奖品。
| 
