Re: [abcusers] lyrics adjustments in abcm2ps (possible?)
One can control whether the kind of alignment is to be maintained or
reset to default with a little change:
%%beginps
/lyleft{dup stringwidth pop 10.5 sub 0 RM showc}!
/lyright{10.5 0 RM showc}!
/lycenter{show}!
/lydo{show}!
/lyshow{
dup 0 get(<)0 get eq
{
dup 0 0 put
/lydo/lyleft load def
}{
dup 0 get(>)0 get eq
{
dup 0 0 put
/lydo/lyright load def
}{
dup 0 get(=)0 get eq
{
dup 0 0 put
/lydo/lycenter load def
} if
} ifelse
} ifelse
lydo
% %%%
% disable the next line to maintain the last alignment option
/lydo/lycenter load def % <--this resets to default alagnment
% %%%
}!
%%endps
X:1
T:Rock of Ages
C:Augustus M. Toplady/Thomas Hastings
M:3/4
L:1/8
Q:1/4=110
K:Bb
%%vocalfont Times-Roman *
F > G | F2 D2 B > G | F4 B > c | d3 c B A | B4
w:=1.~Rock <~~of A-ges, cleft for me, >Let me hide =my-self in Thee;
w:=2.~Could <~~my tears for-ev-er flow, >Could my zeal =no lan-gour know,
w:=3.~While <~~I draw this fleet-ing breath, >When my eyes =shall close
in death,
--
Hudson Lacerda
Re: [abcusers] lyrics adjustments in abcm2ps (possible?)
Thank you very very much Hudson,
That was an important part of my "wish list" of features for abcm2ps.
Best regards,
Eduardo.
- Original Message -
From: "Hudson Lacerda" <[EMAIL PROTECTED]>
To:
Sent: Sunday, January 22, 2006 9:45 PM
Subject: Re: [abcusers] lyrics adjustments in abcm2ps (possible?)
> Hi Eduardo.
> This version maintains the alignment for the next syllables:
>
> %%beginps
> /lyleft{dup stringwidth pop 10.5 sub 0 RM showc}!
> /lyright{10.5 0 RM showc}!
> /lycenter{show}!
> /lydo{show}!
> /lyshow{
> dup 0 get(<)0 get eq
> {
> dup 0 0 put
> /lydo/lyleft load def
> }{
> dup 0 get(>)0 get eq
> {
> dup 0 0 put
> /lydo/lyright load def
> }{
> dup 0 get(=)0 get eq
> {
> dup 0 0 put
> /lydo/lycenter load def
> } if
> } ifelse
> } ifelse
> lydo
> }!
> %%endps
>
> X:1
> T:Rock of Ages
> C:Augustus M. Toplady/Thomas Hastings
> M:3/4
> L:1/8
> Q:1/4=110
> K:Bb
> %%vocalfont Times-Roman *
> F > G | F2 D2 B > G | F4 B > c | d3 c B A | B4
> w:=1.~Rock <~~of A-ges, cleft for me, >Let me hide =my-self in Thee;
> w:=2.~Could <~~my tears for-ev-er flow, >Could my zeal =no lan-gour know,
> w:=3.~While <~~I draw this fleet-ing breath, >When my eyes =shall close
> in death,
>
>
>
> --
> Hudson Lacerda <http://geocities.yahoo.com.br/hfmlacerda/>
> *Não deixe seu voto sumir! http://www.votoseguro.org/
> *Apóie o Manifesto:http://www.votoseguro.com/alertaprofessores/
>
> == THE WAR IN IRAQ COSTS ==
> http://nationalpriorities.org/index.php?option=com_wrapper&Itemid=182
>
>
>
>
>
> ___
> Yahoo! doce lar. Faça do Yahoo! sua homepage.
> http://br.yahoo.com/homepageset.html
>
>
>
>
> Yahoo! Groups Links
>
>
>
>
>
>
>
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/abcusers/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
Re: [abcusers] lyrics adjustments in abcm2ps (possible?)
Hi Eduardo.
This version maintains the alignment for the next syllables:
%%beginps
/lyleft{dup stringwidth pop 10.5 sub 0 RM showc}!
/lyright{10.5 0 RM showc}!
/lycenter{show}!
/lydo{show}!
/lyshow{
dup 0 get(<)0 get eq
{
dup 0 0 put
/lydo/lyleft load def
}{
dup 0 get(>)0 get eq
{
dup 0 0 put
/lydo/lyright load def
}{
dup 0 get(=)0 get eq
{
dup 0 0 put
/lydo/lycenter load def
} if
} ifelse
} ifelse
lydo
}!
%%endps
X:1
T:Rock of Ages
C:Augustus M. Toplady/Thomas Hastings
M:3/4
L:1/8
Q:1/4=110
K:Bb
%%vocalfont Times-Roman *
F > G | F2 D2 B > G | F4 B > c | d3 c B A | B4
w:=1.~Rock <~~of A-ges, cleft for me, >Let me hide =my-self in Thee;
w:=2.~Could <~~my tears for-ev-er flow, >Could my zeal =no lan-gour know,
w:=3.~While <~~I draw this fleet-ing breath, >When my eyes =shall close
in death,
--
Hudson Lacerda
Re: [abcusers] lyrics adjustments in abcm2ps (possible?)
Hi Eduardo.
Eduardo Vieira escreveu:
> Hello list,
>
> I would like to know if with abcm2ps, one could write a postscript
> decoration that would do this:
> -> change the lyrics alignment from center aligned to left, or right aligned
> along the song.
I did a basic hack, still not well tested... try it under other
circunstances.
In a w: syllable, use a leading "0" (zero) for left alignment, and a
leading ">" for right alignment.
%%beginps
/lyshow {
/str 50 string def
str copy
str 0 get(0)0 get eq
{
str 0( )0 get put
3.5 0 RM
show
}{
str 0 get(>)0 get eq
{
str 0( )0 get put
10.5 0 RM
showc
}{
show
} ifelse
} ifelse
}!
%%endps
X:1
T:Rock of Ages
C:Augustus M. Toplady/Thomas Hastings
M:3/4
L:1/8
Q:1/4=110
K:Bb
F > G | F2 D2 B > G | F4 B > c | d3 c B A | B4
w:1.~Rock~ of A-ges, cleft for >me, 0~Let me hide my-self in >Thee;
w:2.~Could my tears for-ev-er >flow, 0~Could my zeal no lan-gour >know,
w:3.~While I draw this fleet-ing >breath, 0~When my eyes shall close in
>death,
Não é perfeito, mas quebra o galho...
Até mais.
Hudson
--
Hudson Lacerda
