xhads/source/world.ads

-- Copyright (c) 2024 - Ognjen 'xolatile' Milan Robovic
--
-- GNU General Public Licence (version 3 or later)

with core, item, unit, construction;

package world is

------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

	type biome is (
		ash,                    cave,                   grass,                  rough,                  snow,                   swamp
	);

                                             ------------------------------------------------------------------------------------------

	procedure configure;

	procedure make (index : in biome; width, height : in natural);

	procedure draw (x, y, width, height : in integer);

	function width  return integer;
	function height return integer;

------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

end world;