shell-script-pt
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [shell-script] Screen Saver em shell 2


From: rensousa
Subject: Re: [shell-script] Screen Saver em shell 2
Date: Thu, 29 Jul 2004 15:17:50 -0300
User-agent: Internet Messaging Program (IMP) 3.1

Hummm.... Isso tah ficando divertido !!!!
Que tal assim....


#!/bin/bash

trap "echo -e '\033[m0';clear;setterm -cursor on;exit" 2

setterm -cursor off

Chars="abcdefghijklmnopqrstuvxywzABCDEFGHIJKLMNOPQRSTUVXYWZ01234567890!@#$%¨
&*()_-+=^~{}[];:?"
clear
while true; do
    lin=0
    [ ${#Cols[@]} -eq $(($(tput cols)-2)) ] && unset Cols
    while true; do
        COL=$((RANDOM%$(tput cols)))
        [ "${Cols[$COL]}" ] && continue
        Cols[$COL]=1
        break
    done
    COR="\e[3$((RANDOM%7+1));1m"
    while [ $lin -lt $(tput lines) ]; do
        Char=$(echo $Chars | cut -c$((RANDOM%86+1)))
        for i in `seq 26 35`;do
            Char1=$(echo $Chars | cut -c$i)
            tput cup $lin $COL; echo -en "\e[37;1m$Char1"
        done
        tput cup $lin $COL; echo -en "$COR$Char";sleep 0.0001
        let lin++
    done
done

Citando Victor Leonardo <address@hidden>:

> 
> 
> 
> 
> Ôpa!
> 
> Pode ser que assim dê certo a sua idéia! Mudei um pouquinho o shell do
> 
> Júlio Cézar repetindo a parte que seleciona aleatoriamente a lista de
> 
> caracteres a serem jogados na tela e o negócio funcionou! Aí Renato,
> 
> olha se é mais ou menos isso que você tinha sugerido! Pode ser que dê
> 
> pra melhorar né!
> 
> 
> 
> Valeu pela sugestão!!!
> 
> 
> 
> 
> 
> #!/bin/bash
> 
> 
> 
> trap "echo -e '\033[m0';clear;setterm -cursor on;exit" 2
> 
> 
> 
> setterm -cursor off
> 
> 
> 
> Chars="abcdefghijklmnopqrstuvxywzABCDEFGHIJKLMNOPQRSTUVXYWZ01234567890!@#$%¨
> 
> &*()_-+=^~{}[];:?"
> 
> clear
> 
> while true; do
> 
>     lin=0
> 
>     [ ${#Cols[@]} -eq $(($(tput cols)-2)) ] && unset Cols
> 
>     while true; do
> 
>         COL=$((RANDOM%$(tput cols)))
> 
>         [ "${Cols[$COL]}" ] && continue
> 
>         Cols[$COL]=1
> 
>         break
> 
>     done
> 
>     COR="\e[3$((RANDOM%7+1));1m"
> 
>     while [ $lin -lt $(tput lines) ]; do
> 
>         Char=$(echo $Chars | cut -c$((RANDOM%86+1)))
> 
>         tput cup $lin $COL; echo -en "$COR$Char";sleep 0,00001
> 
>         Char=$(echo $Chars | cut -c$((RANDOM%86+1)))
> 
>         tput cup $lin $COL; echo -en "$COR$Char";sleep 0,00001
> 
>         Char=$(echo $Chars | cut -c$((RANDOM%86+1)))
> 
>         tput cup $lin $COL; echo -en "$COR$Char";sleep 0,00001
> 
>         Char=$(echo $Chars | cut -c$((RANDOM%86+1)))
> 
>         tput cup $lin $COL; echo -en "$COR$Char";sleep 0,00001
> 
>         Char=$(echo $Chars | cut -c$((RANDOM%86+1)))
> 
>         tput cup $lin $COL; echo -en "$COR$Char";sleep 0,00001
> 
>         let lin++
> 
>     done
> 
> done
> 
> 
> 
> 


reply via email to

[Prev in Thread] Current Thread [Next in Thread]