Microcodes
by Pall Thayer
Microcodes are very small code-based artworks. Each one is a fully contained work of art. On this page you can see contributed modifications of the original Microcodes that can be seen here.

Original code:

Enter your name (will be displayed):

Here you can enter extra info, such as warnings if the code can cause damage:

Enter code (must be complete and runnable):

No modified codes have been submitted for this Microcode.

For Each (and every) Color
07. April 2010
#!/usr/bin/perl
while(1){
    foreach $color (1..256){
        $output = "\x1b[48;5;$color"."m";
        foreach(0..`tput lines`){
            $output .= " " x `tput cols`;
            $output .= "\n";
        }
        $output .= "\x1b[0m\n";
        print $output;
        select(undef, undef, undef, 0.05);
    }
}

back to Microcodes