musiccutter: test.mup annotate

annotate test.mup @ 38:9e8ed92b477c

Re-jig note translation to only happen when we are going to emit a note. This fixes "note_off with no note_on" cases (iWriteMusic likes to emit these for rests). This means some messages have untransposed notes but we draw the line because they only have to be transposed because of limitations in the organ so before that they are are untransposed (except for the bulk adjustment)

author	Daniel O'Connor <darius@dons.net.au>
date	Mon, 23 May 2016 22:35:44 +0930
parents	b9727813e029
children

rev	line source
0 0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	1 header
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	2 title(22) "Test"
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	3
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	4 score
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	5 scale = 0.75
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	6 packfact = 0.5
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	7 units = cm
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	8 // pageheight = 29.7
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	9 // pagewidth = 21
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	10 topmargin = 1
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	11 botmargin = 1
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	12 leftmargin = 1
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	13 rightmargin = 1
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	14 measnum = y
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	15 staffs = 1
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	16
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	17 music
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	18
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	19 // Put each voice on a different channel
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	20 // using a different instrument sound.
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	21 // The program numbers correspond to the
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	22 // General MIDI sounds as noted.
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	23 midi 1 1: 0 "channel=1"; 0 "program=1"; 0 "parameter=10,0";
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	24
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	25 // Bar 1
10 b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	26 1 1: 1a;
0 0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	27 endbar
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	28
0773354c7428 Initial commit, WIP. Daniel O'Connor <darius@dons.net.au> parents: diff changeset	29 // Bar 2
10 b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	30 1 1: 1b;
2 b1aac55d2864 Parameterise page size add some more debugging. Daniel O'Connor <darius@dons.net.au> parents: 0 diff changeset	31 endbar
b1aac55d2864 Parameterise page size add some more debugging. Daniel O'Connor <darius@dons.net.au> parents: 0 diff changeset	32
b1aac55d2864 Parameterise page size add some more debugging. Daniel O'Connor <darius@dons.net.au> parents: 0 diff changeset	33 // Bar 3
10 b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	34 1 1: 1c;
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	35 endbar
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	36
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	37 // Bar 4
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	38 1 1: 1d;
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	39 endbar
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	40
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	41 // Bar 5
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	42 1 1: 1e;
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	43 endbar
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	44
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	45 // Bar 6
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	46 1 1: 1f;
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	47 endbar
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	48
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	49 // Bar 7
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	50 1 1: 1g;
2 b1aac55d2864 Parameterise page size add some more debugging. Daniel O'Connor <darius@dons.net.au> parents: 0 diff changeset	51 endbar
10 b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	52
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	53 // Bar 8
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	54 1 1: 1a-;
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	55 endbar
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	56
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	57 // Bar 9
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	58 1 1: 1b-;
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	59 endbar
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	60
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	61 // Bar 10
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	62 1 1: 1c+;
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	63 endbar
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	64
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	65 // Bar 11
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	66 1 1: 1d+;
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	67 endbar
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	68
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	69 // Bar 12
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	70 1 1: 1e;
b9727813e029 add more notes to generate >1 page Daniel O'Connor <darius@dons.net.au> parents: 2 diff changeset	71 endbar

Mercurial > ~darius > hgwebdir.cgi > musiccutter

annotate test.mup @ 38:9e8ed92b477c