Start more sensibly separating avatar from ai creatures

2024-12-17 19:55:07 +00:00
parent 234b10df40
commit d0ef2628ce
23 changed files with 393 additions and 369 deletions
@@ -1,11 +1,12 @@
-{-# LANGUAGE TemplateHaskell #-}
 {-# LANGUAGE StrictData #-}
-module Dodge.Annotation.Data where
-import Dodge.Data.GenWorld
-import Dodge.Tree.Compose.Data
+{-# LANGUAGE TemplateHaskell #-}
+
+module Dodge.Annotation.Data where

-import Control.Monad.State
 import Control.Lens
+import Control.Monad.State
+import Dodge.Data.GenWorld
+import Dodge.Data.MetaTree
 import System.Random

 type MTRS = MetaTree Room String
@@ -19,6 +20,6 @@ data Annotation
    | PassthroughLockKeyLists
        [(Int -> State StdGen (MetaTree Room String), State StdGen ItemType)]
        [(ItemType, State StdGen (MetaTree Room String))]
-         Int 
+        Int

 makeLenses ''Annotation