On Fri, 7 Sep 2001, Roberto Montero Ortiz wrote:
> �Hey gente que hay?
>
> Por m�s que le doy vueltas, no capto qu� es lo que hace el script en la
> parte atr�s de la camiseta del GULCR
>
Aqu� va la versi�n m�s reciente (y ordenada) del c�digo. Lamento enviar
archivos a la lista, y les ruego paciencia (s�lo son 650 bytes, bastante
menos de lo que acostumbro enviar en texto :-P)
El c�digo se puede correr en una consola (texto), en un xterm o en un kvt
(terminal de kde). En la terminal de gnome, no funciona bien. Si alguien
usa alg�n otro emulador de terminal y funciona, por favor av�seme, SIN
ENVIAR COPIA A LA LISTA.
El c�digo requiere:
1. Tener los fuentes del kernel instalados en /usr/src/linux
2. Tener gawk instalado como "awk". Para los usuarios de Debian, instalar
gawk y cambiar awk por gawk en la primera l�nea.
Quienes aun as� no puedan ver el resultado, por favor escr�banme
directamente (i.e., NO A LA LISTA).
Saludos,
-alf
awk '
NR>=24&&NR<=60{
print gensub(/O/,"\033[1;33;40m\200\033[00m","g", \
gensub(/\+/,"\033[0;32;40m\260\033[00m","g", \
gensub(/X/,"\033[0;37m\200\033[00m","g", \
gensub(/(\.|o)/,"\033[01;30m\200\033[00m","g", \
gensub(/@/,"\033[01;37;47m \033[00m","g", \
gensub(/#/,"\033[01;30;40m \033[00m","g", \
gensub(/ /,"\033[01;34;44m \033[00m","g", \
substr($0,2,length($0)-3) \
) \
) \
) \
) \
) \
) \
)
}' /usr/src/linux/Documentation/x*li*x*
