input/rhythm.ly

   1 \header{
   2 filename =       "rhythm.ly";
   3 enteredby =      "HWN";
   4 copyright =      "public domain";
   5 TestedFeatures =         "multiple meters, beaming, unsynced bars, userdefd engravers";
   6 }
   7
   8
   9
  10 \version "1.0.2";
  11
  12 ritme = \melodic\transpose c'' {
  13         \partial 8;
  14
  15         \time  4/4;
  16         c8                                      |
  17
  18         [a8~  a8. a8 a16 a16 a16] c4.           |       % watch the beams!
  19          r32 r32 r16 r8 r4 r2                   |
  20         \time   5/16;
  21
  22         % divide measure in 5 equal parts. Usually it 2+3 or 3+2
  23         \grouping  16*5 ;
  24         [c8 c16 c8 ]                            |       % watch THIS!
  25          [5/4 c16 c16 c16 c16]1/1 |
  26         \time   2/8;
  27         c4                              |
  28         c4      c4      c4      c4
  29         \time 4/4;
  30         c1 c1 c1
  31
  32 %       [c16 c16 c16 c16 ]                      |
  33 %       [c16 c16 c16 c16 c16 ]                  |
  34 %       [c16 c16 c16 c16 c16 ]                  |
  35
  36          }
  37
  38
  39 another =
  40         \melodic{ \time 4/4;
  41                 c1.  c1. c4 c4 c4 c4  \time  4/4; c1 c1 c1
  42          }
  43
  44
  45 yanother =
  46         \melodic{ \time 4/4;
  47                 c1 c1 c1 c4 c4 c4 c4  c1 c1 c1
  48          }
  49
  50
  51 \score{
  52         \type StaffGroup <
  53                 \ritme
  54                 \another
  55                 \type RhythmicStaff {
  56                         \yanother
  57                 }
  58         >
  59
  60         \paper{
  61
  62         %% remove Timing_engraver and Bar_number_engraver
  63         Score = \translator {
  64         \type Score_engraver;
  65
  66         %\consists "Timing_engraver";
  67
  68         \consists "Span_score_bar_engraver";
  69         \consists "Score_priority_engraver";
  70         \consists "Priority_horizontal_align_engraver";
  71         \consists "Vertical_align_engraver";
  72
  73
  74         \accepts "StaffGroup";
  75         \accepts "Staff";
  76         \accepts "Lyrics";
  77         \accepts "GrandStaff";
  78 }
  79
  80 RhythmicStaff = \translator
  81 {
  82           \type "Engraver_group_engraver";
  83         nolines  = "1";
  84           \consists "Pitch_squash_engraver";
  85
  86         \consists "Bar_column_engraver";
  87         \consists "Bar_number_engraver";
  88           \consists "Bar_engraver";
  89           \consists "Meter_engraver";
  90           \consists "Staff_sym_engraver";
  91           \consists "Line_group_engraver";
  92           \consists "Timing_engraver";
  93           \accepts "Voice";
  94 }
  95         %% add Timing_engraver to the staff
  96         Staff = \translator {
  97           \type "Engraver_group_engraver";
  98         defaultclef=    violin;
  99
 100         \consists "Bar_column_engraver";
 101         \consists "Bar_number_engraver";
 102         \consists "Timing_engraver";
 103           \consists "Bar_engraver";
 104           \consists "Clef_engraver";
 105           \consists "Key_engraver";
 106           \consists "Meter_engraver";
 107           \consists "Local_key_engraver";
 108           \consists "Staff_sym_engraver";
 109           \consists "Collision_engraver";
 110           \consists "Rest_collision_engraver";
 111
 112           \consists "Line_group_engraver";
 113           \accepts "Voice";
 114         }
 115         }
 116 }