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.

Frustration
21. May 2009 
#!/usr/bin/perl
$width = `tput cols`;
@word = split('',"frustration");
while(!$calm){
        $vent;
        foreach(1..$width){
                $vent .= $word[int(rand(scalar @word))];
        }
        print $vent."\n"; select(undef, undef, undef, 0.1);
        $calm = 1 if $vent =~ /frustration/;
}

back to Microcodes