众文网1.求份详细的贪吃蛇课程设计报告
贪吃蛇游戏----《C程序设计课程设计》
一、设计要求
编写C语言程序实现贪吃蛇游戏，贪吃蛇游戏是一个深受人们喜欢的游戏：一条蛇在密闭的围墙内，在围墙内随机出现一个食物，通过键盘上的四个光标键控制蛇向上下左右四个方向移动，蛇头撞到食物，则表示食物被吃掉，这时蛇的身体长一节，同时计10分；接着又出现食物，等待被蛇吃掉，如果蛇在移动过程中，撞到墙壁或身体交叉（蛇头撞到自己的身体）游戏结束。
二、设计内容
1.游戏界面：边框表示围墙，红色矩形代表蛇，绿色小方块代表食物。
2.设计思路
这个程序的关键是表示蛇的图形以及蛇的移动。用一个小矩形表示蛇的一节身体，身体每长一节，增加一个矩形块，蛇头用两节表示。移动时必须从蛇头开始，所以蛇不能向相反方向移动，也就是蛇尾不能改作蛇头。如果不按任何键，蛇自行在当前方向上前移，当游戏者按了有效的方向键后，蛇头朝着指定的方向移动，一步移动一节身体，所以当按了有效的方向键后，先确定蛇头的位置，然后蛇身体随着蛇头移动，图形的实现是从蛇头的新位置开始画出蛇，这时由于没有庆平的原因，原来蛇的位置和新蛇的位置差一个单位，所以看起来社会多一节身体，所以将蛇的最后一节用背景色覆盖。食物的出现和消失也是画矩形块和覆盖矩形块。
3.数据结构
#define N 200
stuct Food
{
int x ； /*食物的横坐标*/
int y ； /*食物的纵坐标*/
int yes ； /*判断是否要出现食物的变量*/
}food /*食物的结构体*/
struct Snake
{
intx[N]； /*蛇的横坐标*/
inty[N]； /*蛇的纵坐标*/
intnode； /*蛇的节数*/
intdirection； /*蛇的移动方向*/
intlife； /*蛇生命，0活着，1死亡*/
}snake;
4.主要函数
1）主函数main（)：初始化图形系统，调用DrawK（)画出开始画面，调用函数Gameplay（)，即玩游戏过程，游戏结束后调用Close（)关闭图形系统，结束程序。
2）画界面函数DrawK();
3）游戏具体过程函数Gameplay();
4）游戏结束函数Gameplay（)，游戏结束，清除屏幕，输出分数，显示游戏结束信息。
5)PrScore（)，输出分数。
6)Close（)函数图形结束。在显示游戏结束信息的画面时，按任意键关闭图形系统，结束程序。
2.c语言实训贪吃蛇报告书
《高级语言程序设计》课程设计 实验报告
题目：贪吃蛇
专业：计算机
班级： 软件
姓名：
成绩：
指导教师：
完成日期：2008年09月23日
一、目的
1. 进一步掌握和利用C语言进行程设计的能力；
2、进一步理解和运用结构化程设计的思想和方法；
3、初步掌握开发一个小型实用系统的基本方法；
4、学会调试一个较长程序的基本方法；
5、学会利用流程图或N-S图表示算法；
6、掌握书写程设计开发文档的能力（书写课程设计报告）；
二、内容与设计思想。
(1).系统功能与分析（填写你所设计的菜单及流程图）。
功能：进行贪食蛇游戏
分析：定义键盘方向键操作，随机数发生器产生食物，并分别利用函数判断贪食蛇的长度及游戏是否成功等.
并能够输入游戏成绩.
(2).数据结构
struct Food
{
int x；/*食物的横坐标*/
int y；/*食物的纵坐标*/
int yes；/*判断是否要出现食物的变量*/
}food；/*食物的结构体*/
struct Snake
}
int x[N];
int y[N];
int node；/*蛇的节数*/
int direction；/*蛇移动方向*/
int life；/* 蛇的生命，0活着，1死亡*/
}snake;
(3).模块设计
根据功能需要：
源文件 ：#include <stdio.h>
#include <graphics.h>
#include <stdlib.h>
#include <dos.h>
函数名 功能
void main（) 游戏主程序
void Init(void)； 图形驱动
void Close(void)； 图形结束
void DrawK(void)； 开始画面
void GameOver(void)； 结束游戏
void GamePlay(void)； 玩游戏具体过程
void PrScore(void)； 输出成绩
(3)总体设计思想：
利用图形驱动，制作美观的游戏界面.
通过随机函数产生随机数，控制游戏过程食物的出现.
定义键盘操作，控制游戏过程蛇的移动方向.
画出边界，并判断游戏是否结束.
统计游戏过程蛇吃的食物数量，计算并输出游戏成绩.
(4)调试过程： 测试数据及结果，出现了哪些问题，如何修改的
这里，你就写一下你平时出错的地方，与如何修改的.这里我也不好帮你写.
(5)程序有待改进的地方及本次实习的收获和建议
收获：加深认识了程序编译过程的中团队合作的重要性.
提高了自己的编程能力
(7)源程序清单（主要代码）
清单只要将上面的程序全部粘帖就可以了.
3.急求 设计贪吃蛇实验报告
学生课程设计（论文） 题 目： 贪吃蛇游戏程序设计指导 学生姓名： 学 号：200910801001 所在院（系）： 计算机学院 专 业： 计算机科学与技术 班 级： 2009级一班 指导教师： 何春燕 职称： 讲 师 2010年06月 18日 目录 摘要…………………………………………………………6 1、设计要求………………………………………………….7 2、所用仪器设备…………………………………………….7 3、具体设计过程…………………………………………….8. 3.1、程序功能……………………………………………8 3.2设计思想………………………………………………8 3.3.设计的具体实现……………………………………8. 3.4 总体流程图………………………………………….14 3.5、程序代码编写及注释………………………………..15 3.6调试问题及解决方法…………………………………21 3.7调试结果…………………………………………….22. 4设计心得体会………………………………………………25. 5、参考文献………………………………………………..26 摘 要 编写C语言程序实现贪吃蛇游戏，贪吃蛇游戏是一个深受人们喜爱的游戏，一条蛇在密闭的围墙内，在围墙内随机出现一个食物，通过按键盘上的四个光标键控制蛇向上下左右四个方向移动，蛇头撞到食物，则表示食物被蛇吃掉，这时蛇的身体长一节，同时计10分，接着又出现食物，等待被蛇吃掉，如果蛇在移动过程中，撞到墙壁或身体交叉蛇头撞到自己的身体游戏结束。
作为一个完整的程序，尤其是一个完整的游戏，必须考虑人机交流与用户体验。游戏的界面不能太丑，更不能连个简单的界面都没有。
游戏应该有个比较漂亮的界面，在有必要硬件支持和软件的支持下，游戏开发者必须最大限度的使游戏美观。游戏的美观是一方面，游戏的内在素质是另一方面。
一个游戏的优劣，最终由玩家决定。在游戏与玩家见面之前，游戏开发者要设计一种让玩家投入的游戏模式，并且在一定的游戏规则下进行。
关键词 贪吃蛇 流程图 c语言 源程序 turbo C 贪吃蛇游戏程序设计 1、设计要求 通过游戏程序设计，提高编程兴趣与编程思路，巩固C语言中所学的知识，合理的运用资料，实现理论与实际相结合。 （1）.收集资料，分析课题，分解问题，形成总体设计思路； （2）.深入分析各个小问题，列出大纲，编写各部分程序模块； （3）.对于设计中用到的关键函数，要学会通过查资料，弄懂其用法，要联系问题进行具体介绍； （4）.上机调试，查错，逐步分析不能正常运行的原因，确保所设计的程序正确，并且能正常运行； （5）.完成课程设计报告，并进行答辩 C语言是一种易学易懂的通用程序设计语言，由于它具有功能性强，运用简洁，灵活兼有高级语言与低级语言的优点，以及“目标程序效率高”可移植性和能在各种系统上普遍实现等特点使它成为当今世界上的主流程序设计语言之一，同时被选作目前全世界广泛应用，同时也是大学生必修的科目。
作为一位当代的大学生更要很好的利用它，学好一门设计语言，实现学以至用。 制作C程序报告，可以巩固和加深自己对C语言课程的基本知识的理解和掌握，并且能够掌握C语言编程和程序调试的基本技能。
通过游戏程序的设计训练可以提高自己的基本技能，更好地掌握字符串的表示方法和字符串函数的功能、Tc图形操作的基本知识、键盘上特殊键的获取以及图形方式下光标的显示，提高自己编程兴趣与编程水平，学会如何正确的书写程序设计说明文档，提高运用C语言解决实际问题的能力，巩固C语言语法规则的理解和掌握，学会通过源程序写出流程图，提高自学以及查阅资料的能力。 2、所用仪器设备 1、能正常工作的计算机一台； 2、WindowsXP; 3、TC程序； 4、Microsoft Word2003; 3、具体设计过程 3.1、程序功能 贪吃蛇游戏是一个经典小游戏，一条蛇在封闭围墙里，围墙里随机出现一个食物，通过按键盘四个光标键控制蛇向上下左右四个方向移动，蛇头撞倒食物，则食物被吃掉，蛇身体长一节，同时记10分，接着又出现食物，等待蛇来吃，如果蛇在移动中撞到墙或身体叉蛇头撞倒自己身体游戏结束。
3.2 设计思想 程序关键在于表示蛇的图形及蛇的移动。用一个小矩形快表示蛇的一节身体，身体每长一节，增加一个矩形块，蛇头用俩节表示。
移动时必须从蛇头开始，所以蛇不能向相反的方向移动，如果不按任意键，蛇自行在当前方向上前移，但按下有效方向键后，蛇头朝着该方向移动，一步移动一节身体，所以按下有效方向键后，先确定蛇头的位置，而后蛇的身体随蛇头移动，图形的实现是从蛇头新位置开始画出蛇，这时，由于未清屏的原因，原来的蛇的位置和新蛇的位置差一个单位，所以看起来蛇多一节身体，所以将蛇的最后一节用背景色覆盖。食物的出现与消失也是画矩形块和覆盖矩形块。
为了便于理解，定义两个结构体：食物与蛇。 3.3.设计的具体实现 （1）函数定义 函数定义是对各个基础函数的定义，并且设置需要运用的信息，便于调用 #define N 200 #include /*图形头文件*/ #include /*包含rand等函数*/ 。
4.贪吃蛇游戏设计的目的及内容
主要内容就是设计蛇的形状和方向，以及食物的产生与位置，先创建一个Point对象point，由多个point 组合成蛇身，当蛇吃到食物时，则增加一个point在蛇身上，使蛇身不断加长，同时利用随机函数在游戏面板上产生一个新的Food对象代替原来被“吃掉”的food，其次，玩家使用方向键来控制蛇的行进，当蛇吃到 food 就给玩家加分作为奖励，最后就可以得出用户的分数。
设计的目的在于学习Java程序设计基本技术，学习用MyEclipse开发Java程序的相关技术，以及熟悉项目开发的完整过程。学会怎样进行一个项目的需求分析、概要设计、详细设计等软件开发过程，熟练地掌握Java程序设计的基本技术和方法，以及熟练地掌握MyEclipse开发环境的使用方法，培养初步的项目分析能力和程序设计能力。
游戏实现的具体任务如下：
1） 游戏的开始，停止，暂停，继续。 根据用户单击的按钮（开始，停止，暂停，继续），游戏实现具体相应的功能。
2） 游戏难度的调整。 用户可以通过选择相应难度地形来设置游戏的难度级别，级别越高，游戏难度也越大。
3） 游戏帮助。单击游戏帮助按钮弹出一个消息框提供相应的游戏介绍。另外在游戏中提供了网格对每一块小方块进行包裹，玩家可以选择是否显示网格，可以帮助刚入门的玩家比对蛇头与食物的位置。
4） 蛇身和背景颜色的设置。可以通过单击相应的设置按钮让蛇身或背景的颜色以用户喜欢的颜色输出。另外如果玩家选择显示网格，也可以单击相应按钮设置网格线的颜色。
5） 游戏奖励。当蛇吃到一颗食物时则得到10分作为奖励，同时如果吃到
特殊的食物则会得到普通食物三倍的奖励。但特殊的食物会在一定时间内自动消失。
5.急需贪吃蛇的设计改进思想
给你个无任何控件的源代码，，，，，，， 你复制以下代码到你窗体下，按F5就行了具体的设计思想，，自己分析吧！'贪吃蛇代码（无控件、全代码）Private WithEvents Timer1 As TimerPrivate WithEvents Label1 As LabelDim GFangXiang As BooleanDim HWB As SingleDim She() As ShenTiDim X As Long, Y As LongDim ZhuangTai(23, 23) As LongPrivate Type ShenTi F As Long X As Long Y As LongEnd Type'按键反应 ←↑↓→Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Dim C As Long If KeyCode = 27 Then End 'ESC退出 If KeyCode = 32 Then If Timer1.Enabled = True Then '空格暂停 Timer1.Enabled = False Label1.Visible = True Else '空格开始 Timer1.Enabled = True Label1.Visible = False End If End If C = UBound(She) If GFangXiang = True Then Exit Sub Select Case KeyCode Case 37 '← If She(C).F = 2 Then Exit Sub She(C).F = 0 GFangXiang = True Case 38 '↑ If She(C).F = 3 Then Exit Sub She(C).F = 1 GFangXiang = True Case 39 '↑ If She(C).F = 0 Then Exit Sub She(C).F = 2 GFangXiang = True Case 40 '→ If She(C).F = 1 Then Exit Sub She(C).F = 3 GFangXiang = True End SelectEnd SubPrivate Sub Form_Load() Me.AutoRedraw = True Me.BackColor = &HC000& Me.FillColor = 255 Me.FillStyle = 0 Me.WindowState = 2 Set Timer1 = Controls.Add("VB.Timer", "Timer1") Set Label1 = Controls.Add("VB.Label", "Label1") Label1.AutoSize = True Label1.BackStyle = 0 Label1 = "暂停" Label1.ForeColor = RGB(255, 255, 0) Label1.FontSize = 50 ChuShiHua '初始化End SubPrivate Sub Form_Resize() On Error GoTo 1: With Me If .WindowState 1 Then .Cls .ScaleMode = 3 HWB = .ScaleHeight / .ScaleWidth .ScaleWidth = 24 .ScaleHeight = 24 Label1.Move (Me.ScaleWidth - Label1.Width) / 2, (Me.ScaleHeight - Label1.Height) / 2 HuaTu Me.Line (X, Y)-(X + 1, Y + 1), RGB(255, 255, 0), BF End If End With1:End SubPrivate Sub Timer1_Timer() Dim C As Long, I As Long On Error GoTo 2: QingChu '清图 C = UBound(She) Select Case She(C).F Case 0 If ZhuangTai(She(C).X - 1, She(C).Y) = 2 Then C = C + 1 ReDim Preserve She(C) She(C).F = She(C - 1).F She(C).X = She(C - 1).X - 1 She(C).Y = She(C - 1).Y ChanShengShiWu GoTo 1: ElseIf ZhuangTai(She(C).X - 1, She(C).Y) = 1 Then GoTo 2: End If Case 1 If ZhuangTai(She(C).X, She(C).Y - 1) = 2 Then C = C + 1 ReDim Preserve She(C) She(C).F = She(C - 1).F She(C).X = She(C - 1).X She(C).Y = She(C - 1).Y - 1 ChanShengShiWu GoTo 1: ElseIf ZhuangTai(She(C).X, She(C).Y - 1) = 1 Then GoTo 2: End If Case 2 If ZhuangTai(She(C).X + 1, She(C).Y) = 2 Then C = C + 1 ReDim Preserve She(C) She(C).F = She(C - 1).F She(C).X = She(C - 1).X + 1 She(C).Y = She(C - 1).Y ChanShengShiWu GoTo 1: ElseIf ZhuangTai(She(C).X + 1, She(C).Y) = 1 Then GoTo 2: End If Case 3 If ZhuangTai(She(C).X, She(C).Y + 1) = 2 Then C = C + 1 ReDim Preserve She(C) She(C).F = She(C - 1).F She(C).X = She(C - 1).X She(C).Y = She(C - 1).Y + 1 ChanShengShiWu GoTo 1: ElseIf ZhuangTai(She(C).X, She(C).Y + 1) = 1 Then GoTo 2: End If End Select ZhuangTai(She(0).X, She(0).Y) = 0 For I = 0 To C Select Case She(I).F Case 0 She(I).X = She(I).X - 1 Case 1 She(I).Y = She(I).Y - 1 Case 2 She(I).X = She(I).X + 1 Case 3 She(I).Y = She(I).Y + 1 End Select Next TiaoZheng1: GFangXiang = False ZhuangTai(She(C).X, She(C).Y) = 1 HuaTu Exit Sub2： '游戏结束 If MsgBox（"得分：" & UBound(She) - 2 & "分 " & vbCrLf & "游戏结束，点“是”重新开始游戏，点“否”"， vbYesNo， "贪吃蛇"） = vbYes Then ChuShiHua Else End End IfEnd Sub'初始化Private Sub ChuShiHua() Me.Cls Timer1.Enabled = True Timer1.Interval = 50 Erase ZhuangTai ReDim She(2) She(0).F = 2 She(0).X = 9 She(0).Y = 11 ZhuangTai(9, 11) = 1 She(1).F = 2 She(1).X = 10 She(1).Y = 11 ZhuangTai(10, 11) = 1 She(2).F = 2 She(2).X = 11 She(2).Y = 11 ZhuangTai(11, 11) = 1 HuaTu '画图 ChanShengShiWuEnd Sub'清图Private Sub QingChu() Dim I As Long For I = 0 To UBound(She) Me.Line (She(I).X, She(I).Y)-(She(I).X + 1, She(I).Y + 1), Me.BackColor, BF NextEnd Sub'画图 蛇Private Sub HuaTu() Dim I As Long For I = 0 To UBound(She) Me.Circle (She(I).X + 0.5, She(I).Y + 0.5), 0.49, RGB(255, 255, 0), , , HWB NextEnd SubPrivate Sub TiaoZheng() Dim I As Long For I = 0 To UBound(She) - 1 She(I).F = She(I + 1).F NextEnd Sub'随机产生食物Private Sub ChanShengShiWu() Randomize Timer1: X = Int(Rnd * 24) Y = Int(Rnd * 24) If ZhuangTai(X, Y) > 0 Then GoTo 1: ZhuangTai(X, Y) = 2 Me.Line (X, Y)-(X + 1, Y + 1), RGB(255, 255, 0), BFEnd Sub。
转载请注明出处众文网 » web贪吃蛇毕业论文(求份详细的贪吃蛇课程设计报告)