Having difficulty with Arrays of Types...

Blitz3D Forums/Blitz3D Beginners Area/Having difficulty with Arrays of Types...

Type t_unit_loc
Field x
Field y
Field z
End Type

Dim unit_loc.t_unit_loc(5)

For val=0 To 1
unit_loc.t_unit_loc(val) = New t_unit_loc
Next

unit_loc(0)\x=5
unit_loc(0)\y=10

unit_loc(1)\x=15
unit_loc(1)\y=20


For val=0 To 1
	DebugLog "Unit loc:"+val
	DebugLog unit_loc(val)\x
	DebugLog unit_loc(val)\y
Next

WaitKey



Here is how to do it.