chiark / gitweb /
Use self-explanatory constants to specify alignment zones
authorBen Harris <bjh21@bjh21.me.uk>
Mon, 18 Nov 2024 14:13:15 +0000 (14:13 +0000)
committerBen Harris <bjh21@bjh21.me.uk>
Mon, 18 Nov 2024 14:13:15 +0000 (14:13 +0000)
This adds ALEFHEIGHT for the height of Hebrew letters.

bedstead.c

index 62c2cb0bb6b787346856ef332b84196af8f2f3f6..6439e154659c405a93022ce7c149fc7af0ce35f1 100644 (file)
 #define ASCENT 8
 #define DESCENT 2
 #define XHEIGHT 5
+#define ALEFHEIGHT 6
 #define CAPHEIGHT (ASCENT-1)
 
 /*
@@ -3149,11 +3150,11 @@ main(int argc, char **argv)
             (int)(XSIZE * XPIX), (int)(ASCENT * YPIX));
        printf("   <Private>\n");
        TTXF("BlueValues", "0 0 %4g %4g %4g %4g %4g %4g",
-            (double)(YPIX * 5), (double)(YPIX * 5),
-            (double)(YPIX * 6), (double)(YPIX * 6),
-            (double)(YPIX * 7), (double)(YPIX * 7));
+            (double)(YPIX * XHEIGHT),    (double)(YPIX * XHEIGHT),
+            (double)(YPIX * ALEFHEIGHT), (double)(YPIX * ALEFHEIGHT),
+            (double)(YPIX * CAPHEIGHT),  (double)(YPIX * CAPHEIGHT));
        TTXF("OtherBlues", "%4g %4g",
-            (double)(YPIX * -2), (double)(YPIX * -2));
+            (double)(YPIX * -DESCENT),   (double)(YPIX * -DESCENT));
        TTXI("BlueFuzz", 0);
        TTXF("StdHW", "%4g", (double)YPIX);
        TTXF("StdVW", "%4g", (double)(XPIX * (100 + weight->weight) / 100));