UI for showing the current state

[yaxu]

There isn't a nice way to show the current state of controller input and other state. This works but something friendlier would be good:

import Control.Concurrent.MVar

readMVar $ sStateMV tidal