Scripts/amiga-classic.ps1
|
# Amiga Classic ASCII $art = @' ___..-.---.---.--..___ _..-- `.`. `. `. `. --.._ / ___________\ \ \______ \ | |.-----------`. `. `.---.| | |`. |' \`. \ \ \ '| | |`. |' \ `-._ `. `. `.'| | /| |' `-._o)\ /(o\ \ \| |\ .' | |' `. .' '. `. `. `. | `. / .| |' `. (_.==._) \ \ \ |. \ _.--. .' .' | |' _.-======-._ `. `. `. `. `. _.-_.-'\\ / / | |' .' |_||_| `. \ \ \ \ \ .'_.' || / .' |`. |' /_.-'========`-._\ `. `-._`._`. \(.__ :| ( ' |`. |'.______________________.'\ _.) ` )`-._`-._/ / \\ | '.------------------------.'`-._-' // `-._.' _\\_ \ | AMIGA O O O O * * `.`.| ' // (_ _) '-._|________________________|_.-'| _//_ / / /`-._ |`-._ / / / | (_ _) .' \ |`-._ `-._ `-._`-._/ / / | \ \ / `. | `-._ `-._ `-._|/ / | / `. / / / /. ) | `-._ `-._ `-._ / / .' \ | | | \ \|/ | `-._`-._ `-._ `-._ / /. ( .\ \ \ \ \ \ \ \/ | `-._`-._`-._ `-._ `-._/ / \ \|/ / | | | `.\_\/ `-._ `-._`-._`-._ `-._/| /| \ \/ / / / / `-._ `-._`-._`-._ || / | \ \/_/.' .' `-._ `-._`-._ || / | \ / / . `-._ `-._ || / | \ '\ / / `-._ ||/'._.' \ \`. .' / `-._|/ \ `.`-._.' .' \ .' `-.__\/ `\ .' ' \`. _.' .' `.`-._.-' _.' `-.__.-' '@ # Split art into lines and color each line cyclically with Amiga-inspired colors $lines = $art -split "`n" $colors = @("Blue", "White", "Cyan", "Yellow", "Magenta", "Green", "Red") for ($i = 0; $i -lt $lines.Count; $i++) { Write-Host $lines[$i] -ForegroundColor $colors[$i % $colors.Count] } |