<原创>最简易的纯代码坦克大战,该怎么解决
发布时间:2011-06-21 11:29:25 文章来源:www.iduyao.cn 采编人员:星星草
<原创>最简易的纯代码坦克大战
效果图
不到350行
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using System.Threading;
namespace WindowsApplication87
{
/// <summary>
/// Made by wartim 2009.10.12
/// var 1.0.0.0
/// </summary>
public partial class Form1 : Form
{
static int HEIGHT = 300;
static int WIDTH = 300;
Bitmap OrgBmp = new Bitmap(WIDTH, HEIGHT);
List<Tank> Tanks = new List<Tank>();
UserTank UTank = null;
List<Bullet> Bullets = new List<Bullet>();
PictureBox PB = new PictureBox();
public Form1()
{
InitializeComponent();
this.Size = new Size(WIDTH, HEIGHT);
this.FormBorderStyle = FormBorderStyle.FixedDialog;
this.KeyPreview = true;
this.KeyDown += new KeyEventHandler(Form1_KeyDown);
using (Graphics G = Graphics.FromImage(OrgBmp))
G.FillRectangle(new SolidBrush(this.BackColor), this.ClientRectangle);
PB.Parent = this;
PB.Dock = DockStyle.Fill;
PB.Image = OrgBmp;
for (int i = 0; i < 5; i++)
{
Tanks.Add(new Tank(Color.Blue, this.BackColor));
Thread.Sleep(100);
}
UTank = new UserTank(Color.Red, this.BackColor);
Thread T = new Thread(new ThreadStart(RunThread));
T.IsBackground = true;
T.Start();
}
void Form1_KeyDown(object sender, KeyEventArgs e)
{
switch (e.KeyCode)
{
case Keys.Up: UTank.ChangeDirection(Direction.UP); UTank.Move(); break;
case Keys.Down: UTank.ChangeDirection(Direction.DOWN); UTank.Move(); break;
case Keys.Left: UTank.ChangeDirection(Direction.LEFT); UTank.Move(); break;
case Keys.Right: UTank.ChangeDirection(Direction.RIGHT); UTank.Move(); break;
case Keys.Space: Bullets.Add(new Bullet(Color.Black, UTank)); break; // 发射子弹
}
}
void RunThread()
{
try
{
int Start = Environment.TickCount;
Random R = new Random();
int KillCount = 0, DeathCount = 0;
while (true)
if (Environment.TickCount - Start > 100)
{
Bitmap CacheBmp = new Bitmap(OrgBmp);
for (int i = 0; i < Tanks.Count; i++)
{
Tanks[i].Move();
Tanks[i].Draw(ref CacheBmp);
if (R.Next(10) == 0) // 电脑发子弹是10分之一的可能
Bullets.Add(new Bullet(Color.Red, Tanks[i]));
}
UTank.Draw(ref CacheBmp);
List<Bullet> TempBullets = new List<Bullet>();
for (int i = 0; i < Bullets.Count; i++)
{
if (Bullets[i].ObjStep != -1)
友情提示:
信息收集于互联网,如果您发现错误或造成侵权,请及时通知本站更正或删除,具体联系方式见页面底部联系我们,谢谢。
其他相似内容:
-
C#读取文本并入库
文本格式固定如下:
**********************:
<中文作者一>=赵逢玲
<中文作者二>=杜秀华
<中文作者三>=王翠东
<中...
-
C#操作Word文档(Office 2007)
首先引入类库,Microsoft.Office.Interop.Word,然后进行编程。代码如下:
using ...
-
请问,ReadLine方法读取文件
一个txt文件,有两行
aaaa
bbbb
代码:
string s1 = @"D:iosamplepp.txt";
using (StreamReader sr = new...
-
验证控件
在gridview页脚行添加了验证控件,可是点击编辑更新时触发了验证事件,无法更新,怎么办?
------解决方案-------------------...
-
在BITMAP上用GDI+画图,如何使画出的图像尽可能清晰?
我在一张bitmap上用GDI+绘制了简单的多边形,并用PictureBox显示。
我发现,如果我...
-
???如何利用webbrower获取ifream元素????
如何利用webbrower获取ifream元素.我在GOOGLE,BAIDU一整天依然无法找到解决方法!!希望各...
-
如何解决“已有打开的与此命令相关联的DataReader,必须首先将它关闭。”错误?
小弟写了一个DBHelper类来控制数据库访问,但是在实际...
-
在做asp.net项目时,在做数据库更新时出现',' 附近有语法错误。(数据库是用sql2000的)
数据库更新语句:
public void Update()
...
-
为什么我这段代码不会发出声音呢?
C# code
using System;
using System.Collections.Generic;
using System.ComponentModel;
usi...
-
ClickOnce 不支持请求执行级别requireAdministrator
写了一个应用程序,使用ServiceController控制 windows服务的的启动和停止。
...