[Groff-commit] groff ChangeLog doc/pic.ms

[Werner LEMBERG]

CVSROOT:        /cvsroot/groff
Module name:    groff
Changes by:     Werner LEMBERG <wl>     07/11/20 17:25:39

Modified files:
        .              : ChangeLog 
        doc            : pic.ms 

Log message:
        * doc/pic.ms: Add Heinz-Jürgen's 3d boxes example.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/groff/ChangeLog?cvsroot=groff&r1=1.1112&r2=1.1113
http://cvs.savannah.gnu.org/viewcvs/groff/doc/pic.ms?cvsroot=groff&r1=1.36&r2=1.37

Patches:
Index: ChangeLog
===================================================================
RCS file: /cvsroot/groff/groff/ChangeLog,v
retrieving revision 1.1112
retrieving revision 1.1113
diff -u -b -r1.1112 -r1.1113
--- ChangeLog   19 Nov 2007 20:36:45 -0000      1.1112
+++ ChangeLog   20 Nov 2007 17:25:39 -0000      1.1113
@@ -1,3 +1,7 @@
+2007-11-20  Werner LEMBERG  <address@hidden>
+
+       * doc/pic.ms: Add Heinz-Jürgen's 3d boxes example.
+
 2007-11-17  Werner LEMBERG  <address@hidden>
 
        * src/roff/nroff/nroff.sh: Handle GROFF_TYPESETTER environment

Index: doc/pic.ms
===================================================================
RCS file: /cvsroot/groff/groff/doc/pic.ms,v
retrieving revision 1.36
retrieving revision 1.37
diff -u -b -r1.36 -r1.37
--- doc/pic.ms  19 Nov 2007 09:28:44 -0000      1.36
+++ doc/pic.ms  20 Nov 2007 17:25:39 -0000      1.37
@@ -31,7 +31,7 @@
 .\" Eric S. Raymond <address@hidden> in August 1995.  It has been put
 .\" under the GPL in March 2006.
 .\"
-.\"    $Id: pic.ms,v 1.36 2007/11/19 09:28:44 wl Exp $ 
+.\"    $Id: pic.ms,v 1.37 2007/11/20 17:25:39 wl Exp $ 
 .
 .
 .\" Set a proper TeX and LaTeX
@@ -47,7 +47,7 @@
 .\" Centered caption for figure.  Assumes previous .KS
 .de CE
 .  ce 1
-Figure \\n(H1-\\$1
+Figure \\n[H1]-\\$1
 .  sp 1
 .  KE
 ..
@@ -2433,8 +2433,66 @@
 }
 .PE
 .CE "2: Hypothetical production flow for dual-mode publishing"
-.LP
-.\"%%REFERENCE%%
+.PP
+.KS
+.PS
+# a three-dimensional block
+#
+# tblock(<width>, <height>, <text>)
+
+define tblock { [
+  box ht $2 wid $1 \
+      color "gold" outlined "black" \
+      xslanted 0 yslanted 0 \
+      $3;
+  box ht .1 wid $1 \
+      color "yellow" outlined "black" \
+      xslanted .1 yslanted 0 \
+      with .sw at last box .nw;
+  box ht $2 wid .1 \
+      color "goldenrod" outlined "black" \
+      xslanted 0 yslanted .1 \
+      with .nw at 2nd last box .ne;
+] }
+
+tblock(1, .5, "Master" "1");
+move -.1
+tblock(.5, 1, "Slave");
+.PE
+.CE "3: Three-dimensional Boxes"
+.PP
+Here the source code for figure \n[H1]-3:
+.KS
+.DS
+.CW
+\&.PS
+# a three-dimensional block
+#
+# tblock(<width>, <height>, <text>)
+
+define tblock { [
+  box ht $2 wid $1 \e
+      color "gold" outlined "black" \e
+      xslanted 0 yslanted 0 \e
+      $3;
+  box ht .1 wid $1 \e
+      color "yellow" outlined "black" \e
+      xslanted .1 yslanted 0 \e
+      with .sw at last box .nw;
+  box ht $2 wid .1 \e
+      color "goldenrod" outlined "black" \e
+      xslanted 0 yslanted .1 \e
+      with .nw at 2nd last box .ne;
+] }
+
+tblock(1, .5, "Master" "1");
+move -.1
+tblock(.5, 1, "Slave");
+\&.PE
+.DE
+.ft R
+.KE
+.
 .
 .
 .NH 1