Add toggle for visual sounds

src/Dodge/Render.hs

@@ -8,7 +8,6 @@ import Dodge.Data
 import Dodge.Config.Data
 import Dodge.Base.Window
 import Dodge.Render.Picture
---import Dodge.Creature.ShadowBox
 import Dodge.Render.Shape
 import Geometry
 import Render
@@ -18,23 +17,12 @@ import Shader.Poke
 import Shader.Bind
 import Shader.Data
 import MatrixHelper
---import Polyhedra.Data
 import Shader.ExtraPrimitive
 import Shader.Parameters
 
 import Foreign
---import Control.Applicative
---import Control.Monad.State
 import Control.Lens
 import Control.Monad
---import qualified Control.Foldl as F
---import Data.Tuple.Extra
---import Data.List
---import Data.Bifunctor
---import Data.Function
---import qualified Data.IntMap.Strict as IM
---import qualified Data.Map as M
---import qualified Data.Set as S
 import Graphics.Rendering.OpenGL hiding (color,scale,translate,rotate)
 import qualified SDL
 import qualified Data.Vector.Unboxed.Mutable as UMV