]> Git — Sourcephile - tmp/julm/arpeggigon.git/blob - src/RMCA/Translator/Instruments.hs
Implementing instrument change.
[tmp/julm/arpeggigon.git] / src / RMCA / Translator / Instruments.hs
1 module RMCA.Translator.Instruments where
2
3 instrumentList :: [(Int, String)]
4 instrumentList = [ (0,"AcousticGrandPiano")
5 , (1,"BrightAcousticPiano")
6 , (2,"ElectricGrandPiano")
7 , (3,"Honky-tonkPiano")
8 , (4,"ElectricPiano1")
9 , (5,"ElectricPiano2")
10 , (6,"Harpsichord")
11 , (7,"Clavinet")
12 , (8,"Celesta")
13 , (9,"Glockenspiel")
14 , (10,"MusicBox")
15 , (11,"Vibraphone")
16 , (12,"Marimba")
17 , (13,"Xylophone")
18 , (14,"TubularBells")
19 , (15,"Dulcimer")
20 , (16,"DrawbarOrgan")
21 , (17,"PercussiveOrgan")
22 , (18,"RockOrgan")
23 , (19,"ChurchOrgan")
24 , (20,"ReedOrgan")
25 , (21,"Accordion")
26 , (22,"Harmonica")
27 , (23,"TangoAccordion")
28 , (24,"AcousticGuitar(nylon)")
29 , (25,"AcousticGuitar(steel)")
30 , (26,"ElectricGuitar(jazz)")
31 , (27,"ElectricGuitar(clean)")
32 , (28,"ElectricGuitar(muted)")
33 , (29,"OverdrivenGuitar")
34 , (30,"DistortionGuitar")
35 , (31,"GuitarHarmonics")
36 , (32,"AcousticBass")
37 , (33,"ElectricBass(finger)")
38 , (34,"ElectricBass(pick)")
39 , (35,"FretlessBass")
40 , (36,"SlapBass1")
41 , (37,"SlapBass2")
42 , (38,"SynthBass1")
43 , (39,"SynthBass2")
44 , (40,"Violin")
45 , (41,"Viola")
46 , (42,"Cello")
47 , (43,"Contrabass")
48 , (44,"TremoloStrings")
49 , (45,"PizzicatoStrings")
50 , (46,"OrchestralHarp")
51 , (47,"Timpani")
52 , (48,"StringEnsemble1")
53 , (49,"StringEnsemble2")
54 , (50,"SynthStrings1")
55 , (51,"SynthStrings2")
56 , (52,"ChoirAahs")
57 , (53,"VoiceOohs")
58 , (54,"SynthChoir")
59 , (55,"OrchestraHit")
60 , (56,"Trumpet")
61 , (57,"Trombone")
62 , (58,"Tuba")
63 , (59,"MutedTrumpet")
64 , (60,"FrenchHorn")
65 , (61,"BrassSection")
66 , (62,"SynthBrass1")
67 , (63,"SynthBrass2")
68 , (64,"SopranoSax")
69 , (65,"AltoSax")
70 , (66,"TenorSax")
71 , (67,"BaritoneSax")
72 , (68,"Oboe")
73 , (69,"EnglishHorn")
74 , (70,"Bassoon")
75 , (71,"Clarinet")
76 , (72,"Piccolo")
77 , (73,"Flute")
78 , (74,"Recorder")
79 , (75,"PanFlute")
80 , (76,"Blownbottle")
81 , (77,"Shakuhachi")
82 , (78,"Whistle")
83 , (79,"Ocarina")
84 , (80,"Lead1(square)")
85 , (81,"Lead2(sawtooth)")
86 , (82,"Lead3(calliope)")
87 , (83,"Lead4(chiff)")
88 , (84,"Lead5(charang)")
89 , (85,"Lead6(voice)")
90 , (86,"Lead7(fifths)")
91 , (87,"Lead8(bass+lead)")
92 , (88,"Pad1(newage)")
93 , (89,"Pad2(warm[disambiguationneeded])")
94 , (90,"Pad3(polysynth)")
95 , (91,"Pad4(choir)")
96 , (92,"Pad5(bowed)")
97 , (93,"Pad6(metallic)")
98 , (94,"Pad7(halo)")
99 , (95,"Pad8(sweep)")
100 , (96,"FX1(rain)")
101 , (97,"FX2(soundtrack)")
102 , (98,"FX3(crystal)")
103 , (99,"FX4(atmosphere)")
104 , (100,"FX5(brightness)")
105 , (101,"FX6(goblins)")
106 , (102,"FX7(echoes)")
107 , (103,"FX8(sci-fi)")
108 , (104,"Sitar")
109 , (105,"Banjo")
110 , (106,"Shamisen")
111 , (107,"Koto")
112 , (108,"Kalimba")
113 , (109,"Bagpipe")
114 , (110,"Fiddle")
115 , (111,"Shanai")
116 , (112,"TinkleBell")
117 , (113,"Agogo")
118 , (114,"SteelDrums")
119 , (115,"Woodblock")
120 , (116,"TaikoDrum")
121 , (117,"MelodicTom")
122 , (118,"SynthDrum")
123 , (119,"ReverseCymbal")
124 , (120,"GuitarFretNoise")
125 , (121,"BreathNoise")
126 , (122,"Seashore")
127 , (123,"BirdTweet")
128 , (124,"TelephoneRing")
129 , (125,"Helicopter")
130 , (126,"Applause")
131 , (127,"Gunshot")
132 ]