LA BATERÍA MIDI TÁCTIL

Este proyecto, consistió en el armado casero de una batería musical que trabaje con señales MIDI, utilizando una placa Arduino Pro Micro.

La batería está compuesta por ocho parches, un botón de reinicio, cuatro potenciometros y dos enradas para fichas tipo 'plug' para la conexión de pedales.

Todo el equipo fue montado en una caja de fibro-fácil pintada con pintura acrílica de color negro mate.

En este caso, se optó por utilizar unos círculos de cobre como parches, que conectados a las entradas digitales del Arduino, y con la ayuda de una biblioteca de software adecuada, permiten detectar si son tocadas por un dedo. Esto brinda una interfaz usuario-instrumento muy simple y agradable.

Este enfoque presenta ciertas características favorables y otras desfavorables, al comparar al instrumento diseñado respecto de una batería musical real:

Las ventajas de utilizar estos sensores son las siguientes:
- Son de bajo costo
- El funcionamiento es muy estable
- Son mucho más silencioso que cualquier otra forma de percusión
- El instrumento puede implementarse en un formato bien compacto
Entre las desventajas podría citarse:
- Al tocar el instrumento la sensación es diferente de la de utilizar una batería normal, ya que se utilizan las yemas de los dedos en lugar de baquetas.

La siguiente figura muestra un esquema de las conexiones efectuadas:

En lo que respecta a la salida MIDI, existen dos formas de encarar el tema.
Una de ellas es implementar una interfaz MIDI estándar, con conectores tipo DIN de cinco pines, que brinda la ventaja de poder conectar la batería a cualquier otro dispositivo MIDI de forma sencilla.
En este caso, se optó por la otra alternativa, que es enviar la señal MIDI a través del puerto microUSB del ArduinoProMicro, y utilizar la batería en conjunto con un ordenador y un programa específico que permita interpretar la señal del puerto serie USB y generar el sonido.


El código utilizado para programar el Arduino es el siguiente:

#line 1 'BateriaMIDItactil.ino' #include <CapacitiveSensor.h> #define COMMON_PIN 2 #define CAP_THRESHOLD 150 //era 80 #define NUM_OF_SAMPLES 10 // era 5 #define CS(Y) CapacitiveSensor(2, Y) #define primerInstrumento 13 #define _13_TaikoDrum 13 #define _14_TaikoDrum 14 #define _15_FilterSnap 15 #define _16_NoiseSlap 16 #define _17_ScratchHi 17 #define _18_ScratchHi 18 #define _21_MetClick1 21 #define _22_MetClick2 22 #define _23_MetClick2 23 #define _24_MetClick2 24 #define _25_OrchSnare 25 #define _26_BrushSwirl 26 #define _27_FilterSnap 27 #define _28_NoiseSlap 28 #define _29_ScratchLo 29 #define _30_ScratchHi 30 #define _31_Sticks 31 #define _32_Sinetick 32 #define _33_MetClick1 33 #define _34_MetClick2 34 // 35 a 81 es General MIDI #define _35_BassDrum2 35 #define _36_BassDrum1 36 #define _37_SideStick-Rimshot 37 #define _38_SnareDrum1 38 #define _39_HandClap 39 #define _40_SnareDrum2 40 #define _41_LowTom2 41 #define _42_ClosedHiHat 42 #define _43_LowTom1 43 #define _44_ClosedHiHat 44 #define _45_MidTom2 45 #define _46_OpenHiHat 46 #define _47_MidTom1 47 #define _48_LowMidTom 48 #define _49_CrashCymbal1 49 #define _50_HighTom1 50 #define _51_RideCymbal1 51 #define _52_ChineseCymbal 52 #define _53_RideBell 53 #define _54_Tambourine 54 #define _55_SplashCymbal 55 #define _56_CowBell 56 #define _57_CrashCymbal2 57 #define _58_VibraSlap 58 #define _59_RideCymbal2 59 #define _60_HighBongo 60 #define _61_LowBongo 61 #define _62_MuteHighConga 62 #define _63_OpenHighConga 63 #define _64_LowConga 64 #define _65_HighTimbale 65 #define _66_LowTimbale 66 #define _67_HighAgogo 67 #define _68_LowAgogo 68 #define _69_Cabasa 69 #define _70_Maracas 70 #define _71_ShortWhistle 71 #define _72_ShortWhistle 72 #define _73_ShortGuiro 73 #define _74_LongGuiro 74 #define _75_Claves 75 #define _76_HighWoodBlock 76 #define _77_LowWoodblock 77 #define _78_MuteCuica 78 #define _79_OpenCuica 79 #define _80_MuteTriangle 80 #define _81_OpenTriangle 81 // 35 a 81 es General MIDI #define _82_SmallShaker 82 #define _83_SleighBells 83 #define _84_BellTree 84 #define _85_Castanet 85 #define ultimoInstrumento 85 uint8_t parche[10]; int valorPotenciometro[4]; int valorAnteriorPotenciometro[4]; int parcheAlterado[3]; int pedalExpresion; int expresion; int bombo; CapacitiveSensor keys[] = {CS(3), CS(4), CS(5), CS(6), CS(7), CS(8), CS(9), CS(10)}; int t[10]; int retardo; int enContacto[10]; int preset; void setup() { for(int i=0; i<10; ++i) { t[i] = 0; enContacto[i] = 0; keys[i].set_CS_AutocaL_Millis(0xFFFFFFFF); } // ASIGNACIÓN DE LOS INSTRUMENTOS POR DEFECTO PARA CADA PARCHE parche[0] = _35_BassDrum2; parche[1] = _57_CrashCymbal2; parche[2] = _43_LowTom1; parche[3] = _41_LowTom2; parche[4] = _42_ClosedHiHat; parche[5] = _47_MidTom1; parche[6] = _40_SnareDrum2; parche[7] = _51_RideCymbal1; parche[8] = _35_BassDrum2; parche[9] = _35_BassDrum2; parcheAlterado[0] = parche[1]; parcheAlterado[1] = parche[4]; parcheAlterado[2] = parche[7]; valorPotenciometro[0] = 0; valorPotenciometro[1] = 0; valorPotenciometro[2] = 0; Serial.begin(57600); for (uint8_t i=0; i<16; i++) { enviarMensajeMIDI(176+i,123,0); } retardo = 30; preset = 0; cambiarPresetMIDI(preset); noteOn(22,90); noteOff(22,90); expresion = 0; bombo = 0; pinMode(14,INPUT); pinMode(15,INPUT); pedalExpresion = 0; if ( digitalRead(14) == LOW ) { pedalExpresion = 1; } // SELECTOR DE LA CONFIGURACIÓN DEL PEDAL DE BOMBO IZQUIERDO valorPotenciometro[3] = analogRead(3)/10; if (valorPotenciometro[3]>0 && valorPotenciometro[3]<10) { parche[9] = _35_BassDrum2; } if (valorPotenciometro[3]>10 && valorPotenciometro[3]<20) { parche[9] = _42_ClosedHiHat; } if (valorPotenciometro[3]>20 && valorPotenciometro[3]<30) { parche[9] = _51_RideCymbal1; } if (valorPotenciometro[3]>30 && valorPotenciometro[3]<40) { parche[9] = _46_OpenHiHat; } if (valorPotenciometro[3]>40 && valorPotenciometro[3]<50) { parche[9] = _54_Tambourine; } if (valorPotenciometro[3]>50 && valorPotenciometro[3]<60) { parche[9] = _56_CowBell; } if (valorPotenciometro[3]>60 && valorPotenciometro[3]<70) { parche[9] = _53_RideBell; } if (valorPotenciometro[3]>70 && valorPotenciometro[3]<80) { parche[9] = _39_HandClap; } if (valorPotenciometro[3]>80 && valorPotenciometro[3]<90) { parche[9] = _70_Maracas; } if (valorPotenciometro[3]>90 && valorPotenciometro[3]<100){ parche[9] = _55_SplashCymbal; } // SELECTOR DE LA CONFIGURACIÓN DEL PEDAL DE BOMBO DERECHO valorPotenciometro[1] = analogRead(1)/10; if (valorPotenciometro[1]>0 && valorPotenciometro[1]<10) { parche[8] = _35_BassDrum2; } if (valorPotenciometro[1]>10 && valorPotenciometro[1]<20) { parche[8] = _42_ClosedHiHat; } if (valorPotenciometro[1]>20 && valorPotenciometro[1]<30) { parche[8] = _51_RideCymbal1; } if (valorPotenciometro[1]>30 && valorPotenciometro[1]<40) { parche[8] = _46_OpenHiHat; } if (valorPotenciometro[1]>40 && valorPotenciometro[1]<50) { parche[8] = _54_Tambourine; if (valorPotenciometro[1]>50 && valorPotenciometro[1]<60) { parche[8] = _56_CowBell; } if (valorPotenciometro[1]>60 && valorPotenciometro[1]<70) { parche[8] = _53_RideBell; } if (valorPotenciometro[1]>70 && valorPotenciometro[1]<80) { parche[8] = _39_HandClap; } if (valorPotenciometro[1]>80 && valorPotenciometro[1]<90) { parche[8] = _70_Maracas; } if (valorPotenciometro[1]>90 && valorPotenciometro[1]<100){ parche[8] = _55_SplashCymbal; } }} void noteOn(unsigned char nota, unsigned char velocidad) { if (pedalExpresion==1) { if ( digitalRead(14) == HIGH ) { velocidad = 60; enviarMensajeMIDI(0x99, nota, velocidad); } else { velocidad = 118; enviarMensajeMIDI(0x99, nota, velocidad); } } else { velocidad = 118; enviarMensajeMIDI(0x99, nota, velocidad); } } void noteOff(unsigned char nota, unsigned char velocidad) { enviarMensajeMIDI(0x89, nota, velocidad); } void enviarMensajeMIDI(unsigned char comando, unsigned char dato1, unsigned char dato2) { Serial.write(comando); Serial.write(dato1); Serial.write(dato2); } void cambiarPresetMIDI(unsigned char preset) { Serial.write(201); Serial.write(preset); } void loop(){ // SELECTOR DE LA CONFIGURACIÓN DE PARCHES valorPotenciometro[0] = analogRead(0)/10; if (valorPotenciometro[0]!=valorAnteriorPotenciometro[0]) { if (valorPotenciometro[0]>0 && valorPotenciometro[0]<10) { // PARCHES POR DEFECTO parche[0] = _35_BassDrum2; parche[1] = _57_CrashCymbal2; parche[2] = _43_LowTom1; parche[3] = _41_LowTom2; parche[4] = _42_ClosedHiHat; parche[5] = _47_MidTom1; parche[6] = _40_SnareDrum2; parche[7] = _51_RideCymbal1; } if (valorPotenciometro[0]>10 && valorPotenciometro[0]<20) { // PARCHES CON DOS SNARE AL CENTRO parche[0] = _35_BassDrum2; parche[1] = _57_CrashCymbal2; parche[2] = _38_SnareDrum1; parche[3] = _41_LowTom2; parche[4] = _42_ClosedHiHat; parche[5] = _40_SnareDrum2; parche[6] = _47_MidTom1; parche[7] = _51_RideCymbal1; } if (valorPotenciometro[0]>20 && valorPotenciometro[0]<30) { // PARCHES TIPO BONGO/CONGA parche[0] = _39_HandClap; parche[1] = _56_CowBell; parche[2] = _63_OpenHighConga; parche[3] = _64_LowConga; parche[4] = _53_RideBell; parche[5] = _61_LowBongo; parche[6] = _60_HighBongo; parche[7] = _54_Tambourine; } if (valorPotenciometro[0]>30 && valorPotenciometro[0]<40) { parche[0] = _35_BassDrum2; parche[1] = _57_CrashCymbal2; parche[2] = _43_LowTom1; parche[3] = _41_LowTom2; parche[4] = _42_ClosedHiHat; parche[5] = _47_MidTom1; parche[6] = _40_SnareDrum2; parche[7] = _51_RideCymbal1; } if (valorPotenciometro[0]>40 && valorPotenciometro[0]<50) { parche[0] = _35_BassDrum2; parche[1] = _57_CrashCymbal2; parche[2] = _43_LowTom1; parche[3] = _41_LowTom2; parche[4] = _42_ClosedHiHat; parche[5] = _47_MidTom1; parche[6] = _40_SnareDrum2; parche[7] = _51_RideCymbal1; } if (valorPotenciometro[0]>50 && valorPotenciometro[0]<60) { parche[0] = _35_BassDrum2; parche[1] = _57_CrashCymbal2; parche[2] = _43_LowTom1; parche[3] = _41_LowTom2; parche[4] = _42_ClosedHiHat; parche[5] = _47_MidTom1; parche[6] = _40_SnareDrum2; parche[7] = _51_RideCymbal1; } if (valorPotenciometro[0]>60 && valorPotenciometro[0]<70) { parche[0] = _35_BassDrum2; parche[1] = _57_CrashCymbal2; parche[2] = _43_LowTom1; parche[3] = _41_LowTom2; parche[4] = _42_ClosedHiHat; parche[5] = _47_MidTom1; parche[6] = _40_SnareDrum2; parche[7] = _51_RideCymbal1; } if (valorPotenciometro[0]>70 && valorPotenciometro[0]<80) { parche[0] = _35_BassDrum2; parche[1] = _57_CrashCymbal2; parche[2] = _43_LowTom1; parche[3] = _41_LowTom2; parche[4] = _42_ClosedHiHat; parche[5] = _47_MidTom1; parche[6] = _40_SnareDrum2; parche[7] = _51_RideCymbal1; } if (valorPotenciometro[0]>80 && valorPotenciometro[0]<90) { parche[0] = _35_BassDrum2; parche[1] = _57_CrashCymbal2; parche[2] = _43_LowTom1; parche[3] = _41_LowTom2; parche[4] = _42_ClosedHiHat; parche[5] = _47_MidTom1; parche[6] = _40_SnareDrum2; parche[7] = _51_RideCymbal1; parcheAlterado[0] = parche[1]; parcheAlterado[1] = parche[4]; parcheAlterado[2] = parche[7]; } if (valorPotenciometro[0]>90 && valorPotenciometro[0]<100){ parche[0] = _35_BassDrum2; parche[1] = _57_CrashCymbal2; parche[2] = _43_LowTom1; parche[3] = _41_LowTom2; parche[4] = _42_ClosedHiHat; parche[5] = _47_MidTom1; parche[6] = _40_SnareDrum2; parche[7] = _51_RideCymbal1; } parcheAlterado[0] = parche[1]; parcheAlterado[1] = parche[4]; parcheAlterado[2] = parche[7]; valorAnteriorPotenciometro[0] = valorPotenciometro[0]; } // SELECTOR DE LA CONFIGURACIÓN DEL PARCHE SUPERIOR IZQUIERDO valorPotenciometro[3] = analogRead(3)/10; if (valorPotenciometro[3]!=valorAnteriorPotenciometro[3]) { if (valorPotenciometro[3]>0 && valorPotenciometro[3]<10) { parche[1] = _57_CrashCymbal2; } if (valorPotenciometro[3]>10 && valorPotenciometro[3]<20) { parche[1] = _42_ClosedHiHat; } if (valorPotenciometro[3]>20 && valorPotenciometro[3]<30) { parche[1] = _51_RideCymbal1; } if (valorPotenciometro[3]>30 && valorPotenciometro[3]<40) { parche[1] = _46_OpenHiHat; } if (valorPotenciometro[3]>40 && valorPotenciometro[3]<50) { parche[1] = _54_Tambourine; } if (valorPotenciometro[3]>50 && valorPotenciometro[3]<60) { parche[1] = _56_CowBell; } if (valorPotenciometro[3]>60 && valorPotenciometro[3]<70) { parche[1] = _53_RideBell; } if (valorPotenciometro[3]>70 && valorPotenciometro[3]<80) { parche[1] = _39_HandClap; } if (valorPotenciometro[3]>80 && valorPotenciometro[3]<90) { parche[1] = _70_Maracas; } if (valorPotenciometro[3]>90 && valorPotenciometro[3]<100){ parche[1] = _55_SplashCymbal; } valorAnteriorPotenciometro[3] = valorPotenciometro[3]; } // SELECTOR DE LA CONFIGURACIÓN DEL PARCHE SUPERIOR CENTRAL valorPotenciometro[2] = analogRead(2)/10; if (valorPotenciometro[2]!=valorAnteriorPotenciometro[2]) { if (valorPotenciometro[2]>0 && valorPotenciometro[2]<10) { parche[4] = _57_CrashCymbal2; } if (valorPotenciometro[2]>10 && valorPotenciometro[2]<20) { parche[4] = _42_ClosedHiHat; } if (valorPotenciometro[2]>20 && valorPotenciometro[2]<30) { parche[4] = _51_RideCymbal1; } if (valorPotenciometro[2]>30 && valorPotenciometro[2]<40) { parche[4] = _46_OpenHiHat; } if (valorPotenciometro[2]>40 && valorPotenciometro[2]<50) { parche[4] = _54_Tambourine; } if (valorPotenciometro[2]>50 && valorPotenciometro[2]<60) { parche[4] = _56_CowBell; } if (valorPotenciometro[2]>60 && valorPotenciometro[2]<70) { parche[4] = _53_RideBell; } if (valorPotenciometro[2]>70 && valorPotenciometro[2]<80) { parche[4] = _39_HandClap; } if (valorPotenciometro[2]>80 && valorPotenciometro[2]<90) { parche[4] = _70_Maracas; } if (valorPotenciometro[2]>90 && valorPotenciometro[2]<100){ parche[4] = _55_SplashCymbal; } valorAnteriorPotenciometro[2] = valorPotenciometro[2]; } // SELECTOR DE LA CONFIGURACIÓN DEL PARCHE SUPERIOR DERECHO valorPotenciometro[1] = analogRead(1)/10; if (valorPotenciometro[1]!=valorAnteriorPotenciometro[1]) { if (valorPotenciometro[1]>0 && valorPotenciometro[1]<10) { parche[7] = _57_CrashCymbal2; } if (valorPotenciometro[1]>10 && valorPotenciometro[1]<20) { parche[7] = _42_ClosedHiHat; } if (valorPotenciometro[1]>20 && valorPotenciometro[1]<30) { parche[7] = _51_RideCymbal1; } if (valorPotenciometro[1]>30 && valorPotenciometro[1]<40) { parche[7] = _46_OpenHiHat; } if (valorPotenciometro[1]>40 && valorPotenciometro[1]<50) { parche[7] = _54_Tambourine; } if (valorPotenciometro[1]>50 && valorPotenciometro[1]<60) { parche[7] = _56_CowBell; } if (valorPotenciometro[1]>60 && valorPotenciometro[1]<70) { parche[7] = _53_RideBell; } if (valorPotenciometro[1]>70 && valorPotenciometro[1]<80) { parche[7] = _39_HandClap; } if (valorPotenciometro[1]>80 && valorPotenciometro[1]<90) { parche[7] = _70_Maracas; } if (valorPotenciometro[1]>90 && valorPotenciometro[1]<100){ parche[7] = _55_SplashCymbal; } valorAnteriorPotenciometro[1] = valorPotenciometro[1]; } // LECTURA E INTERPRETACIÓN DE LOS PARCHES if (pedalExpresion==0) { if (digitalRead(14) == HIGH) enContacto[9]=0; if ((enContacto[9]==0) and digitalRead(14) == LOW) { noteOn(parche[9],120); enContacto[9] = 1; } } if (digitalRead(15) == HIGH) enContacto[8]=0; if ((enContacto[8]==0) and digitalRead(15) == LOW) { noteOn(parche[8],120); enContacto[8] = 1; } if (keys[0].capacitiveSensor(NUM_OF_SAMPLES) < CAP_THRESHOLD) enContacto[0]=0; if ((enContacto[0]==0) and (keys[0].capacitiveSensor(NUM_OF_SAMPLES) > CAP_THRESHOLD)) { noteOn(parche[0],120); enContacto[0] = 1; } if (keys[1].capacitiveSensor(NUM_OF_SAMPLES) < CAP_THRESHOLD) enContacto[1]=0; if ((enContacto[1]==0) and (keys[1].capacitiveSensor(NUM_OF_SAMPLES) > CAP_THRESHOLD)) { noteOn(parche[1],120); enContacto[1] = 1; } if (keys[2].capacitiveSensor(NUM_OF_SAMPLES) < CAP_THRESHOLD) enContacto[2]=0; if ((enContacto[2]==0) and (keys[2].capacitiveSensor(NUM_OF_SAMPLES) > CAP_THRESHOLD)) { noteOn(parche[2],120); enContacto[2] = 1; } if (keys[3].capacitiveSensor(NUM_OF_SAMPLES) < CAP_THRESHOLD) enContacto[3]=0; if ((enContacto[3]==0) and (keys[3].capacitiveSensor(NUM_OF_SAMPLES) > CAP_THRESHOLD)) { noteOn(parche[3],120); enContacto[3] = 1; } if (keys[4].capacitiveSensor(NUM_OF_SAMPLES) < CAP_THRESHOLD) enContacto[4]=0; if ((enContacto[4]==0) and (keys[4].capacitiveSensor(NUM_OF_SAMPLES) > CAP_THRESHOLD)) { noteOn(parche[4],120); enContacto[4] = 1; } if (keys[5].capacitiveSensor(NUM_OF_SAMPLES) < CAP_THRESHOLD) enContacto[5]=0; if ((enContacto[5]==0) and (keys[5].capacitiveSensor(NUM_OF_SAMPLES) > CAP_THRESHOLD)) { noteOn(parche[5],120); enContacto[5] = 1; } if (keys[6].capacitiveSensor(NUM_OF_SAMPLES) < CAP_THRESHOLD) enContacto[6]=0; if ((enContacto[6]==0) and (keys[6].capacitiveSensor(NUM_OF_SAMPLES) > CAP_THRESHOLD)) { noteOn(parche[6],120); enContacto[6] = 1; } if (keys[7].capacitiveSensor(NUM_OF_SAMPLES) < CAP_THRESHOLD) enContacto[7]=0; if ((enContacto[7]==0) and (keys[7].capacitiveSensor(NUM_OF_SAMPLES) > CAP_THRESHOLD)) { noteOn(parche[7],120); enContacto[7] = 1; } }

Para interpretar la señal MIDI proveniente del puerto USB en una PC con sistema operativo Windows, existen varias opciones. En este caso en particular, se optó por programar una interfaz propia en lenguaje PowerBasic, cuyo código se muestra a continuación:

#compiler PBWin 10 #dim all #resource 'Bateria.pbr' #compile EXE #include 'Win32API.inc' global fCloseThread as long global fuente as long global nComm as long global puerto as string global estado aS string global hMidi as long global dev as long global nota aS string global velocidad aS string $AppTitle = 'Bateria' $ComPort = '//./COM24' thread function recibirDatos(byval hWnd as long) as long local buffer as string while isfalse fCloseThread comm recv #nComm, 1, buffer if asc(buffer)=153 then estado = 'C' else if estado = 'C' then nota = buffer estado = 'N' else if estado = 'N' then velocidad = buffer estado = '0' midiOutShortMsg(hMidi, &H99 + (asc(nota) * 256) + (asc(velocidad) * &H10000)) end if end if end if wend function = %TRUE end function callback function dialogCallback () as long if CB.MSG=%WM_INITDIALOG then function=%FALSE end function function PBMain () as long #register none local hDlg as dword local resultado as long local hThread as long dim hArchivo as long local dummy as string estado = '0' nota = '0' velocidad = '0' open 'Bateria.ini' for input as hArchivo if ERR=53 then msgbox 'Error: No se ha encontrado un archivo de configuración.' exit function end if line input #hArchivo,puerto close hArchivo comm open '\.\'+puerto as #nComm if ERRCLEAR then msgbox 'No se encuentra el puerto serie',, 'Bateria' exit function end if comm set #nComm, baud = 57600 comm set #nComm, byte = 8 comm set #nComm, parity = %False comm set #nComm, stop = 0 comm set #nComm, txbuffer = 4096 comm set #nComm, rxbuffer = 4096 comm print #nComm, $NUL if comm(#nComm, RXQUE) then comm recv #nComm, comm(#nComm, RXQUE), dummy midiOutOpen(hMidi, dev, 0, 0, 0) dialog new 0, 'Bateria',,, 100, 30, %WS_POPUP OR %WS_VISIBLE OR %WS_CLIPCHILDREN OR %WS_CAPTION OR %WS_SYSMENU OR %WS_MINIMIZEBOX, 0 TO hDlg dialog set icon hDlg, 'Bateria' control add label, hDlg, 100, 'BATERÍA MIDI ACTIVADA', 10, 10, 80, 20 font new 'Arial',0,1 to fuente dialog set color hDlg, -1, rgb(0,0,0) control set color hDlg, 100, &H0000F000,&H00000000 control set font hDlg, 100, fuente thread create recibirDatos(hDlg) to hThread dialog show modal hDlg, call dialogCallback to resultado fCloseThread = %TRUE do thread close hThread to resultado loop until ISTRUE resultado if comm(#nComm, RXQUE) then comm recv #nComm, comm(#nComm, RXQUE), dummy comm close #nComm end function

En cuanto a la utilización de la batería, basta con conectarla a una entrada USB de la PC, y activar la interfaz creada con el código mostrado anteriormente.

La batería tiene ya asignados los sonidos correspondientes a cada parche, mas los de ambos pedales, que por defecto, corresponden a un bombo.
Sin embargo, uno de los potenciómetros permite seleccionar en el momento, diferentes distribuciones de parches, en base a los conjuntos de parches pre-programados al cargar el código del Arduino.

Por otra parte, los otros tres potenciómetros permiten seleccionar qué instrumento sonará al golpear los parches superiores izquierdo, central y derecho, respectivamente. Esto permite hacer pequeñas variaciones sobre los conjuntos de parches pre-programados.

Existen también dos modos de configuración que no son tan directo como los antes mencionados.

Por un lado, dos de los potenciómetros se pueden utilizar además, para programar los instrumentos a utilizar al pisar los pedales. La forma de hacerlo es elegir los instrumentos deseados para los pedales fijándolos en los parches superiores izquierdo y derecho, y sin modificarlos, reiniciar la batería. En realidad, los sonidos asignados a cada pedal dependen de la posición en que se encuentren dichos potenciómetros al momento de iniciar la batería.

Por otra parte, si al iniciar la batería, se mantiene pisado en pedal derecho, el mismo no funcionará como pedal de bombo (ni de otro instrumento que se le haya fijado con su potenciómetro) sino que actuará como pedal de expresión, haciendo que al tocar cualquiera de los parches, se cuente con dos opciones: que suene normalmente, o que suene más fuerte si se está pisando el pedal de expresión.