Documentation/snippets/creating-a-sequence-of-notes-on-various-pitches.ly

   1 % DO NOT EDIT this file manually; it is automatically
   2 % generated from Documentation/snippets/new
   3 % Make any changes in Documentation/snippets/new/
   4 % and then run scripts/auxiliar/makelsr.py
   5 %
   6 % This file is in the public domain.
   7 %% Note: this file works from version 2.15.27
   8 \version "2.15.27"
   9
  10 \header {
  11 %% Translation of GIT committish: b482c3e5b56c3841a88d957e0ca12964bd3e64fa
  12   texidoces = "
  13 En una música que tenga muchas apariciones de la
  14 misma secuencia de notas a distintas alturas, podría ser de
  15 utilidad la siguiente función musical.  Admite una nota, de la que
  16 sólo se utiliza su altura.  Las funciones de apoyo en Scheme se
  17 han tomado prestadas del documento de \"Consejos y trucos\" de la
  18 versión 2.10 del manual.  Este ejemplo crea las duraciones
  19 rítmicas que se usan a todo lo largo de «Marte», de «Los Planetas»
  20 de Gustav Holst.
  21
  22 "
  23   doctitlees = "Crear una secuencia de notas a distintas alturas"
  24
  25 %% Translation of GIT committish: f5cfaf8ef4ac347702f554af0944ef0d8396e73a
  26   texidocfr = "
  27 Lorsque la musique comporte à de nombreuses reprises une même séquence
  28 sur des hauteurs différentes, la fonction musicale ci-dessous peut
  29 s'avérer fort utile.  Elle considère une note dont seule la hauteur est
  30 utilisée.  Cet exemple reproduit le rythme utilisé tout au long de
  31 @qq{Mars}, l'une des pièces de l'œuvre de Gustav Holst @qq{Les planètes}.
  32
  33 "
  34   doctitlefr = "Création d'une séquence de notes de même hauteur"
  35
  36   lsrtags = "pitches"
  37
  38   texidoc = "
  39 In music that contains many occurrences of the same sequence of notes
  40 at different pitches, the following music function may prove useful.
  41 It takes a note, of which only the pitch is used.   This example
  42 creates the rhythm used throughout Mars, from Gustav Holst's The
  43 Planets.
  44
  45 "
  46   doctitle = "Creating a sequence of notes on various pitches"
  47 } % begin verbatim
  48
  49
  50 rhythm =
  51 #(define-music-function (parser location p) (ly:pitch?)
  52    "Make the rhythm in Mars (the Planets) at the given pitch"
  53   #{ \times 2/3 { $p 8 $p $p } $p 4 $p $p 8 $p $p 4 #})
  54
  55 \new Staff {
  56   \time 5/4
  57   \rhythm c'
  58   \rhythm c''
  59   \rhythm g
  60 }