1 files changed, 21 insertions, 0 deletions
diff --git a/crawl-ref/source/dat/clua/lm_fog.lua b/crawl-ref/source/dat/clua/lm_fog.lua
index 62853cb9b7..d1106101fa 100644
--- a/crawl-ref/source/dat/clua/lm_fog.lua
+++ b/crawl-ref/source/dat/clua/lm_fog.lua
@@ -161,3 +161,24 @@ end
 function fog_machine(pars)
   return FogMachine:new(pars)
 end
+
+function fog_machine_geyser(cloud_type, size, power)
+  return FogMachine:new {
+    cloud_type = cloud_type, pow_max = power, size = size,
+    delay_min = power , delay_max = power * 2
+  }
+end
+
+function fog_machine_spread(cloud_type, size, power)
+  return FogMachine:new {
+    cloud_type = cloud_type, pow_max = power, spread_rate = size,
+    size = 1, delay_min = 5, delay_max = 15
+  }
+end
+
+function fog_machine_brownian(cloud_type, size, power)
+  return FogMachine:new {
+    cloud_type = cloud_type, size = 1, pow_max = power,
+    walk_dist = size, delay_min = 1, delay_max = power / size
+  }
+end