Aê Renato!
Segue o script solicitado.
#!/bin/bash
trap "echo -e '\033[m0';clear;setterm -cursor on;exit" 2
clear
prepara () {
setterm -cursor off
Chars="abcdefghijklmnopqrstuvxywzABCDEFGHIJKLMNOPQRSTUVXYWZ01234567890!
@#$%¨
&*()_-+=^~{}[];:?"
while true; do
lin=0
lin1=$((RANDOM%$(tput lines)))
[ [EMAIL PROTECTED] -eq $(($(tput cols)-2)) ] && unset Cols
while true; do
COL=$((RANDOM%$(tput cols)))
COL2=$((RANDOM%$(tput cols)))
[ "${Cols[$COL]}" ] && continue
Cols[$COL]=1
break
done
COR="\e[32;1m"
COR2="\e[32;1m"
coluna1
done
}
coluna1 () { while [ $lin -lt $(tput lines) ]; do
Char=$(echo $Chars | cut -c$((RANDOM%86+1)))
for i in `seq 1 3`;do
Char1=$(echo $Chars | cut -c$i);sleep 0.000001
tput cup $lin $COL; echo -en "\e[37;1m$Char1"
done
tput cup $lin $COL; echo -en "$COR$Char";sleep 0.0001
let lin++
coluna2
done
prepara
}
coluna2 () { while [ $lin1 -lt $(tput lines) ]; do
Char=$(echo $Chars | cut -c$((RANDOM%86+1)))
for i in `seq 1 3`;do
Char1=$(echo $Chars | cut -c$i);sleep 0.000001
tput cup $lin1 $COL2; echo -en "\e[37;1m$Char1"
done
tput cup $lin1 $COL2; echo -en "$COR2$Char";sleep 0.0001
let lin1++
coluna1
done
[ $lin1 -eq $(tput lines) ] && lin1=$((RANDOM%$(tput
lines)));COL2=$((RANDOM%$(tput cols)));coluna2
# coluna1
}
prepara
Em Qui, 2006-06-08 às 15:56 -0300, Renato L. Sousa escreveu:
> Olá amigos,
>
> Há algum tempo atras rolou uma mensagem na lista para um
> desenvolvimento
> de um script que parecia um descanço de tela do matrix. Eu tinha
> esse
> script guardado mas por um problema técnico ( e falta de backup !!! )
> acabei perdendo ele.
> Será que alguem na lista ainda tem ele ?
>
> Obrigado,
>
> Renato L. Sousa
>
> --
> ----------------------------------------------------------------------
> Renato L. Sousa - Técnico de Informática
> Serviço Técnico de Informática - STI/FAAC
> UNESP - Campus de Bauru
>
>
--
Victor L. Gomes
Suporte
EAC Software
Tel.: (31) 3273-4415
Visite nosso site: www.eacnet.com.br
---------------------------------------------------------------------
Esta lista não admite a abordagem de outras liguagens de programação, como
perl, C etc. Quem insistir em não seguir esta regra será moderado sem prévio
aviso.
---------------------------------------------------------------------
Sair da lista: [EMAIL PROTECTED]
---------------------------------------------------------------------
Esta lista é moderada de acordo com o previsto em
http://www.listas-discussao.cjb.net
---------------------------------------------------------------------
Servidor Newsgroup da lista: news.gmane.org
Grupo: gmane.org.user-groups.programming.shell.brazil
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/shell-script/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
