git.cworth.org Git - scherzo/blob - score.c

   1 /* scherzo - Music notation training
   2  *
   3  *      score - Utilities for drawing (simple) musical scores
   4  *
   5  * Copyright © 2010 Carl Worth
   6  *
   7  * This program is free software: you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation, either version 3 of the License, or
  10  * (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program.  If not, see http://www.gnu.org/licenses/ .
  19  */
  20
  21 #include "score.h"
  22
  23 struct score
  24 {
  25     /* Height of a single staff */
  26     int staff_height;
  27
  28     /* Height of one space within a staff */
  29     int space_height;
  30
  31     /* Full width of staff */
  32     int width;
  33 };
  34
  35 void
  36 score_init (score_t *score)
  37 {
  38     score_set_staff_height (score, 24);
  39 }
  40
  41 int
  42 score_set_staff_height (score_t *score, int height)
  43 {
  44     score->space_height = (int) height / 4;
  45     score->staff_height = score->space_height * 4;
  46     return score->staff_height;
  47 }
  48
  49 void
  50 score_set_width (score_t *score, int width)
  51 {
  52     score->width = width;
  53 }
  54
  55 static void
  56 _draw_staff (score_t *score, cairo_t *cr)
  57 {
  58     int i;
  59
  60     cairo_save (cr);
  61
  62     cairo_rectangle (cr,
  63                      0.5, 0.5,
  64                      score->width - 1.0, score->space_height * 4);
  65
  66     for (i = 1; i < 4; i++) {
  67         cairo_move_to (cr, 0, i * score->space_height + 0.5);
  68         cairo_rel_line_to (cr, score->width, 0);
  69     }
  70
  71     cairo_set_line_width (cr, 1.0);
  72
  73     cairo_set_source_rgb (cr, 0.0, 0.0, 0.0); /* black */
  74     cairo_stroke (cr);
  75
  76     cairo_restore (cr);
  77 }
  78
  79 static void
  80 _draw_grand_staff (score_t *score, cairo_t *cr)
  81 {
  82     cairo_save (cr);
  83
  84     /* Vertical lines at each end */
  85     cairo_rectangle (cr,
  86                      0.5, 0.5,
  87                      score->width - 1.0,
  88                      score->staff_height * 3);
  89     cairo_set_source_rgb (cr, 0.0, 0.0, 0.0);
  90     cairo_set_line_width (cr, 1.0);
  91     cairo_stroke (cr);
  92
  93     /* Top staff */
  94     _draw_staff (score, cr);
  95
  96     /* Bottom staff */
  97     cairo_translate (cr, 0, score->staff_height * 2);
  98     _draw_staff (score, cr);
  99
 100     cairo_restore (cr);
 101 }
 102
 103 void
 104 score_draw (score_t *score, cairo_t *cr)
 105 {
 106     _draw_grand_staff (score, cr);
 107 }