El dom, 06-04-2008 a las 21:17 +0200, Charito Equis escribió:
> Francisco Vila escribió:
> > Es graciosa esta articulación de LilyPond en forma de gafas:
> probadlo
> >
> >
> > gafasps = #"0.15 setlinewidth
> > 255 0 0 setrgbcolor

> lo de gafasps =#"bla-bla" ¿es scheme?

No: PostScript. He aquí la explicación:

0.15 setlinewidth % grosor del trazo 0.15 puntos
255 0 0 setrgbcolor % color rojo
-0.9 0 translate % desplazar todo un poco a la izquierda
1.1 1.1 scale % aumentar un 10%
1.2 0.7 moveto % colocar plumilla
0.7 0.7 0.5 0 361 arc % definir círculo izquierdo, 361 grados
stroke % imprimir el círculo
2.20 0.70 0.50 0 361 arc % definir círculo derecho, 361 grados
stroke % imprimirlo
1.45 0.85 0.30 0 180 arc % definir arco de la nariz, 180 grados
stroke % imprimirlo
0.20 0.70 moveto % plumilla al extremo
0.80 2.00 lineto % palo de la patilla izquierda
0.92 2.26 1.30 2.40 1.15 1.70 curveto % gancho oreja
stroke % imprimir
2.70 0.70 moveto % plumilla al otro extremo
3.30 2.00 lineto % palo de la patilla derecha
3.42 2.26 3.80 2.40 3.65 1.70 curveto % gancho oreja
stroke % imprimir esto y fin.

¿A que mola?
--
Francisco Vila Doncel. Badajoz (Spain)
http://www.paconet.org