手机站
网通分站
电信主站
密 码:
用户名:
当前位置 : 主页>程序设计>VB>列表

用VB开发即时战略游戏

来源:互联网 作者:west263.com 时间:2008-02-23
西部数码-全国虚拟主机10强!40余项虚拟主机管理功能,全国领先!双线多线虚拟主机南北访问畅通无阻!免费赠送企业邮局,.CN域名,自助建站480元起,免费试用7天,满意再付款! P4主机租用799元/月.月付免压金!

1 2 下一页

  先解释一下设计方法。

  1.这叫棋子操纵模式。

  2.回合制采用单方棋子操纵模式,也就是敌方棋子由电脑操纵,使用者棋子由使用者操纵。

  3.即时制采用双方棋子操纵模式,也就是双方棋子都由电脑操作,只是电脑允许使用者改变我方棋子行为模式而已。

  4.我们可以这么想,电脑由一个时间器(Timer) 隔一段时间去动一下敌我双方的所有旗子,也就是说使用者如果不动作,其实就是看电脑自己在下棋。

  5.但一旦使用者指定某棋子时,该棋子移动指标就被标为 False ,如此电脑在每一棋步中碰到该棋子就不会对它有所动作,但其他棋子则继续动作,直到使用者设定完该棋子行动方式后,行动指标恢复为 True ,意思就是继续交还电脑控管。

  6.用一个最简单的 VB 模型来说明:
 
  Type 棋子模式
  行动指标 As Boolean
  行为模式 As SomeValue
  End Type

  '假设有十颗棋子

  Dim 棋子(9) AS 棋子模式
  Sub Form_Load()
  Dim I As Long

  棋子(0).行为模式=敌A
  棋子(1).行为模式=敌B
  .
  .
  棋子(5).行为模式=我A
  棋子(6).行为模式=我B
  .
  .
  For I=0 To Ubound(棋子)-1
  棋子.行动指标=True
  Next
  End Sub

上一篇: 如何用VB程序来播放WAV文件
下一篇: VB基础学习:编码规范

1 2 下一页

文章整理:西部数码--专业提供域名注册虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!