| blob | 794933cae42f9414d160dee391b187e1c9e65562 |
16 vertical reference point in order to obtain the
20 subtracted from (sit) the vertical reference point
21 of a staff line, in order to obtain the reference
26 ;; adjacent staff lines.
28 ;; An integer value indicating how many non-white pixels are
29 ;; used to draw a staff line.
31 ;; An integer value indicating how many non-white pixels are
32 ;; used to draw a stem
34 ;; The width of filled and half-note noteheads is always 1.5 times the
35 ;; staff line distance. Since the staff line distance is an even
36 ;; number, this width is always an integer. This is important, because
37 ;; we need to position stems very precisely with respect to noteheads.
38 ;; and we want the left and right edges of noteheads to fall on integer
39 ;; pixel borders. Moreover, by having a fixed proportion, these
40 ;; noteheads will have the same proportional width no matter what the
41 ;; staff line distance is, which makes the characters look similar at
42 ;; different sizes. However, this means that we cannot make the
43 ;; heights of these characters integers. That is OK, though, since we
44 ;; count on anti-aliasing to give the impression of proportional
45 ;; sizes.
47 ;; While the rule above guarantees that the width of noteheads is an
48 ;; integer, it sometimes creates an even integer and sometimes an odd
49 ;; integer. When the width is even, the x-coordinate of the middle of
50 ;; the character is between two pixels, which is fine because that is
51 ;; how the MetaFont coordinate system works. When it is odd, however,
52 ;; the middle of the character is in the middle of a pixel. If we were
53 ;; to leave it like that, the left and right edges of the character
54 ;; would be in the middle of a pixel, which defeats the purpose. For
55 ;; that reason, when the width is odd, we put the reference point of
56 ;; the character one half pixel to the left of its middle.
57 ;;
58 ;; A similar rule holds for vertical reference points. For instance,
59 ;; the reference point of a staff line is the middle of the line if its
60 ;; thickness is even and one half pixel below that if it is odd.
61 ;;
62 ;; We do this consistently for stems, staff lines, etc. Thus, the
63 ;; client program can pretend that the reference point is always in the
64 ;; middle of the object. When the object has an odd size the effect is
65 ;; simply that everything appears to be off by half a pixel. We just
66 ;; have to watch out with attach points between stems and noteheads.
67 ;; In fact, in general, the noteheads may have a different distance
68 ;; from the reference point to the left attach point from the distance
69 ;; from the reference point to the right attach point.
71 ;; Characters are positioned vertically in multiples of half a staff
72 ;; line distance. An even multiple indicates that the symbol will be
73 ;; placed ON A STAFF LINE, and an odd multiple a symbol BETWEEN TWO
74 ;; STAFF LINES. The bottom staff line of a staff has a multiple of
75 ;; zero, and the multiple is positive towards the upper edge of the
76 ;; page and negative towards the lower edge of the page.
77 ;;
78 ;; When the staff line thickness is even, the reference point for
79 ;; placing characters is the middle of the staff line or half way
80 ;; between two adjacent middles of staff lines. When the staff line
81 ;; thickness is odd, the reference point is located half a pixel lower
82 ;; down.
84 ;; A certain number of characters are rotationally symmetric. But the
85 ;; center of the character is usually not the reference point. Since
86 ;; the reference point is (0, 0), we must draw these characters at an
87 ;; offset.
89 ;; The vertical offset from the reference point to the middle of the
90 ;; staff line. This is zero for even staff line thicknesses and 0.5
91 ;; otherwise.
119 staff-line-thickness
120 stem-thickness
121 notehead-width
122 xoffset
123 yoffset
124 dot-diameter
125 staff-line-offset-down
126 staff-line-offset-up
127 ledger-line-offset-down
128 ledger-line-offset-up
129 ledger-line-offset-left
130 ledger-line-offset-right
131 stem-offset-left
132 stem-offset-right
133 bar-line-offset-left
134 bar-line-offset-right
135 notehead-right-x-offset
136 notehead-right-y-offset
137 notehead-left-x-offset
138 notehead-left-y-offset
139 beam-offset-down
140 beam-offset-up
141 beam-hang-sit-offset) font
152 staff-line-offset-up
154 ;; we can't use 12 here, because Lisp rounds 0.5 to 0 which
155 ;; happens for the smallest staff-line-distance = 6
159 stem-offset-right
164 bar-line-offset-right
169 ledger-line-offset-up
174 ledger-line-offset-right
193 ;;; the DOWN staff line offset is a nonnegative integer, and the UP
194 ;;; staff line offset is a negative integer. This way, both of them
195 ;;; should be ADDED to a reference y value to obtain the lower and
196 ;;; upper y coordinates of the staff line. If the staff line has a
197 ;;; thickness which is an even number of pixels, then the two values
198 ;;; returned have the same magnitude (but opposite signs). Otherwise
199 ;;; the first value (DOWN) has a magnitude which is one smaller than
200 ;;; that of the second value (UP). This implies that the y-value of the
201 ;;; reference point for a staff line is either in the middle of the
202 ;;; staff line (if the thickness is even) or half a pixel BELOW the
203 ;;; middle (if the thickness is odd).
294 ;;; default method
299 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
300 ;;;
301 ;;; Beams
316 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
317 ;;;
318 ;;; Clefs
320 ;;; w
321 ;;; |
322 ;;; **
323 ;;; ****
324 ;;; *****
325 ;;; ** | **
326 ;;; ** h **
327 ;;; ** **
328 ;;; ** g-**
329 ;;; v-**-i **
330 ;;; ** ***
331 ;;; * ***
332 ;;; * ***-x
333 ;;; * ****
334 ;;; * ****
335 ;;; * ****
336 ;;;*************************************************************************
337 ;;; * ******
338 ;;; * ******
339 ;;; * ******
340 ;;; ******
341 ;;; ******
342 ;;; ee\ ******/dd
343 ;;;*************************************************************************
344 ;;; ********
345 ;;; ******* *
346 ;;; ******* *
347 ;;; ******* *
348 ;;; ******* *
349 ;;; ****** ff\*/gg/c
350 ;;;*************************************************************************
351 ;;; ****** ************
352 ;;; ***** ****************
353 ;;; f ***** ******************
354 ;;; \***** ***** * | ***
355 ;;; **** b-**** * bb **
356 ;;; (0, 0)\ ****/y ***/cc * aa\**/d
357 ;;;*************************************************************************
358 ;;; **** ** * **
359 ;;; *** * * **
360 ;;; ** | * **
361 ;;; ** a z ) * **
362 ;;; *** | * **
363 ;;; ***************
364 ;;;*************************************************************************
365 ;;; |e *
366 ;;; o *
367 ;;; | *
368 ;;; *** *
369 ;;; ******* *
370 ;;; ********* *
371 ;;; n-*********-p *
372 ;;; ****** s-*-l
373 ;;; ****-q r *
374 ;;; **** / **
375 ;;; *******
376 ;;; |
377 ;;; m
378 ;;;
379 ;;;
383 stem-thickness yoffset) font
409 ;; yz should be slightly above the upper edge of the staff line
450 ;;;
451 ;;; xa xb
452 ;;; ||
453 ;;; || xc xf
454 ;;; || | |
455 ;;; (0, top) ********* ** ****************
456 ;;; ********* ** ********************
457 ;;; ********* ** **** | **********
458 ;;; ********* ** *** | ********
459 ;;; ********* ** *** (xg,yg) *******
460 ;;; ********* ** ***** ********
461 ;;; ********* ** ******* ********
462 ;;; ********* ** ******** ********
463 ;;; ********* ** ******** ********
464 ;;; ********* ** | ****** ********
465 ;;; ********* ** | **___yd ********
466 ;;; ********* ** xd ********
467 ;;; ********* ** (xj,yj)-- ********
468 ;;; ********* ** ********
469 ;;; ********* ** (xe,ye) ********
470 ;;; ********* ** | ********--(xk,yk)
471 ;;; ********* ** ** ********
472 ;;; ********* ** **** ********
473 ;;; ********* ** **** (xh,yh) ********
474 ;;; ********* ** ****** | *******
475 ;;; ********* ** ******* | ******
476 ;;; ********* ** ***** *************
477 ;;; ********* ** **** |_____
478 ;;; ********* ** ****** (xl,yl)
479 ;;; (0, 0) ********* ***********--xi
480 ;;; ********* ***********
481 ;;; ********* ** *******
482 ;;; ********* ** ****
483 ;;; ********* ** ***** *************
484 ;;; ********* ** ******* ******
485 ;;; ********* ** ****** *******
486 ;;; ********* ** **** ********
487 ;;; ********* ** **** ********
488 ;;; ********* ** ** ********
489 ;;; ********* ** ********
490 ;;; ********* ** ********
491 ;;; ********* ** ********
492 ;;; ********* ** ********
493 ;;; ********* ** ** ********
494 ;;; ********* ** ****** ********
495 ;;; ********* ** ******** ********
496 ;;; ********* ** ******** ********
497 ;;; ********* ** ******* ********
498 ;;; ********* ** ***** ********
499 ;;; ********* ** *** *******
500 ;;; ********* ** *** ********
501 ;;; ********* ** **** **********
502 ;;; ********* ** ********************
503 ;;; ********* ** ****************
506 ;;; The x coordinate of the reference point is always on the left edge
507 ;;; of the character. The y coordinate of the reference point is the
508 ;;; top edge of the staff line on which the character sits.
510 ;;; since the character is symmetric around the staff line, we only
511 ;;; have to define the upper curve, then we draw it both unmodified and
512 ;;; reflected + shifted the thickness of the staff line.
531 ;; define some y coordinates
569 r))
572 ;;;
573 ;;;
574 ;;; i
575 ;;; |
576 ;;;***********************************************************************
577 ;;; ********* |xj
578 ;;; ** | ** ***
579 ;;; ** e *** *****_yj
580 ;;; ** *** *****
581 ;;; *** |d *** ***
582 ;;; (0,0)\** *** ***
583 ;;;***********************************************************************
584 ;;; ********* ***
585 ;;; a-*********-c **** ***
586 ;;; ********* **** *****_yk
587 ;;; ******* f-****-h *****
588 ;;; *** **** ***
589 ;;; |b ****
590 ;;;***********************************************************************
591 ;;; ****
592 ;;; ****
593 ;;; ****
594 ;;; ****
595 ;;; ***
596 ;;; ***
597 ;;;***********************************************************************
598 ;;; ***
599 ;;; ***
600 ;;; ***
601 ;;; ***
602 ;;; g-***
603 ;;; |
604 ;;; g + (0, -1)
605 ;;;***********************************************************************
606 ;;;
607 ;;;
608 ;;;
648 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
649 ;;;
650 ;;; Noteheads
686 sld))
690 sld)))
703 sld)
706 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
707 ;;;
708 ;;; Dot
710 ;;; The dot is complicated, because there are several contradicting
711 ;;; constraints that it must satisfy. For one thing, it is rotationally
712 ;;; symmetric. For that reason, we cannot use a different xoffset and
713 ;;; yoffset for the dot. Also, the dot is used for several different
714 ;;; purposes. When used in a dotted note, it is aligned in the middle
715 ;;; of the space between two staff lines, and must thus be aligned
716 ;;; vertically the same way as a notehead is. But it is also used as a
717 ;;; staccato dot, in which case it must be horizontally aligned the same
718 ;;; way as the noteheads are. This restriction is more important the
719 ;;; lower the resolution is.
721 ;;; Let us see how this works. For a staff line distance of 6 (the
722 ;;; smallest), vertical and horizontal alignments are the same: the
723 ;;; space between staff lines is 5 pixels and the note is 9 pixels wide;
724 ;;; both odd values. For a staff line distance of 8, it does not work.
725 ;;; The space is 7 pixels, so odd, but noteheads are 12 pixels wide so
726 ;;; even. We think it is more important that the dot be aligned
727 ;;; vertically, and that half a pixel of horizontal offset is not a
728 ;;; problem for the staccato dot. We thus use yoffset for the alignment
729 ;;; both vertically and horizontally.
731 ;;; Ross says the dot should be roughly a third of the staff line
732 ;;; distance, but in his examples, it is closer to half a staff line
733 ;;; distance. Compromise by using 0.4. We count on anti aliasing to
734 ;;; save us from too ugly a result when the edges do not fall on pixel
735 ;;; boundaries.
743 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
744 ;;;
745 ;;; Ties
1025 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1026 ;;;
1027 ;;; Accidentals
1032 stem-thickness
1033 yoffset) font
1035 ;; bars and the outer edge of the character as a fraction of
1036 ;; the staff line distance
1038 ;; A factor that determines the height of the thin part as a
1039 ;; fraction of the staff line distance
1041 ;; A factor that determines the width of the hole as a fraction of the
1042 ;; staff line distance.
1045 ;; Hope that half a pixel will not be visible and will not influence
1046 ;; the required distance to the noteheads.
1047 ;;
1048 ;; FIXME: this is the only real difference between the
1049 ;; :semisharp and :sesquisharp glyph calculations, and the
1050 ;; :sharp glyph. Find a way to unify the glyph
1051 ;; computations in a proper metafonty way.
1055 ;; FIXME: this leads to a blurry glyph at most sizes:
1056 ;; choose a coordinate which lies on a pixel boundary in
1057 ;; preference.
1062 ;; The path for the thick part symmetric around (0, 0)
1064 ;; Determine the y coordinate of the previous path at the
1065 ;; cross point of the thin part. Use congruent triangles.
1067 ;; The path for the thin part symmetric around (0, 0)
1081 stem-thickness
1082 yoffset) font
1084 ;; bars and the outer edge of the character as a fraction of
1085 ;; the staff line distance
1087 ;; A factor that determines the height of the thin part as a
1088 ;; fraction of the staff line distance
1090 ;; A factor that determines the width of the hole as a fraction of the
1091 ;; staff line distance.
1094 ;; Hope that half a pixel will not be visible and will not influence
1095 ;; the required distance to the noteheads.
1103 ;; The path for the thick part symmetric around (0, 0)
1105 ;; Determine the y coordinate of the previous path at the
1106 ;; cross point of the thin part. Use congruent triangles.
1109 ;; The path for the thin part symmetric around (0, 0)
1132 stem-thickness
1133 yoffset) font
1135 ;; bars and the outer edge of the character as a fraction of
1136 ;; the staff line distance
1138 ;; A factor that determines the height of the thin part as a
1139 ;; fraction of the staff line distance
1141 ;; A factor that determines the width of the hole as a fraction of the
1142 ;; staff line distance.
1145 ;; Hope that half a pixel will not be visible and will not
1146 ;; influence the required distance to the noteheads.
1147 ;;
1148 ;; FIXME: see note in :semisharp glyph at this point
1156 ;; The path for the thick part symmetric around (0, 0)
1158 ;; Determine the y coordinate of the previous path at the
1159 ;; cross point of the thin part. Use congruent triangles.
1162 ;; The path for the thin part symmetric around (0, 0)
1201 ;; FIXME: 1.2 here (and in the :sesquiflat glyph, below)
1202 ;; represents the difference in width between the
1203 ;; :semiflat bulge and the regular :flat bulge. Find a
1204 ;; way to share code between the glyphs.
1217 --
1238 --
1263 (clim:region-union (clim:region-union (translate (rotate (slant combined (* 0.6 1.2)) (- (/ pi 2)))
1270 --
1294 --
1300 --
1303 ;;; The width of a natural sign is slightly less than 2/3s of the
1304 ;;; staff line distance of that font.
1308 stem-thickness
1309 yoffset) font
1312 ;; staff line distance.
1315 ;; Hope that half a pixel will not be visible and will not influence
1316 ;; the required distance to the noteheads.
1321 ;; The left part of the character is right in the middle of the
1322 ;; staff line and the lower edge of the right part touches the upper
1323 ;; edge of the staff line
1326 ;; The path for the thick part
1340 --
1347 --
1351 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1352 ;;;
1353 ;;; Rests
1357 notehead-width xoffset yoffset) font
1363 notehead-width xoffset yoffset) font
1369 notehead-width xoffset yoffset) font
1377 notehead-width xoffset yoffset) font
1451 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1452 ;;;
1453 ;;; Flags
1460 extreme-point &
1461 extreme-point ++
1470 extreme-point &
1471 extreme-point ++
1557 xoffset))))))
1570 xoffset)
1574 xoffset))))))
1587 xoffset)
1591 xoffset)
1595 xoffset))))))
1613 ;;; w3
1614 ;;; ___________
1615 ;;; | |
1616 ;;;
1617 ;;; 9 *** 10 ** -11 -
1618 ;;; ********** -12 |
1619 ;;; *********** |
1620 ;;; 8- ************ |
1621 ;;; ************* |
1622 ;;; ************** |
1623 ;;; *************** |
1624 ;;; ***6/ ********** |
1625 ;;; ** / ********** |
1626 ;;; 7 5 ********** |
1627 ;;; ********** | h2
1628 ;;; ********** |
1629 ;;; ********** |
1630 ;;; ********** |
1631 ;;; ********** |
1632 ;;; ********** |
1633 ;;; ********** |
1634 ;;; 4 -**********- 13 |
1635 ;;; 3 ********** 14 - |
1636 ;;; \ **************** / | |
1637 ;;; 2 -**********************- 15 | h1 |
1638 ;;; ********************** _| _|
1639 ;;; | | |
1640 ;;; 1 0 16
1641 ;;;
1642 ;;;
1643 ;;; |___|
1644 ;;; w1
1645 ;;;
1646 ;;; |_________|
1647 ;;; w2
1652 yoffset)
1653 font
1658 ;; if the little notch is to be visible, the top
1659 ;; of this character should hang below the upper staff line.
1661 ;; w1 and w2 should be integers in to avoid fuzziness
1688 ;;;
1689 ;;; w2
1690 ;;; __________
1691 ;;; | |
1692 ;;; 10
1693 ;;; | _
1694 ;;; ********* |
1695 ;;; ************** |
1696 ;;; ****************** |
1697 ;;; ****-6 | ********** |
1698 ;;; 9 -****** 5 ********** |
1699 ;;; *******-7 4-*********-11 |
1700 ;;; ****** ********* |
1701 ;;; *** ********* |
1702 ;;; | ******** |
1703 ;;; 8 ******* |
1704 ;;; ***** 14 |
1705 ;;; ***** | | h1
1706 ;;; *****-12 13 * |
1707 ;;; ******* | ** _ |
1708 ;;; ********************** | |
1709 ;;; *********************** | |
1710 ;;; _ *********************** | |
1711 ;;; | **** | ************* | h2 |
1712 ;;; | 3 -*** 1 *********** | |
1713 ;;; h3 | ** ******** | |
1714 ;;; |_ \ ***** _| _|
1715 ;;; 2 |
1716 ;;; 0
1717 ;;;
1718 ;;;
1719 ;;;
1720 ;;; |__________|
1721 ;;; w1
1722 ;;;
1727 yoffset)
1728 font
1731 ;; at the bottom of the staff line
1733 ;; it should have its top at the lower edge of the staff line
1761 ;;;
1762 ;;; w2
1763 ;;; _________
1764 ;;; | |
1765 ;;; q _
1766 ;;; ********** |
1767 ;;; ************** |
1768 ;;; *****m l ******** |
1769 ;;; ******* ******* |
1770 ;;; p*********n k********r |
1771 ;;; ******* ******** |
1772 ;;; *** j ******* |
1773 ;;; o | ******** |
1774 ;;; ii-*************s |
1775 ;;; ************* | h1
1776 ;;; c | ******** |
1777 ;;; *** h ******* |
1778 ;;; ******* ******** |
1779 ;;; ********* ********* |
1780 ;;; b - ***********d g********* t |
1781 ;;; ********* f ******** |
1782 ;;; ******- e| ******** |
1783 ;;; **************** |
1784 ;;; ************ _|
1785 ;;; |
1786 ;;; a
1787 ;;;
1788 ;;; |___________|
1789 ;;; w1
1790 ;;;
1791 ;;;
1792 ;;;
1797 yoffset)
1798 font
1801 ;; at the bottom of the staff line
1803 ;; it should have its top at the lower edge of the staff line
1835 ;;;
1836 ;;;
1837 ;;;
1838 ;;; k l
1839 ;;; ************* -
1840 ;;; j*************m |
1841 ;;; ************* |
1842 ;;; ************* |
1843 ;;; ************ |
1844 ;;; ************ |
1845 ;;; *********** *** |
1846 ;;; **********n t****v |
1847 ;;; ********* ****** |
1848 ;;; ******** ******** |
1849 ;;; i******* s********** | h2
1850 ;;; ****** ********** |
1851 ;;; ***** ********** |
1852 ;;; ***** r**********w |
1853 ;;; ******o p ********** |
1854 ;;; ****************************** |
1855 ;;; h*********************************x |
1856 ;;; ****************************** - |
1857 ;;; g f e**********y | |
1858 ;;; d**************** | |
1859 ;;; c -**********************z | h1 |
1860 ;;; ********************** _| _|
1861 ;;; b a aa
1862 ;;;
1863 ;;; |_ _|
1864 ;;; w2
1865 ;;; |_________|
1866 ;;; w1
1867 ;;;
1872 yoffset)
1873 font
1877 ;; Its top should hang under the staff line
1914 ;;;
1915 ;;; w2
1916 ;;; _______
1917 ;;; | |
1918 ;;;
1919 ;;; l n _
1920 ;;; ******* m *****o |
1921 ;;; k******************** |
1922 ;;; ******************* |
1923 ;;; ****************** |
1924 ;;; *****q********** |
1925 ;;; **** **p** |
1926 ;;; ****r |
1927 ;;; **** s **t** - |
1928 ;;; *************** | |
1929 ;;; ****************** | | h1
1930 ;;; j**** h ********** | |
1931 ;;; i ********* | |
1932 ;;; c ********* | |
1933 ;;; - ***** g*********u | |
1934 ;;; | ********* ********* | h2 |
1935 ;;; | *********** ********* | |
1936 ;;; - | b************d ********* | |
1937 ;;; | h4| ********** ********* | |
1938 ;;; h3| | ******e f ********* | |
1939 ;;; | | ************** | |
1940 ;;; |_ |_ ******** _| _|
1941 ;;; a
1942 ;;;
1943 ;;; |___________|
1944 ;;; w1
1945 ;;;
1946 ;;;
1951 yoffset)
1952 font
1955 ;; at the bottom of the staff line
1957 ;; it should have its top at the lower edge of the staff line
2003 ;;;
2004 ;;; w2
2005 ;;; __________
2006 ;;; | |
2007 ;;; c _
2008 ;;; **** |
2009 ;;; ******g***** |
2010 ;;; ***** ******** |
2011 ;;; ****** **********d |
2012 ;;; ****** f********** |
2013 ;;; *******h ******** |
2014 ;;; ******** **e* |
2015 ;;; ********** j |
2016 ;;; ************i********** |
2017 ;;; ************************* |
2018 ;;; ************* n ********** | h1
2019 ;;; b*********** ********** |
2020 ;;; ********** ********** |
2021 ;;; ********** **********k |
2022 ;;; **********m o********** |
2023 ;;; ********** ********** |
2024 ;;; ********* ********* |
2025 ;;; ********* l ******** |
2026 ;;; ******************** |
2027 ;;; **************** |
2028 ;;; ********* _|
2029 ;;; a
2030 ;;;
2031 ;;;
2032 ;;; |____________|
2033 ;;; w1
2034 ;;;
2035 ;;;
2040 yoffset)
2041 font
2044 ;; at the bottom of the staff line
2046 ;; it should have its top at the lower edge of the staff line
2085 ;;;
2086 ;;;
2087 ;;; w1
2088 ;;; __________
2089 ;;; | |
2090 ;;;
2091 ;;;
2092 ;;; k m o _
2093 ;;; * l ************ * |
2094 ;;; j******************* * |
2095 ;;; ********************n ** |
2096 ;;; *********************** |
2097 ;;; *** g ************e*** |
2098 ;;; ** ********* ** |
2099 ;;; i* f d** |
2100 ;;; h *** |
2101 ;;; **** |
2102 ;;; **** |
2103 ;;; ***** |
2104 ;;; ***** | h1
2105 ;;; ****** |
2106 ;;; ****** |
2107 ;;; ******* |
2108 ;;; ******* |
2109 ;;; ******* |
2110 ;;; ******* |
2111 ;;; ******* |
2112 ;;; ********p |
2113 ;;; ******** |
2114 ;;; ********* |
2115 ;;; c ****a****q |
2116 ;;; *** *** _|
2117 ;;; b r
2118 ;;;
2119 ;;;
2120 ;;;
2121 ;;;
2122 ;;;
2123 ;;;
2124 ;;;
2125 ;;;
2130 yoffset)
2131 font
2135 ;; if the little notch is to be visible, the top
2136 ;; of this character should hang below the upper staff line.
2167 ;;;
2168 ;;;
2169 ;;;
2170 ;;; w2
2171 ;;; __________
2172 ;;; | |
2173 ;;; e _
2174 ;;; ****** |
2175 ;;; ************ |
2176 ;;; **** i **** |
2177 ;;; **** **** |
2178 ;;; ***** **** |
2179 ;;; ******l j****f |
2180 ;;; d****** **** |
2181 ;;; ******* **** |
2182 ;;; ********** k **** |
2183 ;;; ******************* |
2184 ;;; ******************g | h1
2185 ;;; c****************** |
2186 ;;; ******************** |
2187 ;;; ***** o ******** |
2188 ;;; ***** ***** |
2189 ;;; **** p*****h - |
2190 ;;; - b****n ***** | |
2191 ;;; | **** ***** | |
2192 ;;; | **** ***** | h3 |
2193 ;;; h2 | **** m ****** | |
2194 ;;; | **************** | |
2195 ;;; |_ ********* _| _|
2196 ;;; a
2197 ;;;
2198 ;;; |___________|
2199 ;;; w1
2200 ;;; |________|
2201 ;;; w3
2202 ;;;
2203 ;;; |_____|
2204 ;;; w4
2209 yoffset)
2210 font
2213 ;; at the bottom of the staff line
2215 ;; it should have its top at the lower edge of the staff line