I had a few minutes tonight so I decided to have a little fun. I am stopping now before this becomes a new project 
Below is the code:
$colors =
"cyan",
"Green",
"Yellow",
"Red",
"magenta",
"white"
Clear-Host
Write-Host
while($true)
{
$oldpos = $host.ui.RawUI.CursorPosition
Write-Host " *" -ForegroundColor ($colors | get-random)
# Row One
Write-Host " *" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random)
# Row Two
Write-Host " *" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random)
# Row Three
Write-Host " *" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random)
# Row Four
Write-Host " *" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random)
# Row Five
Write-Host " *" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random)
# Row Six
Write-Host " *" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random) -nonewline
Write-Host "*" -ForegroundColor DarkGreen -nonewline
Write-Host "*" -ForegroundColor ($colors | get-random)
# Stump
Write-Host " *** " -fore DarkGreen
Write-Host " *** " -fore DarkGreen
$host.ui.RawUI.CursorPosition = $oldpos
sleep .40
}
Write-Host
tshell :: Dec.10.2009 ::
All ::
2 Comments »