# Glimmr Drawing Commands

## version 2/101030 by Erik Temple

**Section - Monochrome bitmap without background color**

To drmonobitmap (HUE - a number) in (WIN - a g-window) at (X1 - a number) by/x (Y1 - a number) using (BIT_MAP - a list of lists of numbers) with dot/-- size (WGT - a number) pixel/pixels/px/--:

let row be Y1;

let column be X1;

let the bit-height be the number of entries of BIT_MAP;

repeat with current-row running through BIT_MAP:

repeat with index running through current-row:

if index > 0:

dimrectdraw (HUE) in (WIN) at (column) by (row) with size (WGT) by (WGT);

increase column by WGT;

increase row by WGT;

now column is X1.

To draw/display a/-- monochrome bitmap (HUE - a number) in (WIN - a g-window) at (X1 - a number) by/x (Y1 - a number) using (BIT_MAP - a list of lists of numbers) with dot/-- size (WGT - a number) pixel/pixels/px/--:

#if utilizing Glimmr debugging;

say "[>console][DC]Drawing monochrome bitmap in [i][win][/i] with upper left ([X1], [Y1]) and dot size [WGT] (bitmap is [number of entries of bit_map] long, with width [the number of entries in entry 1 of BIT_MAP]; color [hue].[<]";

#end if;

drmonobitmap (HUE) in (WIN) at (X1) by (Y1) using (BIT_MAP) with dot size (WGT) px.

To draw/display a/-- monochrome bitmap (HUE - a number) in (WIN - a g-window) at (COORD1 - a list of numbers) using (BIT_MAP - a list of lists of numbers) with dot/-- size (WGT - a number) pixel/pixels/px/--:

let x1 be entry 1 of coord1;

let y1 be entry 2 of coord1;

display a monochrome bitmap (HUE) in (WIN) at (X1) by (Y1) using (BIT_MAP) with dot size (WGT) px.