about summary refs log blame commit diff
path: root/src/Xanthous/Game.hs
blob: 0ab5425a04f4e9c6d8c98eccfc70c889440380c0 (plain) (tree)
1
2
3
4
5
6
7
8
9

                    
            
                     

                  

                       
 
                   



                       
                         
 
                 
                      


                        
               

                   
 



                   

                  




                    
         
                                                                                


                                 
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 ()