Begin Comment

   File: waltz

   Note: These all need some help. They tend to sound a bit heavy, but
   	that could be just my ears thinking that waltzes sound that way.
   	
   Defines: VieneseWaltz    Basic 3/4 with strings and piano
            VieneseWaltz1   Same with 8th note apreggios
            Waltz           Pretty standard stuff
            Waltz1          Added strings
            FrenchWaltz     Accordion umm-paa
            FrenchWaltzEnd  A scale with the strings
            FrenchWaltz1    Same, with added apreggios
            FrenchWaltz1End Ending with scales

   Author: Bob van der Poel
   
End


Time 3		// All are 3/4 time

/////////////////////////////////////////////////
// Do all defines first


Begin Bass Define
	B1	1 4 0 90 @	// Root on beat 1
	B2	1 4 2 90 @	// 5th on beat 1
	Bwalk	1 4 0 90 ; 2 4 1 90; 3 4 2 90 @
End

Begin Chord Define
	C1	1 4 80 @
	C2      C1 Shift 1
	C3      C2 Shift 1
	C23     C2; C3 @
	C123    C1; C23 @
End

Begin Arpeggio Define
	 Ar1	1  2+4 90 @
	 Ar3	Ar1 * 3
	 Ar6 	Ar1 * 6
	 Ar12   Ar1 * 12
End

Begin Drum Define
	D1      1 0 90 @
	D2      D1 Shift 1
	D3      D2 Shift 1
	D23     D2; D3 @
	D123    D1 ; D23 @
	D1'	D1 Shift .5
	D1'23   D1'; D23 @
End

Begin Scale Define
	S1  1 1 90 @
	S6  S1 * 6
	S12 S1 * 12
End

//////////////////////////////////////////////////
//   VieneseWaltz
//   Sustained strings and a 1-23 piano.

SeqClear
SeqSize 2

Begin Chord
	Sequence	C123
	Articulate 99
	Invert 0 2
	Octave 5
	Voice Strings
	Volume mp
End

Begin Chord1
	Sequence	C23
	Invert 1 0
	Voice Piano2
	Articulate 95
	RVolume 10
	Octave 5
End

Begin Bass
	Sequence	B1	B2
	Voice Piano2
	Octave 3
	Articulate 90
	Volume ff
End


Begin Drum
	Sequence	D1
	Tone  KickDrum1
	Rvolume 20
	Rtime 4
End

Begin Drum1
	 Sequence	D2
	 Tone RideCymbal1
	 Rvolume 10
	 Volume mp
	 Rtime 3
End

Begin Drum2
	Sequence	D23
	Tone ClosedHiHat
	Rvolume 10
	Volume mp
	Rtime 2
	Rskip 20
End


DefGroove VieneseWaltz


//////////////////////////////////////////////////
///   VieneseWaltz1  - Same as above, but with arp musicbox

SeqSize 4

Chord1 Sequence -		// Kill piano

// Set up a musicbox to arpeggiate on 3 bars and a scale on the 4th
// Ar6 and S6 are both 3 pairs of 1/8 notes.

Begin Arpeggio
	Sequence 	Ar6 / / Z 
	Invert 0 1
	Articulate 99
	Volume mf
	Octave 5
	Rskip 20
	Rvolume 20
	Voice  MusicBox
End

Begin Scale
	Sequence 	z / / S6 
	Articulate 99
	Volume mf
	Octave 5
	Rskip 5
	Rvolume 20
	Voice  MusicBox
End

DefGroove VieneseWaltz1


//////////////////////////////////////
/////   Waltz        - plain, dull (and a bit heavy sounding), 3/4

SeqClear
SeqSize 4

Begin Drum
	Sequence	D1	/	/	/
	Tone ClosedHiHat
End

Begin Drum1
	Sequence	D1	/	/	/
	Tone KickDrum1
	Volume mp
	Rskip 10
	Rvolume 10
	Rtime 3
End

Begin Drum2
	Sequence 	D23	/	/	D1'23
	Tone SnareDrum1
	Volume p
	Rskip 2
	Rvolume 20
	Rtime 2
End

Begin Drum3
	Sequence	D1	z	z	z
	Tone OpenHiHat
	Rskip 10
	Rvolume 10
	Rtime 2
End

Begin Chord
	Sequence	C1	/	/	/
	Voice Piano1
	Octave 4
End

Begin Chord1
	Sequence	z	z	z	C23
	Voice Piano1
	Articulate 99
	Rskip 10
	Strum 10
	Octave 4
End

Begin Arpeggio
	Sequence	z	Ar6	/	/
	Voice Piano1 
	Octave 4
	Rskip 10
	Invert 0 1 2 1
	Volume mp
	Articulate 99
End

Begin Scale
	Sequence	S6	z	z	z 
	Voice  Piano1
	Octave 4
	Volume mp
	Articulate 99
End

Begin Bass
	Sequence	B1	B2	B1	B2
	Voice AcousticBass
	Octave 		4	3	3	4
	Articulate 70
	Volume mf
End

DefGroove Waltz

//////////////////////////////////////////////
/////   Waltz1       - variation of above with sustained strings


Begin Chord
	Sequence	C123
	Voice TremoloStrings
	Octave 5
	SeqRnd
	Volume  p
	Rvolume 5
	Rskip 5		// Remember, this skips notes, not chords
	Invert	0 1 0  -1
End

Drum1	Sequence	-
Drum2	Sequence	D23
Chord1	Sequence	-

DefGroove Waltz1


//////////////////////////////////////////////
/////   FrenchWaltz	Cheezy 3/4 with accordion

SeqClear
SeqSize 8

// Block chords on 1, 2, and 3. Skip on 4th bar since we
// have the bass walk there.

Begin Chord
	Sequence	C23    /    /    C2    C23  /     /    C2
	Voice     Accordion  
	Articulate      80     /    /    99    80   /     /    99
	Invert          0      1    2    3     3    2     1     0
	Volume mf
	Octave 4
End

// The bass/walk is a bass note (alternating) on beat1,
// and a little walk on the 8th bar.


Begin Bass
	Sequence	B1 / / / / / / Bwalk
	Voice Accordion
	Articulate 70
	Volume mf
	Octave 4
End

Begin Chord1
	Sequence C123
	Invert 0 1 2 0
	SeqRnd
	Voice Strings
	Octave 5
	Volume p
	Articulate 90
End

Begin Drum
	Sequence	D1
	Tone  CowBell
	Rvolume 10
End

Begin Drum1
	Sequence	D23
	Tone Tambourine
	Rvolume 10
End

Begin Drum2
	Sequence	D1
	Tone OpenTriangle
	Rskip 50
	Rvolume 30
End

DefGroove FrenchWaltz

/////////////////////////////////////////
/// FrenchWaltzEnd

Groove FrenchWaltz

Chord1 Sequence -
Begin Scale
	SeqClear
	Sequence S12  S6
	Voice Strings
	Octave 5
	Articulate 99
End

DefGroove FrenchWaltzEnd

////////////////////////////////////////////////////
// Alternate adds a light 1/8th and 1/4 note aprs 

//// FrenchWaltz1

Groove FrenchWaltz

Chord Sequence C123

Chord1 Sequence -

Begin Arpeggio
	Sequence	Ar6	Ar6	Ar12	Ar3
	SeqRnd
	Articulate 70
	Voice Accordion
	Octave 6
	Rvolume 10
	Rskip		5	5	30	1
	Rtime 2
End

DefGroove FrenchWaltz1

////////////////////////////////////
// FrenchWaltz1End

Arpeggio Sequence -

Chord Sequence C123

Begin Scale
	SeqClear
	Sequence S12  S6
	Voice Accordion
	Octave 5
	Articulate 99
End

DefGroove FrenchWaltz1End


