Re: useless aesthetics -- ascii dragonfly boot splash

[Aaron Malone <aaron@xxxxxxxxx>]

On Friday 02 January 2004 17:50, Aaron Malone wrote:
> The color version has not been changed -- I actually didn't realize
> the option was there until today.  I may learn the color escape
> codes and fix that over the weekend. :)

Thanks for commiting, Jeroen.  I just did the color version.  There's 
not much to it, though, and I don't know if it's worth putting in -- 
does anyone actually *use* loader_color?

-- 
Aaron Malone
aaron@xxxxxxxxx

--- beastie.4th.orig	Mon Jan  5 17:28:28 2004
+++ beastie.4th	Mon Jan  5 17:33:19 2004
@@ -51,25 +51,25 @@
 
 \ The BSD Daemon.  He is 19 rows high and 34 columns wide
 : technicolor-beastie ( x y -- )
-2dup at-xy ."               ,        ," 1+
-2dup at-xy ."              /(        )`" 1+
-2dup at-xy ."              \ \___   / |" 1+
-2dup at-xy ."              /- _  `-/  '" 1+
-2dup at-xy ."             (/\/ \ \   /\" 1+
-2dup at-xy ."             / /   | `    \" 1+
-2dup at-xy ."             O O   ) /    |" 1+
-2dup at-xy ."             `-^--'`<     '" 1+
-2dup at-xy ."            (_.)  _  )   /" 1+
-2dup at-xy ."             `.___/`    /       " 1+
-2dup at-xy ."               `-----' /" 1+
-2dup at-xy ."  <----.     __ / __   \" 1+
-2dup at-xy ."  <----|====O)))==) \) /====|" 1+
-2dup at-xy ."  <----'    `--' `.__,' \" 1+
-2dup at-xy ."               |        |" 1+
-2dup at-xy ."                \       /       /\" 1+
-2dup at-xy ."           ______( (_  / \______/" 1+
-2dup at-xy ."         ,'  ,-----'   |" 1+
-at-xy ."         `--{__________) " 1+
+2dup at-xy ." " 1+
+2dup at-xy ." " 1+
+2dup at-xy ." ,--,           |           ,--," 1+
+2dup at-xy ." |   `-,       ,^,       ,-'   |" 1+
+2dup at-xy ."  `,    `-,   (/ \)   ,-`    ,-'" 1+
+2dup at-xy ."    `-,    `-,/   \,-`    ,-`" 1+
+2dup at-xy ."       `------(   )------'" 1+
+2dup at-xy ."   ,----------(   )-----------," 1+
+2dup at-xy ."  |        _,-(   )-,_        |" 1+
+2dup at-xy ."   `-,__,-`   \   /   `-,__,-'" 1+
+2dup at-xy ."               | |" 1+
+2dup at-xy ."               | |" 1+
+2dup at-xy ."               | |" 1+
+2dup at-xy ."               | |" 1+
+2dup at-xy ."               | |" 1+
+2dup at-xy ."               | |" 1+
+2dup at-xy ."               `|'" 1+
+2dup at-xy ." " 1+
+at-xy ."
 ;
 
 : boring-beastie ( x y -- )