// HamShield library collection // Based on Programming Manual rev. 2.0, 5/19/2011 (RM-MPU-6000A-00) // 11/22/2013 by Morgan Redfield // 04/26/2015 various changes Casey Halverson #include "Arduino.h" #include "HamShield.h" #include // #include /* don't change this regulatory value, use dangerMode() and safeMode() instead */ bool restrictions = true; /* channel lookup tables */ uint32_t FRS[] = {0,462562,462587,462612,462637,462662,462687,462712,467562,467587,467612,467637,467662,467687,467712}; uint32_t GMRS[] = {0,462550,462575,462600,462625,462650,462675,462700,462725}; uint32_t MURS[] = {0,151820,151880,151940,154570,154600}; uint32_t WX[] = {0,162550,162400,162475,162425,162450,162500,162525}; /* morse code lookup table */ const char *ascii = "ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789.,?'!/()&:;=+-_\"$@", *itu[] = { ".-","-...","-.-.","-..",".","..-.","--.","....","..",".---","-.-",".-..","--","-.","---",".--.","--.-",".-.","...","-","..-","...-",".--","-..-","-.--","--..","-----",".----","..---","...--","....-",".....","-....","--...","---..","----.",".-.-.-","--..--","..--..",".----.","-.-.--","-..-.","-.--.","-.--.-",".-...","---...","-.-.-.","-...-",".-.-.","-....-","..--.-",".-..-.","...-..-",".--.-." }; /* 2200 Hz */ const unsigned char AFSK_mark[] PROGMEM = { 154, 249, 91, 11, 205, 216, 25, 68, 251, 146, 0, 147, 250, 68, 24, 218, 203, 13, 88, 254, 128, 1, 167, 242, 52, 37, 231, 186, 5, 108, 255, 108, 5, 186, 231, 37, 52, 242, 167, 1, 128, 254, 88, 13, 203, 218, 24, 69, 250, 147, 0, 147, 250, 69, 24, 218, 203, 13, 88, 255, 127, 2, 165, 245, 48 }; /* 1200 Hz */ const unsigned char AFSK_space[] PROGMEM = { 140, 228, 250, 166, 53, 0, 53, 166, 249, 230, 128, 24, 7, 88, 203, 255, 203, 88, 7, 24, 128, 230, 249, 167, 53, 0, 53, 167, 249, 230, 128, 24, 6, 88, 202, 255, 202, 88, 6, 24, 127, 231, 249, 167, 52, 0, 52, 167, 248, 231, 127, 25, 6, 89, 202, 255, 202, 89, 6, 25, 127, 231, 248, 167, 53, 0, 54, 165, 251, 227, 133, 14}; /* Aux button variables */ volatile int ptt = false; volatile long bouncer = 0; /** Default constructor, uses default I2C address. * @see A1846S_DEFAULT_ADDRESS */ HamShield::HamShield() { devAddr = A1846S_DEV_ADDR_SENLOW; } /** Specific address constructor. * @param address I2C address * @see A1846S_DEFAULT_ADDRESS * @see A1846S_ADDRESS_AD0_LOW * @see A1846S_ADDRESS_AD0_HIGH */ HamShield::HamShield(uint8_t address) { devAddr = address; } /** Power on and prepare for general usage. * */ void HamShield::initialize() { // set up PWM output for RF power control - commenting out to get rid of terrible buzzing noise // pwr_control_pin = 9; // Note: these initial settings are for UHF 12.5kHz channel // see the A1846S register table and initial settings for more info uint16_t tx_data; // reset all registers in A1846S softReset(); //set up clock to ues 12-14MHz setClkMode(1); tx_data = 0x0031; I2Cdev::writeWord(devAddr, 0x31, tx_data); // included as per AU supplied register table tx_data = 0x44A5; I2Cdev::writeWord(devAddr, 0x33, tx_data); // agc number - included as per AU supplied register table tx_data = 0x2B87; I2Cdev::writeWord(devAddr, 0x34, tx_data); // Rx digital gain - included as per AU supplied register table tx_data = 0x470F; I2Cdev::writeWord(devAddr, 0x41, tx_data); // digital gain for Tx - included as per AU supplied register table tx_data = 0x0DFF; I2Cdev::writeWord(devAddr, A1846S_RX_VOLUME_REG, tx_data); tx_data = 0x7FFF; I2Cdev::writeWord(devAddr, 0x47, tx_data);// soft mute tx_data = 0x2C62; I2Cdev::writeWord(devAddr, 0x4F, tx_data);// included as per AU supplied register table tx_data = 0x0094; I2Cdev::writeWord(devAddr, 0x53, tx_data);// included as per AU supplied register table tx_data = 0x0081; I2Cdev::writeWord(devAddr, 0x55, tx_data);// included as per AU supplied register table tx_data = 0x0B22; I2Cdev::writeWord(devAddr, 0x56, tx_data);// sq detection time tx_data = 0x1C00; I2Cdev::writeWord(devAddr, 0x57, tx_data);// bypass rssi lpfilter tx_data = 0x0EDB; I2Cdev::writeWord(devAddr, 0x5A, tx_data);// SQ detection time tx_data = 0x101E; I2Cdev::writeWord(devAddr, 0x60, tx_data);// SQ noise threshold tx_data = 0x16AD; I2Cdev::writeWord(devAddr, 0x63, tx_data);// pre-emphasis bypass threshold // calibration tx_data = 0x00A4; I2Cdev::writeWord(devAddr, 0x30, tx_data); delay(50); tx_data = 0x00A6; I2Cdev::writeWord(devAddr, 0x30, tx_data); delay(100); tx_data = 0x0006; I2Cdev::writeWord(devAddr, 0x30, tx_data); delay(10); // continue default setup in 12.5kHz mode tx_data = 0x1100; I2Cdev::writeWord(devAddr, 0x15, tx_data); // tuning bit tx_data = 0x4495; I2Cdev::writeWord(devAddr, 0x32, tx_data); // agc target power tx_data = 0x40C3; I2Cdev::writeWord(devAddr, 0x3A, tx_data); // modu_det_sel sq setting tx_data = 0x0F1E; I2Cdev::writeWord(devAddr, 0x3C, tx_data); // pk_det_thr sq setting tx_data = 0x28D0; I2Cdev::writeWord(devAddr, 0x3F, tx_data); // pk_det_thr sq setting tx_data = 0x20BE; I2Cdev::writeWord(devAddr, 0x48, tx_data); // pk_det_thr sq setting tx_data = 0x0A50; I2Cdev::writeWord(devAddr, 0x59, tx_data); // Tx FM Deviation tx_data = 0x1425; //0x0A10; I2Cdev::writeWord(devAddr, 0x62, tx_data); // Modu_det_thresh (sq setting) tx_data = 0x2494; I2Cdev::writeWord(devAddr, 0x65, tx_data); // setting th_sif for SQ rssi detect tx_data = 0x2494; I2Cdev::writeWord(devAddr, 0x66, tx_data); // setting th_sif for SQ rssi detect // AGC gain table settings // the rest of these settings are to upper register addresses // set 0x7F to 1 to write to them tx_data = 0x0001; I2Cdev::writeWord(devAddr, 0x7F, tx_data); tx_data = 0x0014; I2Cdev::writeWord(devAddr, 0x06, tx_data); tx_data = 0x020C; I2Cdev::writeWord(devAddr, 0x07, tx_data); tx_data = 0x0214; I2Cdev::writeWord(devAddr, 0x08, tx_data); tx_data = 0x030C; I2Cdev::writeWord(devAddr, 0x09, tx_data); tx_data = 0x0314; I2Cdev::writeWord(devAddr, 0x0A, tx_data); tx_data = 0x0324; I2Cdev::writeWord(devAddr, 0x0B, tx_data); tx_data = 0x0344; I2Cdev::writeWord(devAddr, 0x0C, tx_data); tx_data = 0x1344; I2Cdev::writeWord(devAddr, 0x0D, tx_data); tx_data = 0x1B44; I2Cdev::writeWord(devAddr, 0x0E, tx_data); tx_data = 0x3F44; I2Cdev::writeWord(devAddr, 0x0F, tx_data); tx_data = 0xE0EB; I2Cdev::writeWord(devAddr, 0x12, tx_data); // done writing to upper page addresses, so set 0x7F back tx_data = 0x0000; I2Cdev::writeWord(devAddr, 0x7F, tx_data); delay(100); // setup default values setFrequency(446000); //setVolume1(0xF); //setVolume2(0xF); setModeReceive(); setTxSourceMic(); setSQLoThresh(80); setSQOn(); } /** Verify the I2C connection. * Make sure the device is connected and responds as expected. * @return True if connection is valid, false otherwise */ bool HamShield::testConnection() { I2Cdev::readWord(devAddr, 0x00, radio_i2c_buf); return radio_i2c_buf[0] == 0x1846; } /** A1846S each register write is 24-bit long, including a * r/nw bit, 7-bit register address , and 16-bit data (MSB * is the first bit). * R/W, A[6:0], D[15:0] * * Note (this shouldn't be necessary, since all ctl registers are below 0x7F) * If register address is more than 7FH, first write 0x0001 * to 7FH, and then write value to the address subtracted by * 80H. Finally write 0x0000 to 7FH * Example: writing 85H register address is 0x001F . * Move 7FH 0x0001{ } * Move 05H 0x001F{ } 05H=85H-80H * Move 7FH 0x0000{ } */ uint16_t HamShield::readCtlReg() { I2Cdev::readWord(devAddr, A1846S_CTL_REG, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::softReset() { uint16_t tx_data = 0x1; I2Cdev::writeWord(devAddr, A1846S_CTL_REG, tx_data); delay(100); // Note: see A1846S setup info for timing guidelines tx_data = 0x4; I2Cdev::writeWord(devAddr, A1846S_CTL_REG, tx_data); } void HamShield::setFrequency(uint32_t freq_khz) { radio_frequency = freq_khz; uint32_t freq_raw = freq_khz << 4; // shift by 4 to multiply by 16 (was shift by 3 in old 1846 chip) // send top 16 bits to A1846S_FREQ_HI_REG uint16_t freq_half = (uint16_t) (0x3FFF & (freq_raw >> 16)); I2Cdev::writeWord(devAddr, A1846S_FREQ_HI_REG, freq_half); // send bottom 16 bits to A1846S_FREQ_LO_REG freq_half = (uint16_t) (freq_raw & 0xFFFF); I2Cdev::writeWord(devAddr, A1846S_FREQ_LO_REG, freq_half); } uint32_t HamShield::getFrequency() { return radio_frequency; } void HamShield::setUHF() { setGpioHi(2); // turn off VHF setGpioLow(3); // turn on UHF } void HamShield::setVHF() { setGpioHi(3); // turn off UHF setGpioLow(2); // turn on VHF } void HamShield::setNoFilters() { setGpioHi(3); // turn off UHF setGpioHi(2); // turn off VHF } /* // band // 00 - 400-520MHz // 10 - 200-260MHz // 11 - 134-174MHz // TODO: add write to 0x32 based on band selection void HamShield::setBand(uint16_t band){ if (band == 0) { setUHF(); } else if (band == 2) { // not quite in the band for our filters, but use VHF setVHF(); } else if (band == 3) { setVHF(); } else { // illegal write code, turn UHF and VHF channels both off setNoFilters(); // turn off transmit as well to make sure we don't break anything setTX(0); } I2Cdev::writeBitsW(devAddr, A1846S_BAND_SEL_REG, A1846S_BAND_SEL_BIT, A1846S_BAND_SEL_LENGTH, band); } uint16_t HamShield::getBand(){ I2Cdev::readBitsW(devAddr, A1846S_BAND_SEL_REG, A1846S_BAND_SEL_BIT, A1846S_BAND_SEL_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } */ /* // xtal frequency (kHz) // 12-14MHz crystal: this reg is set to crystal freq_khz // 24-28MHz crystal: this reg is set to crystal freq_khz / 2 void HamShield::setXtalFreq(uint16_t freq_kHz){ I2Cdev::writeWord(devAddr, A1846S_XTAL_FREQ_REG, freq_kHz); } uint16_t HamShield::getXtalFreq(){ I2Cdev::readWord(devAddr, A1846S_XTAL_FREQ_REG, radio_i2c_buf); return radio_i2c_buf[0]; } // adclk frequency (kHz) // 12-14MHz crystal: this reg is set to crystal freq_khz / 2 // 24-28MHz crystal: this reg is set to crystal freq_khz / 4 void HamShield::setAdcClkFreq(uint16_t freq_kHz){ I2Cdev::writeWord(devAddr, A1846S_ADCLK_FREQ_REG, freq_kHz); } uint16_t HamShield::getAdcClkFreq(){ I2Cdev::readWord(devAddr, A1846S_ADCLK_FREQ_REG, radio_i2c_buf); return radio_i2c_buf[0]; } */ // clk mode // 12-14MHz: set to 1 // 24-28MHz: set to 0 void HamShield::setClkMode(bool LFClk){ // include upper bits as default values uint16_t tx_data = 0x0FD1; if (!LFClk) { tx_data = 0x0FD0; } I2Cdev::writeWord(devAddr, A1846S_CLK_MODE_REG, tx_data); } bool HamShield::getClkMode(){ I2Cdev::readBitW(devAddr, A1846S_CLK_MODE_REG, A1846S_CLK_MODE_BIT, radio_i2c_buf); return (radio_i2c_buf[0] != 0); } // clk example // 12.8MHz clock // A1846S_XTAL_FREQ_REG[15:0]= xtal_freq<15:0>=12.8*1000=12800 // A1846S_ADCLK_FREQ_REG[12:0] =adclk_freq<15:0>=(12.8/2)*1000=6400 // A1846S_CLK_MODE_REG[0]= clk_mode =1 // TX/RX control // TODO: create a 25kHz setup option as well as 12.5kHz (as is implemented now) /* // channel mode // 11 - 25kHz channel // 00 - 12.5kHz channel // 10,01 - reserved void HamShield::setChanMode(uint16_t mode){ I2Cdev::writeBitsW(devAddr, A1846S_CTL_REG, A1846S_CHAN_MODE_BIT, A1846S_CHAN_MODE_LENGTH, mode); } uint16_t HamShield::getChanMode(){ I2Cdev::readBitsW(devAddr, A1846S_CTL_REG, A1846S_CHAN_MODE_BIT, A1846S_CHAN_MODE_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } */ // choose tx or rx void HamShield::setTX(bool on_noff){ // make sure RX is off if (on_noff) { setRX(false); // For RF6886: // first turn on power // set RX output off setGpioHi(4); // remember that RX and TX are active low // set TX output on setGpioLow(5); // remember that RX and TX are active low // then turn on VREG (PWM output) // then apply RF signal setRfPower(9); // figure out a good default number (TODO: or don't set a default) } I2Cdev::writeBitW(devAddr, A1846S_CTL_REG, A1846S_TX_MODE_BIT, on_noff); } bool HamShield::getTX(){ I2Cdev::readBitW(devAddr, A1846S_CTL_REG, A1846S_TX_MODE_BIT, radio_i2c_buf); return (radio_i2c_buf[0] != 0); } void HamShield::setRX(bool on_noff){ // make sure TX is off if (on_noff) { setTX(false); // set TX output off setGpioHiZ(5); // remember that RX and TX are active low // set RX output on setGpioLow(4); // remember that RX and TX are active low } I2Cdev::writeBitW(devAddr, A1846S_CTL_REG, A1846S_RX_MODE_BIT, on_noff); } bool HamShield::getRX(){ I2Cdev::readBitW(devAddr, A1846S_CTL_REG, A1846S_RX_MODE_BIT, radio_i2c_buf); return (radio_i2c_buf[0] != 0); } void HamShield::setModeTransmit(){ // check to see if we should allow them to do this if(restrictions == true) { if((radio_frequency > 139999) & (radio_frequency < 148001)) { setRX(false); setTX(true); } if((radio_frequency > 218999) & (radio_frequency < 225001)) { setRX(false); setTX(true); } if((radio_frequency > 419999) & (radio_frequency < 450001)) { setRX(false); setTX(true); } } else { // turn off rx, turn on tx setRX(false); // break before make setTX(true); } } void HamShield::setModeReceive(){ // turn on rx, turn off tx setTX(false); // break before make setRX(true); } void HamShield::setModeOff(){ // turn off rx, turn off tx, set pwr_dwn bit setTX(false); setRX(false); } // set tx source // 000 - Nothing // 001 - sine source from tone1 // 010 - sine source from tone2 // 011 - sine source from tone1 and tone2 // 100 - mic void HamShield::setTxSource(uint16_t tx_source){ I2Cdev::writeBitsW(devAddr, A1846S_TX_VOICE_REG, A1846S_VOICE_SEL_BIT, A1846S_VOICE_SEL_LENGTH, tx_source); } void HamShield::setTxSourceMic(){ setTxSource(4); } void HamShield::setTxSourceTone1(){ setTxSource(1); } void HamShield::setTxSourceTone2(){ setTxSource(2); } void HamShield::setTxSourceTones(){ setTxSource(3); } void HamShield::setTxSourceNone(){ setTxSource(0); } uint16_t HamShield::getTxSource(){ I2Cdev::readBitsW(devAddr, A1846S_TX_VOICE_REG, A1846S_VOICE_SEL_BIT, A1846S_VOICE_SEL_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } /* // set PA_bias voltage // 000000: 1.01V // 000001:1.05V // 000010:1.09V // 000100: 1.18V // 001000: 1.34V // 010000: 1.68V // 100000: 2.45V // 1111111:3.13V void HamShield::setPABiasVoltage(uint16_t voltage){ I2Cdev::writeBitsW(devAddr, A1846S_PABIAS_REG, A1846S_PABIAS_BIT, A1846S_PABIAS_LENGTH, voltage); } uint16_t HamShield::getPABiasVoltage(){ I2Cdev::readBitsW(devAddr, A1846S_PABIAS_REG, A1846S_PABIAS_BIT, A1846S_PABIAS_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } */ // Subaudio settings // TX and RX code /* Set code mode: Step1: set 58H[1:0]=11 set voice hpf bypass Step2: set 58H[5:3]=111 set voice lpf bypass and pre/de-emph bypass Step3 set 3CH[15:14]=10 set code mode Step4: set 1FH[3:2]=01 set GPIO code in or code out TX code mode: Step1: 45H[2:0]=010 RX code mode: Step1: set 45H[2:0]=001 Step2: set 4dH[15:10]=000001 */ // Ctcss/cdcss mode sel // x00=disable, // 001=inner ctcss en, // 010= inner cdcss en // 101= outer ctcss en, // 110=outer cdcss en // others =disable void HamShield::setCtcssCdcssMode(uint16_t mode){ I2Cdev::writeBitsW(devAddr, A1846S_SUBAUDIO_REG, A1846S_C_MODE_BIT, A1846S_C_MODE_LENGTH, mode); } uint16_t HamShield::getCtcssCdcssMode(){ I2Cdev::readBitsW(devAddr, A1846S_SUBAUDIO_REG, A1846S_C_MODE_BIT, A1846S_C_MODE_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::setInnerCtcssMode(){ setCtcssCdcssMode(1); } void HamShield::setInnerCdcssMode(){ setCtcssCdcssMode(2); } void HamShield::setOuterCtcssMode(){ setCtcssCdcssMode(5); } void HamShield::setOuterCdcssMode(){ setCtcssCdcssMode(6); } void HamShield::disableCtcssCdcss(){ setCtcssCdcssMode(0); } // Ctcss_sel // 1 = ctcss_cmp/cdcss_cmp out via gpio // 0 = ctcss/cdcss sdo out vio gpio void HamShield::setCtcssSel(bool cmp_nsdo){ I2Cdev::writeBitW(devAddr, A1846S_SUBAUDIO_REG, A1846S_CTCSS_SEL_BIT, cmp_nsdo); } bool HamShield::getCtcssSel(){ I2Cdev::readBitW(devAddr, A1846S_SUBAUDIO_REG, A1846S_CTCSS_SEL_BIT, radio_i2c_buf); return (radio_i2c_buf[0] != 0); } // Cdcss_sel // 1 = long (24 bit) code // 0 = short(23 bit) code void HamShield::setCdcssSel(bool long_nshort){ I2Cdev::writeBitW(devAddr, A1846S_SUBAUDIO_REG, A1846S_CDCSS_SEL_BIT, long_nshort); } bool HamShield::getCdcssSel(){ I2Cdev::readBitW(devAddr, A1846S_SUBAUDIO_REG, A1846S_CDCSS_SEL_BIT, radio_i2c_buf); return (radio_i2c_buf[0] != 0); } // Cdcss neg_det_en void HamShield::enableCdcssNegDet(){ I2Cdev::writeBitW(devAddr, A1846S_SUBAUDIO_REG, A1846S_NEG_DET_EN_BIT, 1); } void HamShield::disableCdcssNegDet(){ I2Cdev::writeBitW(devAddr, A1846S_SUBAUDIO_REG, A1846S_NEG_DET_EN_BIT, 0); } bool HamShield::getCdcssNegDetEnabled(){ I2Cdev::readBitW(devAddr, A1846S_SUBAUDIO_REG, A1846S_NEG_DET_EN_BIT, radio_i2c_buf); return (radio_i2c_buf[0] != 0); } // Cdcss pos_det_en void HamShield::enableCdcssPosDet(){ I2Cdev::writeBitW(devAddr, A1846S_SUBAUDIO_REG, A1846S_POS_DET_EN_BIT, 1); } void HamShield::disableCdcssPosDet(){ I2Cdev::writeBitW(devAddr, A1846S_SUBAUDIO_REG, A1846S_POS_DET_EN_BIT, 0); } bool HamShield::getCdcssPosDetEnabled(){ I2Cdev::readBitW(devAddr, A1846S_SUBAUDIO_REG, A1846S_POS_DET_EN_BIT, radio_i2c_buf); return (radio_i2c_buf[0] != 0); } // css_det_en void HamShield::enableCssDet(){ I2Cdev::writeBitW(devAddr, A1846S_SUBAUDIO_REG, A1846S_CSS_DET_EN_BIT, 1); } void HamShield::disableCssDet(){ I2Cdev::writeBitW(devAddr, A1846S_SUBAUDIO_REG, A1846S_CSS_DET_EN_BIT, 0); } bool HamShield::getCssDetEnabled(){ I2Cdev::readBitW(devAddr, A1846S_SUBAUDIO_REG, A1846S_CSS_DET_EN_BIT, radio_i2c_buf); return (radio_i2c_buf[0] != 0); } // ctcss freq void HamShield::setCtcss(float freq) { int dfreq = freq / 10000; dfreq = dfreq * 65536; setCtcssFreq(dfreq); } void HamShield::setCtcssFreq(uint16_t freq){ I2Cdev::writeWord(devAddr, A1846S_CTCSS_FREQ_REG, freq); } uint16_t HamShield::getCtcssFreq(){ I2Cdev::readWord(devAddr, A1846S_CTCSS_FREQ_REG, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::setCtcssFreqToStandard(){ // freq must be 134.4Hz for standard cdcss mode setCtcssFreq(0x2268); } // cdcss codes void HamShield::setCdcssCode(uint16_t code) { // note: assuming a well formed code (xyz, where x, y, and z are all 0-7) // Set both code registers at once (23 or 24 bit code) // sends 100, c1, c2, c3, 11 bits of crc // TODO: figure out what to do about 24 or 23 bit codes uint32_t cdcss_code = 0x800000; // top three bits are 100 uint32_t oct_code = code%10; code = code / 10; cdcss_code += oct_code << 20; oct_code = code % 10; code = code / 10; cdcss_code += oct_code << 17; cdcss_code += (code % 10) << 14; // TODO: CRC // set registers uint16_t temp_code = (uint16_t) cdcss_code; I2Cdev::writeWord(devAddr, A1846S_CDCSS_CODE_HI_REG, temp_code); temp_code = (uint16_t) (cdcss_code >> 16); I2Cdev::writeWord(devAddr, A1846S_CDCSS_CODE_LO_REG, temp_code); } uint16_t HamShield::getCdcssCode() { uint32_t oct_code; I2Cdev::readWord(devAddr, A1846S_CDCSS_CODE_HI_REG, radio_i2c_buf); oct_code = (radio_i2c_buf[0] << 16); I2Cdev::readWord(devAddr, A1846S_CDCSS_CODE_LO_REG, radio_i2c_buf); oct_code += radio_i2c_buf[0]; oct_code = oct_code >> 12; uint16_t code = (oct_code & 0x3); oct_code = oct_code >> 3; code += (oct_code & 0x3)*10; oct_code = oct_code >> 3; code += (oct_code & 0x3)*100; return code; } // SQ void HamShield::setSQOn(){ I2Cdev::writeBitW(devAddr, A1846S_CTL_REG, A1846S_SQ_ON_BIT, 1); } void HamShield::setSQOff(){ I2Cdev::writeBitW(devAddr, A1846S_CTL_REG, A1846S_SQ_ON_BIT, 0); } bool HamShield::getSQState(){ I2Cdev::readBitW(devAddr, A1846S_CTL_REG, A1846S_SQ_ON_BIT, radio_i2c_buf); return (radio_i2c_buf[0] != 0); } // SQ threshold void HamShield::setSQHiThresh(uint16_t sq_hi_threshold){ // Sq detect high th, rssi_cmp will be 1 when rssi>th_h_sq, unit 1/8dB I2Cdev::writeWord(devAddr, A1846S_SQ_OPEN_THRESH_REG, sq_hi_threshold); } uint16_t HamShield::getSQHiThresh(){ I2Cdev::readWord(devAddr, A1846S_SQ_OPEN_THRESH_REG, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::setSQLoThresh(uint16_t sq_lo_threshold){ // Sq detect low th, rssi_cmp will be 0 when rssi th_h_vox, then vox will be 1(unit mV ) I2Cdev::writeWord(devAddr, A1846S_TH_H_VOX_REG, vox_open_thresh); } uint16_t HamShield::getVoxOpenThresh(){ I2Cdev::readWord(devAddr, A1846S_TH_H_VOX_REG, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::setVoxShutThresh(uint16_t vox_shut_thresh){ // When vssi < th_l_vox && time delay meet, then vox will be 0 (unit mV ) I2Cdev::writeWord(devAddr, A1846S_TH_L_VOX_REG, vox_shut_thresh); } uint16_t HamShield::getVoxShutThresh(){ I2Cdev::readWord(devAddr, A1846S_TH_L_VOX_REG, radio_i2c_buf); return radio_i2c_buf[0]; } // Tail Noise void HamShield::enableTailNoiseElim(){ I2Cdev::writeBitW(devAddr, A1846S_CTL_REG, A1846S_TAIL_ELIM_EN_BIT, 1); } void HamShield::disableTailNoiseElim(){ I2Cdev::writeBitW(devAddr, A1846S_CTL_REG, A1846S_TAIL_ELIM_EN_BIT, 1); } bool HamShield::getTailNoiseElimEnabled(){ I2Cdev::readBitW(devAddr, A1846S_CTL_REG, A1846S_TAIL_ELIM_EN_BIT, radio_i2c_buf); return (radio_i2c_buf[0] != 0); } // tail noise shift select // Select ctcss phase shift when use tail eliminating function when TX // 00 = 120 degree shift // 01 = 180 degree shift // 10 = 240 degree shift // 11 = reserved void HamShield::setShiftSelect(uint16_t shift_sel){ I2Cdev::writeBitsW(devAddr, A1846S_SUBAUDIO_REG, A1846S_SHIFT_SEL_BIT, A1846S_SHIFT_SEL_LENGTH, shift_sel); } uint16_t HamShield::getShiftSelect(){ I2Cdev::readBitsW(devAddr, A1846S_SUBAUDIO_REG, A1846S_SHIFT_SEL_BIT, A1846S_SHIFT_SEL_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } // DTMF void HamShield::setDTMFC0(uint16_t freq) { I2Cdev::writeBitsW(devAddr, A1846S_DTMF_C01_REG, A1846S_DTMF_C0_BIT, A1846S_DTMF_C0_LENGTH, freq); } uint16_t HamShield::getDTMFC0() { I2Cdev::readBitsW(devAddr, A1846S_DTMF_C01_REG, A1846S_DTMF_C0_BIT, A1846S_DTMF_C0_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::setDTMFC1(uint16_t freq) { I2Cdev::writeBitsW(devAddr, A1846S_DTMF_C01_REG, A1846S_DTMF_C1_BIT, A1846S_DTMF_C1_LENGTH, freq); } uint16_t HamShield::getDTMFC1() { I2Cdev::readBitsW(devAddr, A1846S_DTMF_C01_REG, A1846S_DTMF_C1_BIT, A1846S_DTMF_C1_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::setDTMFC2(uint16_t freq) { I2Cdev::writeBitsW(devAddr, A1846S_DTMF_C23_REG, A1846S_DTMF_C2_BIT, A1846S_DTMF_C2_LENGTH, freq); } uint16_t HamShield::getDTMFC2() { I2Cdev::readBitsW(devAddr, A1846S_DTMF_C23_REG, A1846S_DTMF_C2_BIT, A1846S_DTMF_C2_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::setDTMFC3(uint16_t freq) { I2Cdev::writeBitsW(devAddr, A1846S_DTMF_C23_REG, A1846S_DTMF_C3_BIT, A1846S_DTMF_C3_LENGTH, freq); } uint16_t HamShield::getDTMFC3() { I2Cdev::readBitsW(devAddr, A1846S_DTMF_C23_REG, A1846S_DTMF_C3_BIT, A1846S_DTMF_C3_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::setDTMFC4(uint16_t freq) { I2Cdev::writeBitsW(devAddr, A1846S_DTMF_C45_REG, A1846S_DTMF_C4_BIT, A1846S_DTMF_C4_LENGTH, freq); } uint16_t HamShield::getDTMFC4() { I2Cdev::readBitsW(devAddr, A1846S_DTMF_C45_REG, A1846S_DTMF_C4_BIT, A1846S_DTMF_C4_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::setDTMFC5(uint16_t freq) { I2Cdev::writeBitsW(devAddr, A1846S_DTMF_C45_REG, A1846S_DTMF_C5_BIT, A1846S_DTMF_C5_LENGTH, freq); } uint16_t HamShield::getDTMFC5() { I2Cdev::readBitsW(devAddr, A1846S_DTMF_C45_REG, A1846S_DTMF_C5_BIT, A1846S_DTMF_C5_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::setDTMFC6(uint16_t freq) { I2Cdev::writeBitsW(devAddr, A1846S_DTMF_C67_REG, A1846S_DTMF_C6_BIT, A1846S_DTMF_C6_LENGTH, freq); } uint16_t HamShield::getDTMFC6() { I2Cdev::readBitsW(devAddr, A1846S_DTMF_C67_REG, A1846S_DTMF_C6_BIT, A1846S_DTMF_C6_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::setDTMFC7(uint16_t freq) { I2Cdev::writeBitsW(devAddr, A1846S_DTMF_C67_REG, A1846S_DTMF_C7_BIT, A1846S_DTMF_C7_LENGTH, freq); } uint16_t HamShield::getDTMFC7() { I2Cdev::readBitsW(devAddr, A1846S_DTMF_C67_REG, A1846S_DTMF_C7_BIT, A1846S_DTMF_C7_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } // TX FM deviation void HamShield::setFMVoiceCssDeviation(uint16_t deviation){ I2Cdev::writeBitsW(devAddr, A1846S_FM_DEV_REG, A1846S_FM_DEV_VOICE_BIT, A1846S_FM_DEV_VOICE_LENGTH, deviation); } uint16_t HamShield::getFMVoiceCssDeviation(){ I2Cdev::readBitsW(devAddr, A1846S_FM_DEV_REG, A1846S_FM_DEV_VOICE_BIT, A1846S_FM_DEV_VOICE_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::setFMCssDeviation(uint16_t deviation){ I2Cdev::writeBitsW(devAddr, A1846S_FM_DEV_REG, A1846S_FM_DEV_CSS_BIT, A1846S_FM_DEV_CSS_LENGTH, deviation); } uint16_t HamShield::getFMCssDeviation(){ I2Cdev::readBitsW(devAddr, A1846S_FM_DEV_REG, A1846S_FM_DEV_CSS_BIT, A1846S_FM_DEV_CSS_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } // RX voice range void HamShield::setVolume1(uint16_t volume){ I2Cdev::writeBitsW(devAddr, A1846S_RX_VOLUME_REG, A1846S_RX_VOL_1_BIT, A1846S_RX_VOL_1_LENGTH, volume); } uint16_t HamShield::getVolume1(){ I2Cdev::readBitsW(devAddr, A1846S_RX_VOLUME_REG, A1846S_RX_VOL_1_BIT, A1846S_RX_VOL_1_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::setVolume2(uint16_t volume){ I2Cdev::writeBitsW(devAddr, A1846S_RX_VOLUME_REG, A1846S_RX_VOL_2_BIT, A1846S_RX_VOL_2_LENGTH, volume); } uint16_t HamShield::getVolume2(){ I2Cdev::readBitsW(devAddr, A1846S_RX_VOLUME_REG, A1846S_RX_VOL_2_BIT, A1846S_RX_VOL_2_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } // GPIO void HamShield::setGpioMode(uint16_t gpio, uint16_t mode){ uint16_t mode_len = 2; uint16_t bit = gpio*2 + 1; I2Cdev::writeBitsW(devAddr, A1846S_GPIO_MODE_REG, bit, mode_len, mode); } void HamShield::setGpioHiZ(uint16_t gpio){ setGpioMode(gpio, 0); } void HamShield::setGpioFcn(uint16_t gpio){ setGpioMode(gpio, 1); } void HamShield::setGpioLow(uint16_t gpio){ setGpioMode(gpio, 2); } void HamShield::setGpioHi(uint16_t gpio){ setGpioMode(gpio, 3); } uint16_t HamShield::getGpioMode(uint16_t gpio){ uint16_t mode_len = 2; uint16_t bit = gpio*2 + 1; I2Cdev::readBitsW(devAddr, A1846S_GPIO_MODE_REG, bit, mode_len, radio_i2c_buf); return radio_i2c_buf[0]; } // Int void HamShield::enableInterrupt(uint16_t interrupt){ I2Cdev::writeBitW(devAddr, A1846S_INT_MODE_REG, interrupt, 1); } void HamShield::disableInterrupt(uint16_t interrupt){ I2Cdev::writeBitW(devAddr, A1846S_INT_MODE_REG, interrupt, 0); } bool HamShield::getInterruptEnabled(uint16_t interrupt){ I2Cdev::readBitW(devAddr, A1846S_INT_MODE_REG, interrupt, radio_i2c_buf); return (radio_i2c_buf[0] != 0); } // ST mode void HamShield::setStMode(uint16_t mode){ I2Cdev::writeBitsW(devAddr, A1846S_CTL_REG, A1846S_ST_MODE_BIT, A1846S_ST_MODE_LENGTH, mode); } uint16_t HamShield::getStMode(){ I2Cdev::readBitsW(devAddr, A1846S_CTL_REG, A1846S_ST_MODE_BIT, A1846S_ST_MODE_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::setStFullAuto(){ setStMode(2); } void HamShield::setStRxAutoTxManu(){ setStMode(1); } void HamShield::setStFullManu(){ setStMode(0); } // Pre-emphasis, De-emphasis filter void HamShield::bypassPreDeEmph(){ I2Cdev::writeBitW(devAddr, A1846S_EMPH_FILTER_REG, A1846S_EMPH_FILTER_EN, 1); } void HamShield::usePreDeEmph(){ I2Cdev::writeBitW(devAddr, A1846S_EMPH_FILTER_REG, A1846S_EMPH_FILTER_EN, 0); } bool HamShield::getPreDeEmphEnabled(){ I2Cdev::readBitW(devAddr, A1846S_EMPH_FILTER_REG, A1846S_EMPH_FILTER_EN, radio_i2c_buf); return (radio_i2c_buf[0] != 0); } // Read Only Status Registers int16_t HamShield::readRSSI(){ I2Cdev::readBitsW(devAddr, A1846S_RSSI_REG, A1846S_RSSI_BIT, A1846S_RSSI_LENGTH, radio_i2c_buf); int16_t rssi = (radio_i2c_buf[0] & 0x3FF) - 137; return rssi; } uint16_t HamShield::readVSSI(){ I2Cdev::readWord(devAddr, A1846S_VSSI_REG, radio_i2c_buf); return radio_i2c_buf[0] & 0x7FF; // only need lowest 10 bits } uint16_t HamShield::readDTMFIndex(){ // TODO: may want to split this into two (index1 and index2) I2Cdev::readBitsW(devAddr, A1846S_DTMF_RX_REG, A1846S_DTMF_INDEX_BIT, A1846S_DTMF_INDEX_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } uint16_t HamShield::readDTMFCode(){ // 1:f0+f4, 2:f0+f5, 3:f0+f6, A:f0+f7, // 4:f1+f4, 5:f1+f5, 6:f1+f6, B:f1+f7, // 7:f2+f4, 8:f2+f5, 9:f2+f6, C:f2+f7, // E(*):f3+f4, 0:f3+f5, F(#):f3+f6, D:f3+f7 I2Cdev::readBitsW(devAddr, A1846S_DTMF_RX_REG, A1846S_DTMF_CODE_BIT, A1846S_DTMF_CODE_LENGTH, radio_i2c_buf); return radio_i2c_buf[0]; } void HamShield::setRfPower(uint8_t pwr) { // using loop reference voltage input to op-amp // (see RF6886 datasheet) // 30 is 0.5V, which is ~min loop reference voltage // 127 is 2.5V, which is ~max loop ref voltage int max_pwr = 15; //167; // 167 is 3.3*255/5 - 1; if (pwr > max_pwr) { pwr = max_pwr; } I2Cdev::writeBitsW(devAddr, A1846S_PABIAS_REG, A1846S_PADRV_BIT, A1846S_PADRV_LENGTH, pwr); } bool HamShield::frequency(uint32_t freq_khz) { //TODO: there are several "special" frequencies that require extra setup of the AU1846 if((freq_khz >= 137000) && (freq_khz <= 174000)) { setVHF(); //setBand(3); // 0b11 is 134-174MHz setFrequency(freq_khz); return true; } if((freq_khz >= 200000) && (freq_khz <= 260000)) { setVHF(); //setBand(2); // 10 is 200-260MHz setFrequency(freq_khz); return true; } if((freq_khz >= 400000) && (freq_khz <= 520000)) { setUHF(); //setBand(00); // 00 is 400-520MHz setFrequency(freq_khz); return true; } return false; } /* FRS Lookup Table */ bool HamShield::setFRSChannel(uint8_t channel) { if(channel < 15) { setFrequency(FRS[channel]); return true; } return false; } /* GMRS Lookup Table (borrows from FRS table since channels overlap) */ bool HamShield::setGMRSChannel(uint8_t channel) { if((channel > 8) & (channel < 16)) { channel = channel - 7; // we start with 0, to try to avoid channel 8 being nothing setFrequency(FRS[channel]); return true; } if(channel < 9) { setFrequency(GMRS[channel]); return true; } return false; } /* MURS band is 11.25KHz (2.5KHz dev) in channel 1-3, 20KHz (5KHz dev) in channel 4-5. Should we set this? */ bool HamShield::setMURSChannel(uint8_t channel) { if(channel < 6) { setFrequency(MURS[channel]); return true; } } /* Weather radio channels */ bool HamShield::setWXChannel(uint8_t channel) { if(channel < 8) { setFrequency(WX[channel]); setModeReceive(); // turn off squelch? // channel bandwidth? return true; } return false; } /* Scan channels for strongest signal. returns channel number. You could do radio.setWXChannel(radio.scanWXChannel()) */ uint8_t HamShield::scanWXChannel() { uint8_t channel = 0; int16_t toprssi = 0; for(int x = 0; x < 8; x++) { setWXChannel(x); delay(100); int16_t rssi = readRSSI(); if(rssi > toprssi) { toprssi = rssi; channel = x; } } return channel; } /* removes the out of band transmit restrictions for those who hold special licenses */ void HamShield::dangerMode() { restrictions = false; return; } /* enable restrictions on out of band transmissions */ void HamShield::safeMode() { restrictions = true; return; } /* scanner mode. Scans a range and returns the active frequency when it detects a signal. If none is detected, returns 0. */ uint32_t HamShield::scanMode(uint32_t start,uint32_t stop, uint8_t speed, uint16_t step, uint16_t threshold) { setModeReceive(); int16_t rssi = -150; for(uint32_t freq = start; freq < stop; freq = freq + step) { setFrequency(freq); for(int x = 0; x < speed; x++) { rssi = readRSSI(); if(rssi > threshold) { return freq; } } } return 0; // found nothing } /* white space finder. (inverted scanner) Scans a range for a white space, and if no signal exists, stop there. */ uint32_t HamShield::findWhitespace(uint32_t start,uint32_t stop, uint8_t dwell, uint16_t step, uint16_t threshold) { setModeReceive(); int16_t rssi = -150; for(uint32_t freq = start; freq < stop; freq = freq + step) { setFrequency(freq); for(int x = 0; x < dwell; x++) { rssi = readRSSI(); if(rssi > threshold) { break; } } if(rssi < threshold) { return freq; } /* found a blank channel */ } return 0; // everything is busy } /* channel scanner. Scans an array of channels for activity. returns channel number if found. Otherwise, returns 0. ignores whatever is in array position 0 */ uint32_t HamShield::scanChannels(uint32_t buffer[],uint8_t buffsize, uint8_t speed, uint16_t threshold) { setModeReceive(); int16_t rssi = 0; for(int x = 1; x < buffsize; x++) { setFrequency(buffer[x]); for(int y = 0; y < speed; y++) { rssi = readRSSI(); if(rssi > threshold) { return x; } } } return 0; } /* white space channel finder. Scans an array of channels for white space. returns channel number if empty found. Otherwise, returns 0. ignores whatever is in array position 0 */ uint32_t HamShield::findWhitespaceChannels(uint32_t buffer[],uint8_t buffsize, uint8_t dwell, uint16_t threshold) { setModeReceive(); int16_t rssi = 0; for(int x = 1; x < buffsize; x++) { setFrequency(buffer[x]); for(int y = 0; y < dwell; y++) { rssi = readRSSI(); if(rssi > threshold) { break; } } if(rssi < threshold) { return x; } /* found a blank channel */ } return 0; // everything is busy } /* Setup the auxiliary button input mode and register the ISR */ void HamShield::buttonMode(uint8_t mode) { pinMode(HAMSHIELD_AUX_BUTTON,INPUT); // set the pin mode to input digitalWrite(HAMSHIELD_AUX_BUTTON,HIGH); // turn on internal pull up sHamShield = this; if(mode == PTT_MODE) { attachInterrupt(HAMSHIELD_AUX_BUTTON, HamShield::isr_ptt, CHANGE); } if(mode == RESET_MODE) { attachInterrupt(HAMSHIELD_AUX_BUTTON, HamShield::isr_reset, CHANGE); } } /* Interrupt routines */ /* handle aux button to reset condition */ void HamShield::isr_reset() { wdt_enable(WDTO_15MS); while(1) { } } /* Transmit on press, receive on release. We need debouncing !! */ void HamShield::isr_ptt() { if((bouncer + 200) > millis()) { if(ptt == false) { ptt = true; sHamShield->setModeTransmit(); bouncer = millis(); } if(ptt == true) { ptt = false; sHamShield->setModeReceive(); bouncer = millis(); } } } /* Radio etiquette function: Wait for empty channel. Optional timeout (0 waits forever) Optional break window (how much dead air to wait for after a transmission completes) Does not take in account the millis() overflow */ bool HamShield::waitForChannel(long timeout = 0, long breakwindow = 0, int setRSSI = HAMSHIELD_EMPTY_CHANNEL_RSSI) { int16_t rssi = 0; // Set RSSI to max received signal for(int x = 0; x < 20; x++) { rssi = readRSSI(); } // "warm up" to get past RSSI hysteresis long timer = millis() + timeout; // Setup the timeout value if(timeout == 0) { timer = 4294967295; } // If we want to wait forever, set it to the max millis() while(timer > millis()) { // while our timer is not timed out. rssi = readRSSI(); // Read signal strength if(rssi < setRSSI) { // If the channel is empty, lets see if anyone breaks in. timer = millis() + breakwindow; while(timer > millis()) { rssi = readRSSI(); if(rssi > setRSSI) { return false; } // Someone broke into the channel, abort. } return true; // It passed the test...channel is open. } } return false; } /* Morse code out, blocking */ void HamShield::morseOut(char buffer[HAMSHIELD_MORSE_BUFFER_SIZE]) { for(int x = 0; x < strlen(buffer); x++) { char output = morseLookup(buffer[x]); if(buffer[x] != ' ') { for(int m = 0; m < strlen(itu[output]); m++) { if(itu[output][m] == '-') { tone(HAMSHIELD_PWM_PIN,1000,HAMSHIELD_MORSE_DOT*3); delay(HAMSHIELD_MORSE_DOT*3); } else { tone(HAMSHIELD_PWM_PIN,1000,HAMSHIELD_MORSE_DOT); delay(HAMSHIELD_MORSE_DOT); } delay(HAMSHIELD_MORSE_DOT); } delay(HAMSHIELD_MORSE_DOT*3); } else { delay(HAMSHIELD_MORSE_DOT*7); } } return; } /* Morse code lookup table */ char HamShield::morseLookup(char letter) { for(int x = 0; x < 54; x++) { if(letter == ascii[x]) { return x; // return itu[x]; } } } /* SSTV VIS Digital Header Reference: http://www.barberdsp.com/files/Dayton%20Paper.pdf Millis Freq Description ----------------------------------------------- 300 1900 Leader tone 10 1200 break 300 1900 Leader tone 30 1200 VIS start bit 30 bit 0 1100hz = “1”, 1300hz = “0” 30 bit 1 “” 30 bit 2 “” 30 bit 3 “” 30 bit 4 “” 30 bit 5 “” 30 bit 6 “” 30 PARITY Even=1300hz,Odd=1100hz 30 1200 VIS stop bit */ void HamShield::SSTVVISCode(int code) { toneWait(1900,300); toneWait(1200,10); toneWait(1900,300); toneWait(1200,30); for(int x = 0; x < 7; x++) { if(bitRead(code,x)) { toneWait(1100,30); } else { toneWait(1300,30); } } if(parityCalc(code)) { toneWait(1300,30); } else { toneWait(1100,30); } toneWait(1200,30); return; } /* SSTV Test Pattern Print 6 color bars MARTIN1 is only supported for this Reference: http://www.barberdsp.com/files/Dayton%20Paper.pdf */ void HamShield::SSTVTestPattern(int code) { SSTVVISCode(code); if(code == MARTIN1) { for(int x = 0; x < 257; x++){ toneWaitU(1200,4862); // sync pulse (4862 uS) toneWaitU(1500,572); // sync porch (572 uS) /* Green Channel - 146.432ms a line (we are doing 144ms) */ toneWait(2400,24); toneWait(2400,24); toneWait(2400,24); toneWait(2400,24); toneWait(1500,24); toneWait(1500,24); toneWaitU(1500,572); // color separator pulse (572 uS) /* Blue Channel - 146.432ms a line (we are doing 144ms) */ toneWait(2400,24); toneWait(1500,24); toneWait(2400,24); toneWait(1500,24); toneWait(1500,24); toneWait(2400,24); toneWaitU(1500,572); // color separator pulse (572 uS) /* Red Channel - 146.432ms a line (we are doing 144ms) */ toneWait(2400,24); toneWait(2400,24); toneWait(1500,24); toneWait(1500,24); toneWait(2400,24); toneWait(1500,24); toneWaitU(1500,572); // color separator pulse (572 uS) } } } /* wait for tone to complete */ void HamShield::toneWait(uint16_t freq, long timer) { tone(HAMSHIELD_PWM_PIN,freq,timer); delay(timer); } /* wait microseconds for tone to complete */ void HamShield::toneWaitU(uint16_t freq, long timer) { if(freq < 16383) { tone(HAMSHIELD_PWM_PIN,freq); delayMicroseconds(timer); noTone(HAMSHIELD_PWM_PIN); return; } tone(HAMSHIELD_PWM_PIN,freq); delay(timer / 1000); noTone(HAMSHIELD_PWM_PIN); return; } bool HamShield::parityCalc(int code) { unsigned int v; // word value to compute the parity of bool parity = false; // parity will be the parity of v while (code) { parity = !parity; code = code & (code - 1); } return parity; } /* void HamShield::AFSKOut(char buffer[80]) { for(int x = 0; x < 65536; x++) { startPlayback(AFSK_mark, sizeof(AFSK_mark)); delay(8); startPlayback(AFSK_space, sizeof(AFSK_space)); delay(8); } } */