# Using this function will turn any ^ glyph on the map into a fog generator
# of the following kind:
#{{
#function place_vapours()
#subst("^ = lua:fog_machine{ pow_max = 20, delay_min = 50, delay_max = 300, size = 12, #start_clouds = 1, cloud_type = "freezing vapour"} ")
#end
#}}

# To do:
# 1) Ideally, the portal duration should depend on absolute depth (the deeper,
#    the less time the player gets). I suggest a duration of
#    100 + 10*(30-abs.depth) + rn(100*(30-abs.depth))
# 2) I think there should be more bazaars: each shop should have a chance of
#    (abs.depth-10)/30 of becoming a portal (with negative chance==0), and at
#    most one bazaar per level
# 3) The above would (and should) include bazaars outside of the dungeon.

  if not crawl.one_chance_in(3) then

  local blow = 200 + 30*(40 - you.absdepth()) + crawl.random2(200)
  local bhigh = blow + crawl.random2(blow) + 100
  if not crawl.one_chance_in(6) then

                  low=1000, high=1500, msg=messager,

                  low=blow, high=bhigh, msg=messager,

xx......xxxxxxx...xxxxxxxxx...xxxxxxxxx...xxxxxxx.....xxx

xxx.....xxxxxxx...xxxxxxxxx...xxxxxxxxx...xxxxxxx.....xxx