Skip to content

Instantly share code, notes, and snippets.

@achedeuzot

achedeuzot/bumper.exs

Forked from bryanhunter/bumper.exs
Created June 28, 2021 18:43
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save achedeuzot/d2d7ae40de8cf462df7965ce4b74bddb to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save achedeuzot/d2d7ae40de8cf462df7965ce4b74bddb to your computer and use it in GitHub Desktop.
Download ZIP

Revisions

  1. @bryanhunter bryanhunter created this gist Jan 20, 2015.
    26 changes: 26 additions & 0 deletions bumper.exs
    View file
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,26 @@
    defmodule Bumper do

    @doc ~S"""
    Reads a Bitmap (24-bit) and displays width, height, and the RGB of each pixel
    """
    def show(filename) do
    {:ok, bindata} = File.read(filename)
    << "BM",
    _::size(64),
    offset_to_pixels::size(32)-little,
    _::size(32),
    width::size(32)-little,
    height::size(32)-little,
    _::size(16),
    24::size(16)-little,
    _rest::binary>> = bindata

    <<_::size(offset_to_pixels)-bytes, pixels::binary>> = bindata
    IO.puts "Offset:#{offset_to_pixels} Width:#{width} Height:#{height}"

    for <<b::size(8), g::size(8), r::size(8) <- pixels >>, do: {r,g,b}
    end
    end

    Bumper.show("krgbw.bmp")
    |> IO.inspect