From 4f609406a387a57fb2d9a7413b6d862e50e18277 Mon Sep 17 00:00:00 2001 From: Bernhard M. Wiedemann Date: Sep 13 2019 14:29:36 +0000 Subject: restructure files to remain below github limit of 1000 entries --- diff --git a/abcm2ps.changes b/abcm2ps.changes new file mode 100644 index 0000000..b7e4da7 --- /dev/null +++ b/abcm2ps.changes @@ -0,0 +1,152 @@ +------------------------------------------------------------------- +Thu Jul 18 13:02:40 UTC 2019 - mvetter@suse.com + +- Update to 8.14.5: + * staves not joined by bars when intermediate staff not displayed + * 'sample8.html' was not installed + * license moved to LGPL >= 3 + * don't limit the volta brackets to the length of the first ending + +------------------------------------------------------------------- +Sat May 11 08:09:08 UTC 2019 - Luigi Baldoni + +- Added compiler_flags.patch to fix Factory build +- Renamed source tarball to follow the name-version custom + +------------------------------------------------------------------- +Mon Mar 18 08:35:40 UTC 2019 - mvetter@suse.com + +- Update to 8.14.4: + * program loop when P: on beamed note at end of line and %%breakoneoln 0 + * crash/loop when slur between note and grace note and other slurs later + +------------------------------------------------------------------- +Mon Mar 11 11:51:53 UTC 2019 - mvetter@suse.com + +- Update to 8.14.3: + * erroneous double '8va's on a same staff when set on combined notes/rests + * don't put two '8va's on the same staff + * loss of %%sep since previous version + +------------------------------------------------------------------- +Sat Dec 22 14:15:23 UTC 2018 - Michael Vetter + +- Update to 8.14.2: + * !8va! must be above the staff + * crash when SVG output and call to an unknown symbol in PS sequence + * crash when no note in voice overlay + * crash when SVG output and 'F' is not a font name in a PS sequence + * crash when only one bar in a voice and no symbol in a second voice + * possible crashes when bad definition of special decorations + * crash on decoration type 7 without start/stop + * crash on decoration type 5 without start/stop + * crash when unterminated decoration in U: + * crash when random character greater than 128 in a s: line + * bad test of font encoding + * read access outside of array when exact memory allocation of w: + * read access outside of array on small line starting with %% + * fixes from Debian (Makefile/configure/INSTALL) + +------------------------------------------------------------------- +Mon Nov 19 12:45:13 UTC 2018 - mvetter@suse.com + +- Update to 8.14.1: + * bad definition of the music font (@font-face[1]) + * bad error when --pango 2 in command line and SVG output + * bad beams when notes on 2 staves and %%flatbeams + * error in SVG output when color setting since version v8.14.0 + * code revert: use pango only when needed + * crash in 'make install' when no 'rst2man' in the shell PATH + +------------------------------------------------------------------- +Mon Sep 24 16:33:28 UTC 2018 - Jan Engelhardt + +- Fix some grammar issues in descriptions. +- Use %configure macro. + +------------------------------------------------------------------- +Fri Sep 21 09:07:42 UTC 2018 - Edgar Aichinger + +- more work on spec to enable A4 paper format and use pango for non-latin characters in PS output +- use make install target instead of custom commands in specfile + +------------------------------------------------------------------- +Thu Sep 13 13:45:31 UTC 2018 - Edgar Aichinger + +- some minor specfile tweaks to reduce rpmlint warnings + +------------------------------------------------------------------- +Wed Sep 12 07:05:32 UTC 2018 - mvetter@suse.com + +- Update to 8.14.0: + * better handling of fonts when pango + * bad transposition when chord symbols separated by ';' + * always use pango when available + * Use CSS shorthand file description for SVG output + build: + * Split clean targets according to the GNU guidelines + * Install documentation into prefix/share/doc instead of prefix/doc + * Install the examples in a separate documentation directory + documentation: + * add man page +- Use github URL in source field +- Clean up spec file with spec-cleaner +- Clean up spec file according to rpmlint warnings +- Use %license tag for COPYING file +- Dont install INSTALL file + +------------------------------------------------------------------- +Fri Jan 12 14:04:53 UTC 2018 - edogawa@aon.at + +- updated to version 8.13.18 +- sources are on github now, changed specfile accordingly + +------------------------------------------------------------------- +Tue May 21 00:00:00 UTC 2013 - edogawa@aon.at + +- updated to version 6.6.22 + +------------------------------------------------------------------- +Thu Aug 5 00:00:00 UTC 2010 - edogawa@aon.at + +- updated to version 5.9.15 +- updated/added format files from abcplus page + +------------------------------------------------------------------- +Fri Dec 11 00:00:00 UTC 2009 - edogawa@aon.at + +- updated to version 5.9.7 + +------------------------------------------------------------------- +Tue Oct 20 00:00:00 UTC 2009 - edogawa@aon.at + +- updated to version 5.9.6 + +------------------------------------------------------------------- +Wed Aug 12 00:00:00 UTC 2009 - edogawa@aon.at + +- updated to version 5.9.5 + +------------------------------------------------------------------- +Fri Apr 24 00:00:00 UTC 2009 - edogawa@aon.at + +- updated to version 5.9.4 + +------------------------------------------------------------------- +Sun Jul 8 00:00:00 UTC 2007 - edogawa@aon.at + +- updated to version 4.12.30 + +------------------------------------------------------------------- +Thu Jan 4 00:00:00 UTC 2007 - christian@links2linux.de + +- added 3 .fmt extensions + +------------------------------------------------------------------- +Wed Jan 3 00:00:00 UTC 2007 - christian@links2linux.de + +- taken from "original" src.rpm from the project homepage + rewritten for packman +- initial version 4.12.27 + + diff --git a/abcm2ps.spec b/abcm2ps.spec new file mode 100644 index 0000000..4269d6e --- /dev/null +++ b/abcm2ps.spec @@ -0,0 +1,73 @@ +# +# spec file for package abcm2ps +# +# Copyright (c) 2019 SUSE LINUX GmbH, Nuernberg, Germany. +# Copyright (c) 2007 by Edgar Aichinger +# +# All modifications and additions to the file contributed by third parties +# remain the property of their copyright owners, unless otherwise agreed +# upon. The license for this file, and modifications and additions to the +# file, is the same license as for the pristine package itself (unless the +# license for the pristine package is not an Open Source License, in which +# case the license is the MIT License). An "Open Source License" is a +# license that conforms to the Open Source Definition (Version 1.9) +# published by the Open Source Initiative. + +# Please submit bugfixes or comments via http://bugs.opensuse.org/ +# + + +Name: abcm2ps +Version: 8.14.5 +Release: 0 +Summary: A program to typeset abc tunes into Postscript +License: LGPL-3.0-or-later +Group: Productivity/Publishing/Other +Summary(de): Ein Werkzeug um ABC-Notationen in Postscript zu drucken +URL: https://github.com/leesavide/abcm2ps/ +Source0: https://github.com/leesavide/abcm2ps/archive/v%{version}.tar.gz#/%{name}-%{version}.tar.gz +Source1: italian.fmt +Source2: deco-guitar.fmt +Source3: deco-marks.fmt +Source4: renaissance.fmt +Source5: thinlines.fmt +# PATCH-FIX-OPENSUSE compiler_flags.patch -- aloisio@gmx.com +Patch0: compiler_flags.patch +BuildRequires: pkgconfig +# for rst2man +BuildRequires: python3-docutils +# for rendering non-latin characters in Postscript output +BuildRequires: pkgconfig(cairo) +BuildRequires: pkgconfig(freetype2) +BuildRequires: pkgconfig(pangocairo) + +%description +abcm2ps is a package which converts music tunes from ABC format to +PostScript. Based on abc2ps version 1.2.5, it was developed mainly to print +barock organ scores which have independent voices played on one or many +keyboards and a pedal board. abcm2ps introduces many extensions to the ABC +language that make it suitable for classical music. + +%prep +%setup -q +%patch0 -p1 +mv config.h.in config.h.sed +sed "s/\/\/#define A4_FORMAT/#define A4_FORMAT/" config.h.sed > config.h.in + +%build +%configure +make %{?_smp_mflags} + +%install +%make_install +# remove documentation and examples from wrong install path +rm -rf %{buildroot}/%{_datadir}/doc + +%files +%license COPYING +%doc README.md *.abc sample3.eps +%{_bindir}/* +%{_datadir}/%{name} +%{_mandir}/man1/%{name}* + +%changelog diff --git a/compiler_flags.patch b/compiler_flags.patch new file mode 100644 index 0000000..db0037d --- /dev/null +++ b/compiler_flags.patch @@ -0,0 +1,23 @@ +diff -urEbw abcm2ps-8.14.5/configure abcm2ps-8.14.5.new/configure +--- abcm2ps-8.14.5/configure 2019-07-17 09:44:10.000000000 +0200 ++++ abcm2ps-8.14.5.new/configure 2019-07-18 15:01:30.465812774 +0200 +@@ -5,7 +5,7 @@ + VDATE=2019-07-17 + + CC=gcc +-CFLAGS="-g -O2 -Wall -pipe" ++CFLAGS="$RPM_OPT_FLAGS -pipe" + + srcdir=. + prefix=/usr/local +@@ -60,8 +60,8 @@ + if which pkg-config > /dev/null ; then + if pkg-config --exists freetype2 ; then + if pkg-config --exists pangocairo ; then +- CPPFLAGS="$CPPFLAGS -DHAVE_PANGO=1 `pkg-config pango cairo freetype2 --cflags`" +- LDLIBS="$LDLIBS `pkg-config pangocairo pangoft2 freetype2 --libs`" ++ CPPFLAGS="$CPPFLAGS -DHAVE_PANGO=1 `pkg-config pango cairo gobject-2.0 freetype2 --cflags`" ++ LDLIBS="$LDLIBS `pkg-config pangocairo pangoft2 gobject-2.0 freetype2 --libs`" + else + echo "pangocairo not found - no pango support" + fi diff --git a/deco-guitar.fmt b/deco-guitar.fmt new file mode 100644 index 0000000..718c1c4 --- /dev/null +++ b/deco-guitar.fmt @@ -0,0 +1,162 @@ +% deco-guitar.fmt + +% This file provides some guitar fingerings + +% == PostScript routines == + +% -- guitar chords +postscript /slw05{0.5 setlinewidth}! +postscript /slw06{0.6 setlinewidth}! +postscript /slw09{0.9 setlinewidth}! +postscript /guitar{ % usage: x y guitar +postscript gsave exch 10 sub exch 8 add T +postscript slw06 0 24 M 20 0 RL stroke +postscript 0 0 M 20 0 RL 0 6 M 20 0 RL +postscript 0 12 M 20 0 RL 0 18 M 20 0 RL +postscript 0 0 M 0 24 RL 4 0 M 0 24 RL 8 0 M 0 24 RL +postscript 12 0 M 0 24 RL 16 0 M 0 24 RL 20 0 M 0 24 RL +postscript stroke slw05}! +postscript /gdot{newpath 1.4 0 360 arc fill}! +postscript /gx{28 M -1.3 -1.3 RM 2.6 2.6 RL 0 -2.6 RM -2.6 2.6 RL stroke}! +postscript /go{28 newpath 1.5 0 360 arc stroke}! +postscript /fr2{1.8 setlinewidth -1 24 M 22 0 RL stroke slw05 +postscript -12 20 M /Helvetica-Italics 8 selectfont (fr2) show}! +% -- main C chords +postscript /C{ % usage: x y C +postscript guitar +postscript 0 gx 20 go +postscript 16 21 gdot 8 15 gdot 4 9 gdot +postscript grestore}! +postscript /Cm{ +postscript guitar fr2 +postscript 0 gx +postscript 4 21 gdot 20 21 gdot slw09 4 21 M 16 0 RL stroke +postscript 16 15 gdot 8 9 gdot 12 9 gdot +postscript grestore}! +postscript /C7{ +postscript guitar +postscript 0 gx +postscript 16 21 gdot 8 15 gdot 4 9 gdot 12 9 gdot +postscript grestore}! +% -- main D chords +postscript /D{ +postscript guitar +postscript 0 gx 4 gx 8 go +postscript 12 15 gdot 20 15 gdot 16 9 gdot +postscript grestore}! +postscript /Dm{ +postscript guitar +postscript 0 gx 4 gx 8 go +postscript 20 21 gdot 12 15 gdot 16 9 gdot +postscript grestore}! +postscript /D7{ +postscript guitar +postscript 0 gx 4 gx 8 go +postscript 16 21 gdot 12 15 gdot 20 15 gdot +postscript grestore}! +% -- main E chords +postscript /E{ +postscript guitar +postscript 0 go 16 go 20 go +postscript 12 21 gdot 4 15 gdot 8 15 gdot +postscript grestore}! +postscript /Em{ +postscript guitar +postscript 0 go 12 go 16 go 20 go +postscript 4 15 gdot 8 15 gdot +postscript grestore}! +postscript /E7{ +postscript guitar +postscript 0 go 20 go +postscript 12 21 gdot 4 15 gdot 8 15 gdot 16 9 gdot +postscript grestore}! +% -- main F chords +postscript /F{ +postscript guitar +postscript 0 21 gdot 20 21 gdot slw09 0 21 M 20 0 RL stroke +postscript 12 15 gdot 4 9 gdot 8 9 gdot +postscript grestore}! +postscript /Fm{ +postscript guitar +postscript 0 21 gdot 20 21 gdot slw09 0 21 M 20 0 RL stroke +postscript 4 9 gdot 8 9 gdot +postscript grestore}! +postscript /F7{ +postscript guitar fr2 +postscript 0 gx 4 gx +postscript 8 21 gdot 16 15 gdot 12 9 gdot 20 9 gdot +postscript grestore}! +% -- main G chords +postscript /G{ +postscript guitar +postscript 4 15 gdot 0 9 gdot 20 9 gdot +postscript grestore}! +postscript /Gm{ +postscript guitar fr2 +postscript 0 21 gdot 20 21 gdot slw09 0 21 M 20 0 RL stroke +postscript 4 9 gdot 8 9 gdot +postscript grestore}! +postscript /G7{ +postscript guitar +postscript 20 21 gdot 4 15 gdot 0 9 gdot +postscript grestore}! +% -- main A chords +postscript /A{ +postscript guitar +postscript 0 go 4 go 20 go +postscript 8 15 gdot 12 15 gdot 16 15 gdot +postscript grestore}! +postscript /Am{ +postscript guitar +postscript 0 go 4 go 20 go +postscript 16 21 gdot 8 15 gdot 12 15 gdot +postscript grestore}! +postscript /A7{ +postscript guitar +postscript 0 go 4 go 12 go 20 go +postscript 8 15 gdot 16 15 gdot +postscript grestore}! +% -- main B chords +postscript /B{ +postscript guitar +postscript 0 gx +postscript 4 15 gdot 20 15 gdot slw09 4 15 M 16 0 RL stroke +postscript 8 3 gdot 12 3 gdot 16 3 gdot +postscript grestore}! +postscript /Bm{ +postscript guitar +postscript 0 gx +postscript 4 15 gdot 20 15 gdot slw09 4 15 M 16 0 RL stroke +postscript 16 9 gdot 8 3 gdot 12 3 gdot +postscript grestore}! +postscript /B7{ +postscript guitar +postscript 0 gx 16 go +postscript 8 21 gdot 4 15 gdot 12 15 gdot 20 15 gdot +postscript grestore}! + +% == Decoration definitions == + +deco C 3 C 36 0 0 +deco Cm 3 Cm 36 0 0 +deco C7 3 C7 36 0 0 +deco D 3 D 36 0 0 +deco Dm 3 Dm 36 0 0 +deco D7 3 D7 36 0 0 +deco E 3 E 36 0 0 +deco Em 3 Em 36 0 0 +deco E7 3 E7 36 0 0 +deco F 3 F 36 0 0 +deco Fm 3 Fm 36 0 0 +deco F7 3 F7 36 0 0 +deco G 3 G 36 0 0 +deco Gm 3 Gm 36 0 0 +deco G7 3 G7 36 0 0 +deco A 3 A 36 0 0 +deco Am 3 Am 36 0 0 +deco A7 3 A7 36 0 0 +deco B 3 B 36 0 0 +deco Bm 3 Bm 36 0 0 +deco B7 3 B7 36 0 0 + +% -- End of file deco-guitar.fmt diff --git a/deco-marks.fmt b/deco-marks.fmt new file mode 100644 index 0000000..bfd0a07 --- /dev/null +++ b/deco-marks.fmt @@ -0,0 +1,81 @@ +% deco-marks.fmt + +% This file provides position marks + +% == PostScript routines == + +% -- write big letters (position marks) above the staff +% (from Guido Gonzato) +postscript /bigl{ % usage: str x y bigl +postscript /Times-Roman 18 selectfont +postscript 4 add M cshow gsave +postscript 0.7 setlinewidth 1 -2 RM +postscript 0 16 RL -16 0 RL +postscript 0 -16 RL 16 0 RL +postscript stroke grestore}! +% (from Jonas Petersson) +postscript /biglc { % usage: str x y biglc +postscript 2 copy 5 2 roll /Times-Bold 22 selectfont +postscript 6 add M cshow gsave +postscript 1 setlinewidth 13 add newpath +postscript 12 0 360 arc +postscript stroke grestore}! + +% == Decoration definitions == + +% -- big letters in a square +deco a 3 bigl 20 0 0 A +deco b 3 bigl 20 0 0 B +deco c 3 bigl 20 0 0 C +deco d 3 bigl 20 0 0 D +deco e 3 bigl 20 0 0 E +deco f 3 bigl 20 0 0 F +deco g 3 bigl 20 0 0 G +deco h 3 bigl 20 0 0 H +deco i 3 bigl 20 0 0 I +deco j 3 bigl 20 0 0 J +deco k 3 bigl 20 0 0 K +deco l 3 bigl 20 0 0 L +deco m 3 bigl 20 0 0 M +deco n 3 bigl 20 0 0 N +deco o 3 bigl 20 0 0 O +deco p 3 bigl 20 0 0 P +deco q 3 bigl 20 0 0 Q +deco r 3 bigl 20 0 0 R +deco s 3 bigl 20 0 0 S +deco t 3 bigl 20 0 0 T +deco u 3 bigl 20 0 0 U +deco v 3 bigl 20 0 0 V +deco w 3 bigl 20 0 0 W +deco x 3 bigl 20 0 0 X +deco y 3 bigl 20 0 0 Y +deco z 3 bigl 20 0 0 Z +% -- big letters in a circle +deco ac 3 biglc 20 0 0 A +deco bc 3 biglc 20 0 0 B +deco cc 3 biglc 20 0 0 C +deco dc 3 biglc 20 0 0 D +deco ec 3 biglc 20 0 0 E +deco fc 3 biglc 20 0 0 F +deco gc 3 biglc 20 0 0 G +deco hc 3 biglc 20 0 0 H +deco ic 3 biglc 20 0 0 I +deco jc 3 biglc 20 0 0 J +deco kc 3 biglc 20 0 0 K +deco lc 3 biglc 20 0 0 L +deco mc 3 biglc 20 0 0 M +deco nc 3 biglc 20 0 0 N +deco oc 3 biglc 20 0 0 O +deco pc 3 biglc 20 0 0 P +deco qc 3 biglc 20 0 0 Q +deco rc 3 biglc 20 0 0 R +deco sc 3 biglc 20 0 0 S +deco tc 3 biglc 20 0 0 T +deco uc 3 biglc 20 0 0 U +deco vc 3 biglc 20 0 0 V +deco wc 3 biglc 20 0 0 W +deco xc 3 biglc 20 0 0 X +deco yc 3 biglc 20 0 0 Y +deco zc 3 biglc 20 0 0 Z + +% -- End of file deco-marks.fmt diff --git a/italian.fmt b/italian.fmt new file mode 100644 index 0000000..3c99792 --- /dev/null +++ b/italian.fmt @@ -0,0 +1,33 @@ +% italian.fmt +% written by Christopher Lane +% for abcm2ps 5.9.* +% (adapted for more abcm2ps versions by Hudson Lacerda) + +% -- latin guitar chords +postscript /gcshow { % string gcshow +postscript -5 0 RM +postscript dup 0 get +postscript dup dup 65 ge exch 71 le and { +postscript 65 sub [(La) (Si) (Do) (Re) (Mi) (Fa) (Sol)] exch get show +postscript } { currentfont /Encoding get exch get glyphshow +postscript } ifelse +postscript dup length 1 sub 1 exch getinterval +postscript % +postscript dup mark exch (m) search { +postscript (di) search { cleartomark } { +postscript length exch pop exch (aj) anchorsearch { cleartomark } { +postscript pop /tempstr 4 2 roll cleartomark +postscript def tempstr exch (-) putinterval tempstr +postscript } ifelse +postscript } ifelse +postscript } { +postscript cleartomark } ifelse +postscript +postscript currentdict /gchshow known { +postscript /gchshow load cshow %% abcm2ps older than abcm2ps-5.1.0 +postscript } { +postscript show %% abcm2ps-5.1.0 or newer +postscript } ifelse +postscript }! +% End of file italian.fmt + diff --git a/renaissance.fmt b/renaissance.fmt new file mode 100644 index 0000000..3c9619e --- /dev/null +++ b/renaissance.fmt @@ -0,0 +1,742 @@ +% Abcm2ps style for renaissance music +% (c) 2004-2008 by Eric Forgeot +% with help from Hudson Lacerda and JF Moine (abcm2ps) +% +% released under a CC-BY-SA license. + + +% voir syms.c +% su = stem up / sd = stem down + + +%%%%%% setdefl 1 +notespacingfactor 1.0 + + +beginps + +/x 0 def +/y 0 def + +/tclef { % treble cle - cle de sol usage: +gsave translate 1 dup scale +-7 2 translate newpath + 4.03027 16.5654 moveto + 3.98828 15.5674 5.55469 14.7344 5.97949 15.0059 curveto + 6.00977 15.0059 lineto + 6.20996 15.165 6.34863 15.4033 6.37012 15.7256 curveto + 6.42969 16.6553 lineto + 6.38965 17.2627 6.60352 17.001 7.20996 16.9102 curveto + 7.50195 16.8662 8.41406 16.0293 7.68945 15.3057 curveto + 7.37012 15.0059 7.00977 14.8154 6.60938 14.7354 curveto + 6.58008 14.7354 lineto + 6.16016 14.6758 5.55957 14.7158 4.78027 14.8555 curveto + 4.75 14.8555 lineto + 3.9502 14.9951 3.41016 15.3857 3.12988 16.0254 curveto + 2.57031 17.2256 3.13965 18.1357 4.83984 18.7559 curveto + 5.67969 19.0957 6.57031 19.2051 7.50977 19.0859 curveto + 7.57031 19.0859 lineto + 8.50977 18.9453 9.16016 18.7256 9.51953 18.4258 curveto + 9.5498 18.4258 lineto + 10.2021 17.918 10.6621 17.2021 10.7803 17.0459 curveto + 11.2617 16.4033 11.4199 15.5156 11.3203 14.4355 curveto + 11.3203 14.4053 lineto + 11.1035 12.0723 9.66211 9.59766 8.7998 9.33594 curveto + 7.75 9.96582 lineto + 6.5498 10.7754 lineto + 4.92969 9.24512 lineto + 3.94727 9.86621 3.51172 10.5371 2.64941 11.0752 curveto + 2.62012 11.0752 lineto + 1.73145 9.93359 1.87402 6.74805 2.16992 5.0459 curveto + 2.16992 5.01562 lineto + 2.33008 4.11523 2.68945 3.14551 3.25 2.10547 curveto + 3.79004 1.0459 4.87012 0.515625 6.49023 0.515625 curveto + 8.07031 0.515625 9.0498 0.975586 9.42969 1.89551 curveto + 9.42969 1.92578 lineto + 10.2432 3.93652 10.2598 5.55957 9.30957 6.96582 curveto + 9.30957 6.99512 lineto + 8.29297 8.44238 6.7041 8.43359 5.76953 6.60547 curveto + 5.33008 5.74512 5.21973 4.98535 5.43945 4.3252 curveto + 5.43945 4.26562 lineto + 5.75195 3.47168 6.14453 3.86035 6.37012 4.08594 curveto + 6.37598 4.09766 6.98047 5.08496 7.2998 5.0459 curveto + 7.45996 5.0459 7.50977 4.68555 7.4502 3.96582 curveto + 7.4502 3.90527 lineto + 7.37012 3.125 7.08008 2.72559 6.58008 2.70508 curveto + 5.51855 2.70508 5.25391 3.22266 5.10938 4.98535 curveto + 5.10938 5.0459 lineto + 5.04004 5.91699 5.22363 6.92969 5.88965 7.5957 curveto + 6.49023 8.25586 7.12012 8.58594 7.78027 8.58594 curveto + 8.66797 8.58594 9.73145 7.83105 10 7.625 curveto + 11.9414 6.13672 11.1162 2.71582 10.3301 1.38574 curveto + 9.80957 0.525391 8.57031 0.105469 6.60938 0.125 curveto + 6.49023 0.125 lineto + 4.4502 0.165039 2.91992 0.605469 1.89941 1.44531 curveto + -0.795898 3.66602 0.0615234 7.49609 0.609375 9.03516 curveto + 0.609375 9.06543 lineto + 1.14941 10.4854 1.70996 11.4355 2.29004 11.915 curveto + 2.34961 11.915 lineto + 3.66992 10.8057 lineto + 4.12988 10.4258 4.46973 10.1953 4.68945 10.1152 curveto + 6.07031 11.7354 lineto + 6.09961 11.7656 lineto + 6.28027 11.4854 6.68945 11.1553 7.33008 10.7754 curveto + 8.7998 9.875 lineto + 9.61719 10.5195 10.1582 11.3545 10.3896 14.2852 curveto + 10.3896 14.3154 lineto + 10.4199 15.5869 10.2129 16.3711 10.0898 16.8652 curveto + 10.0898 16.9551 lineto + 9.87012 17.7754 9.35938 18.3154 8.55957 18.5752 curveto + 8.5 18.5752 lineto + 7.75977 18.7959 7.0498 18.8154 6.37012 18.6357 curveto + 6.30957 18.6357 lineto + 4.94531 18.2744 4.11133 17.4873 4.03027 16.5957 curveto + 4.03027 16.5654 lineto + closepath +fill grestore + } bdef + + +/bclef { % bass cle - cle de fa usage: +gsave translate 1 dup scale +-1 0 translate + newpath + 0.0996094 10.7012 moveto + 0.609375 -0.818359 lineto + -0.560547 -1.14844 lineto + -0.411133 10.8516 lineto + -2.24121 12.9814 lineto + -3.00098 13.8809 -3.40039 14.4111 -3.44043 14.5713 curveto + -3.44043 14.5713 lineto + -3.44043 14.5713 lineto + -3.16113 14.6709 -2.74121 15.0615 -2.18066 15.7412 curveto + -0.710938 17.5713 lineto + -2.39062 19.5811 lineto + -3.03125 20.3408 -3.36133 20.791 -3.38086 20.9316 curveto + -3.38086 20.9316 lineto + -3.04102 21.0312 -2.53125 21.5215 -1.85059 22.4014 curveto + -0.260742 24.4717 lineto + -0.650391 29.8115 lineto + 0.249023 29.9609 lineto + 0.128906 24.5908 lineto + 0.369141 24.1914 0.899414 23.5908 1.71875 22.791 curveto + 1.74902 22.7617 lineto + 2.58887 21.9209 3.10938 21.3115 3.30957 20.9316 curveto + 2.62598 20.5625 1.60645 19.1104 0.579102 17.8115 curveto + 2.16895 16.1016 lineto + 2.8291 15.4209 3.24902 14.9209 3.42871 14.6016 curveto + 3.12891 14.4209 2.66895 13.9512 2.04883 13.1914 curveto + 0.0996094 10.7012 lineto + closepath + 0.0693359 18.6514 moveto + 0.519531 18.2314 lineto + 1.3291 19.251 lineto + 2.22949 20.4209 lineto + 1.80957 20.9316 lineto + 0.849609 22.041 lineto + -0.111328 23.1514 lineto + -0.430664 23.4717 -0.600586 23.6113 -0.621094 23.5713 curveto + -0.720703 23.5117 -1.01074 23.1816 -1.49121 22.5811 curveto + -1.52051 22.5215 lineto + -1.55078 22.4609 lineto + -2.33105 21.3809 lineto + -1.46094 20.3008 lineto + 0.0693359 18.6514 lineto + 0.0693359 18.6816 lineto + 0.0693359 18.6514 lineto + 0.0693359 18.6514 lineto + 0.0693359 18.6514 lineto + closepath + 2.31934 14.0615 moveto + 1.86914 14.6016 lineto + 0.90918 15.7412 lineto + -0.111328 16.8809 lineto + -0.390625 17.1816 -0.560547 17.3213 -0.621094 17.3008 curveto + -0.621094 17.3008 lineto + -1.55078 16.1611 lineto + -2.36133 15.0508 lineto + -2.36133 15.0508 lineto + -2.00098 14.5713 lineto + -1.10059 13.5215 lineto + 0.548828 11.8115 lineto + 1.41895 12.8613 lineto + 2.31934 14.0615 lineto + closepath +fill grestore + } bdef + + +/ft0{ % bemol +pop pop +gsave newpath +x y 2.5 sub +translate -10 0 translate + -3.67871 4.53906 moveto + -4.09863 4.55957 -4.41895 4.33887 -4.63867 3.87891 curveto + -4.8584 3.41895 -4.95898 2.99902 -4.93848 2.61914 curveto + -4.93848 2.25977 -4.8584 1.80957 -4.69824 1.26953 curveto + -4.55859 0.708984 -4.21875 0.429688 -3.67871 0.429688 curveto + -3.15918 0.469727 -2.83887 0.649414 -2.71875 0.969727 curveto + -2.5791 1.30957 -2.49902 1.73926 -2.47852 2.25977 curveto + -2.45898 2.83887 -2.52832 3.35938 -2.68848 3.81934 curveto + -2.68848 3.84961 lineto + -2.86914 4.30957 -3.19824 4.53906 -3.67871 4.53906 curveto + closepath + -5.77832 14.5596 moveto + -4.75879 14.4092 lineto + -4.81836 12.8496 lineto + -4.93848 9.48926 lineto + -4.99902 6.12891 lineto + -4.99902 5.14941 -4.95898 4.68945 -4.87891 4.74902 curveto + -4.77832 4.92969 -4.3291 5.04883 -3.52832 5.10938 curveto + -2.72852 5.14941 -2.15918 4.86914 -1.81836 4.26953 curveto + -1.51855 3.70898 -1.41895 3.09961 -1.51855 2.43945 curveto + -1.51855 2.40918 lineto + -1.63867 1.74902 -1.79883 1.26953 -1.99902 0.969727 curveto + -1.99902 0.939453 lineto + -2.21875 0.639648 -2.6084 0.40918 -3.16895 0.249023 curveto + -3.70898 0.0888672 -4.15918 0.0888672 -4.51855 0.249023 curveto + -4.89844 0.429688 -5.18848 0.729492 -5.38867 1.14941 curveto + -5.6084 1.54883 -5.73828 1.91895 -5.77832 2.25977 curveto + -5.80859 4.47949 lineto + -5.83887 8.67969 lineto + -5.80859 12.7295 lineto + -5.77832 14.5596 lineto + closepath +fill grestore +}! + +/sh0{ % diese +%pop +gsave newpath +pop pop x y +translate -7 0 translate + 3.47949 -10.75 moveto + 2.55957 -12.0498 2.13965 -12.7998 2.21973 -13 curveto + 2.2793 -13.2402 2.18945 -13.2451 1.9502 -13.0156 curveto + 1.58984 -12.6699 lineto + 2.04004 -12.04 lineto + 3.24023 -10.3604 lineto + 3.12012 -10.2002 2.9502 -9.9502 2.72949 -9.61035 curveto + 2.14941 -10.4102 1.63965 -11.1553 1.2002 -11.8457 curveto + 0.759766 -12.5352 0.55957 -12.9404 0.599609 -13.0605 curveto + 0.660156 -13.2998 0.569336 -13.3057 0.330078 -13.0752 curveto + -0.0302734 -12.7305 lineto + 0.75 -11.6504 lineto + 2.45996 -9.28027 lineto + 0.734375 -6.89551 lineto + -0.0302734 -5.86035 lineto + 0.240234 -5.53027 lineto + 0.419922 -5.31055 0.509766 -5.31055 0.509766 -5.53027 curveto + 0.509766 -5.61035 0.729492 -5.98535 1.16992 -6.65527 curveto + 1.60938 -7.3252 2.12988 -8.07031 2.72949 -8.89062 curveto + 2.80957 -8.75 2.89453 -8.62012 2.98438 -8.5 curveto + 3.0752 -8.37988 3.16016 -8.25977 3.24023 -8.14062 curveto + 2.04004 -6.53516 lineto + 1.58984 -5.91992 lineto + 1.85938 -5.58984 lineto + 2.04004 -5.37012 2.12988 -5.37012 2.12988 -5.58984 curveto + 2.12988 -5.65039 2.25977 -5.87988 2.51953 -6.28027 curveto + 3.47949 -7.75 lineto + 4.45508 -6.29492 lineto + 4.72461 -5.88477 4.85938 -5.65039 4.85938 -5.58984 curveto + 4.85938 -5.37012 4.95508 -5.37012 5.14453 -5.58984 curveto + 5.42969 -5.91992 lineto + 4.93457 -6.5498 lineto + 4.60449 -6.9707 4.21973 -7.49023 3.7793 -8.11035 curveto + 3.89941 -8.29004 3.98438 -8.41504 4.03516 -8.48535 curveto + 4.08496 -8.55566 4.16992 -8.69043 4.29004 -8.89062 curveto + 5.80469 -6.65527 lineto + 6.25488 -5.98535 6.47949 -5.61035 6.47949 -5.53027 curveto + 6.47949 -5.31055 6.5752 -5.31055 6.76465 -5.53027 curveto + 7.0498 -5.86035 lineto + 6.2998 -6.85059 lineto + 4.55957 -9.25 lineto + 5.24023 -10.1299 5.83008 -10.9307 6.33008 -11.6504 curveto + 6.83008 -12.3701 7.06934 -12.7305 7.0498 -12.7305 curveto + 6.66016 -13.0752 lineto + 6.39941 -13.3057 6.30957 -13.2998 6.38965 -13.0605 curveto + 6.42969 -12.9404 6.24023 -12.5557 5.81934 -11.9053 curveto + 4.29004 -9.64062 lineto + 3.75 -10.3604 lineto + 4.9502 -12.0254 lineto + 5.42969 -12.6699 lineto + 5.04004 -13.0156 lineto + 4.7793 -13.2451 4.68945 -13.2402 4.76953 -13 curveto + 4.80957 -12.8203 4.37988 -12.0703 3.47949 -10.75 curveto + closepath + 3.47949 -10 moveto + 3.58008 -9.82031 3.66504 -9.69043 3.73438 -9.61035 curveto + 3.80469 -9.53027 3.89941 -9.41016 4.01953 -9.25 curveto + 3.89941 -9.08984 3.80957 -8.96484 3.75 -8.875 curveto + 3.50977 -8.5 lineto + 3.41016 -8.66016 3.24023 -8.91992 3 -9.28027 curveto + 3.09961 -9.41992 3.1748 -9.53516 3.22461 -9.625 curveto + 3.27441 -9.71484 3.35938 -9.83984 3.47949 -10 curveto + closepath + 3.47949 -10.75 moveto + 2.55957 -12.0498 2.13965 -12.7998 2.21973 -13 curveto + 2.2793 -13.2402 2.18945 -13.2451 1.9502 -13.0156 curveto + 1.58984 -12.6699 lineto + 2.04004 -12.04 lineto + 3.24023 -10.3604 lineto + 3.12012 -10.2002 2.9502 -9.9502 2.72949 -9.61035 curveto + 2.14941 -10.4102 1.63965 -11.1553 1.2002 -11.8457 curveto + 0.759766 -12.5352 0.55957 -12.9404 0.599609 -13.0605 curveto + 0.660156 -13.2998 0.569336 -13.3057 0.330078 -13.0752 curveto + -0.0302734 -12.7305 lineto + 0.75 -11.6504 lineto + 2.45996 -9.28027 lineto + 0.734375 -6.89551 lineto + -0.0302734 -5.86035 lineto + 0.240234 -5.53027 lineto + 0.419922 -5.31055 0.509766 -5.31055 0.509766 -5.53027 curveto + 0.509766 -5.61035 0.729492 -5.98535 1.16992 -6.65527 curveto + 1.60938 -7.3252 2.12988 -8.07031 2.72949 -8.89062 curveto + 2.80957 -8.75 2.89453 -8.62012 2.98438 -8.5 curveto + 3.0752 -8.37988 3.16016 -8.25977 3.24023 -8.14062 curveto + 2.04004 -6.53516 lineto + 1.58984 -5.91992 lineto + 1.85938 -5.58984 lineto + 2.04004 -5.37012 2.12988 -5.37012 2.12988 -5.58984 curveto + 2.12988 -5.65039 2.25977 -5.87988 2.51953 -6.28027 curveto + 3.47949 -7.75 lineto + 4.45508 -6.29492 lineto + 4.72461 -5.88477 4.85938 -5.65039 4.85938 -5.58984 curveto + 4.85938 -5.37012 4.95508 -5.37012 5.14453 -5.58984 curveto + 5.42969 -5.91992 lineto + 4.93457 -6.5498 lineto + 4.60449 -6.9707 4.21973 -7.49023 3.7793 -8.11035 curveto + 3.89941 -8.29004 3.98438 -8.41504 4.03516 -8.48535 curveto + 4.08496 -8.55566 4.16992 -8.69043 4.29004 -8.89062 curveto + 5.80469 -6.65527 lineto + 6.25488 -5.98535 6.47949 -5.61035 6.47949 -5.53027 curveto + 6.47949 -5.31055 6.5752 -5.31055 6.76465 -5.53027 curveto + 7.0498 -5.86035 lineto + 6.2998 -6.85059 lineto + 4.55957 -9.25 lineto + 5.24023 -10.1299 5.83008 -10.9307 6.33008 -11.6504 curveto + 6.83008 -12.3701 7.06934 -12.7305 7.0498 -12.7305 curveto + 6.66016 -13.0752 lineto + 6.39941 -13.3057 6.30957 -13.2998 6.38965 -13.0605 curveto + 6.42969 -12.9404 6.24023 -12.5557 5.81934 -11.9053 curveto + 4.29004 -9.64062 lineto + 3.75 -10.3604 lineto + 4.9502 -12.0254 lineto + 5.42969 -12.6699 lineto + 5.04004 -13.0156 lineto + 4.7793 -13.2451 4.68945 -13.2402 4.76953 -13 curveto + 4.80957 -12.8203 4.37988 -12.0703 3.47949 -10.75 curveto + closepath + 3.47949 -10 moveto + 3.58008 -9.82031 3.66504 -9.69043 3.73438 -9.61035 curveto + 3.80469 -9.53027 3.89941 -9.41016 4.01953 -9.25 curveto + 3.89941 -9.08984 3.80957 -8.96484 3.75 -8.875 curveto + 3.50977 -8.5 lineto + 3.41016 -8.66016 3.24023 -8.91992 3 -9.28027 curveto + 3.09961 -9.41992 3.1748 -9.53516 3.22461 -9.625 curveto + 3.27441 -9.71484 3.35938 -9.83984 3.47949 -10 curveto + closepath +fill grestore +}! + + + +/su { %hampe haut +pop pop gsave newpath +x y translate -7 -0.1 translate + 3.36816 4.10156 moveto + 3.6748 4.69238 lineto + 3.91504 19.6025 lineto + 3.91504 19.6318 lineto + 3.91504 19.6621 lineto + 3.94531 19.6621 lineto + 3.94531 20.4424 lineto + 3.94531 20.4424 lineto + 3.94531 20.4424 lineto + 3.94531 20.4424 lineto + 3.91504 20.4424 lineto + 3.10547 20.1719 lineto + 2.8252 20.0928 2.625 19.9922 2.50488 19.8721 curveto + 3.04492 4.60254 lineto + 3.36816 4.10156 lineto + closepath +fill grestore +}! + +/sd { %hampe down +pop pop gsave newpath +x y translate -7 -0.1 translate + 3.59375 -3.06836 moveto + 3.28711 -3.65918 lineto + 3.04688 -18.5693 lineto + 3.04688 -18.5986 lineto + 3.04688 -18.6289 lineto + 3.0166 -18.6289 lineto + 3.0166 -19.4092 lineto + 3.0166 -19.4092 lineto + 3.0166 -19.4092 lineto + 3.0166 -19.4092 lineto + 3.04688 -19.4092 lineto + 3.85645 -19.1387 lineto + 4.13672 -19.0596 4.33691 -18.959 4.45703 -18.8389 curveto + 3.91699 -3.56934 lineto + 3.59375 -3.06836 lineto + closepath +fill grestore +}! + + + + +/sfu { %hampe croche +pop pop gsave newpath +x y translate -7 -0.1 translate + 3.33398 4.23438 moveto + 3.6748 4.69238 lineto + 3.91504 19.6025 lineto + 3.91504 19.6318 lineto + 3.91504 19.6621 lineto + 3.94531 19.6621 lineto + 3.94531 19.6621 lineto + 3.94531 19.6621 lineto + 4.125 19.7227 4.53516 19.582 5.1748 19.2422 curveto + 6.16504 18.7324 lineto + 4.24512 16.4521 lineto + 4.30469 15.6719 lineto + 4.34473 15.1924 4.39551 15.1924 4.45508 15.6719 curveto + 4.45508 15.7021 lineto + 4.53516 16.2021 4.95508 16.9219 5.71484 17.8623 curveto + 6.49512 18.8223 6.88477 19.3926 6.88477 19.5723 curveto + 6.88477 19.5723 lineto + 6.86523 19.752 6.45508 19.9326 5.65527 20.1123 curveto + 4.03516 20.4121 lineto + 4.06543 20.4727 lineto + 4.06543 20.4727 lineto + 3.97559 20.4727 lineto + 3.94531 20.4424 lineto + 3.94531 20.4424 lineto + 3.94531 20.4424 lineto + 3.94531 20.4424 lineto + 3.91504 20.4424 lineto + 3.10547 20.1719 lineto + 2.8252 20.0928 2.625 19.9922 2.50488 19.8721 curveto + 3.04492 4.60254 lineto + 3.33398 4.23438 lineto + closepath +fill grestore +}! + + +/sfd { %hampe croche down +pop pop gsave newpath +x y translate -7 -0.1 translate + 3.62793 -3.20117 moveto + 3.28711 -3.65918 lineto + 3.04688 -18.5693 lineto + 3.04688 -18.5986 lineto + 3.04688 -18.6289 lineto + 3.0166 -18.6289 lineto + 3.0166 -18.6289 lineto + 3.0166 -18.6289 lineto + 2.83691 -18.6895 2.42676 -18.5488 1.78711 -18.209 curveto + 0.796875 -17.6992 lineto + 2.7168 -15.4189 lineto + 2.65723 -14.6387 lineto + 2.61719 -14.1592 2.56641 -14.1592 2.50684 -14.6387 curveto + 2.50684 -14.6689 lineto + 2.42676 -15.1689 2.00684 -15.8887 1.24707 -16.8291 curveto + 0.466797 -17.7891 0.0771484 -18.3594 0.0771484 -18.5391 curveto + 0.0771484 -18.5391 lineto + 0.0966797 -18.7188 0.506836 -18.8994 1.30664 -19.0791 curveto + 2.92676 -19.3789 lineto + 2.89648 -19.4395 lineto + 2.89648 -19.4395 lineto + 2.98633 -19.4395 lineto + 3.0166 -19.4092 lineto + 3.0166 -19.4092 lineto + 3.0166 -19.4092 lineto + 3.0166 -19.4092 lineto + 3.04688 -19.4092 lineto + 3.85645 -19.1387 lineto + 4.13672 -19.0596 4.33691 -18.959 4.45703 -18.8389 curveto + 3.91699 -3.56934 lineto + 3.62793 -3.20117 lineto + closepath +fill grestore +}! + + + + +/hd { % tete noire usage: str x y quartbemol +xymove x y +gsave translate 1 dup scale +defl 4 and 0 eq{-7 0 translate}{}ifelse +0 0 translate newpath + 3.32031 5.0332 moveto + 3.64551 4.69238 lineto + 4.00488 4.15234 4.66504 3.44238 5.625 2.5625 curveto + 6.54492 1.70215 7.10547 1.0625 7.30469 0.642578 curveto + 7.30469 0.612305 lineto + 6.8252 0.37207 6.28516 -0.227539 5.68555 -1.1875 curveto + 3.64551 -4.24805 lineto + 3.04492 -3.58789 lineto + 1.66504 -2.14746 lineto + 0.31543 -0.647461 lineto + -0.0849609 -0.208008 -0.294922 0.0722656 -0.314453 0.192383 curveto + -0.314453 0.192383 lineto + 0.0449219 0.3125 0.584961 0.912109 1.30469 1.99219 curveto + 3.04492 4.60254 lineto + 3.32031 5.0332 lineto + closepath +fill grestore + }! + + + +/Hd { % tete blanche usage: str x y quartbemol TODO : c'est la ronde ici +xymove x y +gsave translate 1 dup scale +defl 4 and 0 eq{-7 0 translate}{}ifelse +0 0 translate newpath + 1.3916 1.78516 moveto + closepath + 7.41797 0.352539 moveto + closepath + 3.7168 4.44043 moveto + 4.03418 3.96484 4.61523 3.28711 5.67285 2.30859 curveto + 6.60059 1.45117 7.15723 0.814453 7.34766 0.407227 curveto + 6.86426 0.150391 6.32617 -0.416992 5.71582 -1.38965 curveto + 3.74316 -4.39844 lineto + 3.12891 -3.78418 lineto + 1.8291 -2.33496 lineto + 0.454102 -0.833984 lineto + 0.0410156 -0.380859 -0.135742 -0.145508 -0.176758 -0.0361328 curveto + 0.229492 0.123047 0.80957 0.793945 1.45801 1.74219 curveto + 3.18359 4.36719 lineto + 3.45312 4.79297 lineto + 3.7168 4.44043 lineto + closepath + 4.31836 -2.87402 moveto + 4.40723 -2.7959 4.68066 -2.37891 5.19531 -1.56543 curveto + 6.00391 -0.265625 lineto + 5.49902 0.286133 lineto + 4.375 1.51172 lineto + 3.32129 2.71094 lineto + 3.0166 3.05762 2.83301 3.13379 2.78613 3.14941 curveto + 2.68164 3.07129 2.3916 2.66113 1.83301 1.86719 curveto + 0.916992 0.564453 lineto + 0.932617 0.526367 1.05957 0.382812 1.3584 0.0664062 curveto + 2.45703 -1.08301 lineto + 3.60645 -2.20703 lineto + 4.31836 -2.87402 lineto + closepath +fill grestore + }! + + +/HDD { % Grosse Ronde +xymove x y +gsave translate 1.2 dup scale +defl 4 and 0 eq{-7 0 translate}{}ifelse +0 0 translate newpath + 0.180664 3.35059 moveto + 0.540039 3.38086 lineto + 0.570312 3.20117 lineto + 0.870117 3.12109 1.79102 3.08301 2.89062 3.0625 curveto + 5.33984 3.08105 lineto + 5.35547 3.24902 lineto + 5.53613 3.24902 lineto + 5.73047 3.23047 lineto + 5.60096 3.07581 5.58008 1.8625 5.58008 -0.189453 curveto + 5.64062 -2.43945 lineto + 5.7002 -3.72949 lineto + 5.58008 -3.76953 5.41992 -3.75879 5.2207 -3.69922 curveto + 5.23438 -3.3125 lineto + 4.23438 -3.09375 1.90533 -3.1426 0.78125 -3.15625 curveto + 0.540039 -3.15918 lineto + 0.510742 -3.48926 lineto + 0.209961 -3.56934 0.0107422 -3.5791 -0.0898438 -3.51953 curveto + 0.0302734 -2.91895 0.100586 -1.80957 0.120117 -0.189453 curveto + 0.180664 3.35059 lineto + closepath + 0.453125 -1.9375 moveto + 2.82812 -1.9375 lineto + 5.28027 -1.89648 lineto + 5.23438 1.73438 lineto + 2.95312 1.78125 lineto + 0.5 1.84375 lineto + 0.44043 1.76367 0.489258 1.62793 0.46875 1.1875 curveto + 0.419922 -1.44922 lineto + 0.453125 -1.9375 lineto + closepath +fill grestore + }! + + + + +/HD { % tete blanche = ronde normale +xymove x y +gsave translate 1 dup scale +defl 4 and 0 eq{-7 0 translate}{}ifelse +0 0 translate newpath + 3.09375 4.62305 moveto + 3.40723 5.08496 lineto + 3.69434 4.71289 lineto + 4.05371 4.17285 4.7041 3.46289 5.64355 2.58301 curveto + 6.60352 1.70312 7.17383 1.05273 7.35352 0.632812 curveto + 6.87402 0.392578 6.33398 -0.1875 5.73438 -1.10742 curveto + 5.7041 -1.16699 lineto + 3.69434 -4.22754 lineto + 3.06348 -3.56738 lineto + 1.74414 -2.12695 lineto + 0.364258 -0.626953 lineto + -0.0361328 -0.1875 -0.246094 0.0927734 -0.265625 0.212891 curveto + -0.265625 0.212891 lineto + 0.09375 0.333008 0.643555 0.932617 1.38379 2.0127 curveto + 3.09375 4.62305 lineto + closepath + 6.09375 -0.0273438 moveto + 5.58398 0.542969 lineto + 4.44434 1.77246 lineto + 3.30371 2.97266 lineto + 2.96387 3.29297 2.77441 3.44238 2.73438 3.42285 curveto + 2.73438 3.42285 lineto + 2.63379 3.36328 2.30371 2.93262 1.74414 2.13281 curveto + 0.933594 0.8125 lineto + 0.914062 0.792969 1.06348 0.613281 1.38379 0.272461 curveto + 2.46387 -0.867188 lineto + 3.63379 -2.00684 lineto + 4.38379 -2.66699 lineto + 4.44434 -2.64746 4.74414 -2.20703 5.28418 -1.34766 curveto + 6.09375 -0.0273438 lineto + closepath +fill grestore + }! + + + + +/HDD0 { % GROSSE longue RONDE usage: str x y quartbemol +gsave translate 0.04 dup scale + 0 0 translate + newpath + 17 18 moveto + 35 31 lineto + 54 46 lineto + 71 61 lineto + 100 87 lineto + 120 113 lineto + 152 75 lineto + 183 47 lineto + 214 25 lineto + 246 6 lineto + 229 -6 lineto + 212 -18 lineto + 168 -53 lineto + 130 -90 lineto + 125 -94 lineto + 120 -101 lineto + 110 -84 lineto + 95 -66 lineto + 66 -38 lineto + 35 -14 lineto + 17 -2 lineto + 0 6 lineto + 17 18 lineto + closepath + 145 -50 moveto + 189 -13 lineto + 101 63 lineto + 57 25 lineto + 145 -50 lineto + closepath + fill grestore + } bdef + + +/bar{ +xymove x +gsave translate 1 dup scale +defl 4 and 0 eq{-7 0 translate}{}ifelse +0.5 0 translate newpath + 5.03711 -2.38184 moveto + 5.03711 6.82812 lineto + 5.06738 12.1982 lineto + 5.06738 25.4883 lineto + 5.09766 26.748 lineto + 5.12793 27.0479 lineto + 5.12793 27.248 5.32715 27.1982 5.72754 26.8975 curveto + 5.72754 -1.27246 lineto + 5.75781 -2.53223 lineto + 5.4873 -2.53223 lineto + 5.03711 -2.38184 lineto + closepath +fill grestore +}! + + + + +% taille par defaut des lignes +/dlw{0.7 SLW}! + +/bnumb{ currentgray /GoudyMediaeval-Regular 12 selectfont + 3 index stringwidth pop 4 add + dup .5 mul neg 4 index add 3 index 3 -1 roll 8 + 1.0 setgray rectfill setgray M showc}! + +/bnum{M/GoudyMediaeval-Regular 12 selectfont showc}! + +%point pour les notes pointées +/dt{ +pop gsave newpath +x y translate -7 -1.45 translate + 8.75293 2.79199 moveto + 8.41602 3.29785 8.94043 3.95508 9.41309 4.03711 curveto + 9.45996 4.04492 9.83398 4.0332 10.1709 3.82715 curveto + 10.8457 3.41406 10.0928 2.11523 9.39062 2.34961 curveto + 8.98535 2.48438 9.03613 2.36816 8.75293 2.79199 curveto + closepath +fill grestore +}! +% TODO +/dt0{x y M RM currentpoint 1.2 0 360 arc fill}! + +%time signature +/tsig{ M gsave/GoudyMediaeval-Regular 16 selectfont 1.2 1 scale + 0 1 RM currentpoint 3 -1 roll showc + 12 add M showc grestore}! + +% barres sup ? grace note +/ghl{ .6 SLW x -3 add exch M +6 0 RL stroke}! + +% barres sup ?grace note +/gsl{dlw M curveto stroke}! + +% barres sup +/hl{ +xymove x y +gsave translate 1 dup scale +defl 4 and 0 eq{-7 0 translate}{}ifelse +1 -1 translate newpath + -2.875 1.5 moveto + -0.512695 1.3877 5.89551 1.46094 8.29492 1.5 curveto + 8.28027 0.525391 lineto + 5.80859 0.566406 -0.557617 0.539062 -2.94922 0.540039 curveto + -2.875 1.5 lineto + closepath +fill grestore }! + +%beam : liaison des croches +/bm{ M 3 copy RL neg 0 exch RL + neg exch neg exch RL 0 exch RL fill}! + +endps + + + + diff --git a/thinlines.fmt b/thinlines.fmt new file mode 100644 index 0000000..89d15b0 --- /dev/null +++ b/thinlines.fmt @@ -0,0 +1,11 @@ +% thinlines.fmt +% written by Guido Gonzato +% for any abcm2ps version +% +% usage: if you find that .ps files look ugly at high %%scale, +% format your abc file using this command line: +% +% abcm2ps -F thinlines.fmt [other parameters] yourfile.abc + +postscript /dlw +postscript {0.3 setlinewidth} bdef % default: 0.7