On this page:
1.1 What is an icon?
1.2 About These Icons
1.3 Icon Style
light-metal-icon-color
metal-icon-color
dark-metal-icon-color
syntax-icon-color
halt-icon-color
run-icon-color
default-icon-height
toolbar-icon-height
plastic-icon-material
glass-icon-material
metal-icon-material
default-icon-material
bitmap-render-icon
icon-color->outline-color
1.4 Arrow Icons
right-arrow-icon
left-arrow-icon
up-arrow-icon
down-arrow-icon
right-over-arrow-icon
left-over-arrow-icon
right-under-arrow-icon
left-under-arrow-icon
1.5 Control Icons
bar-icon
play-icon
back-icon
fast-forward-icon
rewind-icon
stop-icon
record-icon
pause-icon
step-icon
step-back-icon
continue-forward-icon
continue-backward-icon
search-forward-icon
search-backward-icon
1.6 File Icons
floppy-disk-icon
save-icon
load-icon
small-save-icon
small-load-icon
1.7 Symbol and Text Icons
text-icon
recycle-icon
x-icon
check-icon
lambda-icon
hash-quote-icon
1.8 Miscellaneous Icons
regular-polygon-icon
octagon-icon
stop-sign-icon
stop-signs-icon
foot-icon
magnifying-glass-icon
left-magnifying-glass-icon
bomb-icon
left-bomb-icon
clock-icon
1.9 Stickman Icons
standing-stickman-icon
running-stickman-icon
1.10 Tool Icons
check-syntax-icon
small-check-syntax-icon
macro-stepper-icon
small-macro-stepper-icon
debugger-icon
small-debugger-icon
debugger-bomb-color
macro-stepper-hash-color
small-macro-stepper-hash-color
Version: 5.2.1

1 Icons

Neil Toronto <neil.toronto@gmail.com>

1.1 What is an icon?

This section describes an ideal that DrRacket and its tools are steadily approaching.

As a first approximation, an icon is just a small bitmap%, usually with an alpha channel.

But an icon also communicates. Its shape and color are a visual metaphor for an action or a message. Icons should be easily recognizable, distinguishable, visually consistent, and metaphorically appropriate for the actions and messages they are used with. It can be difficult to meet all four requirements at once (“distinguishable” and “visually consistent’ are often at odds), but good examples, good abstractions, and an existing icon library help considerably.

Example: The Macro Stepper icon is composed by appending a text icon image and a step icon image to get image. The syntax quote icon image is the color that DrRacket colors syntax quotes by default. The step icon image is colored like DrRacket colors identifier syntax by default, and is shaped using metaphors used in debugger toolbars, TV remotes, and music players around the world. It is composed of image to connote starting and image to connote immediately stopping.

It would not do to have just image as the Macro Stepper icon: it would be too easily confused with the Debugger icon image, especially for new users and people with certain forms of color-blindness, and thus fail to be distinguishable enough.

As another example, the Check Syntax icon image connotes inspecting and passing. Note that the check mark is also the color of syntax.

1.2 About These Icons

The icons in this collection are designed to be composed to create new ones: they are simple, thematically consistent, and can be constructed in any size and color. Further, slideshow’s pict combiners offer a way to compose them almost arbitrarily. For example, a media player application might create a large “step” button by superimposing a record-icon and a step-icon:
> (require slideshow/pict images/icons/control images/icons/style)
> (pict->bitmap
   (cc-superimpose
    (bitmap (record-icon "forestgreen" 96 glass-icon-material))
    (bitmap (step-icon light-metal-icon-color 48 metal-icon-material))))

image

All the icons in this collection are first drawn using standard dc<%> drawing commands. Then, to get lighting effects, they are turned into 3D objects and ray traced. Many are afterward composed to create new icons; for example, the stop-signs-icon image superimposes three stop-sign-icons, and the magnifying-glass-icon image is composed of three others (frame, glass and handle).

The ray tracer helps keep icons visually consistent with each other and with physical objects in day-to-day life. As an example of the latter, the record-icon, when rendered in clear glass, looks like the clear, round button on a Wii Remote. See the plt-logo and planet-logo functions for more striking examples.

When the rendering API is stable enough to publish, it will allow anyone who can draw a shape to turn that shape into a visually consistent icon.

As with any sort of rendering (such as SVG rendering), ray tracing takes time. For icons, this usually happens during tool or application start up. You can reduce the portion of start-up time taken by rendering to almost nothing by using the images/compile-time library to embed bitmaps directly into compiled modules.

1.3 Icon Style

 (require images/icons/style)

Use these constants and parameters to help keep icon sets visually consistent.

metal-icon-color : (or/c string? (is-a?/c color%))

=

"lightsteelblue"

Good colors to use with metal-icon-material. See bomb-icon and magnifying-glass-icon for examples.

run-icon-color : (or/c string? (is-a?/c color%))

=

"lawngreen"

Standard toolbar icon colors.

Use syntax-icon-color in icons that connote macro expansion or syntax. Example:

Use halt-icon-color in icons that connote stopping or errors. Example:

Use run-icon-color in icons that connote executing programs or evaluation. Examples:
> (play-icon run-icon-color 32)

image

> (require images/icons/stickman)
> (running-stickman-icon 0.9 run-icon-color "white" run-icon-color 32)

image

For new users and for accessibility reasons, do not try to differentiate icons for similar functions only by color.

(default-icon-height)  (and/c rational? (>=/c 0))
(default-icon-height height)  void?
  height : (and/c rational? (>=/c 0))

=

24

The height of DrRacket’s standard icons.

(toolbar-icon-height)  (and/c rational? (>=/c 0))
(toolbar-icon-height height)  void?
  height : (and/c rational? (>=/c 0))

=

16

The height of DrRacket toolbar icons.

Use (toolbar-icon-height) as the height argument for common icons that will be used in toolbars, status bars, and buttons.

(When making an icon for DrRacket’s main toolbar, try to keep it nearly square so that it will not take up too much horizontal space when the toolbar is docked vertically. If you cannot, as with the Macro Stepper, send a thinner icon as the alternate-bitmap argument to a switchable-button%.)

plastic-icon-material : deep-flomap-material-value?
glass-icon-material : deep-flomap-material-value?
metal-icon-material : deep-flomap-material-value?
Materials for icons.

Plastic is opaque and reflects a little more than glass.

Glass is transparent but frosted, so it scatters refracted light. It has the high refractive index of cubic zirconia, or fake diamond. The “glassy look” cannot actually be achieved using glass.

Metal reflects the most, its specular highlight is nearly the same color as the material (in the others, the highlight is white), and it diffuses much more ambient light than directional. This is because, while plastic and glass mostly reflect light directly, metal mostly absorbs light and re-emits it.

Examples:

> (require images/icons/misc)
> (for/list ([material  (list plastic-icon-material
                              glass-icon-material
                              metal-icon-material)])
    (bomb-icon light-metal-icon-color dark-metal-icon-color 32
               material))

(list image image image)

(default-icon-material)  deep-flomap-material-value?
(default-icon-material material)  void?
  material : deep-flomap-material-value?

=

plastic-icon-material

The material used for rendering most icons and icon parts. There are exceptions; for example, the floppy-disk-icon always renders the sliding cover in metal.

(bitmap-render-icon bitmap [z-ratio material])  (is-a?/c bitmap%)
  bitmap : (is-a?/c bitmap%)
  z-ratio : (and rational? (>=/c 0)) = 5/8
  material : deep-flomap-material-value?
   = (default-icon-material)
Makes a 3D object out of bitmap and renders it as an icon.

The z-ratio argument only makes a difference when material is transparent, such as glass-icon-material. It controls what fraction of bitmap’s height the icon is raised, which in turn affects the refracted shadow under the icon: the higher the z-ratio, the lower the shadow.

Examples:

> (define bitmap
    (pict->bitmap (colorize (filled-ellipse 64 64) "tomato")))
> (for/list ([z-ratio  (in-range 0 2 1/3)])
    (bitmap-render-icon bitmap z-ratio glass-icon-material))

(list image image image image image image)

More complex shapes than “embossed and rounded” are possible with the full rendering API, which will be made public in a later release. Still, most of the simple icons (such as those in images/icons/arrow and images/icons/control) can be rendered using only bitmap-render-icon.

(icon-color->outline-color color)  (is-a?/c color%)
  color : (or/c string? (is-a?/c color%))
For a given icon color, returns the proper outline color%.

As an example, here is how to duplicate the record-icon using slideshow/pict:
> (define outline-color (icon-color->outline-color "forestgreen"))
> (define brush-pict (colorize (filled-ellipse 62 62) "forestgreen"))
> (define pen-pict (linewidth 2 (colorize (ellipse 62 62) outline-color)))
> (bitmap-render-icon
   (pict->bitmap (inset (cc-superimpose brush-pict pen-pict) 1))
   5/8 glass-icon-material)

image

> (record-icon "forestgreen" 64 glass-icon-material)

image

The outline width is usually (/ height 32) (in this case, 2), but not always. (For example, recycle-icon is an exception, as are parts of floppy-disk-icon.)

1.4 Arrow Icons

 (require images/icons/arrow)

(right-arrow-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(left-arrow-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(up-arrow-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(down-arrow-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
Standard directional arrows.

Example:

> (list (right-arrow-icon syntax-icon-color (toolbar-icon-height))
        (left-arrow-icon run-icon-color)
        (up-arrow-icon halt-icon-color 37)
        (down-arrow-icon "lightblue" 44 glass-icon-material))

(list image image image image)

(right-over-arrow-icon color    
  [height    
  material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(left-over-arrow-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(right-under-arrow-icon color    
  [height    
  material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(left-under-arrow-icon color    
  [height    
  material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
Standard bent arrows.

1.5 Control Icons

 (require images/icons/control)

(bar-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

Example:

> (bar-icon run-icon-color 32)

image

This is not a “control” icon per se, but is used to make many others.
(play-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

Example:

> (play-icon run-icon-color 32)

image

(back-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

Example:

> (back-icon run-icon-color 32)

image

(fast-forward-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(rewind-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(stop-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

Example:

> (stop-icon halt-icon-color 32)

image

(record-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

Example:

> (record-icon "red" 32)

image

(pause-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

Example:

> (pause-icon halt-icon-color 32)

image

(step-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

Example:

> (step-icon run-icon-color 32)

image

(step-back-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(continue-forward-icon color    
  [height    
  material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(continue-backward-icon color    
  [height    
  material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(search-forward-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(search-backward-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

1.6 File Icons

 (require images/icons/file)

(floppy-disk-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

Example:

> (floppy-disk-icon "crimson" 32 glass-icon-material)

image

(save-icon arrow-color color [height material])  (is-a?/cbitmap%)
  arrow-color : (or/c string? (is-a?/c color%))
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(load-icon arrow-color color [height material])  (is-a?/cbitmap%)
  arrow-color : (or/c string? (is-a?/c color%))
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(small-save-icon arrow-color    
  color    
  [height    
  material])  (is-a?/cbitmap%)
  arrow-color : (or/c string? (is-a?/c color%))
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(small-load-icon arrow-color    
  color    
  [height    
  material])  (is-a?/cbitmap%)
  arrow-color : (or/c string? (is-a?/c color%))
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

1.7 Symbol and Text Icons

 (require images/icons/symbol)

(text-icon str    
  font    
  color    
  [trim?    
  outline    
  height    
  material])  (is-a?/c bitmap%)
  str : string?
  font : (is-a?/c font%)
  color : (or/c string? (is-a?/c color%))
  trim? : boolean? = #t
  outline : (or/c 'auto (and/c rational? (>=/c 0))) = 'auto
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
Renders a text string as an icon. For example,
> (text-icon "An Important Point!"
             (make-object font% 48 'decorative 'normal 'bold #t)
             "lightskyblue" #t 'auto 48)

image

Before rendering, the drawn text is scaled so that it is exactly height pixels tall. Make sure the font is large enough that scaling does not create blurry and jagged edge artifacts, as in the following example:
> (text-icon "Q" (make-object font% 32 'default 'normal 'bold)
             "green" #t 0 96)

image

When str contains tall letters or trim? is #f, using height as the font size should be sufficient.

To make it easy to create a large enough font, text-icon always interpets font sizes as being in pixels, never points. See font% for details on font sizes.

If trim? is #f, the drawn text is not cropped before rendering. Otherwise, it is cropped to the smallest rectangle containing all the non-zero-alpha pixels. Rendering very small glyphs shows the difference dramatically:
> (define font (make-object font% 32 'default))
> (list (text-icon "." font "white")
        (text-icon "." font "white" #f))

(list image image)

Note that both icons are (default-icon-height) pixels tall.

When outline is 'auto, the outline drawn around the text is (/ height 32) pixels wide.

Because different platforms have different fonts, text-icon cannot guarantee the icons it returns have a consistent look or width across all platforms, or that the unicode characters will exist.

(recycle-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
Returns the universal recycling symbol, rendered as an icon.

Example:

> (recycle-icon (make-object color% 0 153 0) 48)

image

(x-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
Returns an “x” icon that is guaranteed to look the same on all platforms. (Anything similar that would be constructed by text-icon would differ at least slightly across platforms.)

Example:

> (x-icon "red" 32)

image

(check-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

Example:

> (check-icon "darkgreen" 32)

image

(lambda-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

(hash-quote-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

1.8 Miscellaneous Icons

 (require images/icons/misc)

(regular-polygon-icon sides    
  start    
  color    
  [height    
  material])  (is-a?/c bitmap%)
  sides : exact-positive-integer?
  start : real?
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
Renders the largest regular polygon with sides sides, with the first vertex at angle start, that can be centered in a height × height box.

Example:

> (for/list ([sides  (in-range 1 9)]
             [material  (in-cycle (list plastic-icon-material
                                        glass-icon-material))])
    (regular-polygon-icon sides (* 1/4 pi) "cornflowerblue" 32
                          material))

(list image image image image image image image image)

(octagon-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
Equivalent to (regular-polygon-icon 8 (/ (* 2 pi) 16) color height material).

Example:

> (octagon-icon halt-icon-color 32)

image

(stop-sign-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

(stop-signs-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

(foot-icon color [height material])  (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

Example:

> (foot-icon "chocolate" 32 glass-icon-material)

image

(magnifying-glass-icon frame-color    
  handle-color    
  [height    
  material])  (is-a?/cbitmap%)
  frame-color : (or/c string? (is-a?/c color%))
  handle-color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

Example:

> (magnifying-glass-icon light-metal-icon-color "lightblue" 32
                         glass-icon-material)

image

(left-magnifying-glass-icon frame-color    
  handle-color    
  [height    
  material])  (is-a?/cbitmap%)
  frame-color : (or/c string? (is-a?/c color%))
  handle-color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

(bomb-icon cap-color    
  bomb-color    
  [height    
  material])  (is-a?/cbitmap%)
  cap-color : (or/c string? (is-a?/c color%))
  bomb-color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

(left-bomb-icon cap-color    
  bomb-color    
  [height    
  material])  (is-a?/cbitmap%)
  cap-color : (or/c string? (is-a?/c color%))
  bomb-color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)

(clock-icon [height    
  face-color    
  hand-color    
  hours    
  minutes])  (is-a?/c bitmap%)
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  face-color : (or/c string? (is-a?/c color%))
   = light-metal-icon-color
  hand-color : (or/c string? (is-a?/c color%)) = "firebrick"
  hours : (integer-in 0 11) = 1
  minutes : (real-in 0 60) = 33

Examples:

> (clock-icon 48)

image

> (clock-icon 48 "lightblue" "darkblue" 3 21)

image

1.9 Stickman Icons

 (require images/icons/stickman)

(standing-stickman-icon color    
  arm-color    
  head-color    
  [height    
  material])  (is-a?/c bitmap%)
  color : (or/c string? (is-a?/c color%))
  arm-color : (or/c string? (is-a?/c color%))
  head-color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
Returns the icon displayed in DrRacket’s lower-right corner when no program is running.

(running-stickman-icon t    
  color    
  arm-color    
  head-color    
  [height    
  material])  (is-a?/c bitmap%)
  t : rational?
  color : (or/c string? (is-a?/c color%))
  arm-color : (or/c string? (is-a?/c color%))
  head-color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
Returns a frame of the icon animated in DrRacket’s lower-right corner when a program is running. The frame returned is for time t of a run cycle with a one-second period.

The following example samples the run cycle at 12 Hz, or every 1/12 second:
> (for/list ([t  (in-range 0 1 1/12)])
    (running-stickman-icon t run-icon-color "white" run-icon-color 32))

(list image image image image image image image image image image image image)

The stickman’s joint angles are defined by continuous periodic functions, so the run cycle can be sampled at any resolution, or at any real-valued time t. The cycle is modeled after the run cycle of the player’s avatar in the Commodore 64 game Impossible Mission.

1.10 Tool Icons

 (require images/icons/tool)

(check-syntax-icon [height material])  (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = (toolbar-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(small-check-syntax-icon [height material])  (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = (toolbar-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
Icons for Check Syntax. The small-check-syntax-icon is used when the toolbar is on the side.

Example:

> (list (check-syntax-icon 32) (small-check-syntax-icon 32))

(list image image)

(macro-stepper-icon [height material])  (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = (toolbar-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(small-macro-stepper-icon [height material])  (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = (toolbar-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
Icons for the Macro Stepper. The small-macro-stepper-icon is used when the toolbar is on the side.

Example:

> (list (macro-stepper-icon 32) (small-macro-stepper-icon 32))

(list image image)

(debugger-icon [height material])  (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = (toolbar-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
(small-debugger-icon [height material])  (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = (toolbar-icon-height)
  material : deep-flomap-material-value?
   = (default-icon-material)
Icons for the Debugger. The small-debugger-icon is used when the toolbar is on the side.

Example:

> (list (debugger-icon 32) (small-debugger-icon 32))

(list image image)