> De : Laura Conrad <[EMAIL PROTECTED]>
> A : [EMAIL PROTECTED]
> Objet : Re: [abcusers] free Finale
> Date�: samedi 28 octobre 2000 13:54
> 
> >>>>> "Christophe" == Christophe Declercq <[EMAIL PROTECTED]> writes:
> 
>     Christophe> [Incipits]
> 
>     Christophe> You could build on something like that:
> 
> We're using incipit to mean two different things -- your example is a
> good way to write out the first few bars of a tune in a smaller font
> so that you can get a lot of "reminders" of the tune on one page.
> 
> What I want is something that's normal in modern editions of early
> music -- a bar at the beginning of the piece that indicates the
> original clef and starting note, or possibly the range, of the part.
> It's traditionally in a slightly smaller font to make it clear that
> this isn't something to play.  Then there's a normal clef, key
> signature, and time signature in the normal font on the same line.
> 
Ah, yes. Sorry, I don't think that sort of incipit is possible with abc2ps
:(

BTW, the date stamping perl script I posted has an error: it will print
last month date (I forgot that in perl, localtime give months from 0 to
11). Sorry for that.

The corrected script is below.


#!/usr/local/bin/perl
$flag = 0;
@date=localtime(time);
($day,$month,$year)=@date[3,4,5];
$month++;
$year+=1900;
while (<>) {
    if (/^%%Page:/) {
        if ($flag) {
            print "grestore\n";
        }
        $flag = 1;
        print $_;
        print "gsave\n";
        print "/Times-Roman-Italic findfont 12 scalefont setfont\n";
        print "60 60 moveto\n";
        print "(Printed on $day/$month/$year) show\n";
        print "grestore\n";
    } else {
        print;
    }
}


Regards

Christophe

 

To subscribe/unsubscribe, point your browser to: http://www.tullochgorm.com/lists.html

Reply via email to