The main loop of the server, processing human and computer player moves turn by turn.
loopSer :: (MonadAtomic m, MonadConnServer m) => DebugModeSer -> (CmdSer -> m Bool) -> (FactionId -> ChanFrontend -> ChanServer CmdClientUI -> IO ()) -> (FactionId -> ChanServer CmdClientAI -> IO ()) -> COps -> m ()Source
Start a clip (a part of a turn for which one or more frames will be generated). Do whatever has to be done every fixed number of time units, e.g., monster generation. Run the leader and other actors moves. Eventually advance the time and repeat.