BulletedNubers

For bulleted numbers three possibilites exist:

• use a font that has such glyphs
• use pic
• use postscript

Font

not done right now

PIC

 .de bun
   .\" arg1 - number
   .\" arg2 - color
   .PS
     .sp -2.4
     move left 4.0
     circle radius 0.1 "\s-2\fB\m[white]\\$1\m[black]\f[]\s+2" shaded "\\$2" outline "\\$2"
   .PE
 ..

Example

 .bun 1 red
 .bun 2 blue

Caveats:

PIC Images are placed in the middle of the page. The macro tries to circumvent this but doesn't do to correctly.

Postscript

See thread in mailing list: http://lists.gnu.org/archive/html/groff/2007-08/msg00000.html

 .\" The radius of the circle used in `ci' macro.
 .\"
 .ds ci-radius 0.8m
 .
 .
 .\" .ci <text>
 .\"
 .\" Emit <text>, written in white and centered within a red circle.
 .\"
 .de ci-end
 ..
 .
 .de ci
 .  ds ci-text \\$1\"
 .  nr ci-width \w'\\$1'
 .  nr ci-height \\n[rst]
 .  nr ci-depth \\n[rsb]
 .  nr ci-rad \\*[ci-radius]
 .
 .  de ci-ps ci-end
     ps: exec
       % move to circle center
       \\n[ci-rad] u
         \\n[ci-height] u \\n[ci-depth] u add 2 div neg
           rmoveto
       gsave
         % shift origin to current point temporarily
         currentpoint translate
         1 0 0 setrgbcolor
         0 0 \\n[ci-rad] u 0 360 arc
         fill
         1 1 1 setrgbcolor
         % move to start of text string
         \\n[ci-width] u 2 div neg
           \\n[ci-height] u \\n[ci-depth] u add 2 div
             moveto
         (\\*[ci-text]) show
       grestore
 .  ci-end
 .
 \Y[ci-ps]\h'2u*\\n[ci-rad]u'
 ..

Example:

  blah blah blah
  .ci 2
  blubb blubb blubb
 
  .ps 30
  .vs 36
  blah blah blah
  .ci 12
  blubb blubb blubb