A titre d’exercice j’ai mis les accords de la gamme majeure. J’ai par contre utilisé le compteur pour indiquer le degré de l’accord.
// Start the macro
// record three drone tracks
// change the counter value
// Enjoy…
// $tonic$ défini la tonique
IfThen {$counter$==1} Do Redeclare int $tonic$ = {$counter$-1}
IfThen {$counter$==2} Do Redeclare int $tonic$ = {$counter$+0}
IfThen {$counter$==3} Do Redeclare int $tonic$ = {$counter$+1}
IfThen {$counter$==4} Do Redeclare int $tonic$ = {$counter$+1}
IfThen {$counter$==5} Do Redeclare int $tonic$ = {$counter$+2}
IfThen {$counter$==6} Do Redeclare int $tonic$ = {$counter$+3}
IfThen {$counter$==7} Do Redeclare int $tonic$ = {$counter$+4}
IfThen {$counter$==8} Do Redeclare int $tonic$ = {$counter$+4}
// $third$ défini la tierce
IfThen {$counter$==1} Do Redeclare int $third$ = {$counter$+3}
IfThen {$counter$==2} Do Redeclare int $third$ = {$counter$+3}
IfThen {$counter$==3} Do Redeclare int $third$ = {$counter$+4}
IfThen {$counter$==4} Do Redeclare int $third$ = {$counter$+5}
IfThen {$counter$==5} Do Redeclare int $third$ = {$counter$+6}
IfThen {$counter$==6} Do Redeclare int $third$ = {$counter$+6}
IfThen {$counter$==7} Do Redeclare int $third$ = {$counter$+7}
IfThen {$counter$==7} Do Redeclare int $third$ = {$counter$+8}
// $fifth $ défini la quinte
IfThen {$counter$==1} Do Redeclare int $fifth$ = {$counter$+6}
IfThen {$counter$==2} Do Redeclare int $fifth$ = {$counter$+7}
IfThen {$counter$==3} Do Redeclare int $fifth$ = {$counter$+8}
IfThen {$counter$==4} Do Redeclare int $fifth$ = {$counter$+8}
IfThen {$counter$==5} Do Redeclare int $fifth$ = {$counter$+9}
IfThen {$counter$==6} Do Redeclare int $fifth$ = {$counter$+10}
IfThen {$counter$==7} Do Redeclare int $fifth$ = {$counter$+11}
IfThen {$counter$==7} Do Redeclare int $fifth$ = {$counter$+11}
TrackSpeed trk1 = {pow(2, ($tonic$*0.08333333))}
TrackSpeed trk2 = {pow(2, ($third$*0.08333333))}
TrackSpeed trk3 = {pow(2, ($fifth$*0.08333333))}
TrackSpeed trk4 = {pow(2, (($tonic$+12)*0.08333333))}
Sleep 10
RestartMacro