// - Look in locgen.df for the theme helper words I used

locations-start

locations-reset

	location
		tags: test
		max-rooms: 7
		entry-tags: test

		: set-theme

			rnd5050 if floor-carpet else floor-wood then

			0 3 rnd loc-wtheme!
			0 4 rnd loc-dtheme!
			0 5 rnd to theme-num 

		;

		: nad 0 auto-doors! ; 
		: ndx 0 %auto-door-escape ;
		
		script: set-theme 
		pre-script: set-theme
		
		room-choice: test
			room-weight: 10
			room-count: 7
			room-script: ndx

locations-end