清远运动休闲网

 找回密码
 注册账号
查看: 1890|回复: 14

战机小游戏(作者:海鱼~)

[复制链接]
发表于 2008-11-16 17:54:50 | 显示全部楼层 |阅读模式


找了一个控件和帮助文档,然后写了一个简单的战机游戏,欢迎大家下载。dd64001
运行后,按“enter”键就可以开始玩游戏了。

游戏界面

游戏界面

战机游戏.rar

196.96 KB, 下载次数: 921

评分

参与人数 1金钱 +30 贡献 +10 收起 理由
adminaco + 30 + 10 厉害!

查看全部评分

 楼主| 发表于 2008-11-16 18:11:29 | 显示全部楼层

公布部分源代码

我是基于directx7,用delphi写出来的,感觉在自己的电脑运行还很正常。dd56001

//绘制我机撞毁火焰
  if(deadflamestatus<>0)then
  begin
    rect.Left :=deadflamepos.X;
    rect.top:=deadflamepos.Y;
    rect.Right :=rect.left+66;
    rect.Bottom :=rect.top+66;
    srect.Left :=(deadflamestatus-1)*66;
    srect.top:=0;
    srect.Right :=srect.left+66;
    srect.Bottom :=srect.top+66;
    //绘制火焰
    rval:=FDDSBack.Blt(@rect, FDDSDead, @srect, DDBLT_WAIT or DDBLT_KEYSRC , nil);
    if(rval = DDERR_SURFACELOST) then
      FDDSBack._Restore;
    tempint:=gettickcount;
    if(tempint-oldtime3>200)then
    begin
      oldtime3:=GetTickCount;
      deadflamestatus:=deadflamestatus+1;//更新火焰状态
      if (deadflamestatus=9 ) then
        deadflamestatus:=0;//火焰完毕
    end;
  end;

[ 本帖最后由 海鱼 于 2008-11-16 19:35 编辑 ]
发表于 2008-11-16 18:46:02 | 显示全部楼层
玩电脑游戏好象已经是十年前的事了,支持一下。
发表于 2008-11-16 19:11:53 | 显示全部楼层
拿分。。。
发表于 2008-11-16 19:55:15 | 显示全部楼层
海鱼,有空教我做一个。
 楼主| 发表于 2008-11-16 19:58:06 | 显示全部楼层
原帖由 圆又芳 于 2008-11-16 19:55 发表
海鱼,有空教我做一个。


有编程基础,就很容易就上手的,说难不难。
发表于 2008-11-16 20:06:34 | 显示全部楼层
本来不喜欢玩游戏的,基于是海鱼的作品,支持一下,玩了,很好玩。继续加油!!
 楼主| 发表于 2008-11-16 20:21:40 | 显示全部楼层
原帖由 格格 于 2008-11-16 20:06 发表
本来不喜欢玩游戏的,基于是海鱼的作品,支持一下,玩了,很好玩。继续加油!!


多谢支持~~dd53001
发表于 2008-11-16 20:38:30 | 显示全部楼层
下载,试玩了一下,不错
发表于 2008-11-17 08:59:30 | 显示全部楼层
支持下,为了顶贴
您需要登录后才可以回帖 登录 | 注册账号

本版积分规则

手机休闲网|Archiver|清远运动休闲网 ( 粤ICP备14018191号 )

GMT+8, 2025-12-16 16:17 , Processed in 1.123230 second(s), 13 queries , File On.

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表