module Xanthous.Game ( GameState(..) , entities , revealedPositions , messageHistory , randomGen , promptState , GamePromptState(..) , getInitialState , positionedCharacter , character , characterPosition , updateCharacterVision -- * Messages , MessageHistory(..) , HasMessages(..) , HasTurn(..) , HasDisplayedTurn(..) , pushMessage , previousMessage , nextTurn -- * Collisions , Collision(..) , collisionAt -- * App monad , AppT(..) -- * Debug State , DebugState(..) , debugState , allRevealed ) where -------------------------------------------------------------------------------- import Xanthous.Game.State import Xanthous.Game.Lenses import Xanthous.Game.Arbitrary ()