Writing to and reading from files

Author

Message

Game Master1330

16

Years of Service

User Offline

Joined: 19th Oct 2007

Location: (GetReaderXYZ() * 42 ) / 0

Posted: 13th Apr 2013 04:09

Link

Hey,

I am attempting to store my levels in files, but for some reason they don't load correctly... This is my read and write code:

+ Code Snippet

Save:
	Open To Write 1, "Test.lvl"
	
	Write Byte 1, PlayerSpawnX
	Write Byte 1, PlayerSpawnY
	
	Write Byte 1, MaxXTiles
	Write Byte 1, MaxYTiles
	Write Byte 1, TileSize
	For X = 0 To MaxXTiles
		For Y = 0 To MaxYTiles
			Write Byte 1, TileSprite(X, Y)
			Write Byte 1, TileType(X, Y)
			Write Byte 1, TileDepth(X, Y)
		Next Y
	Next X
	
	Close File 1
Return


Load:
	Open To Read 1, "Test.lvl"
	
	Read Byte 1, PlayerSpawnX
	Read Byte 1, PlayerSpawnY
	
	Read Byte 1, MaxXTiles
	Read Byte 1, MaxYTiles
	Read Byte 1, TileSize
	For X = 0 To MaxXTiles
		For Y = 0 To MaxYTiles
			Read Byte 1, TileSprite(X, Y)
			Read Byte 1, TileType(X, Y)
			Read Byte 1, TileDepth(X, Y)
		Next Y
	Next X
	
	Close File 1
Return

Matt

Position Object Game Master1330, Object Position X(Reader), Object Position Y(Reader), Object Position Z(Reader) - 5

Hide Object Game Master1330

Back to top

Profile PM Email

Rudolpho

18

Years of Service

User Offline

Joined: 28th Dec 2005

Location: Sweden

Posted: 13th Apr 2013 13:20 Edited at: 13th Apr 2013 13:20

Link

Those read / write functions operating on references are a bit fishy.
I think your problem is that you can't read directly to an array like that; rather try storing the values to a temporary local variable first like so:

+ Code Snippet

for x = 0 to maxXTiles `You know this will actually repeat (maxTiles + 1) times by the way, right?
    for y = 0 to maxYTiles
        read byte 1, tmp
        TileSprite(x, y) = tmp
        read byte 1, tmp
        TileType(x, y) = tmp
        read byte 1, tmp
        TileDepth(x, y) = tmp
    next y
next x

Also you should probably change the array sizes when loading to ensure that they can hold the MaxTiles amount of tiles just read from the input file.

"Why do programmers get Halloween and Christmas mixed up?"

+ Code Snippet

Because Oct(31) = Dec(25)

Back to top

Profile PM Email Website

Game Master1330

16

Years of Service

User Offline

Joined: 19th Oct 2007

Location: (GetReaderXYZ() * 42 ) / 0

Posted: 13th Apr 2013 15:21

Link

Ok thanks, I'll try this and post my results

Position Object Game Master1330, Object Position X(Reader), Object Position Y(Reader), Object Position Z(Reader) - 5

Hide Object Game Master1330

Back to top

Profile PM Email

Game Master1330

16

Years of Service

User Offline

Joined: 19th Oct 2007

Location: (GetReaderXYZ() * 42 ) / 0

Posted: 13th Apr 2013 18:46

Link

This didn't work :\ Any other ideas?

Position Object Game Master1330, Object Position X(Reader), Object Position Y(Reader), Object Position Z(Reader) - 5

Hide Object Game Master1330

Back to top

Profile PM Email

29 games

18

Years of Service

User Offline

Joined: 23rd Nov 2005

Location: not entirely sure

Posted: 13th Apr 2013 23:02 Edited at: 13th Apr 2013 23:08

Link

Try deleting the file before you write data to it so add:

if file exist("Test.lvl")
delete file "Test.lvl"
endif

Before the open to write command.

Also, rather than save the data as byte data type try saving them as word data type (and then obviously load them as word data type). According to the help files bytes go between 0 and 255 so this might work.

From the help files:
INTEGER Range : –2,147,483,648 to 2,147,483,647
REAL Range : 3.4E +/- 38 (7 digits)
BOOLEAN Range : 0 to 1
BYTE Range : 0 to 255
WORD Range : 0 to 65535
DWORD Range : 0 to 4,294,967,295
DOUBLE INTEGER Range : –9,223,372,036,854,775,808 to 9,223,372,036,854,775,807
DOUBLE FLOAT Range : 1.7E +/- 308 (15 digits)

So you might want to try integers or dwords or what ever works for you or gives you the smallest file size, which probably won't be an issue.

one of these days I'll come up with a better signature

Back to top

Profile PM Email

Sorry your browser is not supported!

Newcomers DBPro Corner / Writing to and reading from files