Implement smoke as clouds, mask colors when rendering framebuf texture

src/Dodge/WorldEvent.hs

@@ -5,6 +5,7 @@ module Dodge.WorldEvent
     , module Dodge.WorldEvent.ThingsHit
     , module Dodge.WorldEvent.HelperParticle
     , module Dodge.WorldEvent.Projectile
+    , module Dodge.WorldEvent.Cloud
     )
     where
 
@@ -13,6 +14,7 @@ import Dodge.WorldEvent.Bullet
 import Dodge.WorldEvent.Flash
 import Dodge.WorldEvent.ThingsHit
 import Dodge.WorldEvent.HelperParticle
+import Dodge.WorldEvent.Cloud
 import Dodge.LightSources
 
 import Dodge.Data