Dit is toch een van de wasigste dingen die ik ooit ben tegengekomen. De beste man programmeert onstage muziek in perl. Waar een normale sterveling een knopje op de sequencer indrukt, typt hij razendsnel iets als :
sub bang {
my $self = shift;
# play a drum sample for 100 milliseconds, panned slightly to the left,
# every sixth bang
$self->trigger({sample => '/home/alex/samples/drum.wav'
ts => 100,
pan => 0.4
}
)
if $self->{bangs} % 6 == 0;
}
Uiteraard ook een linkje erbij : http://www.perl.com/pub/a/2004/08/31/livecode.html
Hier zou ik wel eens een filmpje van willen zien...
sub bang {
my $self = shift;
# play a drum sample for 100 milliseconds, panned slightly to the left,
# every sixth bang
$self->trigger({sample => '/home/alex/samples/drum.wav'
ts => 100,
pan => 0.4
}
)
if $self->{bangs} % 6 == 0;
}
Uiteraard ook een linkje erbij : http://www.perl.com/pub/a/2004/08/31/livecode.html
Hier zou ik wel eens een filmpje van willen zien...
