text shadow

diff --git a/generate-board b/generate-board
index 1fe542b0510b9727e1af8c9713e05c28bb98e561..dc5fcd8f5847bb258751b55074a56c4d73768b70 100755 (executable)
--- a/generate-board
+++ b/generate-board
@@ -310,6 +310,7 @@ sub edge_faces() {
 
 sub label_faces() {
   my $sz = 18;
+  my $shadow = $sz * 0.1;
   o("  /Helvetica-Bold findfont  $sz scalefont setfont\n");
   foreach my $rr (values %region) {
     next if $rr->{Special};
@@ -329,7 +330,11 @@ END
     }
     o(<<END);
   } bind def
- %  0 setgray 0 10 359 { } bind for
+    0 setgray 0 10 359 {
+      dup  cos $shadow mul
+      exch sin $shadow mul
+      words pop pop
+    } bind for
     1 setgray 0 0 words pop pop
 END
   }