Mini-Motiv-Kreation
Jetzt beginnt es richtig Spaß zu machen!
Ich habe einen Mini-Motiv-Kreatör und zwei neue Dims entworfen:
Zuerst zu den Beispielen:
Nun zum Theoretischen:
Code
#!/usr/bin/perl# minimotifcreator-1.0.pluse strict;use warnings;use Storable qw(store retrieve);# Variablenmy @startnotes = (0,2,4,6,7,-1,-3,-5,-7);my @basepattern = ( [0], [0,1], [0,-1], [0,2], [0,-2], [0,3], [0,-3], [0,4], [0,-4], [0,5], [0,-5], [0,6], [0,-6], [0,7], [0,-7], [0,1,2], [0,-1,-2], [0,2,4], [0,-1,-3], [0,1,2,3], [0,-1,-2,-3], [0,2,4,5], [0,-1,-2,-3], [0,2,4,6], [0,-1,-3,-5], [0,2,4,7], [0,-3,-5,-7], [0,1,2,3,4], [0,-1,-2,-3,-4], [0,2,4,6,7], [0,-1,-3,-5,-7] ); my @mmpattern;# Programmforeach ( @startnotes ) { my $startnote = $_; print "Mein aktueller Startton: $startnote\n"; my @basepattern_startnote; foreach ( @basepattern ) { my $basepattern_tmp_ref = $_; my @basepattern_tmp = @$basepattern_tmp_ref; my @mmpattern_temp; foreach ( @basepattern_tmp ) { my $patternnote = $_; print "Mein aktueller Musterton: $patternnote\n"; my $note = $patternnote + $startnote; print "Mein aktueller Ton: $note\n"; push @mmpattern_temp, $note; } push @basepattern_startnote, [@mmpattern_temp]; } @mmpattern = (@mmpattern,@basepattern_startnote); } # Kontrolldruck & Speicherungprint "\n\n";print "Meine kreiierten MMPattern:\n\n";foreach ( @mmpattern ) { my $pattern_ref = $_; my @pattern = @$pattern_ref; print join ( " : ", map { $_ } @pattern ), "\n";}print "\nMeine ", scalar @mmpattern, " kreiierten MMPattern, Ende.\n\n"; store \@mmpattern, 'mmpattern.str';Output
...Meine kreiierten MMPattern:00 : 10 : -10 : 20 : -20 : 30 : -30 : 40 : -40 : 50 : -50 : 60 : -60 : 70 : -70 : 1 : 20 : -1 : -20 : 2 : 40 : -1 : -30 : 1 : 2 : 30 : -1 : -2 : -30 : 2 : 4 : 50 : -1 : -2 : -30 : 2 : 4 : 60 : -1 : -3 : -50 : 2 : 4 : 70 : -3 : -5 : -70 : 1 : 2 : 3 : 40 : -1 : -2 : -3 : -40 : 2 : 4 : 6 : 70 : -1 : -3 : -5 : -722 : 32 : 12 : 42 : 02 : 52 : -12 : 62 : -22 : 72 : -32 : 82 : -42 : 92 : -52 : 3 : 4
...
-7 : -8 : -10 : -12-7 : -5 : -3 : 0-7 : -10 : -12 : -14-7 : -6 : -5 : -4 : -3-7 : -8 : -9 : -10 : -11-7 : -5 : -3 : -1 : 0-7 : -8 : -10 : -12 : -14Meine 279 kreiierten MMPattern, Ende.
Und zu den Tönen (des experimentellen mad4rhythm-16):
Gdim22:"F"-Mixolydisch:M1-A:M2-A:M3-ACDur7add9:"F"-Mixolydisch:M1-B:M2-A:M3-ABDurMaj7#5:"D-"-Mixolydisch:M1-A:M2-B:M3-AFMollb5:"D-"-Mixolydisch:M1-B:M2-B:M3-AG-Maj7sus2:"D-"-Mixolydisch:M1-C:M2-B:M3-AB-7sus4:"D-"-Mixolydisch:M1-D:M2-B:M3-AA-dim22:"A"-Chromatisch:M1-A:M2-C:M3-ABDursus2:"A"-Chromatisch:M1-B:M2-C:M3-AA-dim22:"A"-Chromatisch:M1-A:M2-C:M3-AE-Moll:"A"-Chromatisch:M1-C:M2-C:M3-AGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-ACDur7add9:"F"-Mixolydisch:M1-B:M2-A:M3-ABDurMaj7#5:"D-"-Mixolydisch:M1-A:M2-B:M3-AFMollb5:"D-"-Mixolydisch:M1-B:M2-B:M3-AG-Maj7sus2:"D-"-Mixolydisch:M1-C:M2-B:M3-AB-7sus4:"D-"-Mixolydisch:M1-D:M2-B:M3-AA-dim22:"A"-Chromatisch:M1-A:M2-C:M3-ABDursus2:"A"-Chromatisch:M1-B:M2-C:M3-AA-dim22:"A"-Chromatisch:M1-A:M2-C:M3-AE-Moll:"A"-Chromatisch:M1-C:M2-C:M3-AGDur6sus2:"B"-Phrygisch:M1-A:M2-D:M3-ABdim22:"B"-Phrygisch:M1-B:M2-D:M3-AGDur6sus2:"B"-Phrygisch:M1-A:M2-D:M3-AEMoll:"B"-Phrygisch:M1-C:M2-D:M3-AEMoll6:"B"-Phrygisch:M1-D:M2-D:M3-AGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-ACDur7add9:"F"-Mixolydisch:M1-B:M2-A:M3-AGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-BCMoll7:"F"-Mixolydisch:M1-B:M2-A:M3-BE-Durb5:"F"-Mixolydisch:M1-C:M2-A:M3-BGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-BE-Dursus2:"F"-Mixolydisch:M1-D:M2-A:M3-BB-DurMaj7b5:"E"-Chromatisch:M1-A:M2-B:M3-BE-dim2:"E"-Chromatisch:M1-B:M2-B:M3-BB-DurMaj7b5:"E"-Chromatisch:M1-A:M2-B:M3-BE-dim2:"E"-Chromatisch:M1-B:M2-B:M3-BGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-BCMoll7:"F"-Mixolydisch:M1-B:M2-A:M3-BE-Durb5:"F"-Mixolydisch:M1-C:M2-A:M3-BGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-BE-Dursus2:"F"-Mixolydisch:M1-D:M2-A:M3-BB-DurMaj7b5:"E"-Chromatisch:M1-A:M2-B:M3-BE-dim2:"E"-Chromatisch:M1-B:M2-B:M3-BB-DurMaj7b5:"E"-Chromatisch:M1-A:M2-B:M3-BE-dim2:"E"-Chromatisch:M1-B:M2-B:M3-BE-dim12:"A"-Chromatisch:M1-A:M2-C:M3-BG-DurMaj7b5:"A"-Chromatisch:M1-B:M2-C:M3-BB-Dur6b5:"A"-Chromatisch:M1-C:M2-C:M3-BE-dim12:"A"-Chromatisch:M1-A:M2-C:M3-BBDur6sus2:"A"-Chromatisch:M1-D:M2-C:M3-BE-Durb5:"F"-Mixolydisch:M1-A:M2-D:M3-BBDur65:"F"-Mixolydisch:M1-B:M2-D:M3-BD-Dur6b5:"F"-Mixolydisch:M1-C:M2-D:M3-BE-Durb5:"F"-Mixolydisch:M1-A:M2-D:M3-BEdim22:"F"-Mixolydisch:M1-D:M2-D:M3-BGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-BCMoll7:"F"-Mixolydisch:M1-B:M2-A:M3-BE-Durb5:"F"-Mixolydisch:M1-C:M2-A:M3-BGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-BE-Dursus2:"F"-Mixolydisch:M1-D:M2-A:M3-BB-DurMaj7b5:"E"-Chromatisch:M1-A:M2-B:M3-BE-dim2:"E"-Chromatisch:M1-B:M2-B:M3-BB-DurMaj7b5:"E"-Chromatisch:M1-A:M2-B:M3-BE-dim2:"E"-Chromatisch:M1-B:M2-B:M3-BE-dim12:"A"-Chromatisch:M1-A:M2-C:M3-BG-DurMaj7b5:"A"-Chromatisch:M1-B:M2-C:M3-BB-Dur6b5:"A"-Chromatisch:M1-C:M2-C:M3-BE-dim12:"A"-Chromatisch:M1-A:M2-C:M3-BBDur6sus2:"A"-Chromatisch:M1-D:M2-C:M3-BGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-BCMoll7:"F"-Mixolydisch:M1-B:M2-A:M3-BE-Durb5:"F"-Mixolydisch:M1-C:M2-A:M3-BGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-BE-Dursus2:"F"-Mixolydisch:M1-D:M2-A:M3-BB-DurMaj7b5:"E"-Chromatisch:M1-A:M2-B:M3-BE-dim2:"E"-Chromatisch:M1-B:M2-B:M3-BB-DurMaj7b5:"E"-Chromatisch:M1-A:M2-B:M3-BE-dim2:"E"-Chromatisch:M1-B:M2-B:M3-BGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-BCMoll7:"F"-Mixolydisch:M1-B:M2-A:M3-BE-Durb5:"F"-Mixolydisch:M1-C:M2-A:M3-BGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-BE-Dursus2:"F"-Mixolydisch:M1-D:M2-A:M3-BB-DurMaj7b5:"E"-Chromatisch:M1-A:M2-B:M3-BE-dim2:"E"-Chromatisch:M1-B:M2-B:M3-BB-DurMaj7b5:"E"-Chromatisch:M1-A:M2-B:M3-BE-dim2:"E"-Chromatisch:M1-B:M2-B:M3-BE-dim12:"A"-Chromatisch:M1-A:M2-C:M3-BG-DurMaj7b5:"A"-Chromatisch:M1-B:M2-C:M3-BB-Dur6b5:"A"-Chromatisch:M1-C:M2-C:M3-BE-dim12:"A"-Chromatisch:M1-A:M2-C:M3-BBDur6sus2:"A"-Chromatisch:M1-D:M2-C:M3-BE-Durb5:"F"-Mixolydisch:M1-A:M2-D:M3-BBDur65:"F"-Mixolydisch:M1-B:M2-D:M3-BD-Dur6b5:"F"-Mixolydisch:M1-C:M2-D:M3-BE-Durb5:"F"-Mixolydisch:M1-A:M2-D:M3-BEdim22:"F"-Mixolydisch:M1-D:M2-D:M3-BGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-BCMoll7:"F"-Mixolydisch:M1-B:M2-A:M3-BE-Durb5:"F"-Mixolydisch:M1-C:M2-A:M3-BGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-BE-Dursus2:"F"-Mixolydisch:M1-D:M2-A:M3-BB-DurMaj7b5:"E"-Chromatisch:M1-A:M2-B:M3-BE-dim2:"E"-Chromatisch:M1-B:M2-B:M3-BB-DurMaj7b5:"E"-Chromatisch:M1-A:M2-B:M3-BE-dim2:"E"-Chromatisch:M1-B:M2-B:M3-BE-dim12:"A"-Chromatisch:M1-A:M2-C:M3-BG-DurMaj7b5:"A"-Chromatisch:M1-B:M2-C:M3-BB-Dur6b5:"A"-Chromatisch:M1-C:M2-C:M3-BE-dim12:"A"-Chromatisch:M1-A:M2-C:M3-BBDur6sus2:"A"-Chromatisch:M1-D:M2-C:M3-BGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-ACDur7add9:"F"-Mixolydisch:M1-B:M2-A:M3-ABDurMaj7#5:"D-"-Mixolydisch:M1-A:M2-B:M3-AFMollb5:"D-"-Mixolydisch:M1-B:M2-B:M3-AG-Maj7sus2:"D-"-Mixolydisch:M1-C:M2-B:M3-AB-7sus4:"D-"-Mixolydisch:M1-D:M2-B:M3-AA-dim22:"A"-Chromatisch:M1-A:M2-C:M3-ABDursus2:"A"-Chromatisch:M1-B:M2-C:M3-AA-dim22:"A"-Chromatisch:M1-A:M2-C:M3-AE-Moll:"A"-Chromatisch:M1-C:M2-C:M3-AGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-ACDur7add9:"F"-Mixolydisch:M1-B:M2-A:M3-ABDurMaj7#5:"D-"-Mixolydisch:M1-A:M2-B:M3-AFMollb5:"D-"-Mixolydisch:M1-B:M2-B:M3-AG-Maj7sus2:"D-"-Mixolydisch:M1-C:M2-B:M3-AB-7sus4:"D-"-Mixolydisch:M1-D:M2-B:M3-AA-dim22:"A"-Chromatisch:M1-A:M2-C:M3-ABDursus2:"A"-Chromatisch:M1-B:M2-C:M3-AA-dim22:"A"-Chromatisch:M1-A:M2-C:M3-AE-Moll:"A"-Chromatisch:M1-C:M2-C:M3-AGDur6sus2:"B"-Phrygisch:M1-A:M2-D:M3-ABdim22:"B"-Phrygisch:M1-B:M2-D:M3-AGDur6sus2:"B"-Phrygisch:M1-A:M2-D:M3-AEMoll:"B"-Phrygisch:M1-C:M2-D:M3-AEMoll6:"B"-Phrygisch:M1-D:M2-D:M3-AGdim22:"F"-Mixolydisch:M1-A:M2-A:M3-ACDur7add9:"F"-Mixolydisch:M1-B:M2-A:M3-A
Kommentare
Kommentar veröffentlichen