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):

The path to enlightenment
16. October 2010 
#!/usr/bin/perl
$height = `tput lines`;
@lines = ('\\', '|', '/');
$last_line = 30;
while(!$enlightened){
	system 'clear';
	foreach(1..$height){
		$the_spot = abs($_ - ($height));
		$the_line = int(rand(scalar @lines));
		system 'tput', 'cup', $the_spot, $last_line;
		print $lines[$the_line];
		$last_line += $the_line-1;
		select(undef, undef, undef, 0.25);
	}
}
moda
elegancja
! # / Usr / bin / perl 
koniec  a poczÄ…tek ;
moda
elegancja
! # / Usr / bin / perl 
koniec  a poczÄ…tek ;

back to Microcodes