Array help...

BlitzMax Forums/BlitzMax Programming/Array help...

with an array of arrays it's much smaller (and a little easier to maintain)

SuperStrict

Graphics 640 , 480 , 0 , 0

Global array:Int[][]
array = array[..5]
array[0] = [0,0,0,0,0]
array[1] = [0,0,0,0,0]
array[2] = [0,0,0,0,0]
array[3] = [0,0,2,0,0]
array[4] = [3,2,4,2,2]



While Not KeyDown(KEY_ESCAPE)
	
	DrawArray()	
	DrawText "Press a key" , 0 , 200
	
	Flip
	Cls

	WaitKey()
	shift()

Wend
End

Function DrawArray()
	For Local y:Int = 0 To 4
		For Local x:Int = 0 To 4
			DrawText(array[y][x], x*10, y*10)
		Next
	Next
End Function

Function shift()
	For Local y:Int = 0 To 3
		For Local x:Int = 0 To 4
			array[y][x] = array[y+1][x]
		Next
	Next
	array[4] = [1,1,1,1,1]
End Function