Post

 Resources 

Console


Better... Almar Joling (0 replies, 0 views) (2000-Sep-28)
-
Type TileData X as integer Y as integer Texture as string LightColour(3) as long End Type Dim Tiles() as TileData 'Not dimensioned yet! Dim MapWidth as long Dim MapHeight as long Open FileName for Binary As #1 'Maybe first get the number of tiles in the map, so that you can create different size maps? Get #1, , MapWidth Get #1, , MapHeight Redim Tiles(MapWidth,MapHeight) Get #1, , Tiles Close #1 Everything is in your udt now...


-
Up One Level | Back to Forum


Copyright © 2002 - 2004 Eric Coleman, Peter Kuchnio , et. al.
There have been 21 visitors within the last 20 minutes
RSS News Feed