file = GetString("file", "testground.png", "script png")
heightScale = GetInt("scale", 64)
tileSize = GetInt("tilesize", 128)
hollow = GetInt("hollow", 0)

function init()
	matRock = CreateMaterial("unphysical", 0, 0, 0)
	matDirt = CreateMaterial("unphysical", 0, 0, 0)
	matGrass1 = CreateMaterial("unphysical", 0, 0, 0)
	matGrass2 = CreateMaterial("unphysical", 0, 0, 0)
	matTarmac = CreateMaterial("unphysical", 0, 0, 0)
	matTarmacTrack = CreateMaterial("unphysical", 0, 0, 0)
	matTarmacLine = CreateMaterial("unphysical", 0, 0, 0)
	
	LoadImage(file)
	
	w,h = GetImageSize()

	local maxSize = tileSize
	
	local y0 = 0
	while y0 < h-1 do
		local y1 = y0 + maxSize
		if y1 > h-1 then y1 = h-1 end

		local x0 = 0
		while x0 < w-1 do
			local x1 = x0 + maxSize
			if x1 > w-1 then x1 = w-1 end
			Vox(x0, 0, y0)
			Heightmap(x0, y0, x1, y1, heightScale, hollow==0)
			x0 = x1
		end
		y0 = y1
	end
end