首页 相关文章 用VB6.0设计简易赛车游戏

用VB6.0设计简易赛车游戏

第一步,绘制对象:用函数drawcar()画赛车,drawway(n)画跑道的第n层。

  第二步,接受控制:Form的KeyPreview属性要设为true,在Form_KeyPress函数中通过改变全局变量cx来控制赛车的位置。

  第三步,游戏循环:作为即时游戏,必须要有一个Timer,并在其事件Timer1_Timer()中绘制所有对象和进行碰撞检测。本例中,绘图部分写在了Timer1_Timer()中,碰撞测试放在了test()中。

  ……这也是所有即时游戏所共通的框架。当然,我们往往还是根据具体的设计作一些变通,发挥一些技巧……比如这里设计的跑道是随机产生的的,这就要通过一点技巧以便既让玩家感到挑战,又不至于出现不可逾越的难关……

  下面是全部源代码,窗体上只需放个按钮Command1就行了!

ConstD=100注释:方格的宽度
  Constbt/16.shtml'target='_blank'class='article'BT=3000注释:跑道底部的y坐标
  Diml1(22)AsInteger注释:每层跑道左边有几个方块
  Diml2(22)As...[ 查看全文 ]

2016-02-19 标签:

用VB6.0设计简易赛车游戏的相关文章

手机页面
收藏网站 回到头部