VBGamer |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Well... I got number 2... Steven Blom (6 replies, 0 views) (2000-Sep-26) Type TileData
X as integer
Y as integer
Texture as string
LightColour(3) as long
End Type
Dim Tiles(199, 199) as TileData
'write info to tiles
Open "filename.ext" for binary as #1
for x = 0 to 199
for y = 0 to 199
put #1, ,tiles(x,y)
next y
next x
Close #1
it's as simple as that.
Unfortunately, D3D is just beginning for me, so I barely know what you're talking about, so sorry about that one...
reguards
Steven Blom
|