cubes = [];

for( northings=-50:5:50 )
  for( eastings=-50:5:50)
    for( z = 0:-5:-100 )
      cubes( end+1,: ) = [eastings     northings z];
      cubes( end+1,: ) = [eastings+600 northings z];
      cubes( end+1,: ) = [eastings-600 northings z];
    end
  end
end

csvwrite('cubes.csv',cubes);
