/** * grab_pipe.c * * Written by Evan Raskob 2002-2003 * :: devices [at] lowfrequency [dot] org :: * * pipe-based dj/saxophone audio/video controller * * Platform: PIC16F877 * Uses 4 momentary switches on (top to bottom) RB7,RB6,RB5,RB4 * Uses 2 ADC channels for a crossfader potentiometer RA,RA1 * Uses 2 ADC channels for an accelerometer (y,x) RA2,RA3 * Uses 1 ADC channel for rotary pot RA4 * * * Not for use without permission of the author. */ /* Standard Include for 16F876 Chip */ #include <16F877.h> /* library of midi functions (expanded in midi.c) */ #include "midi.h" #device PIC16F877 ADC=10 //this is the ADC control register #byte ADCON0 = 0x1F #define HIGH 0x1 #define LOW 0x0 #FUSES HS,NOWDT,NOPROTECT,NOBROWNOUT /* Delay for 20 mhz crystal */ #use delay (clock=20000000) /* Setup buit-in RS232 serial ports to work work at MIDI speeds */ #use rs232(baud=MIDI_BAUD_RATE, xmit=PIN_C6,rcv=PIN_C7) int sendByte (byte byteToSend) { if (byteToSend < 0) output_bit(PIN_B1, HIGH); putc(byteToSend); return 0; } /** DEBUG **/ //Setup buit-in RS232 serial ports to work work at serial port speeds #use rs232(baud=9600, xmit=PIN_C4,rcv=PIN_C5) /** END DEBUG **/ #use standard_io(B) // send a midi NOTE ON message from the uart of the form [0x9n, note, vel] // where n is the midi channel from 0-F, note and vel are 7-bit numbers int midiNoteOn(byte channel, byte note, byte vel) { sendByte(MIDI_NOTE_ON | (channel & MIDI_CHANNEL_MASK)); sendByte(MIDI_DATA_MASK & note); sendByte(MIDI_DATA_MASK & vel); return 0; } // send a midi NOTE ON message from the uart of the form [0x9n, note, velocity] // where n is the midi channel from 0-F, note is a 7-bit number and velocity is 0 int midiNoteOFF(byte channel, byte note) { sendByte(MIDI_NOTE_ON | (channel & MIDI_CHANNEL_MASK)); sendByte(MIDI_DATA_MASK & note); sendByte(MIDI_DATA_MASK & 0); return 0; return 0; } // send a midi POLYPHONIC AFTERTOUCH message from the uart of the form [0xCn, controller, value] // where n is the midi channel from 0-F, note and pressure are 7-bit numbers int midiControlChange(byte channel, byte controller, byte value) { sendByte(MIDI_CONTROL_CHANGE | (channel & MIDI_CHANNEL_MASK)); sendByte(MIDI_DATA_MASK & controller); sendByte(MIDI_DATA_MASK & value); return 0; } int midiPolyTouch(byte channel, byte note, byte pressure) { sendByte(MIDI_POLY_TOUCH | (channel & MIDI_CHANNEL_MASK)); sendByte(MIDI_DATA_MASK & note); sendByte(MIDI_DATA_MASK & pressure); return 0; } // send a midi CHANNEL AFTERTOUCH message from the uart of the form [0xDn, pressure] // where n is the midi channel from 0-F, and pressure is a 7-bit number int midiChannelTouch(byte channel, byte pressure) { sendByte(MIDI_CHANNEL_TOUCH | (channel & MIDI_CHANNEL_MASK)); sendByte(MIDI_DATA_MASK & pressure); return 0; } // send a midi PITCH BEND message from the uart of the form [0xEn, bendLSB, bendMSB ] // where n is the midi channel from 0-F, and bendLSB and bendMSB are 7-bit numbers // note that MIDI devices normally pack together bendLSB and bendMSB to make a 14-bit number int midiPitchBend(byte channel, byte bendLSB, byte bendMSB) { sendByte(MIDI_PITCH_BEND | (channel & MIDI_CHANNEL_MASK)); sendByte(MIDI_DATA_MASK & bendLSB); sendByte(MIDI_DATA_MASK & bendMSB); return 0; } void setStatusLED(int state) { output_bit(PIN_B0, state); } main() { // 4 magnetic momentary switches // hooked up to pin B7 int switch1 = 0; int note1 = 67; // hooked up to pins B6 int switch2 = 0; int note2 = 68; // hooked up to pins B5 int switch3 = 0; int note3 = 69; // hooked up to pins B4 int switch4 = 0; int note4 = 70; int tempSwitch= 0; int adcval = 0; int lastSlide1 = 0; int lastSlide2 = 0; int16 slideADC = 0; bit_set(ADCON0,7); // Flash what yo momma gave ya //setStatusLED(HIGH); output_high(PIN_B0); delay_ms(650); //setStatusLED(LOW); output_low(PIN_B0); output_high(PIN_B1); delay_ms(650); output_low(PIN_B1); //setStatusLED(LOW); //output_low(PIN_B0); //delay_ms(150); //setStatusLED(HIGH); //output_high(PIN_B0); //delay_ms(150); //setStatusLED(LOW); //output_low(PIN_B0); //delay_ms(10); setup_adc_ports( ALL_ANALOG ); setup_adc(ADC_CLOCK_INTERNAL ); // DEBUG: print to console //printf("Started."); while (TRUE) { /** Debug ** output_high(PIN_B2); delay_ms(350); output_low(PIN_B2); delay_ms(350); ** end debug **/ //switches tempSwitch = input(PIN_B7); if (tempSwitch != switch1) { switch1 = tempSwitch; //switch state has changed if (tempSwitch ==1) { note1 = 67; midiNoteOn(0, note1, 80); setStatusLED(HIGH); } else { midiNoteOff(0, note1); setStatusLED(LOW); } } tempSwitch = input(PIN_B6); if (tempSwitch != switch2) { switch2 = tempSwitch; //switch state has changed if (switch2 ==1) { note2 = 68; midiNoteOn(1, note2, 80); setStatusLED(HIGH); } else { midiNoteOff(1, note2); setStatusLED(LOW); } } tempSwitch = input(PIN_B5); if (tempSwitch != switch3) { switch3 = tempSwitch; //switch state has changed if (switch3 ==1) { note3 = 69; midiNoteOn(2, note3, 80); setStatusLED(HIGH); } else { midiNoteOff(2, note3); setStatusLED(LOW); } } tempSwitch = input(PIN_B4); if (tempSwitch != switch4) { switch4 = tempSwitch; //switch state has changed if (switch4 ==1) { note4 = 70; midiNoteOn(3, note4, 80); setStatusLED(HIGH); } else { midiNoteOff(3, note4); setStatusLED(LOW); } } set_adc_channel(0); delay_ms(4); adcval = read_adc() >> 3; slideADC = read_adc(); lastSlide1 = (slideADC & 0x00FF) >> 1; lastSlide2 = (slideADC & 0xFF00) >> 7; midiPitchBend(0, lastSlide1, lastSlide2); set_adc_channel(1); delay_ms(4); slideADC = read_adc(); lastSlide1 = (slideADC & 0x00FF) >> 1; lastSlide2 = (slideADC & 0xFF00) >> 7; midiPitchBend(1, lastSlide1, lastSlide2); set_adc_channel(2); delay_ms(4); slideADC = read_adc(); lastSlide1 = (slideADC & 0x00FF) >> 1; lastSlide2 = (slideADC & 0xFF00) >> 7; midiPitchBend(2, lastSlide1, lastSlide2); set_adc_channel(3); delay_ms(4); slideADC = read_adc(); lastSlide1 = (slideADC & 0x00FF) >> 1; lastSlide2 = (slideADC & 0xFF00) >> 7; midiPitchBend(3, lastSlide1, lastSlide2); set_adc_channel(4); delay_ms(4); slideADC = read_adc(); lastSlide1 = (slideADC & 0x00FF) >> 1; lastSlide2 = (slideADC & 0xFF00) >> 7; midiPitchBend(4, lastSlide1, lastSlide2); } }