with core, menu, resource, item, unit, construction;

package world is

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

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

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

	procedure configure;

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

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

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

end world;