// ============================================== //
        //                                                //
        //      file : work-34.nlr                        //
        //      date : 2002, may to june                  //
        //                                                //
        //      Work-34, a piece for 2 Nord Modulars.     //
        //                                                //
        // ============================================== //


        // ============================================== //
        // NOTE :                                         //
        //                                                //
        //   Slow, Normal, Fast and Tempo MUST be defined //
        //   this is requiered by the module Utils, which //
        //   will adjust it's fade tempo's accordingly    //
        // ============================================== //


Const Slow   = 5.0;
Const Normal = 1.0;
Const Fast   = 200;
Const Tempo  = Normal; // Slow, Normal or Fast

Include midi;   // Include standard MIDI stuff
Include nm;     // Include standard Nord Modular stuff
Include utils;  // Include application helpers, like silence and fade-stuff
Include slides; // Include slide show control commands


// //////////////////////////////////////////////////////////////////////
// Noodle defenitions ///////////////////////////////////////////////////


Bluess( aDev);
(
  0 Play( aDev, 101, 101, 101, 104);
);

Knetter( aDev);
(
  0 Play( aDev, 101, 101, 102, 103);
);

WahWah( aDev);
(
  0 Play( aDev, 101, 105, 106, 108);
);

noodle_w( aDev);
(
  0 Play( aDev, 109, 110, 111, 112);
);

Plinks( aDev);
(
  0 Play( aDev, 101, 113, 114, 115);
);

Intermezzo( aDev);
(
  0 Play( aDev, 101, 101, 116, 196);
);

Piefje( aDev);
(
  0 Play( aDev, 117, 118, 119, 120);
);

Fortune( aDev);
(
  0 Play( aDev, 101, 101, 121, 122);
);

Fishes_1( aDev);
(
  0 Play( aDev, 123, 101, 101, 101);
);

Fishes_2( aDev);
(
  0 Play( aDev, 123, 124, 101, 101);
);

Fishes_3( aDev);
(
  0 Play( aDev, 123, 124, 125, 101);
);

Fishes_4( aDev);
(
  0 Play( aDev, 123, 124, 125, 126);
);

Sadness( aDev);
(
  0 Play( aDev, 101, 127, 128, 129);
);

Election1( aDev);
(
  0 Play( aDev, 130, 131, 132, 133);
);

Election2( aDev);
(
  0 Play( aDev, 130, 131, 101, 133);
);

Elective( aDev);
(
  0 Play( aDev, 101, 101, 134, 135);
);

Chaos1( aDev);
(
  0 Play( aDev, 101, 136, 137, 138);
);

Chaos2( aDev);
(
  0 Play( aDev, 139, 140, 141, 142);
);

Chaos3( aDev);
(
  0 Play( aDev, 101, 101, 101, 143);
);

n116( aDev); // From Esslingen
(
  // Load the noodle

  0 Play( aDev, 144, 145, 146, 147);

  // after 7 sec's - turn on, just in case it was saved off

  7 ControlChange( aDev, 1, 1, 127);
  7 ControlChange( aDev, 2, 1, 127);
  7 ControlChange( aDev, 3, 1, 127);
  7 ControlChange( aDev, 4, 1, 127);

  // After 5 min's go to 'off mode', takes about 10 min's

  5 * 60 * Tempo ControlChange( aDev, 1, 1, 0);
  5 * 60 * Tempo ControlChange( aDev, 2, 1, 0);
  5 * 60 * Tempo ControlChange( aDev, 3, 1, 0);
  5 * 60 * Tempo ControlChange( aDev, 4, 1, 0);
);

n120( aDev); // From Esslingen
(
  0 Play( aDev, 148, 149, 150, 151);
);

WaterOverTheWaves( aDev);
(
  0 Play( aDev, 152, 153, 154, 155);
);

MoreWater( aDev);
(
  0 Play( aDev, 156, 157, 158, 159);
);

BassWater( aDev);
(
  0 Play( aDev, 101, 160, 161, 163);
);

Plokjes1( aDev);
(
  0 Play( aDev, 101, 101, 162, 163);
);

Plokjes2( aDev);
(
  0 Play( aDev, 101, 163, 164, 165);
);

Intermezzo3( aDev);
(
  0 Play( aDev, 101, 101, 166, 167);
);

Intermezzo4( aDev);
(
  0 Play( aDev, 101, 177, 166, 167);
);

ShadeBass( aDev);
(
  0 Play( aDev, 101, 101, 101, 168);
);

ShadeFuzz( aDev);
(
  0 Play( aDev, 101, 101, 101, 169);
);

ShadeMellow( aDev);
(
  0 Play( aDev, 101, 170, 171, 172);
);

ShadeBleeps( aDev);
(
  0 Play( aDev, 101, 101, 171, 172);
);

ShadeShimmers( aDev);
(
  0 Play( aDev, 175, 176, 173, 174);
);


EuProlog( aDev);
(
  0 Play( aDev, 175, 178, 179, 180);
);

EuProlo( aDev);
(
  0 Play( aDev, 101, 178, 179, 180);
);

EuBang( aDev);
(
  0 Play( aDev, 101, 101, 101, 181);
);

Eu( aDev);
(
  0 Play( aDev, 101, 101, 178, 182);
);

EuTicks( aDev);
(
  0 Play( aDev, 101, 183, 178, 182);
);

EuTicks2( aDev);
(
  0 Play( aDev, 101, 183, 178, 101);
);

Schultze( aDev);
(
  0 Play( aDev, 101, 101, 184, 185);
);

Sunday_1( aDev);
(
  0 Play( aDev, 101, 101, 101, 186);
);

Sunday_2( aDev);
(
  0 Play( aDev, 101, 101, 113, 187);
);

qstu( aDev);
(
  0 Play( aDev, 188, 189, 190, 191);
);


NoNaYet_1( aDev);
(
  0 Play( aDev, 101, 101, 101, 193);
);

NoNaYet_2( aDev);
(
  0 Play( aDev, 101, 101, 192, 193);
);

NoNaYet_3( aDev);
(
  0 Play( aDev, 101, 194, 192, 101);
);

NoNaYet_4( aDev);
(
  0 Play( aDev, 101, 101, 101, 195);
);

NoNaYet_5( aDev);
(
  0 Play( aDev, 101, 101, 102, 103);
);


// //////////////////////////////////////////////////////////////////////
// //////////////////////////////////////////////////////////////////////
// //////////////////////////////////////////////////////////////////////
// Part definitions /////////////////////////////////////////////////////


pSilence; // 0'00
(
   // Silence synths
   0 * 60 * Tempo Silence         ( 1);
   0 * 60 * Tempo Silence         ( 2);
   // Initiate slide player
   0 * 60 * Tempo SlideAutoSize   ( Off);
   0 * 60 * Tempo SlideCenter     ( On);
   0 * 60 * Tempo SlideDelay      ( 5);
   0 * 60 * Tempo SlideManual     ( Off);
   0 * 60 * Tempo SlideReverse    ( Off);
   0 * 60 * Tempo SlideStep       ( 1); // 'Ssmooth as we can
   0 * 60 * Tempo SlideStretch    ( On);
   0 * 60 * Tempo SlideStretchFine( On);
   0 * 60 * Tempo SlideFadeStyle  ( slideFade);
   0 * 60 * Tempo SlideVisible    ( On);
   0 * 60 * Tempo SlideFullScreen ( On);
        6 * Tempo SlideAutoRandom ( On);
        9 * Tempo SlideSelect     ( 1);
);

TestSlides;
(
                 0 pSilence;
         1 * Tempo SlideSelect(   1);
    0 * 20 * Tempo SlideSelect(   2);
    1 * 20 * Tempo SlideSelect(   2);
    2 * 20 * Tempo SlideSelect(   3);
    3 * 20 * Tempo SlideSelect(   4);
    4 * 20 * Tempo SlideSelect(   5);
    5 * 20 * Tempo SlideSelect(   6);
    6 * 20 * Tempo SlideSelect(   7);
    7 * 20 * Tempo SlideSelect(   8);
    8 * 20 * Tempo SlideSelect(   9);
    9 * 20 * Tempo SlideSelect(  10);
   10 * 20 * Tempo SlideSelect(  11);
   11 * 20 * Tempo SlideSelect(  12);
   12 * 20 * Tempo SlideSelect(  13);
   13 * 20 * Tempo SlideSelect(  14);
   14 * 20 * Tempo SlideSelect(  15);
   15 * 20 * Tempo SlideSelect(  16);
   16 * 20 * Tempo SlideSelect(  17);
   17 * 20 * Tempo SlideSelect(  18);
   18 * 20 * Tempo SlideSelect(  19);
   19 * 20 * Tempo SlideSelect(  20);
   20 * 20 * Tempo SlideSelect(  21);
   21 * 20 * Tempo SlideSelect(  22);
   22 * 20 * Tempo SlideSelect(  23);
   23 * 20 * Tempo SlideSelect(  24);
   24 * 20 * Tempo SlideSelect(  25);
   25 * 20 * Tempo SlideSelect(  26);
   26 * 20 * Tempo SlideSelect(  27);
   27 * 20 * Tempo SlideSelect(  28);
   28 * 20 * Tempo SlideSelect(  29);
   29 * 20 * Tempo SlideSelect(  30);
   30 * 20 * Tempo SlideSelect(  31);
   31 * 20 * Tempo SlideSelect(  32);
   32 * 20 * Tempo SlideSelect(  33);
   33 * 20 * Tempo SlideSelect(  34);
   34 * 20 * Tempo SlideSelect(  35);
   35 * 20 * Tempo SlideSelect(  36);
   36 * 20 * Tempo SlideSelect(  37);
   37 * 20 * Tempo SlideSelect(  38);
   38 * 20 * Tempo SlideSelect(  39);
   39 * 20 * Tempo SlideSelect(  40);
   40 * 20 * Tempo SlideSelect(  41);
   41 * 20 * Tempo SlideSelect(  42);
   42 * 20 * Tempo SlideSelect(  43);
   43 * 20 * Tempo SlideSelect(  44);
   44 * 20 * Tempo SlideSelect(  45);
   45 * 20 * Tempo SlideSelect(  46);
   46 * 20 * Tempo SlideSelect(  47);
   47 * 20 * Tempo SlideSelect(  48);
   48 * 20 * Tempo SlideSelect(  49);
   49 * 20 * Tempo SlideSelect(  50);
   50 * 20 * Tempo SlideSelect(  51);
   51 * 20 * Tempo SlideSelect(  52);
   52 * 20 * Tempo SlideSelect(  53);
   53 * 20 * Tempo SlideSelect(  54);
   54 * 20 * Tempo SlideSelect(  55);
   55 * 20 * Tempo SlideSelect(  56);
   56 * 20 * Tempo SlideSelect(  57);
   57 * 20 * Tempo SlideSelect(  58);
   58 * 20 * Tempo SlideSelect(  59);
   59 * 20 * Tempo SlideSelect(  60);
   60 * 20 * Tempo SlideSelect(  61);
   61 * 20 * Tempo SlideSelect(  62);
   62 * 20 * Tempo SlideSelect(  63);
   63 * 20 * Tempo SlideSelect(  64);
   64 * 20 * Tempo SlideSelect(  65);
   65 * 20 * Tempo SlideSelect(  66);
   66 * 20 * Tempo SlideSelect(  67);
   67 * 20 * Tempo SlideSelect(  68);
   68 * 20 * Tempo SlideSelect(  69);
   69 * 20 * Tempo SlideSelect(  70);
   70 * 20 * Tempo SlideSelect(  71);
   71 * 20 * Tempo SlideSelect(  72);
   72 * 20 * Tempo SlideSelect(  73);
   73 * 20 * Tempo SlideSelect(  74);
   74 * 20 * Tempo SlideSelect(  75);
   75 * 20 * Tempo SlideSelect(  76);
   76 * 20 * Tempo SlideSelect(  77);
   77 * 20 * Tempo SlideSelect(  78);
   78 * 20 * Tempo SlideSelect(  79);
   79 * 20 * Tempo SlideSelect(  80);
   80 * 20 * Tempo SlideSelect(  81);
   81 * 20 * Tempo SlideSelect(  82);
   82 * 20 * Tempo SlideSelect(  83);
   83 * 20 * Tempo SlideSelect(  84);
   84 * 20 * Tempo SlideSelect(  85);
   85 * 20 * Tempo SlideSelect(  86);
   86 * 20 * Tempo SlideSelect(  87);
   87 * 20 * Tempo SlideSelect(  88);
   88 * 20 * Tempo SlideSelect(  89);
   89 * 20 * Tempo SlideSelect(  90);
   90 * 20 * Tempo SlideSelect(  91);
   91 * 20 * Tempo SlideSelect(  92);
   92 * 20 * Tempo SlideSelect(  93);
   93 * 20 * Tempo SlideSelect(  94);
   94 * 20 * Tempo SlideSelect(  95);
   95 * 20 * Tempo SlideSelect(  96);
   96 * 20 * Tempo SlideSelect(  97);
   97 * 20 * Tempo SlideSelect(  98);
   98 * 20 * Tempo SlideSelect(  99);
   99 * 20 * Tempo SlideSelect( 100);
  100 * 20 * Tempo SlideSelect( 101);
  101 * 20 * Tempo SlideSelect( 102);
  102 * 20 * Tempo SlideSelect( 103);
  103 * 20 * Tempo SlideSelect( 104);
  104 * 20 * Tempo SlideSelect( 105);
  105 * 20 * Tempo SlideSelect( 106);
  106 * 20 * Tempo SlideSelect( 107);
  107 * 20 * Tempo SlideSelect( 108);
  108 * 20 * Tempo SlideSelect( 109);
);


Const SlideCount    = 113;      // Total number of slides available
Const TotalDuration = 421 * 60; // Seconds
Const Repeats       = 5;        // Nr of sequence repeats over total duration

SequenceSlides;
(
  Loop( i, 1, Repeats * SlideCount);
  (
    i * ( TotalDuration / ( Repeats * SlideCount)) * Tempo
      SlideSelect( 1 + i % SlideCount);
  );
);

DoSomeSlides( aTime, aTimes, anEffect);
(
  0 SlideFadeStyle( anEffect);
  Loop( i, 1, aTimes);
  (
    i * aTime / aTimes
      SlideSelect(( aTime + 13 * i) % SlideCount);
  );
  aTime SlideFadeStyle( slideFade);
);

// //////////////////////////////////////////////////////////////////////

pBluess; // 45'20
(
           0 * 60 * Tempo Bluess  ( 1);
  10.0 +   0 * 60 * Tempo DoSomeSlides( 1 * 30 * Tempo, 10, SlideSwap);
           3 * 60 * Tempo Knetter ( 2); // Knetter
  10.0 +   3 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
           4 * 60 * Tempo FadeOut ( 1); // Bluess
  10.0 +   4 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
           5 * 60 * Tempo WahWah  ( 1);
  10.0 +   5 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
           6 * 60 * Tempo FadeOut ( 2); // Knetter
  10.0 +   6 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          10 * 60 * Tempo Bluess  ( 2);
  10.0 +  10 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          13 * 60 * Tempo Fadeout ( 1); // WahWah
  10.0 +  13 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          15 * 60 * Tempo Fadeout ( 2); // Bluess
          15 * 60 * Tempo noodle_w( 1);
  10.0 +  15 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          37 * 60 * Tempo Plinks  ( 2);
  10.0 +  37 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          40 * 60 * Tempo FadeOut ( 1); // noodle_w
  10.0 +  40 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          45 * 60 * Tempo FadeOut ( 2); // Plinks
);

TestBluess;
(
  0 * 60 * Tempo pSilence;
  0 * 60 * Tempo pBluess;
);

// //////////////////////////////////////////////////////////////////////

pFortune; // 60'20
(
           0 * 60 * Tempo Intermezzo( 1);
  10.0 +   0 * 60 * Tempo DoSomeSlides( 1 * 30 * Tempo, 10, SlideExpand_from_right);
          10 * 60 * Tempo FadeOut   ( 1); // Intermezzo
          10 * 60 * Tempo Piefje    ( 2);
  10.0 +  10 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideExpand_from_right);
          15 * 60 * Tempo Fortune   ( 1);
  10.0 +  15 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideExpand_from_right);
          17 * 60 * Tempo FadeOut   ( 2); // Piefje
  10.0 +  17 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideExpand_from_right);
          27 * 60 * Tempo FadeOut   ( 1); // Fortune
          27 * 60 * Tempo Bluess    ( 2);
  10.0 +  27 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideExpand_from_right);
          31 * 60 * Tempo Knetter   ( 1);
  10.0 +  31 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideExpand_from_right);
          32 * 60 * Tempo FadeOut   ( 2); // Bluess
  10.0 +  32 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideExpand_from_right);
          33 * 60 * Tempo WahWah    ( 2);
  10.0 +  33 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideExpand_from_right);
          34 * 60 * Tempo FadeOut   ( 1); // Knetter
  10.0 +  34 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideExpand_from_right);
          35 * 60 * Tempo FadeOut   ( 2); // WahWah
          35 * 60 * Tempo Fishes_1  ( 1);
  10.0 +  35 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideExpand_from_right);
          39 * 60 * Tempo Fishes_2  ( 2);
  10.0 +  39 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideExpand_from_right);
          40 * 60 * Tempo FadeOut   ( 1); // Fishes_1
  10.0 +  40 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideExpand_from_right);
          43 * 60 * Tempo Fishes_3  ( 1);
  10.0 +  43 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideExpand_from_right);
          44 * 60 * Tempo FadeOut   ( 2); // Fishes_2
  10.0 +  44 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideExpand_from_right);
          47 * 60 * Tempo Fishes_4  ( 2);
  10.0 +  47 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideExpand_from_right);
          48 * 60 * Tempo FadeOut   ( 1); // Fishes_3
  10.0 +  48 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideExpand_from_right);
          60 * 60 * Tempo FadeOut   ( 2); // Fishes_4
);

TestFortune;
(
  0 * 60 * Tempo pSilence;
  0 * 60 * Tempo pFortune;
);

// //////////////////////////////////////////////////////////////////////

pSadness; // 25'20
(
           0 * 60 * Tempo Intermezzo ( 1);
  10.0 +   0 * 60 * Tempo DoSomeSlides( 1 * 30 * Tempo, 10, SlideUneven_shred_from_centre);
          10 * 60 * Tempo SlowFadeOut( 1); // Intermezzo
          10 * 60 * Tempo Sadness    ( 2);
  10.0 +  10 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          25 * 60 * Tempo FadeOut    ( 2); // Sadness
);

TestSadness;
(
  0 * 60 * Tempo pSilence;
  0 * 60 * Tempo pSadness;
);

// //////////////////////////////////////////////////////////////////////

pElection; // 55'20
(
           0 * 60 * Tempo Election1  ( 1);
  10.0 +   0 * 60 * Tempo DoSomeSlides( 1 * 30 * Tempo, 10, SlideSwap);
           6 * 60 * Tempo Elective   ( 2);
  10.0 +   6 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          13 * 60 * Tempo FadeOut    ( 1); // Election1
  10.0 +  13 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          14 * 60 * Tempo Election2  ( 1);
  10.0 +  14 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          20 * 60 * Tempo FadeOut    ( 2); // Elective
  10.0 +  20 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          22 * 60 * Tempo Sadness    ( 2);
  10.0 +  22 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          23 * 60 * Tempo FadeOut    ( 1); // Election2
  10.0 +  23 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          24 * 60 * Tempo Chaos1     ( 1);
  10.0 +  24 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          25 * 60 * Tempo FadeOut    ( 2); // Sadness
  10.0 +  25 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          29 * 60 * Tempo Chaos2     ( 2);
  10.0 +  29 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          30 * 60 * Tempo FadeOut    ( 1); // Chaos1
  10.0 +  30 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          39 * 60 * Tempo Chaos3     ( 1);
  10.0 +  39 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          40 * 60 * Tempo FadeOut    ( 2); // Chaos2
  10.0 +  40 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          41 * 60 * Tempo n116       ( 2); //  - can run at most 15'00 !!
  10.0 +  41 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          43 * 60 * Tempo SlowFadeOut( 1); // Chaos3
  10.0 +  43 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          55 * 60 * Tempo FadeOut    ( 2); // n116
);

TestElection;
(
   0 * 60 * Tempo pSilence;
   0 * 60 * Tempo pElection;
);

// //////////////////////////////////////////////////////////////////////

pWaterRunsOverTheWaves; // 48'00
(
           0 * 60 * Tempo Plokjes2         ( 1);
  10.0 +   0 * 60 * Tempo DoSomeSlides( 1 * 30 * Tempo, 10, SlideUneven_shred_from_centre);
           1 * 60 * Tempo n120             ( 2);
  10.0 +   1 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
           8 * 60 * Tempo SlowFadeOut      ( 1); // Plokjes2
  10.0 +   8 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
           9 * 60 * Tempo BassWater        ( 1);
  10.0 +   9 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          11 * 60 * Tempo SlowFadeOut      ( 1); // BassWater
  10.0 +  11 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          13 * 60 * Tempo WaterOverTheWaves( 1);
  10.0 +  13 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          15 * 60 * Tempo FadeOut          ( 2); // n120
  10.0 +  15 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          16 * 60 * Tempo BassWater        ( 2);
  10.0 +  16 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          23 * 60 * Tempo SlowFadeOut      ( 2); // BassWater
  10.0 +  23 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          24 * 60 * Tempo MoreWater        ( 2);
  10.0 +  24 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          25 * 60 * Tempo FadeOut          ( 1); // WaterOverTheWaves
  10.0 +  25 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          26 * 60 * Tempo BassWater        ( 1);
  10.0 +  26 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          32 * 60 * Tempo SlowFadeOut      ( 2); // MoreWater
  10.0 +  32 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          33 * 60 * Tempo Plokjes1         ( 2);
  10.0 +  33 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          34 * 60 * Tempo SlowFadeOut      ( 1); // BassWater
  10.0 +  34 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          39 * 60 * Tempo Plokjes2         ( 1);
          39 * 60 * Tempo SlowFadeOut      ( 2); // Plokjes1
  10.0 +  39 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          41 * 60 * Tempo Intermezzo3      ( 2);
  10.0 +  41 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          42 * 60 * Tempo SlowFadeOut      ( 1); // Plokjes2
  10.0 +  42 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          46 * 60 * Tempo SlowFadeOut      ( 2); // Intermezzo3
          46 * 60 * Tempo Plokjes2         ( 1);
  10.0 +  46 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          47 * 60 * Tempo SlowFadeOut      ( 1); // Plokjes2
);

TestWater;
(
   0 * 60 * Tempo pSilence;
   0 * 60 * Tempo pWaterRunsOverTheWaves;
);

// //////////////////////////////////////////////////////////////////////

pShades; // 44'00
(
           0 * 60 * Tempo Plokjes2     ( 2);
  10.0 +   0 * 60 * Tempo DoSomeSlides( 1 * 30 * Tempo, 10, SlideSwap);
           2 * 60 * Tempo Intermezzo3  ( 1);
  10.0 +   2 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
           5 * 60 * Tempo SlowFadeOut  ( 2); // Plokjes2
  10.0 +   5 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
           6 * 60 * Tempo Intermezzo4  ( 2);
  10.0 +   6 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
           8 * 60 * Tempo SlowFadeOut  ( 1); // Intermezzo3
  10.0 +   8 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
           9 * 60 * Tempo ShadeBass    ( 1);
  10.0 +   9 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          12 * 60 * Tempo SlowFadeOut  ( 2); // Intermezzo4
  10.0 +  12 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          13 * 60 * Tempo ShadeFuzz    ( 2);
  10.0 +  13 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          15 * 60 * Tempo SlowFadeOut  ( 1); // ShadeBass
  10.0 +  15 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          16 * 60 * Tempo ShadeFuzz    ( 1);
  10.0 +  16 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          17 * 60 * Tempo SlowFadeOut  ( 1); // ShadeFuzz
  10.0 +  17 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          18 * 60 * Tempo ShadeMellow  ( 1);
          18 * 60 * Tempo SlowFadeOut  ( 2); // ShadeFuzz
  10.0 +  18 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          20 * 60 * Tempo ShadeBleeps  ( 2);
  10.0 +  20 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          21 * 60 * Tempo SlowFadeOut  ( 1); // ShadeMellow
  10.0 +  21 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          22 * 60 * Tempo ShadeBleeps  ( 1);
  10.0 +  22 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          27 * 60 * Tempo SlowFadeOut  ( 1); // ShadeBleeps
  10.0 +  27 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          28 * 60 * Tempo ShadeShimmers( 1);
  10.0 +  28 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          29 * 60 * Tempo SlowFadeOut  ( 2); // ShadeBleeps
  10.0 +  29 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          35 * 60 * Tempo Intermezzo4  ( 2);
  10.0 +  35 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          39 * 60 * Tempo SlowFadeOut  ( 1); // ShadeShimmers
  10.0 +  39 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          43 * 60 * Tempo SlowFadeOut  ( 2); // Intermezzo4
);

TestShades;
(
  0 * 60 * Tempo pSilence;
  0 * 60 * Tempo pShades;
);

// //////////////////////////////////////////////////////////////////////


pEurope; // 31'00
(
  // If only Europe could weep

           0 * 60 * Tempo EuProlo    ( 1);
  10.0 +   0 * 60 * Tempo DoSomeSlides( 1 * 30 * Tempo, 10, SlideSwap);
           3 * 60 * Tempo EuBang     ( 2);
  10.0 +   3 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
           6 * 60 * Tempo SlowFadeOut( 2); // EuBang
  10.0 +   6 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
           7 * 60 * Tempo EuProlog   ( 2);
  10.0 +   7 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
           9 * 60 * Tempo SlowFadeOut( 1); // EuProlo
  10.0 +   9 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          10 * 60 * Tempo Eu         ( 1);
  10.0 +  10 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          11 * 60 * Tempo SlowFadeOut( 2); // EuProlog
  10.0 +  11 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          12 * 60 * Tempo Eu         ( 2);
  10.0 +  12 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          16 * 60 * Tempo SlowFadeOut( 1); // Eu
  10.0 +  16 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          17 * 60 * Tempo EuTicks    ( 1);
  10.0 +  17 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          18 * 60 * Tempo SlowFadeOut( 2); // Eu
  10.0 +  18 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          23 * 60 * Tempo EuTicks2   ( 2);
  10.0 +  23 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          24 * 60 * Tempo FadeOut    ( 1); // EuTicks
  10.0 +  24 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideSwap);
          25 * 60 * Tempo EuProlo    ( 1);
  10.0 +  26 * 60 * Tempo DoSomeSlides( 1 * 30 * Tempo, 10, SlideSwap);
          27 * 60 * Tempo SlowFadeout( 2); // EuTicks2
  10.0 +  27 * 60 * Tempo DoSomeSlides( 1 * 30 * Tempo, 10, SlideSwap);
          30 * 60 * Tempo SlowFadeOut( 1); // EuProlo
);


TestEurope;
(
  0 * 60 * Tempo pSilence;
  0 * 60 * Tempo pEurope;
);


// //////////////////////////////////////////////////////////////////////

pRestlessSunday; // 61'00
(
           0 * 60 * Tempo Schultze   ( 2);
  10.0 +   0 * 60 * Tempo DoSomeSlides( 1 * 30 * Tempo, 10, SlideUneven_shred_from_centre);
           2 * 60 * Tempo Sunday_1   ( 1);
  10.0 +   2 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
           4 * 60 * Tempo SlowFadeOut( 2); // Schultze
  10.0 +   4 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          14 * 60 * Tempo Sunday_2   ( 2);
          14 * 60 * Tempo SlowFadeOut( 1); // Sunday_1
  10.0 +  14 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          25 * 60 * Tempo qstu       ( 1);
          25 * 60 * Tempo SlowFadeOut( 2); // Sunday_2
  10.0 +  25 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          30 * 60 * Tempo Bluess     ( 2);
  10.0 +  30 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          39 * 60 * Tempo SlowFadeOut( 2); // Bluess
  10.0 +  39 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          40 * 60 * Tempo SlowFadeOut( 1); // qstu
          40 * 60 * Tempo Intermezzo ( 2);
  10.0 +  40 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          43 * 60 * Tempo SlowFadeOut( 2); // Intermezzo
          43 * 60 * Tempo Sadness    ( 1);
  10.0 +  43 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          57 * 60 * Tempo SlowFadeOut( 1); // Sadness
          57 * 60 * Tempo Schultze   ( 2);
  10.0 +  57 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          60 * 60 * Tempo SlowFadeOut( 2); // Schultze
);

TestSunday;
(
  0 * 60 * Tempo pSilence;
  0 * 60 * Tempo pRestlessSunday;
);


// //////////////////////////////////////////////////////////////////////

pNoNaYet; // 31'00
(
           0 * 60 * Tempo NoNaYet_1  ( 1);
  10.0 +   0 * 60 * Tempo DoSomeSlides( 1 * 30 * Tempo, 10, SlideUneven_shred_from_centre);
           1 * 60 * Tempo NoNaYet_4  ( 2);
  10.0 +   1 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
           4 * 60 * Tempo SlowFadeOut( 2); // NoNaYet_4
  10.0 +   4 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
           5 * 60 * Tempo NoNaYet_2  ( 2);
           5 * 60 * Tempo SlowFadeOut( 1); // NoNaYet_1
  10.0 +   5 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          10 * 60 * Tempo SlowFadeOut( 2); // NoNaYet_2
          10 * 60 * Tempo NoNaYet_3  ( 1);
  10.0 +  10 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          11 * 60 * Tempo NoNaYet_4  ( 2);
  10.0 +  11 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          13 * 60 * Tempo SlowFadeOut( 2); // NoNaYet_4
  10.0 +  13 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          15 * 60 * Tempo NoNaYet_2  ( 2);
  10.0 +  15 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          20 * 60 * Tempo SlowFadeOut( 2); // NoNaYet_2
  10.0 +  20 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          21 * 60 * Tempo NoNaYet_5  ( 2);
  10.0 +  21 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          25 * 60 * Tempo SlowFadeOut( 1); // NoNaYet_3
  10.0 +  25 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          26 * 60 * Tempo NoNaYet_4  ( 1);
  10.0 +  26 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          29 * 60 * Tempo SlowFadeOut( 1); // NoNaYet_4
  10.0 +  29 * 60 * Tempo DoSomeSlides( 1 * 15 * Tempo, 3, SlideUneven_shred_from_centre);
          30 * 60 * Tempo SlowFadeOut( 2); // NoNaYet_5
);

TestNoNaYet;
(
  0 * 60 * Tempo pSilence;
  0 * 60 * Tempo pNoNaYet;
);


// //////////////////////////////////////////////////////////////////////
// //////////////////////////////////////////////////////////////////////
// //////////////////////////////////////////////////////////////////////
// the piece ////////////////////////////////////////////////////////////


PlayPiece;
(
   0 * 60 * Tempo SequenceSlides;
   0 * 60 * Tempo pSilence;               //   0:00 -  0:00 -   0:00 -  0:00
   0 * 60 * Tempo pNoNaYet;               //   0:00 - 31:00 -  31:00 - 30:00
  30 * 60 * Tempo pBluess;                //  30:00 - 45:20 -  75:20 - 45:00
  75 * 60 * Tempo pFortune;               //  75:00 - 60:20 - 135:20 - 59:00
 134 * 60 * Tempo pSadness;               // 134:00 - 25:20 - 159:20 - 21:00
 155 * 60 * Tempo pElection;              // 155:00 - 55:20 - 210:20 - 55:00
 210 * 60 * Tempo pWaterRunsOverTheWaves; // 210:00 - 48:00 - 258:00 - 43:00
 257 * 60 * Tempo pShades;                // 257:00 - 44:00 - 301:00 - 43:00
 300 * 60 * Tempo pEurope;                // 300:00 - 31:00 - 331:00 - 30:00
 330 * 60 * Tempo pRestlessSunday;        // 330:00 - 61:00 - 391:00 - 60:00
 390 * 60 * Tempo pNoNaYet;               // 390:00 - 31:00 - 421:00
);


// //////////////////////////////////////////////////////////////////////

// 0 * 60 * Tempo TestSlides;
// 0 * 60 * Tempo TestBluess;
// 0 * 60 * Tempo TestFortune;
// 0 * 60 * Tempo TestSadness;
// 0 * 60 * Tempo TestElection;
// 0 * 60 * Tempo TestWater;
// 0 * 60 * Tempo TestEurope;
// 0 * 60 * Tempo TestSunday;
// 0 * 60 * Tempo TestNoNaYet;

0 PlayPiece; // Do it all, now.