VBGAME-DIRECT3D

坚持并快乐着!——繁星
posts - 15, comments - 15, trackbacks - 0, articles - 1
  IT博客 :: 首页 :: 新随笔 :: 联系 :: 聚合  :: 管理

D3D球体的实现

Posted on 2005-11-25 15:51 繁星 阅读(1912) 评论(4)  编辑 收藏 引用


刚写了一个模拟地球的程序,我是用经纬地球模型来接近球体的。沿着经线和纬线方向来分割(各分为40份);程序部分代码:

Private Type CUSTOMVERTEX
p As D3DVECTOR
n As D3DVECTOR
tu As Single
tv As Single
End Type

Dim Vertices(3200) As CUSTOMVERTEX
Dim VertexSizeInBytes As Long
VertexSizeInBytes = Len(Vertices(0))
For i = 0 To 39
  For j = 0 To 39
   With Vertices(m)
     .p = Cver(j * g_pi / 40, i * g_pi / 20, 1)
     .n = .p
     .tv = j / 40
     .tu = i / 40
     End With
   With Vertices(m + 1)
     .p = Cver((j + 1) * g_pi / 40, (i + 1) * g_pi / 20, 1)
     .n = .p
     .tv = (j + 1) / 40
     .tu = (i + 1) / 40
   End With
  m = m + 2
  Next
Next
Set g_VB = g_D3DDevice.CreateVertexBuffer(VertexSizeInBytes * 3200, 0, D3DFVF_CUSTOMVERTEX, D3DPOOL_DEFAULT)
D3DVertexBuffer8SetData g_VB, 0, VertexSizeInBytes * 3200, 0, Vertices(0)

Function Cver(a As Single, b As Single, r As Single) As D3DVECTOR
 Cver.x = r * Sin(a) * Cos(b)
 Cver.y = r * Cos(a)
 Cver.z = r * Sin(a) * Sin(b)
End Function

上面代码实现了一个球体并贴上纹理:
qiou0.bmp


原代码下载:http://www.cnitblog.com/Files/seesea/球体.rar

Feedback

# re: D3D球体的实现[未登录]  回复  更多评论   

2007-09-20 10:29 by Meteor
一起来做类似GOOGLE EARTH,SKYLINE的引擎,好吗?我这里已经有雏形了,包括数据生成,服务端,客户端,就是缺少D3D的高手来完善和封装。

# re: D3D球体的实现  回复  更多评论   

2007-09-20 10:48 by 繁星
能留下你的联系方式么,QQ号?

# re: D3D球体的实现[未登录]  回复  更多评论   

2007-09-20 11:04 by Meteor
28209698

# re: D3D球体的实现  回复  更多评论   

2007-11-27 16:46 by 1
先佩服下
只有注册用户登录后才能发表评论。