setr properties

function cnl_mb_imm.rooms_extra_flags()
  local i = cnl_mb_imm
  local b = i.build
  local z = b.zone
  local o = b.zone.offset or 0

  b.room = next(z.rooms,b.room)

  if b.room == nil then
    b.phase_completed = true
    return
  else
    local rm = z.rooms[b.room]

    -- goto
    send(
      "goto "..(b.room+o)..";"
    )

    local flagSum = 0
    for k,v in pairs(rm.flags or {}) do
      flagSum = flagSum + v
    end
    -- set flags
    send("setr flags "..flagSum)

    -- set sector
    send("setr sector "..(0+rm.sector))

    for k,v in pairs(rm.dir) do
      send("dir "..k.." to "..(v+o))
    end

    for k,v in pairs(rm.extra or {}) do
      send(v)
    end

    cnl_mb.doAction("nod")
    return true


  end

end