diff --git a/src/Test.hs b/src/Test.hs index e7acbcd..63d55c5 100644 --- a/src/Test.hs +++ b/src/Test.hs @@ -61,11 +61,11 @@ loadMap = do , player = Just () } void $ mapM_ (\(V2 nr nc) -> do - ttl <- liftIO $ randomRIO (5, 30) + -- ttl <- liftIO $ randomRIO (5, 30) newEntity $ defEntity { pos = Just (V2 (nr + 0.5) (nc + 0.5)) , vel = Just (V2 0 0) - , npcState = Just (NPCStanding ttl) + , npcState = Just (NPCStanding 0) } ) npcposs uu <- partSubscribe m movePlayer