'**************************************************************************** '* robot * '* firmware by dr.Godfried-Willem Raes * '* Logos Foundation * '* This is a framework that implements the main features of the chip * '* as well as the software framework we typically used on 8/16 bit chips * '* used for our musical robots: a realtime multitasker * ' *************************************************************************** ' NOTE: Pickit3 or higher must be used for programming these devices! ' Each interrupt has its own handler, simply write one handler for each interrupting ' device without having to work out which interrupt it is. ' Timers are more logical: specify the count going upwards that will trigger an ' interrupt rather than working out when the counter would underflow. '01.08.2016: Test and debug board designed, etched and soldered. ' Programming requires the PiCkit3 programmer. PicKit2 does not work! '02.08.2016: 1M resistor added over X-tal pins '03.08.2016: Finaly got the clock up and running on the X-tal ' Working out the MIDI UART now. ' Midi-in buffering implemented. ' Trying to use the pwm channels... we cannot use the HPWM commands... ' Implementing velocity control with timers ' Repeats working now. '04.08.2016: Adding 12 bit ADC on channel AN0 ' Midi out looks like working using the Basic command HSROut ' 1 midi packet (3 bytes) takes some 1ms, which conforms to the standard. ' adding initialisation for the PWM channels ' This is as yet not working... '05.08.2016: with 60Mhz clock the frequency range for PWM would be 60MHz --> 915Hz ' so, for audio use we need a prescale devider :64 ' Thus the frequency range would become 14Hz --> 937.5kHz '06.08.2016: pwm begint stilaan goed te werken. ' different modes of operation implemented for the pwm channels ' pwmmodus 0 fully debugged. ' pwmmodus 2 fully debugged (3-phase motor control) ' pwmmodus 1 fully debugged (3 independent PWM channels) ' pwmmodus 3 added: AC motor with capacitor phase shifter using 2 pwm channels ' PWM principieel werkend nu. ' eventueel kunnen nog dead times toegevoegd worden indien nodig voor een toepassing ' We kunnen overbodige pwm pinnen nog disablen en beschikbaar maken voor ' andere funkties. '07.08.2016: Lookup tables for frequencies in 12-tone equal temperament added. Ambitus= 22-127 ' looks like it's possible to implement a 3-voice midi synth on this platform. ' Just did it: the 3-channel synth is working! ' Studying the implementation of 32-bit timers ' timers 2/3 and 4/5 implemented as 32-bits timers ' trying to use timer23 instead of our loop counter. ' This now works fine ' We could use timer1 as a motor speed controller for a stepper ' Timer 45 could be used as a high resolution, extreme ambitus tone generator ' Timer 1,4,5 implemented as fast timers in 16 bits for ADSR implementation ' PWM lookups added for this. '09.08.2016: Further coding. adsr not yet operational. - version saved as 007 '10.08.2016: Different approach to adsr - simplified, using timers ' ADSR works now, but we will need a steep lowpass filter on the output ' with this code we are at the limit of what the PIC can handle. ' As it is now, we can have 6 independent PWM channels. ' For the 3-voice synth we need them all and we used up all available timers. ' The priority settings for the IRQ's are very important for this code to work well. ' This version saved as PIC24_008.bas '11-12.08.2016: application written for midi-invertor: Mirrored_X.bas. Tested o.k. ' PCB made for this app. '13.08.2016: metacompiler statements for UART-TX and UART-RX added. ' Buffered midi-out fully implemented. ' For some reason the ADSR pwm is no longer working now... ' Rearranging priority levels made it work again. ' ADSR timers must have a :8 divider setting. ' This version saved as PIC24_009 ' There is a lot of jitter on the main loop, so we must be operating close to ' the maximum performance for this chip. ' Working version saved as P14_synth1.bas '14.08.2016: To relax the interrupt density, we could also invert the pwm functions and ' use the timers 1,4,5 for frequency generation with waveform duty cycle whilst ' the 3 real PWM channel could do the ADRS at the highest possible frequency. ' This requires PWMmodus to be set to 0. ' Coding started. ' looks like PWM needs to be inverted now. Done. ' ADSR works fine now, but the load on the processor is still very high. ' we should try to get the divisions out of the main loop now. Done.\ ' Further improvements: decrease nr. of steps for ADSR, as 127 steps ' for an attack time of say 100ms seems largely overkill... '******* BUG-robot *************** '04.12.2016: starting from the Synth2 coding ' trying to implement a monophonic synth for Bug \ '05.12.2016: Wave lookup implemented. ' Timer 1 should have no divider and high priority! ' This is the variable sampling rate clock. '07.12.2016: PCB finished and soldered. ' ADSR rewritten '09.12.2016: AM or tremolo controllers added and found to work ' scaling may have to be refined. ' pitch bend implementation must have some bugs still. ' We should get this to work prior to fully implement FM and vibrato. ' Pitch bend working now. Lookup for modulation intervals added for quartertones. '10.12.2016: FM and Vibrato made to work. Still some glitches though ' Adding some noise... '16.12.2016: First tests on the actual robot. ' Tuning is far off! ' as we have only one timer -the adsr timer- in the main loop, ' we can skip the resort procedure and the idx lookup proc. ' Timvals[] array atc. removed. ' Apparently we are an octave too low now. ' Bugs found, but now we suffer from audio artifacts... ' Different wavetable lookups implemented (prog.change). '17.12.2016: Tuning is perfect now. '18.12.2016: Work on different wavetables. ' Vibrato is shaky and can crash the PIC... Bug found and killed. ' Vibrato gives audio artefacts however... ' Parametric wavetables implemented. Using program change commands ' Dynamic formant filter added on PCB. '19.12.2016: adding asymetric sinewaves '28.12.2016: how can we suppress the start-up sounds from the PWM out's? '29.12.2016: ADSR needs to be improved. ' to do: try lowering the formant frequency (now 1750Hz) '31.12.2016: Dirty Assin waveform added '01.01.2017: CC17 bug killed in the ADSR coding ' ---- -robot ----------------------------------------------------------------------- '17.01.2020: Starting from the Bug coding, start coding for '20.01.2020: Tested on the Tektronix scope. Formant frequency is now at 810Hz '27.01.2020: First testing on the flute. ' Bend is not working... ' vibrato should start earlier in the ADSR cycle. ' default waveform is now sine wave. '28.01.2020: Couldn't we use multiple waveforms for the different registers? ' use pointers to different arrays ? ' Done and found to work. ' 8 wavetables implemented. ' Bend is still not working ' Prog change seems not to work... ' The bug was in the hub board, where we did not pass pitchbend and progchanges... ' Pitch-bend now works. We have to check the range though ' Prog change works now, so we can evaluate the results. ' It now becomes possible to use different wave lookups depending on the register ' as we simply have to change 3 pointers in the code. '29.01.2020: Now we do not have any reason anymore to make our waves 256 samples long. ' Tuning lookup tables added, calculated in PBcc ' special wave lookup added for note range 93 to 105 ' So, we have to adapt the coding in the Hub and Pulse-Holdboards accordingly ' Vibrato and tuning now do work. ' Bend has a bug... ' prog's 2 and 5 sound an octave down, prog 6 an octave up... ' prog 7 sounds o.k. ' notes 93-105 work fine now. ' pitch bend proc. recoded. To be checked again now. ' prog's 2,5 and 6 changed. '30.01.2020: bend as sword implemented to make vibrato and pitchbend compatible. ' should now startup with vibrato and tremolo enabled '31.01.2020: Further work on the wavetables. ' order of the wave tables changed! Coding rearranged for readibility. '01.02.2020: trying to remove occasional glitches ' noise added: controller 1 implemented and tested. 5-bit resolution. '02.02.2020: added: specific waveforms for the different registers of the flute. ' Leaving the firmware running under torture conditions, we found it crashed in the morning: ' waveform continues but not responding to midi anymore... TMR1 priority set back to 6. ' Squared sine wave table added. '03.02.2020: ADSR coding may need a complete rewrite, as it might be at the base of observed glitches. ' This version is already a major improvement, but we are not there yet... ' ADRS coding changed such as to go in 4 unit steps. ' Also, reading the timers only when needed, improves speed. ' With these changes, it looks like we got rid of glitches. Awaiting further feedback. '04.02.2020: Alternative waveform for register 60-71 added. Further work on improving the ADSR implementation. ' ADSR now runs at a fixed sampling rate, ca. 114Hz. Previous version saved as PIC24_flut004.bas ' works now, but volume --> 0 crashes the PIC: ranges need update after volume changes... ' Problem solved. ' Further improvement could be to used Ont[x] to calculated the steps in the ADSR, thus ' overcoming the 5 bit resolution we have now... However, we would loose the logarithmic nature ' of our Ont[] lookup tables... '05.02.2020: Further debug and tests. ' CC15 introduced to steer ADSR_period. This works, but small settings are to be avoided. ' release seems not working anymore now... ' Lookup table added for a -40dB range for dynamics. The -60dB range table is still available in the source code. ' controller 80 implemented to change dynamic lookups. '28.02.2020: Wave10, based on a flute sample added. '04.03.2020: Wave11, sample based, 512 words added. Sounds no good. Too rough and exagerated ' Something in between wave5 and wave10 (the sample) would be better... '07.03.2020: Vibrato procedure improved, as on ' Timer0 IRQ disabled before note-on, as on so. ' Check this for glitchy behavior. '10.03.2020: Wave9 removed and replaced with a 4-period calculated excitation wave ' This experiment confirms our theory. ' This wave will now be the default for the low register (notes 60-71) ' Controller 111 added to enable/disable prochanges. ' Prog.change will only possible now after reception of CC111 with value 111. '12.03.2020: New PCB designed using two PIC's, in avoidance of glitches. This board will not be used ' for , but for future designs. The code model remains, but we have to ' add metacompiler instructions to split the firmware in two different parts. '-------robot ------------------------------------------------------------------------------------------- '15.03.2020: Dual processor board produced for application in V5.0 ' Two compilations required now: one for the pitch-related tasks, one for amplitude related tasks. ' We could improve processing speed by using an output pin on the ampli chip to signal end of ' release to the pitch chip. This way we do not have to implement any ADSR timer on the pitch-PIC. ' PCB adapted with a 'flying' wire on the copperside. Of course we should fix this for future versions ' of membrane-driver boards. '16.03.2020: ADSR coding improved. '21.03.2020: First tests on Autosax. Tremolo and Vibrato appear not to work... Maybe due to the GMT test code. ' Wave lookup-tables required now! '22.03.2020: trouble with the metacompiler commmands... ' We better drop prog.change here and replace it with controllers as we did on ' Further research into the origin of sporadic glitches. '23.03.2020: now using floats in the ADSR. Watchout though: Array[cnt] is impossible if cnt is a float! ' controllers 40-43 implemented for waveform evaluation and research '24.03.2020: carefull recheck of IRQ4 and 5 handlers. ' Tested on - tests passed. '27.03.2020: sample waves added, waves 0 to 4. '28.03.2020: evaluation of the waveforms implemented so far. '29.03.2020: Coding for note-off changed such that it will only work for the last setting of playing notes. ' This should solve the problem of overlapping notes in sequenced files as well as in using ' midi-keyboards for sending commands. ' Both PIC's reprogrammed, as this change affects both. '30.03.2020: output waves recorded. Now we can calculate the excitation wave. '31.03.2020: wave5 is now excitation wave for wave0 (f) ' wave6 is now excitation wave for wave3 (p) '01.04.2020: wave1 is now excitation wave for wave0 (f) - sounds an octave too low in low registers... ' wave4 is now excitation wave for wave3 ' defaults changed in function of our judgement. '04.05.2020: New similar board made for test purposes. As yet not meant for use in a robot. '05.05.2020: PTPER = PWM_reset = 2047, to avoid glitches ' both chips to be reprogrammed now! Not yet done on Autosax. '-----------robot ----------------------------------------------------------------------------------------------- '25.10.2020: above mentioned test board now destined for use on the hunting horn in ' coding start '28.10.2020: note and register ranges adapted to the hunting horn. '08.11.2020: Further work on the hunting horn version. '13.11.2020: becomes an autonomous robot. Source code renamed PIC24_Hunt.bas '23.11.2020: Overtone series and just intonation implemented for , based on F '26.11.2020: amplitude pwm lookup recalculated for 11 bits. '28.11.2020: For pitches higher than midi81 we now use 256-sample lookups, to avoid aliases due to ' the sampling period being smaller than the sample size. ' Formant-filter hardware added on the PCB: 47mH - 68nF = 2815Hz '29.11.2020: The hypothesis above proved to be fully wrong. The length of the wave sample lookups is unrelated to the occurence ' of aliases. Doubling the sampling rate and halving the number of periods in the waveform might help... ' 12 lookups added for just-intonation tunings. ' This is different than the pure overtone tuning based on note 41. '30.11.2020: Tuning tables even further extended with just intonation tunings. '02.12.2020: Lookups for 30dB and 50dB dynamic ranges added. Default now set to -30dB '03.12.2020: Wave5 sample changed - now test with a real hunting horn sample. '04.12.2020: all todays work lost by accident... '05.12.2020: Got it working with timer 2, but by accident, deleted source code by overwriting it... ' 3 days of programming work lost... ' starting all over again... ' By around midnight we think we got everything reconstructed again... ' Bug in reading 32 bit timers found and killed. This bug is present in most code we wrote for this processor... ' In this code, we do not use a 32 bit timer anymore. We use now timer2 as a sampling timer for the ' adsr system. '06.12.2020: In the night it became clear that there was not a problem in this code with note-on, velo, 0 ' and the use of CC19 for release: in GMT, we should use mPlay, note, 0 and not NoteOff, note, 0. ' Problem solved. ' code cleanup. pic's updated. '07.12.2020: final testing we hope... '08.12.2020: After changing the tuning, we also should update Modulation_range. Done. '10.12.2020: Work continued. Awaiting user feedback. '13.01.2021: Shouldn't vibrato depth be a lot deaper for hunting horns? '17.01.2021: proc. modulation_range changed to give a semitone up/down range for vibrato and pitchbend. ' This makes pitchbend incompatible with the coding on other robots like ... ' vibrato doesn't seem to work anymore now... '18.01.2021: Debugging work on the vibrato problem. ' bug found: we did read the durations lookup only in the amp compilation... ' Dur[CC4] >> 2 changed to Dur[CC4] << 1 -- this is very wrong! ' Vibrato speed = 1/ Dur[cc4] * 32 * 4.22us / 4 ' Vibrato range now is: 0.456Hz to 4.8 Hz. ' Vibrato works again! Carefully check the order of reading the lookups here! ' Samprate lookup must be read before modulation range is called !!! ' Prescaler for timer4 changed to :64 instead of :256. Thus we do not have to shift the ' values in Dur[cc4] anymore. '19.01.2021: Vibrato now works fine. However, there is a problem: on note-off (during release) pitch ' suddenly returns to the central value... As it is impossible to look ahead, we see no ' solution for this problem... Could we slide pitch during release? This is now implemented ' and tested o.k. However, if there is no release, the pitch-jump problem remains. ' These improvements now also implemented on and ' Upgrade applied to ,,,. '04.03.2021: Wave0 replaced with an algorithmic version, 8 periods, 1024 samples. ' the pitch compilation now requires 19406 bytes in variables. ' to be evaluated. Pitch PIC reprogrammed and formant frequency changed to 716Hz. ' ----------------------------------------------------------------------------------------- '20.06.2021: start coding for ' first version, for test, using the lookups for '21.06.2021: ADSR implementation changed: now we have: ' CC15 = ADSR full period ' CC16 = attack time ' velo = attack level ' CC17 = sustain level (hold-level) ' CC18 = decay time (from attack level = velo to sustain level) ' CC19 = release time (starts on note-off). ' To be considered: use key pressure for modulation of the sustain level... ' of course CC7, volume, can also be used to do this. '22.06.2021: Could we implement sustain level as a function of velo? ' sustain_level = (velo / 100) * CC17, but this requires a float. ' algo wave tables for added. '24.06.2021: Waveforms extended. Controllers 100-110 added for parameters. ' Wave10 does sound an octave too low... '06.07.2021: Considering to implement a controller for starting vibrato after note-on... ' on request of Alain Van Zeveren ' we could use timer32 in the pitch compilation and use timer4 for the watchdog then. '07.07.2021: CC2 fully implemented now. ' Got it working. Vibrato with delay... ' We now split the code in PIC24_pitch and PIC24_ampli ' as we encountered problems with nested metacompiler commands. ' Split undone. Metacompiler commands restructured. ' So, source code is PIC24_trumpet.bas again. '08.07.2021: Op vraag van Alain: gat in de tessituur opgevuld. Deze noten kunnen eigenlijk niet... ' ------------------------------------------------------------------------------------------------- '08.07.2021: Start aanpassing kode aan de alto saxhoorn '03.10.2021: Hardware ready. Code picked up again... '04.10.2021: note range adapted. ' controller 40 no longer required ' no pedal register implemented here. ' wave lookups to be done! '05.10.2021: First tests, still with the wavetables of trumpeter. '06.10.2021: working on the wavetables, trying to implement an attack waveform ' Wave0[] should be the waveform to use for the attack phase. ' this is 12 periods! - gives pitch jump in the attack: check wavetable files! ' However, the mechanism seems to work flawless now. '07.10.2021: attack wave corrected for 10 periods. ' output waves recorded. ' attack wave 12 periods added, replacing the 10 period version. ' Wave8, excitation wave added. '08.10.2021: test and evaluation session. ' One of the problems here is that we do not have good models for what ' this alto saxhorm ought to sound like. There just is no solo music ' available for this instrument... ' Source code restructured. '09.10.2021: default waves changed. Reprogrammed. ' ambitus bug killed in the ampli compilation. '03.11.2021: Compiler upgraded. Report:39.25% program words used, in previous compiler version this was only 26% ' variable bytes 75.75% used, this has not changed. ' ---------------------------------------------------------------------------------------------------------- ' 08.02.2024: Start work on the Teno robot, a tenor saxhorn by Charles Mahillon. ' Compiles o.k. with new range and subwave lookuptables. ' 17.02.2024: Version 1.0 programmed on both PIC's. ' 29.02.2024: bugs... notes below 40 do not play: lines 1377 and 1378 were found remmed... ' CC1 too high? : to be checked in gmt ' CC7 scaling wrong : use 40dB scaling for volume and 30dB for ADSR? ' adsr not working at all ' 01.03.2024: Further testing. ' adsr still not working ' tests for vibrato, tremolo, noise, CC40 added in GMT. These all do work fine. ' There is too much noise in the output... ' 03.03.2024: ADSR bug found: nothing wrong in the firmware, but replacing the MPY734 with the usual MPY634 solved the problem. ' We also tried the AD534, but the amplitudes came out way too low. ADSR now works fine, but the sound quality with ' the MPY734 was a lot better... ' Pitch compilatie met wave 6 voor sub (CC40), wave 5 voor low (CC41), wave 6 voor med (CC42) en wave 6 voor high (CC43) ' 04.03.2024: vraag van Kristof Lauwers: kunnen we sustain level niet beter implementeren als een percentage van velo? ' source code with this modification saved as PIC24_Teno_new.bas ' sustain_level reintroduced and CC17 now has a different meaning. ' Lookup tabel SusProp[] added and made quadratic. ' 05.03.2024: Release not working result of float/integer confusion? Note Cnt is a float! Ont[Cnt] will never work!!! ' 06.03.2024: Release still not working properly... Test board soldered for analysis and debug. ' even after a full day of code analysis we could not trace the reason why release is not working here... ' Attack wave removed for the sub-register in the pitch compilation. ' 07.03.2024: Is release not working or is it just very subtle and barely noticeble? ' Pitch-pic and ampli-pic reflashed. ' To do: consider implementation of portamento. ' we need a flag to start portamento for every note-on received without a note-off for the previous note. ' This can also apply for every note-on received whilst any ADSR-flag is still set. ' For a good portamento, we have to suppress the attack wave as well as the attack phase in the ADSR. ' 09.03.2024: ADSR problem solved: GMT testcode was using noteoff, whereby release is allways 0... ' 10.03.2024: first attempts to implement legato and portamento. This has consequences for all compilations. ' Controller 65 added here: legato_flag and portamento_flag ' with the legato_flag set, note-on's will not use the attack wave, nor the AD phases in the ADRS. ' 11.03.2024: seems we introduced some serious bugs now... ' even with the legato flag set, we still get adsr. ' 12.03.2024: starting all over again... ' 13.03.2024: it works, but portamento may behave shaky... ' This version uploaded in , all 3 PIC's. This be version V2. ' 15.03.2024: bug with repeated notes researched. ' ************************************************************************************************************ ' 05.07.2026: starting from , working code out for under construction. ' PCB version: 07.06.2021 '------------------------------------------------------------------------------------------------------------- ' START: ' one of the following to be defined only ' compile 2-times: once with Pitch defined, once with Ampli ' rename the compiled hex files to xxx_pitch.hex and xxx_ampli.hex ' use the Microchip IPE for programming, using PicKit3. ' For some obscure reason, programming from within Proton does not work. ' this code should also work on 24EP32MC202, 24EP64MC202, 24EP128MC202, 24EP256MC202, 24EP512MC202 ' and dsPIC33EP32MC202, dsPIC33EP64MC202, dsPIC33EP128MC202, dsPIC33EP256MC202, dsPIC33EP512MC202 ' and dsPIC33EP32MC502, dsPIC33EP64MC502, dsPIC33EP128MC502, dsPIC33EP256MC502, dsPIC33EP512MC502 ' Settings for the pitch-chip compilation: Device = 24EP256MC202 ' must be this one for the pitch compilation $define Pitch $define Enable_Timer23 ' 32-bit timer for vibrato delay ' settings for the ampli-chip compilation: 'Device = 24EP128MC202 ' this one is ok for the ampli compilation '$define Ampli '$define Enable_Timer2 ' for ADSR '$define Enable_Timer3 ' for watchdog LED 'Clear ' common defines for both compilations: $define Enable_Int0 ' for pitch $define Enable_Timer1 $define Enable_Timer4 ' for vibrato $define Enable_Timer5 ' for tremolo in the ampli compilation ' watchdog in the pitch compilation. $define Enable_UART_RX ' midi-in $define Enable_PWM ' precompiler instructions ' not used here: '$define Enable_UART_TX ' midi-out '$define enable_Timer45 ' 32-bit timer '$define Enable_ADC12bit ' precompiler instructions Config FPOR = ALTI2C1_OFF, ALTI2C2_OFF ' unsure about this Config FWDT = WDTPOST_PS256, WINDIS_OFF, PLLKEN_ON, FWDTEN_OFF ' FWDTEN_OFF disables the WDT (watchdog timer) RCON.5 = 0 ' clear the watchdog enable bit for reset = SWDTEN_OFF ' first configure the clock... ' select internal FRC at POR not using PLL: Config FOSCSEL = FNOSC_FRC, IESO_OFF DelayMS 10 ' make sure we assign the correct pins to use for the ICD (Pickit3) Config FICD = ICS_PGD1, JTAGEN_OFF ' this sets the pins used for the programmer ' enable clock switching and configure POSC for XT mode with 10MHz crystal Config FOSC = FCKSM_CSECMD, OSCIOFNC_OFF, POSCMD_XT Main_Setup: ' configure PLL prescaler, PLL postscaler, PLL divisor PLLFBD = 46 CLKDIV.7 = 0 'PLLPOST N2=2 CLKDIV.6 = 0 CLKDIV.0 = 0 'PLLPRE N1=2 CLKDIV.1 = 0 CLKDIV.2 = 0 CLKDIV.3 = 0 CLKDIV.4 = 0 Write_OSCCONH ($3) ' = __builtin_write_OSCCONH(0x03) Write_OSCCONL (OSCCON | %1) ' = __builtin_write_OSCCONL(OSCCON | 0x01) PLL_Setup(48, 2, 2, $0300) ' should set it to 120MHz operation with 10MHz X-tal ' Fosc = 10MHz * 48 / 2 * 2 = 120MHz ' now we get a 10MHz clock signal on pin OSC2, pin10... DelayMS 1000 ' wait for stability ' wait for the clock switch to occur: 'while OSCCON & %0111000000000000 = %0011000000000000 ' mask for COSC bits 14-12 'wend ' wait for pll to lock ' this is done in de PLL_setup macro 'while osccon.5 = 1 'wend Declare Xtal = 120 ' set to Fosc PPS_Output(cOut_Pin_RP40, cOut_Fn_U1TX) ' Map UART1 TX pin to RP40 'RP35 PPS_Input(cIn_Pin_RP41, cIn_Fn_U1RX) ' Map UART1 RX pin to RP41 'RPI34 ' constant declarations and port-assignments for debugging: '*********************************************************** 'Symbol framing_error_led PORTA.4 Symbol loopcnt PORTB.5 ' this is pin 14 Symbol poweron_led PORTA.4 ' green LED Symbol watchdog_led PORTB.4 ' red LED Symbol Int0 PORTB.7 ' external IRQ pin on the pitch chip, pin 16 Symbol Sig0 PORTB.6 ' signal from ampli pic to pitch-pic, pin 15 $ifdef Ampli ' added for debugging the ADSR system: ' only in the ampli compilation! Symbol A_Led PORTA.0 ' blue Symbol D_Led PORTA.1 ' green Symbol S_Led PORTB.0 ' yellow Symbol R_Led PORTB.1 ' red $endif $ifdef Pitch Symbol Vib_debug PORTA.0 ' for debugging the vibrato code $endif 'initialisations for the midi input parser: Symbol Midichannel = 13 ' robot_Channel - Teno Symbol NoteOff_Status = 128 + Midichannel ' 2 bytes follow Symbol NoteOn_Status = 144 + Midichannel Symbol Keypres_Status = 160 + Midichannel Symbol Control_Status = 176 + Midichannel Symbol ProgChange_Status = 192 + Midichannel ' 1 byte message Symbol Aftertouch_Status = 208 + Midichannel ' 1 byte follows Symbol Pitchbend_Status = 224 + Midichannel ' lsb msb follow Symbol PWM_reset = 1024 ' halfway value for waveform PWM - so we have 11-bit resolution Symbol PWM_Range = 2047 ' 11-bits - setting for PTPER Symbol CC1_default = 30 ' noise Symbol CC2_default = 48 ' starttime after note-on for vibrato. 64 = 500ms. 06.07.2021 ' 48 = 375ms 03.03.2024 Symbol CC2_units = 1834 ' 1834 x 128 x 4.26us = 1 sekonde Symbol CC3_default = 8 ' vibrato depth Symbol CC4_default = 94 ' vibrato speed Symbol CC5_default = 4 ' tremolo depth .halved in the ctrl.handler , so here we have the halved midi value Symbol CC6_default = 20 ' tremolo speed Symbol CC7_default = 80 ' default volume 'Symbol CC8_default = 0 ' default portamento time Symbol CC15_default = 40 '24 ' ADSR-period Symbol CC16_default = 30 '64 ' attack time Symbol CC17_default = 100 ' sustain level - now a proportion of velo!!! Symbol CC18_default = 8 ' decay time Symbol CC19_default = 120 ' release time Symbol CC20_default = 64 ' tuning Symbol CC65_default = 0 ' legato, portamento flags Symbol CC80_default = 1 ' = midi 31-62 for 30dB dynamic lookup ' registers: ' for : crosschecked with the valve PIC! Symbol Teno_lowest = 28 Symbol Teno_pedal_low = 28 ' all valves depressed. Symbol Teno_pedal_high = 39 ' notes 34 - 39 are in theory impossible Symbol Teno_low = 40 Symbol Teno_low_end = 58 Symbol Teno_mid = Teno_low_end + 1 ' 59 Symbol Teno_mid_end = 78 Symbol Teno_high = Teno_mid_end + 1 Symbol Teno_high_end = 89 Symbol Teno_Highest = 89 Symbol Ekla_lowest = 54 'Symbol Teno_pedal_low = 28 ' all valves depressed. 'Symbol Teno_pedal_high = 39 ' notes 34 - 39 are in theory impossible 'Symbol Teno_low = 40 'Symbol Teno_low_end = 58 'Symbol Teno_mid = Teno_low_end + 1 ' 59 'Symbol Teno_mid_end = 78 'Symbol Teno_high = Teno_mid_end + 1 'Symbol Teno_high_end = 89 Symbol Ekla_Highest = 108 '89 ' waveform parameters: Symbol Wav11p1_default = 27 '32 '27 ' parametric1 Symbol Wav11p2_default = 83 '74 '83 Symbol Wav11p3_default = 96 '80 '96 Symbol Wav11p4_default = 110 '103 '110 Symbol Wav2p1_default = 42 ' square 'Symbol p6_default = 42 ' triangle 'Symbol p7_default = 85 'Symbol p8_default = 8 ' pulse 'Symbol p9_default = 64 ' assin Symbol Wav9p1_default = 20 ' dirty assin symmetry Symbol Wav9p2_default = 64 ' dirty assin noisyness 'constants used for the operation of the PWM modules ' the modus operandi should be set at compile time! Symbol PWMmodus = 0 ' 0 = all pwm channels have the same period (frequency) ' PDC1, PDC2, PDC3 steer the PWM setting for each channel ' PTPER is the register to control the period (frequency) ' PHASE1, PHASE2, PHASE3 steer the phase between output channels ' This mode can be used for ADSR control on 3 channels. ' This is also the mode used for a monophonic synth with ' waveform synthesis and adsr. ' 1 = the three PWM channels have individual period (frequency) controls ' controlled with the PHASE1, PHASE2, PHASE3 registers ' PDC1, PDC2, PDC3 registers steer the PWM ' PWM-value must be < Period ' this mode could be used to implement a 3-voice midi synth ' We only use the PWMH pins for output here, so portB.15, portB.13 and portB.11 ' are free and can be used for adrs control ' 2 = 3-phase motor control mode ' PTPER controls the period (frequency) ' MDC controls the duty cycle for the 3 channels ' PHASE1, PHASE2, PHASE3 steer the phase between the channels ' we start-up with 120 degree phase shifts. ' 3 = 2-phase ac motor using a capacitor phase shifter ' PTPER controls the period (frequency) ' MDC controls the duty cycle for the 3 cha ' PHASE1, PHASE2, PHASE3 steer the phase be' port I/O settings: ' we start-up with 90 degree phase shifts. Symbol angle8 = 6.28318530717 / 256 ' for 8-bit wave table calculation Symbol angle7 = 6.28318530717 / 128 Symbol angle6 = 6.28318530717 / 64 Symbol v_angle = 6.28318530717 / 32 ' for vibrato sine ' for , , , , , -horn= , ,,: ' pwm1H should become sound output on the synth pic ' pwm2H should become ADSR output for multiplier ' pwm3H should become voltage control output for filter or main volume control TRISA = %100000 ' set to output TRISB = %0101011110000000 ' PortB.7 is external interrupt input Output loopcnt Output Sig0 $ifdef Enable_Int0 ' 31.03.2017: This works fine. [ first used in the Rodo-Radar code] ' for autosax used in the pitch pic to receive note off commands. ' same function in and all other 2-processor boards. ' IFS0.0 = INT0IF bit interrupt flag ' IEC0.0 = INT0IE bit interrupt enable flag ' IPC0.0, IPC0.1, IPC0.2 interrupt priority bits, INT0IP bits $ifdef Pitch IPC0.0 = 0 ' priority level set to 4 IPC0.1 = 0 IPC0.2 = 1 Set IEC0.0 ' 0 = disable interrupt on start-up ' 1 = enable interrupt on start-up Clear IFS0.0 ' clear irq flag INTCON2.0 = 1 ' 0 = irq on positive edge INT0EP bit ' 1 = irq on negative edge INTTREG.Byte0 = %00001000 ' do we need this? $endif $ifdef Ampli IPC0.0 = 0 ' priority level set to 0 IPC0.1 = 0 IPC0.2 = 0 Clear IFS0.0 ' clear flag Clear IEC0.0 ' disable IRQ $endif $endif $ifdef Enable_Timer1 ' used as sample frequency generator $ifdef Pitch IPC0bits_T1IP0 = 0 ' set priority - this is very critical! IPC0bits_T1IP1 = 1 IPC0bits_T1IP2 = 1 ' 6 = 110 ' was set to 6 = 011 for ' now for Flut we did set it to 7 = 111 - as we crashed, back to 6 now. ' set to 6 on , and 'TMR1 = 0 ' clear the count 'PR1 = 65535 ' load Timer1 period PR1 = 128 ' this sets the sampling rate and thus the pitch of the note. T1CON.5 = 0 ' set prescaler to :8 = 01 , :64 = 10 , :256 = 11 T1CON.4 = 0 ' prescaler :1 = 00 T1CON.15 = 1 ' start IFS0bits_T1IF = 0 ' clear Timer1 interrupt flag 'IEC0bits_T1IE = 1 ' Enable the Timer1 interrupt $endif $ifdef Ampli IPC0bits_T1IP0 = 0 ' set priority lowest IPC0bits_T1IP1 = 0 IPC0bits_T1IP2 = 0 IEC0bits_T1IE = 0 ' disable interrupt $endif $endif $ifdef Enable_Timer2 ' only for ampli version T2CONbits_TSIDL = 0 T2CONBITs_T32 = 0 ' 16 bits timer T2CONbits_TCS = 0 ' internal clock T2CON.5 = 1 ' pre-scale 256 T2CON.4 = 1 TMR2 = 0 PR2 = 2048 ' ADSR_Period IFS0bits_T2IF = 0 ' clear IRQ flag IPC1bits_T2IP0 = 1 ' set priority to 5 IPC1bits_T2IP1 = 0 IPC1bits_T2IP2 = 1 IEC0bits_T2IE = 1 ' enable timer 2 interrupt T2CONbits_TON = 0 ' stop timer for now! $endif $ifdef Enable_Timer3 ' only used as watchdog in the ampli compilation T3CONbits_TSIDL = 0 T3CONbits_TCS = 0 ' internal clock T3CON.5 = 1 ' pre-scale 256 T3CON.4 = 1 IPC2bits_T3IP0 = 1 ' set priority to 1 IPC2bits_T3IP1 = 0 IPC2bits_T3IP2 = 0 TMR3 = 0 PR3 = 65535 IFS0bits_T3IF = 0 ' clear IRQ flag IEC0bits_T3IE = 1 ' enable timer 3 interrupt T3CONbits_TON = 1 ' start timer $endif $ifdef Enable_Timer23 ' used as a 32-bit timer for starting vibrato after note-on T2CONbits_TON = 0 ' stop counting T3CONbits_TON = 0 T2CONBITs_T32 = 1 ' 32- bit timer start T2CONbits_TCS = 0 ' internal clock T2CONbits_TSIDL = 0 T2CON.5 = 1 ' pre-scale 256 time units are 4.266us = 60MHz / 256 T2CON.4 = 1 ' id. TMR3HLD = 0 TMR2 =0 PR2 = 0 ' 65535 lsb overflows in 279.62ms PR3 = 2 ' 65535 msb overflows in 5 hours IPC2bits_T3IP0 = 0 ' set priority to 2 IPC2bits_T3IP1 = 1 IPC2bits_T3IP2 = 0 IFS0bits_T3IF = 0 ' clear IRQ flag IEC0bits_T3IE = 1 ' 1 = enable timer 3 interrupt ' disabled on boot. $endif $ifdef enable_Timer45 T4CONBITs_T32 = 1 ' 32- bit timer start T4CONbits_TCS = 0 ' internal clock T4CONbits_TON = 1 T4CONbits_TSIDL = 0 T4CON.5 = 1 ' pre-scale 256 T4CON.4 = 1 TMR5HLD = 0 TMR4 = 0 PR4 = 65535 PR5 = 65535 IPC7bits_T5IP0 = 1 ' set priority to 3 IPC7bits_T5IP1 = 1 IPC7bits_T5IP2 = 0 IFS1bits_T5IF = 0 ' clear IRQ flag IEC1bits_T5IE = 1 ' enable timer 5 interrupt $endif $ifdef Enable_Timer4 $ifdef Pitch ' In ,,,,,,,, used as vibrato timer ' with :256 prescaler, a unit becomes 2.12 us ' so maximum period would be 140ms, or 7.15Hz ' if we toggle a bit everytime the IRQ occurs, the frequency ' would become 3.57 Hz - usefull for vibrato or tremolo T4CON.15 = 1 ' start timer in 16 bit mode T4CON.13 = 0 T4CON.6 = 0 'T4CON.5 = 1 ' prescaler set to :256 'T4CON.4 = 1 ' 00 = :1, 01 = :8 , 10 = :64, 11 = :256 ' new 18.01.2021: T4CON.5 = 1 T4CON.4 = 0 ' prescaler to : 64 for vibrato. T4CON.3 = 0 ' operate as 16 bit timer T4CON.1 = 0 ' internal clock TMR4 = 0 ' reset 'PR4 = Dur[CC4_default] >> 2 ' set to default value for vibrato speed. ' at this point, Dur[] is not yet filled!!! PR4 = 5141 IPC6bits_T4IP0 = 1 ' set priority to 3 IPC6bits_T4IP1 = 1 IPC6bits_T4IP2 = 0 ' clear interrupt flag Clear IFS1bits_T4IF ' using the declares ' enable interrupt so we can have vibrato on by default ' must be enabled at all times! Set IEC1bits_T4IE ' idem, using the declares $endif $ifdef Ampli IPC6bits_T4IP0 = 0 ' set priority to 0 IPC6bits_T4IP1 = 0 IPC6bits_T4IP2 = 0 ' clear interrupt flag Clear IFS1bits_T4IF ' disable interrupt Clear IEC1bits_T4IE Clear T4CONbits_TON $endif $endif $ifdef Enable_Timer5 T5CON.15 = 1 ' start timer in 16 bit mode T5CON.13 = 0 T5CON.6 = 0 T5CON.5 = 1 ' prescaler set to :256 T5CON.4 = 1 ' id. T5CON.1 = 0 ' internal clock Clear TMR5 $ifdef Ampli ' In ,,,,, used as AM modulation timer 'PR5 = Dur[CC6] ' preset counter ' not known here, so we do: PR5 = 17107 IPC7bits_T5IP0 = 0 ' set priority to 4 IPC7bits_T5IP1 = 0 IPC7bits_T5IP2 = 1 IFS1bits_T5IF = 0 ' clear IRQ flag IEC1bits_T5IE = 1 ' enable timer 5 interrupt so we can have tremolo on by default ' this bit should allways remain set!!! ' the tremolo flag is checked in the interrupt handler $endif $ifdef Pitch ' now used as watchdog only in the pitch compilation IPC7bits_T5IP0 = 1 ' set priority to 1 IPC7bits_T5IP1 = 0 IPC7bits_T5IP2 = 0 IFS1bits_T5IF = 0 ' clear IRQ flag PR5 = 65535 IEC1bits_T5IE = 1 ' enable IRQ ' 0 = disable irq T5CONbits_TON = 1 ' start timer ' this should do the watchdog in the pitch compilation now. $endif $endif $ifdef Enable_UART_RX ' init UART1-receiver: 31250 Baud ' should generate an interrupt for each byte received U1MODE.0 = 0 ' = U1MODEbits.STSEL = 0 ' 1 stop-bit U1MODE.1 = 0 ' U1MODEbits.PDSEL = 0 ' 8 bit no parity U1MODE.2 = 0 U1MODE.5 = 0 ' =U1MODE_bits.ABAUD = 0 ' no autobauding U1MODE.3 = 0 ' = U1MODEbits.BRGH =0 ' 0 = standard speed mode - 16 clocks per bit U1MODE.4 = 0 ' logic high is the idle state for the input serial data (default) U1MODE.7 = 0 ' wakeup disabled U1MODE.8 = 0 U1MODE.9 = 0 U1BRG = 119 ' 239 ' voor 120MHz 119 ' voor 60MHz ((60000000 / Hserial_baud) / 16) - 1 ' BRGVAL U1STA.5 = 0 ' no bit8 U1STA.6 = 0 ' U1STAbits.URXISEL = 0 ' receive interrupt mode selection bits U1STA.7 = 0 ' interrupt flag is set when a byte is received U1MODE.15 = 1 '=U1MODEbits.UARTEN = 1 U1MODE.12 = 0 ' disable IrDA $ifdef Pitch IPC2.12 = 1 '0 ' set priority level to 5 for receiver IPC2.13 = 0 '1 IPC2.14 = 1 $endif $ifdef Ampli IPC2.12 = 0 '0 ' set priority level to 6 for receiver IPC2.13 = 1 '1 IPC2.14 = 1 $endif IEC0.11 = 1 ' enable IRQ for receiver IEC4.1 = 1 ' enable IRQ for error trapping on receiver $endif $ifdef Enable_UART_TX U1STA.15 = 0 'interrupt generated when character transferred to tx buffer and buffer is empty U1STA.15 = 0 U1STA.10 = 1 ' transmit enable bit U1STA.11 = 0 Clear IFS0.12 ' clear transmit interrupt flag Set IEC0.12 ' enable interrupt IPC3.0 = 1 IPC3.1 = 1 IPC3.2 = 0 ' set priority to 3 $endif $ifdef Enable_ADC12bit ' init for ADC system: try 12 bit ADC (500kS/s) ' not used in nor , ,... 'SMPI1. ADDMAEN = 0 AD1CON1.15 = 1 ' adc module ON AD1CON1.10 = 1 ' select 12-bit mode AD1CON1.9 = 0 ' conversion to right alligned integer 0000 dddd dddd dddd AD1CON1.8 = 0 ' id. AD1CON1.7 = 1 ' auto-convert mode AD1CON1.6 = 1 ' id. AD1CON1.5 = 1 ' id AD1CON1.4 = 0 ' SSRCG AD1CON1.2 = 1 ' sampling immediately after last conversion. SAMP bit it autoset. AD1CON2.15 = 0 ' ref AvDD and AsSS AD1CON2.14 = 0 AD1CON2.13 = 0 AD1CON2.10 = 0 ' no scan ' bits 6-2 = 0 ==> generates interrupt after every sample conversion AD1CON2.1 = 0 ' always fill buffer from the start adres AD1CON2.0 = 0 'use channel input selects for sample MUXA AD1CON3.0 = 0 ' clock derived from system clock AD1CON3.12 = 1 ' 10000 = 16 Tad -autosample time bits AD1CON3.11 = 0 ' / AD1CON3.10 = 0 '/ AD1CON3.9 = 0 ' / AD1CON3.8 = 0 '/ AD1CON3.Byte0 = 16 ' ADCS ADC1 conversion clock select bits (sampling rate) AD1CON4.8 = 0 ' no DMA - results stored in ADC1BUF0 to ADC1BUFF registers AD1CHS0 = 0 ' clear complete register. AN0 is input channel ' now we have to enable the interrupt and find out how to transfer data to an array IEC0.13 = 1 ' enable IRQ 'IPC3 <6:4> set the priority level IFS0.13 = 0 ' clear interrupt flag ' --------------------------------------------------------------------------------- $endif $ifdef Enable_PWM ' PWM channel initialisation ------------------------------------------------------ 'CNPD1 ' enable internal pull down resistor to reset the FLT32 flag on init ' disable interrupts: IEC5.14 = 0 IEC5.15 = 0 IEC6.0 = 0 ' clear interrupt flags: Clear IFS5.14 Clear IFS5.15 Clear IFS6.0 ' pwm time base control register: PTCON 'PTCON.pwm Clear PTCONbits_PTEN ' = PTCON.15 = 0 ' pwmx disabled for setting the bits, should be enabled at the end. PTEN 'PTCON Timebase control register Clear PTCONbits_PTSIDL ' = PTCON.13 ' PTCONbits_SESTAT 'PTCON.12 ' status bit to read Clear PTCONbits_SEIEN ' PTCON.11 disable special event interrupt Set PTCONbits_EIPU ' PTCON.10 active period register is updated immediately Clear PTCONbits_SYNCPOL ' PTCON.9 sync active high. Irrelevant here as we do not use sync Clear PTCONbits_SYNCOEN ' PTCON.8 = 0 ' disable sync output Clear PTCONbits_SYNCEN ' PTCON.7 = 0 ' no external sync Clear PTCONbits_SYNCSRC0 'PTCON.4 Clear PTCONbits_SYNCSRC1 'PTCON.5 Clear PTCONbits_SYNCSRC2 'PTCON.6 Clear PTCONbits_SEVTPS0 'PTCON.0 special event postscaler bits Clear PTCONbits_SEVTPS1 'PTCON.1 Clear PTCONbits_SEVTPS2 'PTCON.2 Clear PTCONbits_SEVTPS3 'PTCON.3 '%110 = / 64 ' timing resolution should become 64x8.5ns = 544ns = 0.544us Select Case PWMmodus Case 0 ' this works o.k. now 'PWMCON1.9 = 0 ' ITB: Independent time base mode if set to 1 'PWMCON2.9 = 0 ' PTPER register steers time base if set to 0 'PWMCON3.9 = 0 ' we do not have a SPHASE1, 2, 3 register thus independent pwm control is not possible ' cfr manual example 14-14, p.44 Clear PWMCON1 Clear PWMCON2 Clear PWMCON3 ' added for : Set PWMCON1.7 ' disable dead-time function Set PWMCON1.0 ' updates are immediate Set PWMCON2.7 ' disable dead-time function Set PWMCON2.0 ' updates are immediate Set PWMCON3.7 ' disable dead-time function Set PWMCON3.0 ' updates are immediate ' PTCON2 register ' pwm input clock prescaler, set to 1 (no division) ' so 1 unit is 8.33 ns 'Set PTPER ' set to lowest frequency = 1831,16 Hz ' for the ADSR implementation we should set this as fast as possible! PTPER = PWM_Range ' was : PWM_reset << 1 =2048 '65535 '2048 '4096 '1024 '64 '256 ' 1024 ' 256 '1024 ' this limits the useable range for PWM values ' now 2047, should be ok. ' 2048 should give 58617 Hz period and 11-bit resolution ' 256 would give 468937 Hz and 8-bit resolution ' 64 would give 1.875750 MHz ' this limits the resolution of the PWM ' using values > 2048 increases artefacts (audible difference tones in the output signal) ' This sets the resolution for the pwm. The value should be larger than PDC1 range. ' Idealy this period should be set to something related to the pitch to be generated. ' Thus the harmonics could be made to be in tune (or slightly out) with the actual pitch. ' set PWMx timing resolution to maximum (divide by 1) Clear PTCON2bits_PCLKDIV0 ' PTCON2.0 ' bit0 Clear PTCON2bits_PCLKDIV1 ' PTCON2.1 ' bit1 Clear PTCON2bits_PCLKDIV2 ' PTCON2.2 ' bit2 PDC1 = PWM_reset ' should be 50% at rest Clear PDC2 Clear PDC3 Clear PHASE1 Clear PHASE2 Clear PHASE3 Set MDC ' set to longest period - irrelevant here, as we do not use MDC ' make the pwmL port free for general I/O: (note_Ports) ' should be changed for bug. All outputs can be complementary PWM or push pull IOCON1.15 = 1 ' pwmH IOCON1.14 = 1 ' 0 = set to I/O, if 1 we have pwmL here IOCON2.15 = 1 ' pwmH IOCON2.14 = 0 ' set to I/O IOCON3.15 = 1 ' pwmH IOCON3.14 = 0 ' set to I/O ' polarity bits: IOCON1.13 = 0 '1= active low, 0 = active High 'must be 0 for bug IOCON1.12 = 0 ' same for the L channel ' these settings have to be set in Mov #0xC0000, w0 as they require the key! ' the FCLCON1,2,3 and IOCON1,2,3 require a key to be written: ' pwm channel 1: -------------------------------------------- Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC003, w0 ' required value for FCLCON1 ' %1100000000000000 = &HC000 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, FCLCON1 ' set pwm ownership and polarity to IOCON1 ' IOCON1 = 0xC000 sets pwm mode to complementary outputs ' IOCON1 = 0xC002 ' swap output pins Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC002, w0 ' required value for IOCON1 ' 0xA800 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, IOCON1 ' pwm channel 2: -------------------------------------------- Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC003, w0 ' required value for FCLCON2 ' %1100000000000000 = &HC000 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, FCLCON2 ' set pwm ownership and polarity to IOCON2 Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0x8000, w0 ' required value for IOCON2 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, IOCON2 ' pwm channel 3: ----------------------------------------------- Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC003, w0 ' required value for FCLCON3 ' %1100000000000000 = &HC000 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, FCLCON3 ' set pwm ownership and polarity to IOCON1 Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0x8000, w0 ' required value for IOCON3 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, IOCON3 Case 1 ' not used for ' cfr. example 14-18, p.48 in manual 'PWMCON1.9 = 1 ' ITB: Independent time base mode if set to 1 'PWMCON2.9 = 1 ' PTPER register steers time base if set to 0 'PWMCON3.9 = 1 ' we do not have a SPHASE1, 2, 3 register thus independent pwm control is not possible ' IOCON1,2,3 must be $C000 PWMCON1 = $0200 PWMCON2 = $0200 PWMCON3 = $0200 ' PTCON2 register ' pwm input clock prescaler, set to /64 Clear PTCON2bits_PCLKDIV0 ' PTCON2.0 ' bit0 Set PTCON2bits_PCLKDIV1 ' PTCON2.1 ' bit1 Set PTCON2bits_PCLKDIV2 ' PTCON2.2 ' bit2 Set PTPER '= 256 ' test value - probably irrelevant in this mode Set PHASE1 ' freq to lowest Set PHASE2 Set PHASE3 Clear PDC1 ' duty cycles note: PDC1 < PHASE1 Clear PDC2 Clear PDC3 Set MDC ' ? clear mdc - seems irrelevant here ' make the pwmL port free for general I/O: IOCON1.15 = 1 IOCON1.14 = 0 IOCON2.15 = 1 IOCON2.14 = 0 IOCON3.15 = 1 IOCON3.14 = 0 ' the FCLCON1,2,3 and IOCON1,2,3 require a key to be written: ' pwm channel 1: -------------------------------------------- Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC003, w0 ' required value for FCLCON1 ' %1100000000000000 = &HC000 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, FCLCON1 ' set pwm ownership and polarity to IOCON1 ' IOCON1 = 0xC000 sets pwm mode to complementary outputs Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0x8000, w0 ' required value for IOCON1 -pwmL disabled. Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, IOCON1 ' pwm channel 2: -------------------------------------------- Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC003, w0 ' required value for FCLCON2 ' %1100000000000000 = &HC000 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, FCLCON2 ' set pwm ownership and polarity to IOCON2 Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0x8000, w0 ' required value for IOCON2 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, IOCON2 ' pwm channel 3: ----------------------------------------------- Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC003, w0 ' required value for FCLCON3 ' %1100000000000000 = &HC000 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, FCLCON3 ' set pwm ownership and polarity to IOCON1 Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0x8000, w0 ' required value for IOCON3 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, IOCON3 ' now we have ports free for ADRS: Symbol ADSR_Port1 PORTB.15 Symbol ADSR_Port2 PORTB.13 Symbol ADSR_Port3 PORTB.11 Output ADSR_Port1 Output ADSR_Port2 Output ADSR_Port3 Case 2 ' 3-phase motor control setting ' ref. ,manual 14-16, p. 46 'PWMCON1.9 = 0 ' ITB: Independent time base mode if set to 1 'PWMCON2.9 = 0 ' PTPER register steers common time base if set to 0 'PWMCON3.9 = 0 PWMCON1 = $0100 PWMCON2 = $0100 PWMCON3 = $0100 ' PTCON2 register ' pwm input clock prescaler, set to /64 Clear PTCON2bits_PCLKDIV0 ' PTCON2.0 ' bit0 Set PTCON2bits_PCLKDIV1 ' PTCON2.1 ' bit1 Set PTCON2bits_PCLKDIV2 ' PTCON2.2 ' bit2 Clear MDC ' master duty cycle control - set to zero on init Set PTPER ' lowest freq. Clear PHASE1 ' 0 graden PHASE2 = 21845 ' 120 graden PHASE3 = 43690 ' 240 graden ' the FCLCON1,2,3 and IOCON1,2,3 require a key to be written: ' pwm channel 1: -------------------------------------------- Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC003, w0 ' required value for FCLCON1 ' %1100000000000000 = &HC000 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, FCLCON1 ' set pwm ownership and polarity to IOCON1 ' IOCON1 = 0xC000 sets pwm mode to complementary outputs Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC000, w0 ' required value for IOCON1 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, IOCON1 ' pwm channel 2: -------------------------------------------- Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC003, w0 ' required value for FCLCON2 ' %1100000000000000 = &HC000 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, FCLCON2 ' set pwm ownership and polarity to IOCON2 Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC000, w0 ' required value for IOCON2 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, IOCON2 ' pwm channel 3: ----------------------------------------------- Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC003, w0 ' required value for FCLCON3 ' %1100000000000000 = &HC000 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, FCLCON3 ' set pwm ownership and polarity to IOCON1 Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC000, w0 ' required value for IOCON3 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, IOCON3 Case 3 ' 2-phase ac motor PWMCON1 = $0100 PWMCON2 = $0100 Clear PTcon2bits_PCLKDIV0 Set PTcon2bits_PCLKDIV1 Set PTcon2bits_PCLKDIV2 Clear MDC Set PTPER Clear PHASE1 PHASE2 = 16384 ' 90 graden ' the FCLCON1,2,3 and IOCON1,2,3 require a key to be written: ' pwm channel 1: -------------------------------------------- Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC003, w0 ' required value for FCLCON1 ' %1100000000000000 = &HC000 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, FCLCON1 ' set pwm ownership and polarity to IOCON1 ' IOCON1 = 0xC000 sets pwm mode to complementary outputs Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC000, w0 ' required value for IOCON1 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, IOCON1 ' pwm channel 2: -------------------------------------------- Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC003, w0 ' required value for FCLCON2 ' %1100000000000000 = &HC000 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, FCLCON2 ' set pwm ownership and polarity to IOCON2 Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC000, w0 ' required value for IOCON2 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, IOCON2 ' pwm channel 3: ----------------------------------------------- Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC003, w0 ' required value for FCLCON3 ' %1100000000000000 = &HC000 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, FCLCON3 ' set pwm ownership and polarity to IOCON1 Mov #0xabcd, w10 ' etc... p. 226 pwm manual Mov #0x4321, w11 Mov #0xC000, w0 ' required value for IOCON3 Mov w10, PWMKEY Mov w11, PWMKEY Mov w0, IOCON3 EndSelect ' common settings: PWMCON1.12 = 0 'fault interrupt disabled PWMCON2.12 = 0 PWMCON3.12 = 0 PWMCON1.11 = 0 'current limit disabled PWMCON2.11 = 0 PWMCON3.11 = 0 PWMCON1.10 = 0 'trigger event interrupts disabled PWMCON2.10 = 0 PWMCON3.10 = 0 ' PWMCON1.9 = 1 ' ITB: Independent time base mode if set to 1 ' PWMCON2.9 = 1 ' PTPER register steers time base if set to 0 ' PWMCON3.9 = 1 ' we do not have a SPHASE1, 2, 3 register thus independent pwm control is not possible ' PWMCON1.8 = 0 'PCD1 en SDC1 registers provide duty cycle info - ' PWMCON2.8 = 0 ' PWMCON3.8 = 0 PWMCON1.7 = 1 ' dead time disabled PWMCON2.7 = 1 PWMCON3.7 = 1 ' PWMCON1.6 = 0 ' PWMCON2.6 = 0 ' PWMCON3.6 = 0 ' PWMCON1.3 = 0 ' PWMCON2.3 = 0 ' PWMCON3.3 = 0 ' PWMCON1.2 = 0 ' edge aligned mode CAM bit. Ignored when ITB = 0 ' PWMCON2.2 = 0 ' PWMCON3.2 = 0 ' PWMCON1.1 = 0 ' PWMCON2.1 = 0 ' PWMCON3.1 = 0 ' PWMCON1.0 = 1 ' PWMCON2.0 = 1 ' PWMCON3.0 = 1 ' The pwm1 to pwm3 values for the duty cycle are in the PDC1, PDC2 and PDC3 registers ' The phases in the PHASE1, PHASE2, PHASE3 registers, if not used for frequency. AUXCON1 = 0 AUXCON2 = 0 AUXCON3 = 0 Set PTCONbits_PTEN ' = PTCON.15 pwmx should be enabled at the end. $endif ' --------------------------------------------------------------------------------- ' --- end of chip initialisation code.--------------------------------------------- ' --------------------------------------------------------------------------------- Variables: ' variable declarations: ' variables for midi reception and parsing: Dim inByte As Byte Dim IndexIn As Byte ' Pointer to the next empty location in the buffer Dim IndexOut As Byte ' Pointer to the location of the oldest character in the buffer Dim Ringbuffer[256] As Byte ' Array for holding received characters in the uart $ifdef Enable_UART_TX Dim Outbuffer[256] As Byte ' buffer for midi-output UART Dim OutIdxIn As Byte Dim OutIdxOut As Byte $endif Dim Bytein As Byte ' midi byte read from buffer Dim StBit As Bytein.7 ' highest bit of ByteIn ' midi variables Dim statusbyte As Byte Dim noteUit As Byte ' note off + release value Dim release As Byte Dim noteAan As Byte ' note on + release value Dim velo As Byte Dim notePres As Byte ' note pressure + pressure value Dim pres As Byte Dim Ctrl As Byte ' continuous controller + value Dim value As Byte Dim prog As Byte ' program change + program-byte Dim aft As Byte ' channel aftertouch Dim pblsb As Byte ' pitch bend lsb Dim pbmsb As Byte ' pitch bend msb Dim Bend As SWord ' for preservation of pitchbend during vibrato Dim PB_old As Byte ' for thinning pitch-bend streams 01.04.2020 Dim i As Byte Dim j As Float ' used for wave calculation and pitchbend Dim k As Word Dim att_flag As Word Dim att As att_flag.0 ' attack flag bit for sound generator Dim Dur[128] As Word $ifdef Enable_ADC12bit Dim DataBuffer[256] As Word ' adc databuffer - not used here. Dim DataInIdx As Byte Dim DataOutIdx As Byte $endif $ifdef Pitch Dim Samprate[128] As Word ' copied from Perxxx lookups on init - these set the pitch ' we have 24 lookups for just intonation and one for natural overtone series. ' sample lookup tables: ' these are accessed by their pointers! 'Dim Wave0[1024] As Word ' changed 04.03.2021 - now 8 periods 'Dim Wave0[1280] As Word ' Wave0 now becomes the attack-waveform, 10 to 16 periods ' so, wave0[2048] for 16 periods. Here 10 periods... Dim Wave0[1536] As Word ' 12 periods - 07.10.2021 Dim Wave1[512] As Word ' = So_wave Dim Wave2[256] As Word ' square wave Dim Wave3[512] As Word ' = Sax Wave Dim Wave4[1024] As Word ' Hunt wave Dim Wave5[512] As Word ' new for alto - from sample recorded gwr Dim Wave6[512] As Word ' = So wave 7 Dim Wave7[512] As Word ' return wave with wave5 and semitone valve down Dim Wave8[512] As Word ' excitation wave 07.10.2021 Dim Wave9[256] As Word ' dirty sine Dim Wave10[512] As Word ' return wave obtained with wave5 as input Dim Wave11[256] As Word ' beauchamp Dim Wave12[512] As Word 'excitation wave 2*Wave5 - Wave7 ' pointer declares: Dim pWave As Word ' pointers to be changed this is used in the timer1 IRQ Dim pWave_end As Word ' and set on reception of a note-on Dim pScnt As Word ' sample address counter, set on note-on, incremented in timer1 ' for reset after power down: Dim pWaveSub_Store As Word ' storage, for implementation of sub register Dim pWaveSub_end_store As Word Dim pWaveLow_Store As Word ' storage, for implementation of low register Dim pWaveLow_end_store As Word Dim pWaveMed_Store As Word Dim pWaveMed_end_Store As Word Dim pWaveHigh_Store As Word ' 82-91 Dim pWaveHigh_end_Store As Word Dim pWave0 As Word '16 bit pointer - should become the attack wave. Dim pWave0_end As Word pWave0 = AddressOf(Wave0) pWave0_end = AddressOf(Wave0_1535) ' might become Wave0_2047 for 16 periods Dim pWave1 As Word '16 bit pointer Dim pWave1_end As Word pWave1 = AddressOf(Wave1) pWave1_end = AddressOf(Wave1_511) Dim pWave2 As Word '16 bit pointer Dim pWave2_end As Word pWave2 = AddressOf(Wave2) pWave2_end = AddressOf(Wave2_255) Dim pWave3 As Word '16 bit pointer Dim pWave3_end As Word pWave3 = AddressOf(Wave3) pWave3_end = AddressOf(Wave3_511) Dim pWave4 As Word '16 bit pointer Dim pWave4_end As Word pWave4 = AddressOf(Wave4) pWave4_end = AddressOf(Wave4_1023) Dim pWave5 As Word '16 bit pointer Dim pWave5_end As Word pWave5 = AddressOf(Wave5) pWave5_end = AddressOf(Wave5_511) Dim pWave6 As Word '16 bit pointer Dim pWave6_end As Word pWave6 = AddressOf(Wave6) pWave6_end = AddressOf(Wave6_511) Dim pWave7 As Word '16 bit pointer Dim pWave7_end As Word pWave7 = AddressOf(Wave7) pWave7_end = AddressOf(Wave7_511) Dim pWave8 As Word '16 bit pointer Dim pWave8_end As Word pWave8 = AddressOf(Wave8) pWave8_end = AddressOf(Wave8_511) Dim pWave9 As Word '16 bit pointer Dim pWave9_end As Word pWave9 = AddressOf(Wave9) pWave9_end = AddressOf(Wave9_255) Dim pWave10 As Word '16 bit pointer Dim pWave10_end As Word pWave10 = AddressOf(Wave10) pWave10_end = AddressOf(Wave10_511) Dim pWave11 As Word '16 bit pointer Dim pWave11_end As Word pWave11 = AddressOf(Wave11) pWave11_end = AddressOf(Wave11_255) Dim pWave12 As Word '16 bit pointer Dim pWave12_end As Word pWave12 = AddressOf(Wave12) pWave12_end = AddressOf(Wave12_511) Dim pWaveSub As Word ' not used on , reused on Teno! Dim pWaveSub_end As Word pWaveSub = AddressOf(Wave6) pWaveSub_end = AddressOf(Wave6_511) Dim pWaveLow As Word Dim pWaveLow_end As Word pWaveLow = AddressOf(Wave5) ' set to the default pWaveLow_end = AddressOf(Wave5_511) ' these pointers change with prog.change commands Dim pWaveMed As Word Dim pWaveMed_end As Word pWaveMed = AddressOf(Wave6) pWaveMed_end = AddressOf(Wave6_511) Dim pWaveHigh As Word Dim pWaveHigh_end As Word pWaveHigh = AddressOf(Wave6) ' was wave3 pWaveHigh_end = AddressOf(Wave6_511) ' uit te breiden naar behoefte.... ' default settings for reset and cold boot: pWaveSub_Store = pWaveSub pWaveSub_end_store = pWaveSub_end pWaveMed_Store = pWaveMed pWaveMed_end_Store = pWaveMed_end pWaveLow_Store = pWaveLow pWaveLow_end_store = pWaveLow_end pWaveHigh_Store = pWaveHigh pWaveHigh_end_Store = pWaveHigh_end Dim Srate As Word ' the value to use for PR1 in timer 1, this determines the pitch ' for vibrato-starttime implementation: Dim CC2 As Byte Dim Vibtime As Dword $endif Dim playingnote As Byte ' storage for the note that is being generated $ifdef Ampli ' variables for the ADSR system: Dim CC15 As Byte ' ADSR_period controlller Dim ADSR_period As Word ' = (CC15 + 1) << 4 Dim ADSR_clock As Word ' sampling clock counter in timer2 irq Dim ADcnt As Word ' used in the main loop to check timer2 roll-over Dim ADSR_flags As Word Dim Attack_flag As ADSR_flags.0 ' 0-1 Dim Decay_flag As ADSR_flags.1 ' 0-2 Dim Release_flag As ADSR_flags.2 ' 0-4 Dim Sustain_flags Dim Sustain_flag As Sustain_flags.0 ' new 11.03.2024 Dim CC16 As Byte ' attack time controller Dim Attack_level As Word ' = velo Dim CC17 As Byte ' base setting for sustain proportion of velo - after Xtof suggestie: maak dit de verhouding tot velo Dim CC18 As Byte ' decay time Dim Sustain_level As Word ' on bug and flut this is velo - X-tof suggestie: maak dit een funktie van velo Dim Susprop[128] As Float ' lookup to calculate sustain_level in function of velo ' Dim CC19 As Byte ' release time controller value Dim Volume As Word ' log map - controller #7 Dim CC7 As Volume ' alias Dim Dyna As Word ' for CC80 Dim CC80_old As Dyna.Byte1 Dim CC80 As Dyna.Byte0 ' 23.03.2020, try this with floats: Dim Cnt As Float 'SWord ' stepcounter for level-index in the ADSR system Dim Astepval As Float 'Word ' always positive Dim Dstepval As Float 'SWord ' must be bipolar Dim Rstepval As Float 'Word ' always positive, but subtracted from cnt ' variables for Amplitude modulation, ctrl's 5 and 6, Timer5: Dim CC5 As Byte Dim CC6 As Byte Dim AM_depth_min As Byte Dim AM_depth_max As Byte Dim AMcnt As Byte ' clock divider in de TMR5 IRQ Dim Ont[128] As Word ' on-time lookup for pwm in ADSR and volume control $endif Dim Modulation_flags As Byte ' allways defined. Dim Vibrato_flag As Modulation_flags.0 ' for pitch Dim Tremolo_flag As Modulation_flags.1 ' for ampli Dim LegaPorto_flags As Byte ' Dim Portamento_flag As LegaPorto_flags.0 ' for portamento (under research) CC12 Dim Legato_flag As LegaPorto_flags.0 ' for legato CC11 ' Dim CC8 As Byte ' for portamento time ' variables for Vibrato ( frequency modulation), ctrl's 3 and 4, Timer 4: $ifdef Pitch Dim CC3 As Byte Dim CC4 As Byte 'DIM FM_depth_min as byte 'dim FM_depth_max as Byte Dim FMcnt As Byte ' used in timer4 interrupt, counts 0-31 ' Dim Vib[32] As Float ' sine wave lookup table Dim Vib[32] As SByte ' SWord ' changed 23.03.2020 - could also be sbyte ' Dim df As Float ' 23.03.2020 - changed from float to sword Dim df As SDword ' 18.01.2021 - changed to sdword, as we had overflows... Dim vimo As SWord ' used in timer4 IRQ Dim vshift As SWord ' required for Hunt: Dim VibRange[128] As Word ' lookup for vibrato range ' used for pitch bend: Dim Range As Word Dim Shift As Word Dim PBrange[128] As Word ' lookup for pitch bend range ' for each note we must have a different range. ' used for noise generation: Dim noise As Byte ' controller 1 - noise = 0, or 128 to 2 Dim CC1 As noise ' alias - set to CC1_default on init and reset. Dim jitter As Word ' random Dim jit As SWord ' bipolar byte for noise ' should be a percentage of Srate Dim noiserange As Word ' modulation range, calculated in note_on Dim halfrange As Word ' = noiserange >> 1 Dim Nsc[32] As Byte ' lookup for midictrl 1 on divider ' lookup tables for tuning and pointers to them: Dim Per440[128] As Word Dim Per442[128] As Word Dim Per445[128] As Word Dim Per438[128] As Word Dim Per435[128] As Word Dim PerQu[128] As Word Dim PerQd[128] As Word ' Dim PerJustF[128] As Word ' for overtone series on Hunt Dim PerJust48[128] As Word ' just intonation scales - reeks 1 Dim PerJust49[128] As Word Dim PerJust50[128] As Word Dim PerJust51[128] As Word Dim PerJust52[128] As Word Dim PerJust53[128] As Word Dim PerJust54[128] As Word Dim PerJust55[128] As Word Dim PerJust56[128] As Word Dim PerJust57[128] As Word Dim PerJust58[128] As Word Dim PerJust59[128] As Word Dim PerJust72[128] As Word ' just intonation scales - reeks 2 Dim PerJust73[128] As Word Dim PerJust74[128] As Word Dim PerJust75[128] As Word Dim PerJust76[128] As Word Dim PerJust77[128] As Word Dim PerJust78[128] As Word Dim PerJust79[128] As Word Dim PerJust80[128] As Word Dim PerJust81[128] As Word Dim PerJust82[128] As Word Dim PerJust83[128] As Word ' following to be implemented: change tuning lookup's by changing the pointers only: Dim p440 As Word p440 = AddressOf(Per440) Dim p442 As Word p442 = AddressOf(Per442) Dim p445 As Word p445 = AddressOf(Per445) Dim p438 As Word p438 = AddressOf(Per438) Dim p435 As Word p435 = AddressOf(Per435) Dim pQu As Word pQu = AddressOf(PerQu) Dim pQd As Word pQd = AddressOf(PerQd) ' Dim pJust As Word ' overtone series ' pJust = AddressOf(PerJustF) Dim CC20 As Byte ' tuning controller Dim tuning As CC20 ' alias, implemented 29.01.2020 ' parameters for the wave-forms: Dim CC100 As Byte Dim Wav11p1 As CC100 Dim CC101 As Byte Dim Wav11p2 As CC101 Dim CC102 As Byte Dim Wav11p3 As CC102 Dim CC103 As Byte Dim Wav11p4 As CC103 Dim CC104 As Byte Dim Wav2p1 As CC104 Dim CC105 As Byte Dim Wav9p1 As CC105 Dim CC106 As Byte Dim Wav9p2 As CC106 Wav11p1 = Wav11p1_default '= 27 ' parametric1 Wav11p2 = Wav11p2_default '= 83 Wav11p3 = Wav11p3_default '= 96 Wav11p4 = Wav11p4_default '= 110 Wav2p1 = Wav2p1_default '= 42 ' square Wav9p1 = Wav9p1_default '= 20 ' dirty assin symmetry Wav9p2 = Wav9p2_default '= 64 ' dirty assin noisyness $endif Variable_Inits: Clear Ringbuffer ' Rx Clear IndexIn ' Clear the buffer internal pointer Clear IndexOut ' Clear the buffer external pointer $ifdef Enable_UART_TX Clear Outbuffer ' Tx Clear OutIdxIn Clear OutIdxOut $endif $ifdef Enable_ADC12bit Clear DataBuffer ' ADC Clear DataInIdx Clear DataOutIdx $endif GoSub Dur_Lookup ' required in both compilations!!! $ifdef Pitch Bend = 0 Set PB_old ' 01.04.2020 GoSub Period_Lookup_Tables GoSub JI_Scales ' 29.11.2020 GoSub Teno_Wave0 ' read the attack-wave form GoSub Teno_Wave1 GoSub Teno_Wave2 GoSub Teno_Wave3 GoSub Teno_Wave4 GoSub Teno_Wave5 ' Eb alto sample played by gwr, note 51 Eb. GoSub Teno_Wave6 GoSub Teno_Wave7 GoSub Teno_Wave8 ' excit wave GoSub Teno_Wave9 ' dirty sine GoSub Teno_Wave10 ' was SinPow3, nu returnwave with no valves Eb GoSub Teno_Wave11 ' Beauchamp - with params Wav11p1,Wav11p2,Wav11p3,Wav11p4 GoSub Teno_Wave12 GoSub Noise_scale Samprate = Per440 ' default - copies the entire pitch array GoSub Vib_Lookup ' sinewave lookup for vibrato speed GoSub Modulation_range ' must come after the samprate lookup! ' also gets Vibrato_range, new 18.01.2021 $endif $ifdef Ampli CC80 = CC80_default CC80_old = CC80_default GoSub PWM_Lookup_table_30dB ' was 60dB table up to 05.02.2020 ' changed to 30dB table, 02.12.2020 Clear ADSR_flags Clear ADSR_clock Clear ADcnt GetSusprop () ' for sustain derived from velo implementation High Sig0 ' irq trig. on the negative going edge $endif Reset_Controllers () ' set all start-up defaults GoTo MAIN ' jump over irq's Interrupt_handling: ' ----------------- $ifdef Pitch Isr- INT0Interrupt ' this interrupt should be send by the amplitude processor ' after the release phase in the ADSR. ' when Sig0 goes low on the amplitude chip, this interrupt is generated here. Clear IFS0.0 ' clear interrupt flag ' here this should stop the sound generator served by T1Interrupt ' maybe following should be made conditional and performed only ' when legato_flag is 0. Clear IEC0bits_T1IE ' disable timer1 interrupt - tone generator Clear IFS0bits_T1IF ' clear interrupt flag PDC1 = PWM_reset ' stop wave Clear IEC0bits_T3IE ' stop timer23 interrupt Clear Vibrato_flag EndIsr- $endif $ifdef Pitch Isr- T1Interrupt ' timer1 interrupt Clear IFS0bits_T1IF ' Reset the Timer1 interrupt flag ' used for pitch generator1 : sampling rate ' Clear TMR1 ' this is not required! ' using waveform pointers it becomes: PR1 = Srate + jit ' read from frequency lookup table PR1 = Samprate[noteAan] ' PR1 can be modulated for pitch bend and vibrato ' jit is bipolar and causes noise if not 0. PDC1 = Ptr16(pScnt++) ' read and post-increment pointer ' If pScnt > pWave_end Then pScnt = pWave ' ' we could speedup here by trying: ' ' if pScnt.byte0 = pWave.byte0 then pScnt = pWave ' ' this can not work, as the pointers are 16 bits and thus move in units of 2 ' new coding with attack-wave: If att = 1 Then If pScnt > pWave0_end Then Clear att ' clear attack flag, set on note-on pScnt = pWave ' as selected on reception of a note-on EndIf Else If pScnt > pWave_end Then pScnt = pWave ' wave-grain for sustain EndIf 'toggle PortA.1 'loopcnt ' for measurement of sampling rate 'loopcnt = Scnt.7 ' for pitch measurement EndIsr- ' exit the interrupt $endif $ifdef Ampli Isr- T2Interrupt ' ADSR sampling rate Clear IFS0bits_T2IF ' clear interrupt flag PR2 = ADSR_period ' set to 2048 Inc ADSR_clock EndIsr- $endif $ifdef Ampli Isr- T3Interrupt ' watchdog - enabled in ampli compilation. Clear IFS0bits_T3IF ' clear interrupt flag Toggle watchdog_led ' led freq = 1.8Hz EndIsr- $endif $ifdef Pitch Isr- T3Interrupt ' for 32-bit timer (T2/T3) in the Pitch compilation ' now becomes the vibrato starttime timer ' this interrupt happens when the time after note-on set with CC2 has elapsed. ' the handler should set the vibrato_flag to start vibrato Clear IFS0bits_T3IF ' 32-bit value in PR2 and PR3 reached (T2/T3 combined) ' this clears the interrupt flag 'clear TMR2 ' required? 'clear TMR3HLD Clear T2ConBits_TON ' this also resets the count If CC3 > 0 Then Set Vibrato_flag ' starts the vibrato PR4 = Dur[CC4] ' set timer, regardless CC3 IEC1bits_T4IE = 1 ' enable interrupt Set T4ConBits_TON Else Clear Vibrato_flag EndIf ' disable this interrupt: Clear IEC0bits_T3IE ' for debug: Toggle Vib_debug ' we get here on every note-on... EndIsr- $endif $ifdef Pitch Isr- T4Interrupt ' used for FM modulation (vibrato-speed) in Bug, Flut, Autosax, So, Hunt, Trumpeter, Teno ' CC3 = modulation depth ' CC4 = modulation speed ' 26.01.2020: as coded now, pitch bend and vibrato will be mutually exclusive... ' 30.01.2020: with the introduction of Bend as sword, this problem should be solved now. ' 23.03.2020: trying to remove the use of a float here... ' 18.01.2021: This interrupt should stay enabled at all times! Clear IFS1bits_T4IF ' 16-bit value reached ' refresh the timer period: 'PR4 = Dur[CC4] >> 2 ' cc4 = vibrato speed - with prescaler at :256 PR4 = Dur[CC4] ' with prescaler at :64 If Vibrato_flag = 1 Then ' this can only be the case if a note is playing. Inc FMcnt ' this is reset when the flag is set. (on note-on commands). ' if FMcnt = 31 then FMcnt = 0 ' can better be coded as: FMcnt = FMcnt & %00011111 ' modulate the sampling rate: vimo = Vib[FMcnt] * CC3 ' -4064 to 3937 df = VibRange[playingnote] * vimo ' 18.01.2021 - df is sword ' df is < 320 * 31 * 127 = 1259840 ' but, this can get much larger than a word!!! ' so it should become a sdword !!! ' we can only avoid a float for df if we recalculate Vib[] * CC3 ' as a sword array everytime CC3 changes... ' 23.03.2020: We made Vib[] sword by multiplying the values by 32 ' in the lookup table vshift = df / 4064 ' = 127 * 32 ' vshift = df >> 4 is impossible as we must preserve sign bit! 'Srate = Samprate[playingnote] + vshift + Bend ' modulated sampling rate used in timer1 irq ' vshift seems to remain 0 ... ' for debug: ' Toggle Vib_debug ' we do not get here Else Clear FMcnt ' could we do this to avoid pitch-jumps on entering the release phase? If vshift > 0 Then Dec vshift If vshift < 0 Then Inc vshift ' Srate must have been set... if we set it here again ' we may loose our pitch shift if it was used. ' this can cause a glitch due to a sudden change of the sampling rate. ' 06.12.2020: shorter coding: 'If Bend > 0 Then Srate = Samprate[playingnote] + Bend ' preserving pitchbend. EndIf Srate = Samprate[playingnote] + vshift + Bend ' modulated sampling rate used in timer1 irq EndIsr- $endif $ifdef Ampli Isr- T4Interrupt Clear IFS1bits_T4IF '16-bit value reached Clear IEC1bits_T4IE ' disable IRQ Clear T4ConBits_TON EndIsr- $endif $ifdef Ampli Isr- T5Interrupt ' used for AM modulation with controllers 5 and 6 ' note that modulation is only applied to the sound, after the attack time in ' the ADSR. Modulation during the release phase is suppressed. Clear IFS1bits_T5IF ' 32-bit value reached if T4/T5 operation in 32 bits ' 16-bit value reached if operated alone. 'Clear TMR5 If Tremolo_flag = 1 Then Inc AMcnt ' we could add the condition that we must be in the decay or sustain phase of the ADSR... ' het modulatie trajekt is nu van Ont[AM_depth_min] tot Ont[AM_depth_max] ' we use a square wave, as it will be rounded anyway in our low pass filter. If AMcnt.0 = 1 Then PDC3 = Ont[AM_depth_max] ' volume controller PWM Else PDC3 = Ont[AM_depth_min] EndIf Else ' 24.03.2020: but should we really do this on each interrupt ??? Clear AMcnt PDC3 = Ont[Volume] ' reset volume EndIf ' refresh the timer period: PR5 = Dur[CC6] EndIsr- $endif $ifdef Pitch Isr- T5Interrupt Clear IFS1bits_T5IF Toggle watchdog_led ' led freq = 1.8Hz ' tested 07.07.2021 0.k. EndIsr- $endif Isr- U1RXInterrupt ' UART receive IRQ - midi receiver Clear IFS0.11 ' reset UART1 receive irq flag Inc IndexIn ' Move up the buffer index (0-255) Ringbuffer[IndexIn] = U1RXREG 'Toggle midi_led 'debug EndIsr- Isr- U1ErrInterrupt ' this irq is generated on UART1 receive errors ' this interrupt is enabled by setting IEC4.1 ' error handling: Clear IFS4.1 ' clear interrupt flag If U1STA.2 = 1 Then 'Set framing_error_led ' no longer happening EndIf If U1STA.1 = 1 Then ' = overrun error 'Set overrun_error_led ' not happening Clear U1STA.1 EndIf EndIsr- $ifdef Enable_UART_TX Isr- U1TXInterrupt ' UART send IRQ IFS0bits_U1TXIF = 0 ' reset UART1 transmit IRQ flag 'Toggle midi_led ' transmit monitor EndIsr- $endif $ifdef Enable_ADC12bit Isr- AD1Interrupt ' this irq happens after every ADC conversion Clear IFS0.13 ' clear interrupt flag Inc DataInIdx ' move up the buffer index DataBuffer[DataInIdx] = ADC1BUF0 ' loopt tot ADC1BUFF -so 16 words deep Toggle PORTA.1 ' for testing sampling rate - 04.08.2016: gives 58.82 kHz ' this means 8.5 us for each conversion EndIsr- $endif Isr- PWM1Interrupt Clear IFS5.14 EndIsr- Isr- PWM2Interrupt Clear IFS5.15 EndIsr Isr- PWM3Interrupt Clear IFS6.0 EndIsr- Proc GetMidi (), Byte ' now a function 01.03.2024 If IndexIn <> IndexOut Then Inc IndexOut Result = Ringbuffer[IndexOut] Else Set Result EndIf EndProc $ifdef Enable_ADC12bit GetADC: ' here we can perform data extraction and signal conditioning ' the data-buffer has 256 words and covers 2.176ms of time. Return $endif MAIN: While $ifdef Enable_UART_RX ' if receiver is enabled Bytein = GetMidi () ' Read data from the serial buffer ' Start the midi parser. Midi_Parse: $ifdef Pitch If Bytein > Pitchbend_Status Then ' here higher statusses are not implemented. $endif $ifdef Ampli If Bytein > Control_Status Then ' here higher statusses are not implemented. $endif If Bytein > 253 Then '254 = midiclock, 255= reset 'midiclock can interrupt all other msg's... '255 had to be intercepted since thats what we 'get when no new byte flows in. Else Clear statusbyte 'reset the status byte EndIf GoTo Check_Timers 'throw away... EndIf If StBit =1 Then 'should be faster than If Bytein > 127 Then 'status byte received, bit 7 is set Clear statusbyte 'if on another channel, the statusbyte needs a reset Select Bytein 'eqv to Select case ByteIn Case NoteOff_Status statusbyte = Bytein Set noteUit 'reset value. Cannot be 0 !!! Set release '0 is a valid midi note! Case NoteOn_Status statusbyte = Bytein Set noteAan Set velo Case Keypres_Status statusbyte = Bytein Set notePres Set pres Case Control_Status ' controllers and switches statusbyte = Bytein Set Ctrl Set value Case ProgChange_Status ' used for different wave lookup tables statusbyte = Bytein Set prog Case Aftertouch_Status ' not used on this board statusbyte = Bytein Set aft Case Pitchbend_Status ' used statusbyte = Bytein Set pblsb Set pbmsb EndSelect Else 'midi byte is 7 bits Select statusbyte Case 0 'not a message for this channel GoTo Check_Timers 'disregard Case NoteOff_Status If noteUit = 255 Then noteUit = Bytein Else ' we have to check for the note range here. release = Bytein + 1 'message complete, so we can do the action... Select noteUit ' If noteUit = playingnote Then Case playingnote $ifdef Ampli If ADSR_flags > 0 Then ' note-off received if an ADSR was still going on Rstepval = Cnt / release Clear ADSR_flags Else ' we must be in the sustain phase Rstepval = Sustain_level / release Cnt = Sustain_level EndIf i = Cnt PDC2 = Ont[i] Clear Tremolo_flag If Rstepval > 0 Then Set Release_flag ' ADSR_flags becomes 4 Clear ADSR_clock ' incremented in the interrupt handler Clear ADcnt Set T2CONbits_TON ' start timer 'Set Sig0 ' stays high... unless Rstepval = 0 ??? Else Clear Sig0 ' stop wave synth Clear T2CONbits_TON Clear playingnote EndIf $endif $ifdef Pitch Clear Vibrato_flag ' no vibrato during release Clear IEC0bits_T3IE ' disable IRQ 2-3 for vibrato Clear T2CONbits_TON ' stop count for vibrato $endif ' Case Else ' ' we can do just nothing at all... ' ' note off for another note received... ' ' this can only happen if legato or portamento is in use. ' If Legato_flag = 1 Then ' $ifdef Ampli ' ' Rstepval = Sustain_level / release ' ' Cnt = Sustain_level ' ' i = Cnt ' ' PDC2 = Ont[i] ' ' Clear Tremolo_flag ' ' If Rstepval > 0 Then ' ' playingnote = noteUit ' ' Set Release_flag ' ADSR_flags becomes 4 ' Clear ADSR_flags ' ' Clear ADSR_clock ' incremented in the interrupt handler ' ' Clear ADcnt ' ' Set T2CONbits_TON ' start timer ' 'Set Sig0 ' stays high... unless Rstepval = 0 ??? ' ' Else ' ' Clear Sig0 ' stop wave synth ' ' Clear T2CONbits_TON ' ' Clear playingnote ' ' EndIf ' $endif ' ' $ifdef Pitch ' ' Clear Vibrato_flag ' no vibrato during release ' ' Clear IEC0bits_T3IE ' disable IRQ 2-3 for vibrato ' ' Clear T2CONbits_TON ' stop count for vibrato ' ' $endif ' EndIf EndSelect Set noteUit 'reset EndIf Case NoteOn_Status If noteAan = 255 Then noteAan = Bytein Else velo = Bytein Select velo Case 0 ' note off via velo=0 Select noteAan Case playingnote $ifdef Ampli ' note that the Sig0 signal should be kept high here, as ' sound generation should not stop during release. If ADSR_flags > 0 Then Rstepval = Cnt / CC19 Clear ADSR_flags Else Rstepval = Sustain_level / CC19 Cnt = Sustain_level EndIf i = Cnt PDC2 = Ont[i] Clear Tremolo_flag If Rstepval > 0 Then Set Release_flag ' ADSR_flags becomes 4 Clear ADSR_clock ' incremented in the interrupt handler Clear ADcnt Set T2CONbits_TON ' start timer 'Set Sig0 ' stays high... unless Rstepval = 0 ??? Else ' ADSR_flags must be zero here. Clear Sig0 ' stop wave synth Clear T2CONbits_TON Clear playingnote EndIf $endif $ifdef Pitch Clear Vibrato_flag ' no vibrato during release Clear IEC0bits_T3IE ' disable timer interrupt Clear T2CONbits_TON ' stop count $endif ' Case Else ' 'noteoff for another note received. ' ' can happen in legato or portamento mode ' If Legato_flag = 1 Then ' $ifdef Ampli ' Clear ADSR_flags '' Rstepval = Sustain_level / CC19 '' Cnt = Sustain_level '' i = Cnt '' PDC2 = Ont[i] '' Clear Tremolo_flag '' If Rstepval > 0 Then '' playingnote = noteAan '' Set Release_flag ' ADSR_flags becomes 4 '' Clear ADSR_clock ' incremented in the interrupt handler '' Clear ADcnt '' Set T2CONbits_TON ' start timer '' 'Set Sig0 ' stays high... unless Rstepval = 0 ??? '' Else '' Clear Sig0 ' stop wave synth '' Clear T2CONbits_TON '' Clear playingnote '' EndIf ' $endif '' $ifdef Pitch '' Clear Vibrato_flag ' no vibrato during release '' Clear IEC0bits_T3IE ' disable IRQ 2-3 for vibrato '' Clear T2CONbits_TON ' stop count for vibrato '' $endif ' EndIf EndSelect Case Else ' velo > 0 $ifdef Ampli ' handle the ADSR parameters, as they are the same for any note: Select noteAan Case Teno_lowest To Teno_Highest ' new implementation: playingnote = noteAan Attack_level = velo ' x-tof suggestie: ' sustain_level = velo * (CC17 / 128) ' but we need a lookup to avoid the divisions here: Sustain_level = velo * Susprop[CC17] Clear ADSR_flags ' now use the pwm2 channel for the ADSR ' and ADSR_period for the sampling rate via timer2 If Legato_flag = 0 Then Clear Cnt ' start volume from zero Clear PDC2 ' start from zero Set Attack_flag ' = 1 Astepval = Attack_level / CC16 ' to be used as increment for Cnt Clear ADSR_clock Clear ADcnt Set T2CONbits_Ton ' start timer Else ' no adsr - stay or jump into the sustain phase PDC2 = Ont[Sustain_level] Cnt = Sustain_level Clear ADSR_clock 'adsr flags are cleared Clear ADcnt Clear T2CONbits_Ton ' stop timer EndIf Set Sig0 ' make signal to pitch chip high again ' when this goes low, an external interrupt is received by ' the pitch-chip to stop the wave generator. So it should only ' go low after the release phase in the asdr EndSelect $endif '------------------- $ifdef Pitch Select noteAan ' here we use different wavetables for the registers: ' subregister - pedals on and Case Teno_pedal_low To Teno_pedal_high Clear IEC0bits_T1IE ' disable timer1 interrupt - tone generator ' set the sampling rate to the requested pitch: Srate = Samprate[noteAan] ' frequency lookup table PR1 = Srate ' added 04.03.2020 to make sure this is set before the first interrupt If noise > 0 Then noiserange = Srate / noise ' for noise modulation halfrange = noiserange >> 1 ' id. used in the main loop pWave = pWaveSub pWave_end = pWaveSub_end 'pScnt = pWave0 ' set pointer to start attack wave. ' without attack wave for the sub-register: pScnt = pWave ' set wave pointer to the start 'Set att ' if an attack wave is required Clear att ' as we do not want an attack wave here! Clear IFS0bits_T1IF ' clear irq flag Set IEC0bits_T1IE ' enable timer1 interrupt - this starts tone generation playingnote = noteAan 'Clear FMcnt 'Set Vibrato_flag 'moet nu worden: If CC3 > 0 Then ' should we reset the timer? Clear TMR3HLD Clear TMR2 ' PR3 = Vibtime.word1 done on reception of CC2 ' PR2 = Vibtime.Word0 Set T2CONbits_TON ' start timer Set IEC0bits_T3IE ' enable IRQ Clear FMcnt EndIf Clear Vibrato_flag ' set flag in timer23 irq only Case Teno_low To Teno_low_end Clear IEC0bits_T1IE ' disable timer1 interrupt - tone generator ' set the sampling rate to the requested pitch: Srate = Samprate[noteAan] ' frequency lookup table PR1 = Srate If noise > 0 Then noiserange = Srate / noise ' for noise modulation halfrange = noiserange >> 1 ' id. used in the main loop pWave = pWaveLow pWave_end = pWaveLow_end If Legato_flag = 0 Then pScnt = pWave0 ' set pointer to the start of the attack wave... Set att ' set attack bit, reset in the IRQ timer1 handler Else pScnt = pWave ' set wave pointer to the start Clear att ' no attack wave EndIf Clear IFS0bits_T1IF ' clear irq flag Set IEC0bits_T1IE ' enable timer1 interrupt - this starts tone generation playingnote = noteAan If CC3 > 0 Then Clear TMR3HLD Clear TMR2 Set T2CONbits_TON ' start timer Set IEC0bits_T3IE ' enable IRQ Clear FMcnt EndIf Clear Vibrato_flag Case Teno_mid To Teno_mid_end Clear IEC0bits_T1IE ' disable timer1 interrupt - tone generator ' set the sampling rate to the requested pitch: Srate = Samprate[noteAan] ' frequency lookup table PR1 = Srate If noise > 0 Then noiserange = Srate / noise ' for noise modulation halfrange = noiserange >> 1 ' id. used in the main loop pWave = pWaveMed pWave_end = pWaveMed_end If Legato_flag = 0 Then pScnt = pWave0 ' set pointer to the start of the attack wave... Set att ' set attack bit, reset in the IRQ timer1 handler Else pScnt = pWave ' set wave pointer to the start Clear att EndIf Clear IFS0bits_T1IF ' clear irq flag Set IEC0bits_T1IE ' enable timer1 interrupt - this starts tone generation playingnote = noteAan If CC3 > 0 Then Clear TMR3HLD Clear TMR2 Set T2CONbits_TON ' start timer Set IEC0bits_T3IE ' enable IRQ Clear FMcnt EndIf Clear Vibrato_flag Case Teno_high To Teno_high_end Clear IEC0bits_T1IE ' disable timer1 interrupt - tone generator ' set the sampling rate to the requested pitch: Srate = Samprate[noteAan] ' frequency lookup table PR1 = Srate If noise > 0 Then noiserange = Srate / noise ' for noise modulation halfrange = noiserange >> 1 ' id. used in the main loop pWave = pWaveHigh pWave_end = pWaveHigh_end If Legato_flag = 0 Then pScnt = pWave0 ' set pointer to the start of the attack wave... Set att ' set attack bit, reset in the IRQ timer1 handler Else pScnt = pWave ' set wave pointer to the start Clear att EndIf Clear IFS0bits_T1IF ' clear irq flag Set IEC0bits_T1IE ' enable timer1 interrupt - this starts tone generation playingnote = noteAan If CC3 > 0 Then Clear TMR3HLD Clear TMR2 Set T2CONbits_TON ' start timer Set IEC0bits_T3IE ' enable IRQ Clear FMcnt EndIf Clear Vibrato_flag EndSelect $endif EndSelect Set noteAan EndIf Case Keypres_Status ' is there a use for an implementation on ? If notePres = 255 Then notePres = Bytein Else pres = Bytein GoSub KeyPres EndIf Case Control_Status ' where the action takes place for controllers If Ctrl = 255 Then Ctrl = Bytein Else value = Bytein GoSub Controller EndIf $ifdef Pitch Case ProgChange_Status ' used to switch between different waveforms If prog = 255 Then ' single byte message prog = Bytein GoSub ProgChange Else Set prog EndIf Case Aftertouch_Status ' any use for this? If aft = 255 Then aft = Bytein GoSub Aftertouch EndIf Case Pitchbend_Status ' implemented on , , , , , , , If pblsb = 255 Then pblsb = Bytein Else pbmsb = Bytein GoSub Pitchbend ' required for portamento even! EndIf $endif EndSelect EndIf $endif 'Midi_Parse_done: Check_Timers: ' we moeten alleen checken wanneer er een timer loopt $ifdef Ampli ' alleen de amplitudes lopen via timers! ' de pitch chip follows via an external interrupt ' generated here via Sig0 If ADcnt < ADSR_clock Then 'ADcnt = ADSR_clock ' this could potentially skip steps... Inc ADcnt ' this will never skip steps... Select ADSR_flags Case 1 ' bit 0 is set = Attack_Flag If Cnt <= Attack_level Then Cnt = Cnt + Astepval If Cnt >= Attack_level Then ' attack time is verstreken Cnt = Attack_level ' = velo PDC2 = Ont[Attack_level] ' set pwm level ' calculate decay phase j = Attack_level - Sustain_level Dstepval = j / CC18 Clear ADSR_clock Clear ADcnt Clear ADSR_flags Select Dstepval Case 0 PDC2= Ont[Sustain_level] ' we blijven in de sustain faze. Clear T2CONbits_TON ' stop timer Case Else Set Decay_flag Set T2CONbits_TON ' (re)start timer EndSelect Set Tremolo_flag Else i = Cnt ' cnt is float, so we must convert to byte here... ??? PDC2 = Ont[i] EndIf EndIf Case 2 ' decay flag set, bit 1 Cnt = Cnt - Dstepval If Cnt < 0 Then Cnt = 0 ' kan dat? If Cnt > Sustain_level Then ' we moeten nog verder zakken... i = Cnt PDC2 = Ont[i] Set T2CONbits_TON ' timer blijft aan Else PDC2 = Ont[Sustain_level] ' sustain level reached Clear ADSR_flags Clear ADSR_clock Clear ADcnt Clear T2CONbits_TON ' stop timer Cnt = Sustain_level ' dit is een hold, zolang de noot duurt EndIf Case 4 ' release flag set - bit 2 - on reception of a note-off ' release phase - Cnt must have been set = Sustain_level in the noteoff ' if legato_flag is set, we should never get here! Cnt = Cnt - Rstepval ' floats! Rstepval must be positive at all times. If Cnt <= 0 Then ' end of release reached Clear Sig0 ' switch synth off via external interrupt on the low going edge Clear ADSR_flags ' de hele adsr cyclus is afgelopen Clear PDC2 ' volume naar nul Clear playingnote ' nu is de noot echt uit. Clear ADSR_clock Clear ADcnt Cnt = 0 ' reset teller Clear T2CONbits_TON ' stop timer 2 'Set Sig0 ' keep it high again - done on note-on Else i = Cnt ' convert to integer PDC2 = Ont[i] Set T2CONbits_TON EndIf EndSelect EndIf $endif $ifdef Enable_UART_TX Midi_OutPut: If OutIdxOut <> OutIdxIn Then ' in dit geval is er een byte te versturen If IFS0bits_U1TXIF = 0 Then Inc OutIdxOut U1TXREG = Outbuffer[OutIdxOut] EndIf EndIf $endif $ifdef Pitch If noise = 0 Then jit = 0 Else ' algo: ' modulation_range = Srate / (128 - noise) ' can be calculated in the note_on ' Modulation_range = Modulation_range >> 1 ' divide by 2 ' jitter = Random & modulation_range ' jit = (Modulation_range >> 1) - jitter ' with range calculated on note-on, we cannot modulate it ' in the adsr to get more noise in the attackperiod... jitter = Random & noiserange ' noiserange is calculated on reception of a note-on using CC1 jit = halfrange - jitter ' for speed-up, halfrange calculated in note-on ' jit is bipolar sword! EndIf $endif $ifdef Ampli ' for debug of the ADSR-system: A_Led = Attack_flag ' works ok blue on testboard, red in teno D_Led = Decay_flag ' works ok green R_Led = Release_flag ' works ok red If ADSR_flags = 0 Then If playingnote > 0 Then Set S_Led ' yellow Else Clear S_Led EndIf Else Clear S_Led EndIf ' end debug code $endif ' Toggle loopcnt ' for loopspeed measurement: 1.25us now, with quite some jitter. ' 10.12.2016: ca. 400kHz code. ' 28.01.2020: 500kHz code, so loopspeed = 1.15 us. ' 6.12.2020: loopspeed for the adsr code: 405kHz, no load. [=1.23 us] ' strange but correct: under heavy load, loopspeed rises to 438kHz... ' trumpeter code ought to be faster... ' to be measured again for Cornalto and Teno Wend ' ************************************************************************************** ' procedures for midi receiver: KeyPres: ' used for flashing speed ' can also be used to modulate sustain_level ' Select notePres ' Case 120 ' pres0 = pres ' Case 121 ' pres1 = pres ' Case 122 ' pres2 = pres ' Case 123 ' pres3 = pres ' EndSelect Set notePres '= 255 Return ProgChange: ' implemented here for changing wavetables ' if we use different lookups accessed by pointers we just need to change the pointers here. ' changed: ' bits 0,1,2: used for progs. in the range 72-92 = medprog ' bits 3,4 : used for progs. in the range 60-71 = lowprog ' bits 5,6 : used for progs. in the range 48-59 = subprog ' algo: $ifdef Pitch ' SubProgNr = prog >> 5 ' bits 5 and 6 only ' LowProgNr = (prog & %00011000) >> 3 ' bits 3 and 4 only ' MedProgNr = prog & %00000111 ' bits 0,1,2 ' ' in order to avoid lost pointers in de timer1 IRQ, we have to switch off any sounding note here! ' Clear IEC0bits_T1IE ' disable timer1 interrupt - tone generator ' Clear IFS0bits_T1IF ' clear interrupt flag ' PDC1 = PWM_reset ' stop wave ' Set Timvals ' Clear PDC2 ' adsr to zero ' Clear playingnote ' '----------------------------------- ' ' code model: ' Select SubProgNr ' 48-59 ' Case 0 ' pWaveSub = pWave1 'sin^2 ' pWaveSub_end = pWave1_end ' Case 1 ' pWaveSub = pWave9 'was sinewave ' pWaveSub_end = pWave9_end ' nu calculated excitation wave ' Case 2 ' pWaveSub = pWave8 'sqr sinewave ' pWaveSub_end = pWave8_end ' Case 3 ' pWaveSub = pWave11 '4-period sample ' pWaveSub_end = pWave11_end ' EndSelect ' Select LowProgNr ' 60-71 ' Case 0 ' pWaveLow = pWave9 ' nu, 10.03.2020: calculated excitation wave ' pWaveLow_end = pWave9_end ' Case 1 ' pWaveLow = pWave11 ' was 2 - now sample ' pWaveLow_end = pWave11_end ' Case 2 ' pWaveLow = pWave10 ' 2-period sample ' pWaveLow_end = pWave10_end ' Case 3 ' pWaveLow = pWave5 ' Wave5 sin+ octave ' pWaveLow_end = pWave5_end ' EndSelect ' Select MedProgNr ' 72 - 92 ' Case 0 ' pWaveMed = pWave0 ' pWaveMed_end = pWave0_end ' Case 1 ' pWaveMed = pWave1 ' pWaveMed_end = pWave1_end ' Case 2 ' pWaveMed = pWave2 ' pWaveMed_end = pWave2_end ' Case 3 ' pWaveMed = pWave3 ' pWaveMed_end = pWave3_end ' Case 4 ' pWaveMed = pWave4 ' pWaveMed_end = pWave4_end ' Case 5 ' pWaveMed = pWave5 ' pWaveMed_end = pWave5_end ' Case 6 ' pWaveMed = pWave6 ' pWaveMed_end = pWave6_end ' Case 7 ' pWaveMed = pWave9 ' pWaveMed_end = pWave9_end ' EndSelect $endif $ifdef Ampli ' Clear playingnote $endif Set prog Return $ifdef Pitch Pitchbend: ' should be implemented for quartertone up and down ' this coding makes the pitch shift only valid for the playing note ' it is reset for every new note ' 09.12.2016: this looks like working. ' due to resolution limitation, it will not work for notes higher than 89. ' note that the pitchbend command must come after a note-on! ' there must be a note playing! ' 29.01.2020: to be checked for the range > 92 !!! ' 07.03.2020: changed, same coding as used and found working well on ' 01.04.2020: thinning applied such that the code will do nothing if only the lsb has changed. ' or if the msb is still the same. If playingnote > 0 Then Select Case pbmsb Case PB_old ' in this case we should do nothing - 01.04.2020 Case > 64 ' de periode moet kleiner worden voor een hogere toon Shift = pbmsb - 64 ' 1 - 63 'shift = (PBrange[playingnote] / 2 ) * (shift / 63) 'better use float here: j = Shift / 63.0 j = (PBrange[playingnote] / 2.0) * j Shift = j Srate = Samprate[playingnote] - Shift Bend = - Shift ' Bend is sword! PB_old = pbmsb ' 01.04.2020 Case 64 Shift = 0 Srate = Samprate[playingnote] ' reset Bend = 0 PB_old = pbmsb ' 01.04.2020 Case Else ' < 64 ' periode moet groter worden als pblsb kleiner wordt Shift = 64 - pbmsb ' 1 - 64 'shift = (PBrange[playingnote] / 2) * (shift / 64) j = Shift / 64.0 j = (PBrange[playingnote] / 2.0) * j Shift = j Srate = Samprate[playingnote] + Shift Bend = Shift PB_old = pbmsb ' 01.04.2020 EndSelect Else Bend = 0 Set PB_old ' makes it 255 01.04.2020 EndIf 'Set pblsb dont do this, as it makes running status impossible!!! Set pbmsb Return $endif Aftertouch: 'this is the channel aftertouch, affecting any playing note 'not implemented here. Set aft ' reset Return Controller: Select Ctrl Case 123 AllNotesOff () 'this should come first! $ifdef Pitch Case 1 ' controls noise in the waveform, jitter on Srate noise = Nsc[value >> 2] ' use lookup - we have only 5 bit resolution here. Case 2 ' controls the time after note-on that has to pass before the vibrato starts. ' vibrato-delay time CC2 = value + 1 ' 1 - 128 Vibtime = CC2 * CC2_units ' = 1834 ' 128 * 1834 = 234742 units of 4.26us = 1 sekonde ' to set the timer2-3 we do: PR2 = Vibtime.word0 ' PR3 = Vibtime.word1 ' this could be done on reception of a note-on. ' of course we could do it here, as PR2 and PR3 are preserved PR2 = Vibtime.LowWord PR3 = Vibtime.HighWord Case 3 ' FM or vibrato depth ' vibrato controllers require a timer for the frequency ' and modulation of the sampling rate in the timer interrupt ' PR1 sets the sampling timer period via Srate ' PR2-PR3 sets the wait time before vibrato starts ' PR4 set the vibrato speed. CC3 = value ' range = (Samprate[playingnote -1] - Samprate[playingnote + 1] ) >> 5 ' the problem is that we need to recalculate the range for every new note... ' a lookup table would be much more appropriate here ' handled in IRQ4 timer ' If CC3 > 0 Then ' If CC4 > 0 Then ' ' start timer ' Clear TMR4 ' IFS1bits_T4IF = 0 ' clear IRQ PR4 = Dur[CC4] '>> 2 ' set timer ' IEC1bits_T4IE = 1 ' enable interrupt - should always stay on ' Else ' ' stop timer ' IFS1bits_T4IF = 0 ' clear IRQ flag ' ' IEC1bits_T4IE = 0 ' disable timer 4 interrupt 'should we do this??? ' EndIf ' Else ' ' stop timer ' IFS1bits_T4IF = 0 ' clear IRQ flag ' 'IEC1bits_T4IE = 0 ' disable timer 4 interrupt ' should we do this ??? ' EndIf Case 4 ' FM or vibrato speed - steers timer 4 CC4 = value ' remap on a log scale PR4 = Dur[CC4] ' set timer $endif $ifdef Ampli Case 5 ' AM-depth (tremolo) CC5 = value >> 1 ' 0-63 ' amplitude modulation controllers require a timer for the frequency ' and modulation of volume or sustain in the timer interrupt If CC5 = 0 Then ' stop timer IFS1bits_T5IF = 0 ' clear IRQ flag IEC1bits_T5IE = 0 ' disable timer 5 interrupt PDC3 = Ont[Volume] ' reset volume to central value Else If CC5 > Volume Then AM_depth_min = 0 Else AM_depth_min = Volume - CC5 EndIf If CC5 + Volume > 127 Then AM_depth_max = 127 Else AM_depth_max = Volume + CC5 EndIf ' het modulatie trajekt is nu van Ont[AM_depth_min] tot Ont[AM_depth_max] EndIf Case 6 ' amplitude modulation speed ' uses timer 5 CC6 = value ' remap on a log scale If value > 0 Then ' start timer Clear TMR5 IFS1bits_T5IF = 0 ' clear IRQ PR5 = Dur[CC6] ' set timer IEC1bits_T5IE = 1 ' enable interrupt Else ' stop timer IFS1bits_T5IF = 0 ' clear IRQ flag IEC1bits_T5IE = 0 ' disable timer 5 interrupt PDC3 = Ont[Volume] ' reset volume to central value EndIf Case 7 Volume = value ' = CC7 ' here we also need to recalculate modulation depth: ' otherwize we may crash on a PDC3 overflow. If CC5 > Volume Then AM_depth_min = 0 Else AM_depth_min = Volume - CC5 EndIf If CC5 + Volume > 127 Then AM_depth_max = 127 Else AM_depth_max = Volume + CC5 EndIf ' we can send this value directly to the final multiplier as 16-bit log pwm PDC3 = Ont[value] $endif Case 11 ' legato flag - this controller can only be sent from the hub board! ' required and used in both compilations! If value.0 = 0 Then Clear Legato_flag Else Set Legato_flag $ifdef Ampli Clear ADSR_flags $endif EndIf $ifdef Ampli Case 15 ' ADSR sampling rate. CC15 = value ADSR_period = (CC15 + 1) << 4 Case 16 CC16 = value + 1 ' attack_time Case 17 ' was attack level in earlier implementations ' now this is sustain level!!! ' attack level is now controlled with the velo byte. 21.06.2021 ' also on Cornalto, 06.10.2021 ' and on CC17 = value + 1 If CC17 > 127 Then CC17 = 127 'sustain_level = velo * Susprop[CC17] ' so CC17 is only used as an index for the floating array Susprop[] ' following a suggestion from X-tof, we could implement CC17 ' as a proportion of velo. This assumes velo to always be larger than sustain. ' 04.03.2024: implemented on as an experiment to be evaluated. Case 18 ' decay time CC18 = value + 1 Case 19 ' release time CC19 = value + 1 $endif $ifdef Pitch Case 20 ' tuning: 64 should be 440Hz diapason ' the variable should be set prior to playing. ' tuning = value ' here we change the lookup table for the tunings... ' here we should change the pointer to the Samprate[] array ' could we do ' Dim Samprate at Per440 here, to avoid copying the arrays? ' to avoid glitches, we switch any sounding note off here first: Clear IEC0bits_T1IE ' disable timer1 interrupt - tone generator Clear IFS0bits_T1IF ' clear interrupt flag PDC1 = PWM_reset ' stop wave Clear PDC2 ' adsr to zero Clear playingnote Select value ' Case 41 ' corresponds to note F, the fundamental tuning of the horn. ' Samprate = PerJustF ' overtone series. - this copies the entire array! ' CC20 = value ' GoSub Modulation_range ' also recalculates vibrato range. Case 48 ' just intonation chromatic scale based on C Samprate = PerJust48 CC20 = value GoSub Modulation_range Case 49 ' just intonation on C# Samprate = PerJust49 CC20 = value GoSub Modulation_range Case 50 ' just intonation on D Samprate = PerJust50 CC20 = value GoSub Modulation_range Case 51 ' just intonation on Eb - this is the one for Samprate = PerJust51 CC20 = value GoSub Modulation_range Case 52 ' just intonation on E Samprate = PerJust52 CC20 = value GoSub Modulation_range Case 53 ' just intonation on F Samprate = PerJust53 CC20 = value GoSub Modulation_range Case 54 ' just intonation on F# Samprate = PerJust54 CC20 = value GoSub Modulation_range Case 55 ' just intonation on G Samprate = PerJust55 CC20 = value GoSub Modulation_range Case 56 ' just intonation on G# Samprate = PerJust56 CC20 = value GoSub Modulation_range Case 57 ' just intonation on A Samprate = PerJust57 CC20 = value Case 58 ' just intonation on Bb - setting for Trumpeter, Bug, Korn, Teno Samprate = PerJust58 CC20 = value GoSub Modulation_range Case 59 ' just intonation on B Samprate = PerJust59 CC20 = value GoSub Modulation_range Case 61 ' EQ quartertone down scale Samprate = PerQd CC20 = value GoSub Modulation_range Case 62 Samprate = Per435 CC20 = value GoSub Modulation_range Case 63 Samprate = Per438 CC20 = value GoSub Modulation_range Case 64 Samprate = Per440 CC20 = value GoSub Modulation_range Case 65 Samprate = Per442 CC20 = value GoSub Modulation_range Case 66 Samprate = Per445 CC20 = value GoSub Modulation_range Case 67 Samprate = PerQu CC20 = value GoSub Modulation_range Case 72 Samprate = PerJust72 CC20 = value GoSub Modulation_range Case 73 Samprate = PerJust73 CC20 = value GoSub Modulation_range Case 74 Samprate = PerJust74 CC20 = value GoSub Modulation_range Case 75 Samprate = PerJust75 CC20 = value GoSub Modulation_range Case 76 Samprate = PerJust76 CC20 = value GoSub Modulation_range Case 77 Samprate = PerJust77 CC20 = value GoSub Modulation_range Case 78 Samprate = PerJust78 CC20 = value GoSub Modulation_range Case 79 Samprate = PerJust79 CC20 = value GoSub Modulation_range Case 80 Samprate = PerJust80 CC20 = value GoSub Modulation_range Case 81 Samprate = PerJust81 CC20 = value GoSub Modulation_range Case 82 Samprate = PerJust82 CC20 = value GoSub Modulation_range Case 83 Samprate = PerJust83 CC20 = value GoSub Modulation_range EndSelect Case 40 ' for research and development only ' steers the wave-forms used for the pedal register on Teno ' was not implemented in Cornalto Select value ' Case 0 ' pWaveSub = pWave0 ' pWaveSub_end = pWave0_end Case 1 pWaveSub = pWave1 pWaveSub_end = pWave1_end Case 2 pWaveSub = pWave2 pWaveSub_end = pWave2_end Case 3 pWaveSub = pWave3 pWaveSub_end = pWave3_end Case 4 pWaveSub = pWave4 pWaveSub_end = pWave4_end Case 5 pWaveSub = pWave5 pWaveSub_end = pWave5_end Case 6 ' this is the default pWaveSub = pWave6 pWaveSub_end = pWave6_end Case 7 pWaveSub = pWave7 pWaveSub_end = pWave7_end Case 8 pWaveSub = pWave8 pWaveSub_end = pWave8_end Case 9 pWaveSub = pWave9 pWaveSub_end = pWave9_end Case 10 pWaveSub = pWave10 pWaveSub_end = pWave10_end Case 11 pWaveSub = pWave11 pWaveSub_end = pWave11_end Case 12 pWaveSub = pWave12 pWaveSub_end = pWave12_end EndSelect Case 41 ' steers the waveforms used for the low register Select value ' Case 0 ' pWaveLow = pWave0 ' this is ok ' pWaveLow_end = pWave0_end Case 1 pWaveLow = pWave1 pWaveLow_end = pWave1_end Case 2 pWaveLow = pWave2 pWaveLow_end = pWave2_end Case 3 pWaveLow = pWave3 pWaveLow_end = pWave3_end Case 4 pWaveLow = pWave4 pWaveLow_end = pWave4_end Case 5 pWaveLow = pWave5 pWaveLow_end = pWave5_end Case 6 pWaveLow = pWave6 pWaveLow_end = pWave6_end Case 7 pWaveLow = pWave7 pWaveLow_end = pWave7_end Case 8 pWaveLow = pWave8 pWaveLow_end = pWave8_end Case 9 pWaveLow = pWave9 pWaveLow_end = pWave9_end Case 10 pWaveLow = pWave10 pWaveLow_end = pWave10_end Case 11 pWaveLow = pWave11 pWaveLow_end = pWave11_end Case 12 pWaveLow = pWave12 pWaveLow_end = pWave12_end EndSelect Case 42 ' steers the waveforms used for the medium register Select value ' Case 0 ' pWaveMed = pWave0 ' pWaveMed_end = pWave0_end Case 1 pWaveMed = pWave1 pWaveMed_end = pWave1_end Case 2 pWaveMed = pWave2 pWaveMed_end = pWave2_end Case 3 pWaveMed = pWave3 pWaveMed_end = pWave3_end Case 4 pWaveMed = pWave4 pWaveMed_end = pWave4_end Case 5 pWaveMed = pWave5 pWaveMed_end = pWave5_end Case 6 pWaveMed = pWave6 pWaveMed_end = pWave6_end Case 7 pWaveMed = pWave7 pWaveMed_end = pWave7_end Case 8 pWaveMed = pWave8 pWaveMed_end = pWave8_end Case 9 pWaveMed = pWave9 pWaveMed_end = pWave9_end Case 10 pWaveMed = pWave10 pWaveMed_end = pWave10_end Case 11 pWaveMed = pWave11 pWaveMed_end = pWave11_end Case 12 pWaveMed = pWave12 pWaveMed_end = pWave12_end EndSelect Case 43 ' steers the waveforms used for the high register ' 28.11.2020: ' note: in avoidance of aliases, the sample array here is only 2-periods, or 256 words long. ' the wave-sample arrays have 512 elements = 4 periods. ' 29.11.2020: no reason to do this. Having 512 elements does not cause aliases! Select value Case 1 pWaveHigh = pWave1 pWaveHigh_end = pWave1_end Case 2 pWaveHigh = pWave2 pWaveHigh_end = pWave2_end Case 3 ' this is the default on trumpeter pWaveHigh = pWave3 pWaveHigh_end = pWave3_end Case 4 pWaveHigh = pWave4 pWaveHigh_end = pWave4_end Case 5 pWaveHigh = pWave5 pWaveHigh_end = pWave5_end Case 6 pWaveHigh = pWave6 pWaveHigh_end = pWave6_end Case 7 pWaveHigh = pWave7 pWaveHigh_end = pWave7_end Case 8 pWaveHigh = pWave8 pWaveHigh_end = pWave8_end Case 9 pWaveHigh = pWave9 pWaveHigh_end = pWave9_end Case 10 pWaveHigh = pWave10 pWaveHigh_end = pWave10_end Case 11 pWaveHigh = pWave11 pWaveHigh_end = pWave11_end Case 12 pWaveHigh = pWave12 pWaveHigh_end = pWave12_end EndSelect $endif Case 66 'on/off for the robot If value = 0 Then PowerDown () Else Set poweron_led ' $ifdef Pitch ' GoSub Start_Vibrato ' $endif $ifdef Ampli Start_Tremolo () $endif EndIf $ifdef Ampli Case 80 ' new 05.02.2020: can be used to change the dynamic curves used from -40 dB to -60db or - 20dB ' to avoid glitches, we switch any sounding note off here first: ' CHECKED for 2-chip implementation!!! Set Sig0 CC80 = value + 1 ' 1-128 CC80 = CC80 >> 5 ' 0 - 1 - 2 - 3 - 4 5-lookups since 02.12.2020 ' >> 5 is equivalent to / 32. 'If CC80 < 64 Then CC80 = 0 'If CC80 > 64 Then CC80 = 127 If CC80 <> CC80_old Then Clear Sig0 ' signal note-off to pitch PIC ' Clear IEC0bits_T1IE ' disable timer1 interrupt - tone generator ' Clear IFS0bits_T1IF ' clear interrupt flag ' PDC1 = PWM_reset ' stop wave Clear PDC2 ' adsr to zero Clear playingnote Select CC80 Case 0 ' -20dB range GoSub PWM_Lookup_table_20dB Case 1 ' -30dB range - default on GoSub PWM_Lookup_table_30dB Case 2 ' 64 ' -40dB range GoSub PWM_lookup_table_40dB Case 3 ' -50dB range GoSub PWM_lookup_table_50dB Case 4 '127 ' - 60dB range GoSub PWM_Lookup_Table_60dB EndSelect CC80_old = CC80 Set Sig0 ' pulse low going edge, so high at rest EndIf $endif $ifdef Pitch Case 100 ' for wave11 ' waveform parameter controller Wav11p1 Wav11p1 = value >> 1 ' 0-64 GoSub Teno_Wave11 Case 101 ' for wave11 Wav11p2 = value If Wav11p2 <= Wav11p1 Then Wav11p2 = Wav11p1 + 1 If Wav11p2 > 120 Then Wav11p2 = 120 GoSub Teno_Wave11 Case 102 ' for wave11 Wav11p3 = value If Wav11p3 <= Wav11p2 Then Wav11p3 = Wav11p2 + 1 If Wav11p3 > 122 Then Wav11p3 = 122 GoSub Teno_Wave11 Case 103 ' for wave11 Wav11p4 = value If Wav11p4 <= Wav11p3 Then Wav11p4 = Wav11p3 + 1 If Wav11p4 > 124 Then Wav11p4 = 124 ' Wav11p4 must always be < 127 'If Wav11p1 < Wav11p2 And Wav11p2 < Wav11p3 And Wav11p3 < Wav11p4 And Wav11p4 < 127 Then ' ' recalculate the waveshape when all parameters are received ' If ProgNr = Parametric1 Then ' GoSub Wave_Lookup ' EndIf 'EndIf GoSub Teno_Wave11 Case 104 ' for wave 2 Wav2p1 = value ' square wave symmetry - 64 is symmetric If Wav2p1 < 1 Then Wav2p1 = 1 If Wav2p1 > 126 Then Wav2p1 = 126 GoSub Teno_Wave2 Case 105 ' dirty assymmetric sinewave , prog.11 Wav9p1 = value If Wav9p1 < 4 Then Wav9p1 = 4 If Wav9p1 > 123 Then Wav9p1 = 123 GoSub Teno_Wave9 Case 106 Wav9p2 = value ' DirtyAssin GoSub Teno_Wave9 $endif ' Case 123 ' AllNotesOff () 'this should come first! EndSelect Set Ctrl 'mandatory reset Return Proc AllNotesOff () ' all notes off - no controller resets $ifdef Pitch Clear IEC0bits_T1IE ' disable the Timer1 interrupt PDC1 = PWM_reset Clear Vibrato_flag $endif $ifdef Ampli Clear Sig0 Clear PDC2 'Clear PDC3 ' keep volume setting! Clear ADSR_flags Clear T2CONbits_TON Clear Tremolo_flag Clear S_Led Set Sig0 $endif Clear playingnote Set PB_old EndProc Proc PowerDown () $ifdef Pitch Clear IEC0bits_T1IE ' disable the Timer1 interrupt PDC1 = PWM_reset 'Clear IEC1bits_T4IE ' disable Timer4 irq vibrato Clear Vibrato_flag Set PB_old $endif $ifdef Ampli Clear Sig0 Clear PDC2 Clear PDC3 ' volume 'Clear IEC1bits_T5IE ' disable Timer5 irq tremolo Clear ADSR_flags Clear T2CONbits_TON Clear S_Led Set Sig0 $endif Clear playingnote Low poweron_led Reset_Controllers () EndProc Proc Reset_Controllers () ' called on init and on power down ' resets all controllers to default startup values ' values to be checked and confirmed. $ifdef Ampli Clear Sig0 Volume = CC7_default ' = 100 PDC3 = Ont[Volume] ' reset volume to central value $endif $ifdef Pitch ' reset the pointers to the waves to their start-up defaults: pWaveSub = pWaveSub_Store pWaveSub_end = pWaveSub_end_store pWaveLow = pWaveLow_Store pWaveLow_end = pWaveLow_end_store pWaveMed = pWaveMed_Store ' pointer to first wave lookup pWaveMed_end = pWaveMed_end_Store pWaveHigh = pWaveHigh_Store pWaveHigh_end = pWaveHigh_end_Store Wav11p1 = Wav11p1_default '= 27 ' parametric1 Wav11p2 = Wav11p2_default '= 83 Wav11p3 = Wav11p3_default '= 96 Wav11p4 = Wav11p4_default '= 110 Wav2p1 = Wav2p1_default '= 42 ' square Wav9p1 = Wav9p1_default '= 20 ' dirty assin symmetry Wav9p2 = Wav9p2_default '= 64 ' dirty assin noisyness CC1 = CC1_default ' = noise CC3 = CC3_default ' vibrato depth CC4 = CC4_default ' vibrato speed Samprate = Per440 ' reset tuning - this copies the entire aray GoSub Modulation_range CC20 = CC20_default ' tuning ' new 06.07.2021: Vibtime = CC2_default * CC2_units ' = 1834 CC2 = CC2_default PR2 = Vibtime.LowWord PR3 = Vibtime.HighWord Clear IEC0bits_T3IE ' disable interrupt Clear T2CONbits_TON ' stop timer Clear Vibrato_flag 'shouldn't we start here IRQ4 already? PR4 = Dur[CC4] ' set timer, regardless CC3 IEC1bits_T4IE = 1 ' enable interrupt Set T4ConBits_TON $endif $ifdef Ampli CC5 = CC5_default ' tremolo CC6 = CC6_default ' tremolo Start_Tremolo () CC15 = CC15_default ADSR_period = (CC15 + 1) << 4 CC16 = CC16_default CC17 = CC17_default CC18 = CC18_default CC19 = CC19_default If CC80 <> CC80_default Then GoSub PWM_Lookup_table_30dB CC80 = CC80_default CC80_old = CC80_default EndIf Clear ADSR_flags Low S_Led Set Sig0 $endif Clear Legato_flag EndProc '$ifdef Pitch 'Start_Vibrato: ' ' proc. called on init so that we can start with vibrato on when a ' ' note is playing ' ' on init CC3 = CC3_default ' ' CC4 = CC4_default '' ' new coding: ' PR4 = Dur[CC4] ' set timer, regardless CC3 ' IEC1bits_T4IE = 1 ' enable interrupt ' Set T4ConBits_TON 'Return '$endif $ifdef Ampli Proc Start_Tremolo () ' proc. called on init so that we can start with tremolo on ' AM-depth (tremolo) ' CC5 = value >> 1 ' 0-63 - here we divided already in the default ' amplitude modulation controllers require a timer for the frequency ' and modulation of volume or sustain in the timer interrupt If (CC5 * CC6) > 0 Then If CC5 > Volume Then AM_depth_min = 0 Else AM_depth_min = Volume - CC5 EndIf If CC5 + Volume > 127 Then AM_depth_max = 127 Else AM_depth_max = Volume + CC5 EndIf ' het modulatie trajekt is nu van Ont[AM_depth_min] tot Ont[AM_depth_max] ' start timer: Clear TMR5 IFS1bits_T5IF = 0 ' clear IRQ PR5 = Dur[CC6] ' set timer IEC1bits_T5IE = 1 ' enable interrupt Else ' ' stop timer ' IFS1bits_T5IF = 0 ' clear IRQ flag ' IEC1bits_T5IE = 0 ' disable timer 5 interrupt PDC3 = Ont[Volume] ' reset volume to central value EndIf EndProc $endif Dur_Lookup: ' using timer23, 1 dur unit is 4.224 us ' used for vibrato and tremolo speed here 'Set Dur[0] Dur[0]= 32000 '2x135ms = 3.7 Hz Dur[1]= 23674 ' 07.08.2016: 2x100ms = 200ms full period --> 5Hz [o.k.14.08.2016] ' 18.01.2021: rechecked and found o.k. ' note that this is the time for 1/32nd of a vibrato period. ' thus vibrato-frequency is: 1 / Dur[i] * 32 * 4.224us = 0.3Hz ' if we do Dur[i] >> 2, it will become 1.25Hz Dur[2]= 22917 ' freq= 2.18178644674259 Dur[3]= 22548 ' freq= 2.21749157353202 Dur[4]= 22185 ' freq= 2.25377507324769 Dur[5]= 21827 ' freq= 2.29074082558299 Dur[6]= 21475 ' freq= 2.32828870779977 Dur[7]= 21129 ' freq= 2.36641582658905 Dur[8]= 20789 ' freq= 2.40511809129828 Dur[9]= 20454 ' freq= 2.44450963136795 Dur[10]= 20124 ' freq= 2.48459550785132 Dur[11]= 19800 ' freq= 2.52525252525252 Dur[12]= 19481 ' freq= 2.56660335711719 Dur[13]= 19167 ' freq= 2.60865028434288 Dur[14]= 18858 ' freq= 2.65139463357726 Dur[15]= 18554 ' freq= 2.69483669289641 Dur[16]= 18255 ' freq= 2.73897562311695 Dur[17]= 17961 ' freq= 2.7838093647347 Dur[18]= 17672 ' freq= 2.82933454051607 Dur[19]= 17387 ' freq= 2.87571173865532 Dur[20]= 17107 ' freq= 2.92278014847723 Dur[21]= 16831 ' freq= 2.97070881112233 Dur[22]= 16560 ' freq= 3.01932367149758 Dur[23]= 16293 ' freq= 3.06880255324372 Dur[24]= 16030 ' freq= 3.11915159076731 Dur[25]= 15772 ' freq= 3.17017499365965 Dur[26]= 15518 ' freq= 3.22206469905916 Dur[27]= 15268 ' freq= 3.27482315954938 Dur[28]= 15022 ' freq= 3.32845160431367 Dur[29]= 14780 ' freq= 3.382949932341 Dur[30]= 14542 ' freq= 3.43831660019254 Dur[31]= 14307 ' freq= 3.4947927587894 Dur[32]= 14077 ' freq= 3.55189315905378 Dur[33]= 13850 ' freq= 3.6101083032491 Dur[34]= 13627 ' freq= 3.66918617450649 Dur[35]= 13407 ' freq= 3.72939509211606 Dur[36]= 13191 ' freq= 3.79046319460238 Dur[37]= 12978 ' freq= 3.85267375558638 Dur[38]= 12769 ' freq= 3.91573341686898 Dur[39]= 12564 ' freq= 3.97962432346386 Dur[40]= 12361 ' freq= 4.04498017959712 Dur[41]= 12162 ' freq= 4.1111659266568 Dur[42]= 11966 ' freq= 4.17850576633796 Dur[43]= 11773 ' freq= 4.24700586086809 Dur[44]= 11583 ' 07.08.2016: geeft 10.1177 Hz Dur[45]= 11397 ' freq= 4.38711941739054 Dur[46]= 11213 ' freq= 4.45910996165165 Dur[47]= 11032 ' freq= 4.53226976069616 Dur[48]= 10855 ' freq= 4.60617227084293 Dur[49]= 10680 ' freq= 4.6816479400749 Dur[50]= 10508 ' freq= 4.75827940616673 Dur[51]= 10338 ' freq= 4.83652544012381 Dur[52]= 10172 ' freq= 4.91545418796697 Dur[53]= 10008 ' freq= 4.99600319744204 Dur[54]= 9846 ' freq= 5.07820434694292 Dur[55]= 9688 ' freq= 5.16102394715111 Dur[56]= 9532 ' freq= 5.24548887956357 Dur[57]= 9378 ' freq= 5.33162721262529 Dur[58]= 9227 ' freq= 5.4188793757451 Dur[59]= 9078 ' freq= 5.50782110597048 Dur[60]= 8932 ' freq= 5.59785042543663 Dur[61]= 8788 ' freq= 5.68957669549385 Dur[62]= 8646 ' freq= 5.78302105019662 Dur[63]= 8507 ' 04.08.2016: 21Hz pulse duur = 23.8ms Dur[64]= 8370 ' geeft nu 20ms pulsen freq= 25Hz 03.08.2016 ' 14.0017Hz 07.08.2016 Dur[65]= 8235 ' freq= 6.07164541590771 Dur[66]= 8102 ' freq= 6.17131572451246 Dur[67]= 7972 ' freq= 6.27195183140993 Dur[68]= 7843 ' freq= 6.37511156445238 Dur[69]= 7717 ' freq= 6.47920176234288 Dur[70]= 7593 ' freq= 6.58501251152377 Dur[71]= 7470 ' freq= 6.69344042838019 Dur[72]= 7350 ' freq= 6.80272108843537 Dur[73]= 7231 ' freq= 6.91467293597013 Dur[74]= 7115 ' freq= 7.02740688685875 Dur[75]= 7000 ' freq= 7.14285714285714 Dur[76]= 6888 ' freq= 7.25900116144018 Dur[77]= 6777 ' freq= 7.37789582411096 Dur[78]= 6667 ' freq= 7.49962501874906 Dur[79]= 6560 ' freq= 7.62195121951219 Dur[80]= 6454 ' freq= 7.74713356058258 Dur[81]= 6350 ' freq= 7.8740157480315 Dur[82]= 6248 ' freq= 8.00256081946223 Dur[83]= 6147 ' freq= 8.13404912965674 Dur[84]= 6048 ' freq= 8.26719576719577 Dur[85]= 5951 ' freq= 8.40194925222652 Dur[86]= 5855 ' freq= 8.5397096498719 Dur[87]= 5760 ' freq= 8.68055555555555 Dur[88]= 5668 ' freq= 8.82145377558222 Dur[89]= 5576 ' freq= 8.96700143472023 Dur[90]= 5486 ' freq= 9.11410864017499 Dur[91]= 5398 ' freq= 9.26268988514264 Dur[92]= 5311 ' freq= 9.41442289587648 Dur[93]= 5225 ' freq= 9.56937799043062 Dur[94]= 5141 ' freq= 9.72573429293912 Dur[95]= 5058 ' freq= 9.88533017002768 Dur[96]= 4977 ' freq= 10.0462125778581 Dur[97]= 4897 ' freq= 10.2103328568511 Dur[98]= 4818 ' freq= 10.3777501037775 Dur[99]= 4740 ' freq= 10.548523206751 Dur[100]= 4664 ' freq= 10.7204116638079 Dur[101]= 4589 ' freq= 10.8956199607758 Dur[102]= 4515 ' freq= 11.0741971207087 Dur[103]= 4442 ' freq= 11.2561909049977 Dur[104]= 4370 ' freq= 11.441647597254 Dur[105]= 4300 ' freq= 11.6279069767442 Dur[106]= 4231 ' freq= 11.8175372252422 Dur[107]= 4162 ' freq= 12.013455069678 Dur[108]= 4095 ' freq= 12.2100122100122 Dur[109]= 4029 ' freq= 12.4100273020601 Dur[110]= 3964 ' freq= 12.6135216952573 Dur[111]= 3901 ' freq= 12.8172263522174 Dur[112]= 3838 ' freq= 13.0276185513288 Dur[113]= 3776 ' freq= 13.2415254237288 Dur[114]= 3715 ' freq= 13.4589502018842 Dur[115]= 3655 ' freq= 13.6798905608755 Dur[116]= 3596 ' freq= 13.9043381535039 Dur[117]= 3538 ' freq= 14.1322781232335 Dur[118]= 3481 ' freq= 14.3636885952312 Dur[119]= 3425 ' freq= 14.5985401459854 Dur[120]= 3370 ' freq= 14.8367952522255 Dur[121]= 3316 ' freq= 15.0784077201448 Dur[122]= 3262 ' freq= 15.3280196198651 Dur[123]= 3210 ' freq= 15.5763239875389 Dur[124]= 3158 ' freq= 15.8328055731476 Dur[125]= 3107 ' freq= 16.0926939169617 Dur[126]= 3057 ' freq= 16.3559044815178 = 38.3365Hz 07.08.2016 Dur[127]= 3008 ' 03.08.2016: 6.9ms nu = 144Hz ' 04.08.2016: 8.35ms - 59.5Hz Return ' midi-note to period lookup for PIC24 with 120MHz clock ' time_unit = 8.33333333333333E-9 ' lowest note = midi 22 (Sib) , freq = 29.1355235 Hz 'Period_Lookup_Table: 'Period[22]= 64355 ' soll frequency = 29.13523 real frequency = 29.13526 'Period[23]= 60743 ' soll frequency = 30.86771 real frequency = 30.86775 'Period[24]= 57334 ' soll frequency = 32.70319 real frequency = 32.70311 'Period[25]= 54116 ' soll frequency = 34.64783 real frequency = 34.64779 'Period[26]= 51079 ' soll frequency = 36.7081 real frequency = 36.70784 'Period[27]= 48212 ' soll frequency = 38.89087 real frequency = 38.89073 'Period[28]= 45506 ' soll frequency = 41.20344 real frequency = 41.20336 'Period[29]= 42952 ' soll frequency = 43.65353 real frequency = 43.65338 'Period[30]= 40541 ' soll frequency = 46.2493 real frequency = 46.24948 'Period[31]= 38266 ' soll frequency = 48.99943 real frequency = 48.99911 'Period[32]= 36118 ' soll frequency = 51.91308 real frequency = 51.91317 'Period[33]= 34091 ' soll frequency = 55 real frequency = 54.99986 'Period[34]= 32178 ' soll frequency = 58.27047 real frequency = 58.26963 'Period[35]= 30372 ' soll frequency = 61.73541 real frequency = 61.73449 'Period[36]= 28667 ' soll frequency = 65.40639 real frequency = 65.40622 'Period[37]= 27058 ' soll frequency = 69.29565 real frequency = 69.29558 'Period[38]= 25539 ' soll frequency = 73.41619 real frequency = 73.41713 'Period[39]= 24106 ' soll frequency = 77.78174 real frequency = 77.78146 'Period[40]= 22753 ' soll frequency = 82.40689 real frequency = 82.40672 'Period[41]= 21476 ' soll frequency = 87.30706 real frequency = 87.30676 'Period[42]= 20271 ' soll frequency = 92.4986 real frequency = 92.49667 'Period[43]= 19133 ' soll frequency = 97.99886 real frequency = 97.99822 'Period[44]= 18059 ' soll frequency = 103.8262 real frequency = 103.8263 'Period[45]= 17045 ' soll frequency = 110 real frequency = 110.0029 'Period[46]= 16089 ' soll frequency = 116.5409 real frequency = 116.5392 'Period[47]= 15186 ' soll frequency = 123.4708 real frequency = 123.469 'Period[48]= 14333 ' soll frequency = 130.8128 real frequency = 130.817 'Period[49]= 13529 ' soll frequency = 138.5913 real frequency = 138.5912 'Period[50]= 12770 ' soll frequency = 146.8324 real frequency = 146.8285 'Period[51]= 12053 ' soll frequency = 155.5635 real frequency = 155.5629 'Period[52]= 11376 ' soll frequency = 164.8138 real frequency = 164.8207 ' lowest note on 'Period[53]= 10738 ' soll frequency = 174.6141 real frequency = 174.6135 'Period[54]= 10135 ' soll frequency = 184.9972 real frequency = 185.0025 'Period[55]= 9566 ' soll frequency = 195.9977 real frequency = 196.0067 'Period[56]= 9030 ' soll frequency = 207.6523 real frequency = 207.6412 'Period[57]= 8523 ' soll frequency = 220 real frequency = 219.993 ' geeft 219.26 'Period[58]= 8044 ' soll frequency = 233.0819 real frequency = 233.093 'Period[59]= 7593 ' soll frequency = 246.9416 real frequency = 246.938 'Period[60]= 7167 ' soll frequency = 261.6255 real frequency = 261.6158 'Period[61]= 6764 ' soll frequency = 277.1826 real frequency = 277.2028 'Period[62]= 6385 ' soll frequency = 293.6648 real frequency = 293.657 'Period[63]= 6026 ' soll frequency = 311.127 real frequency = 311.1517 'Period[64]= 5688 ' soll frequency = 329.6276 real frequency = 329.6414 'Period[65]= 5369 ' soll frequency = 349.2282 real frequency = 349.227 'Period[66]= 5068 ' soll frequency = 369.9944 real frequency = 369.9684 'Period[67]= 4783 ' soll frequency = 391.9954 real frequency = 392.0134 'Period[68]= 4515 ' soll frequency = 415.3047 real frequency = 415.2824 'Period[69]= 4261 ' soll frequency = 440 real frequency = 440.0375 439.78Hz measured 17.12.2016 'Period[70]= 4022 ' soll frequency = 466.1638 real frequency = 466.186 'Period[71]= 3796 ' soll frequency = 493.8833 real frequency = 493.941 'Period[72]= 3583 ' soll frequency = 523.2511 real frequency = 523.3045 'Period[73]= 3382 ' soll frequency = 554.3652 real frequency = 554.4057 'Period[74]= 3192 ' soll frequency = 587.3295 real frequency = 587.406 'Period[75]= 3013 ' soll frequency = 622.254 real frequency = 622.3033 'Period[76]= 2844 ' soll frequency = 659.2551 real frequency = 659.2827 'Period[77]= 2684 ' soll frequency = 698.4565 real frequency = 698.5842 'Period[78]= 2534 ' soll frequency = 739.9888 real frequency = 739.9368 'Period[79]= 2392 ' soll frequency = 783.9908 real frequency = 783.8628 'Period[80]= 2257 ' soll frequency = 830.6094 real frequency = 830.7488 'Period[81]= 2131 ' soll frequency = 880 real frequency = 879.8686 'Period[82]= 2011 ' soll frequency = 932.3275 real frequency = 932.3719 'Period[83]= 1898 ' soll frequency = 987.7666 real frequency = 987.882 'Period[84]= 1792 ' soll frequency = 1046.502 real frequency = 1046.317 'Period[85]= 1691 ' soll frequency = 1108.73 real frequency = 1108.811 'Period[86]= 1596 ' soll frequency = 1174.659 real frequency = 1174.812 'Period[87]= 1507 ' soll frequency = 1244.508 real frequency = 1244.194 'Period[88]= 1422 ' soll frequency = 1318.51 real frequency = 1318.565 'Period[89]= 1342 ' soll frequency = 1396.913 real frequency = 1397.168 'Period[90]= 1267 ' soll frequency = 1479.978 real frequency = 1479.874 'Period[91]= 1196 ' soll frequency = 1567.982 real frequency = 1567.726 'Period[92]= 1129 ' soll frequency = 1661.219 real frequency = 1660.762 'Period[93]= 1065 ' soll frequency = 1760 real frequency = 1760.563 'Period[94]= 1006 ' soll frequency = 1864.655 real frequency = 1863.817 highest note on 'Period[95]= 949 ' soll frequency = 1975.533 real frequency = 1975.764 'Period[96]= 896 ' soll frequency = 2093.004 real frequency = 2092.634 gives artefacts on Flut 'Period[97]= 846 ' soll frequency = 2217.461 real frequency = 2216.312 'Period[98]= 798 ' soll frequency = 2349.318 real frequency = 2349.624 'Period[99]= 753 ' soll frequency = 2489.016 real frequency = 2490.04 'Period[100]= 711 ' soll frequency = 2637.02 real frequency = 2637.131 'Period[101]= 671 ' soll frequency = 2793.826 real frequency = 2794.337 'Period[102]= 633 ' soll frequency = 2959.955 real frequency = 2962.085 'Period[103]= 598 ' soll frequency = 3135.963 real frequency = 3135.451 'Period[104]= 564 ' soll frequency = 3322.438 real frequency = 3324.468 'Period[105]= 533 ' soll frequency = 3520 real frequency = 3517.824 'Period[106]= 503 ' soll frequency = 3729.31 real frequency = 3727.634 'Period[107]= 475 ' soll frequency = 3951.066 real frequency = 3947.368 'Period[108]= 448 ' soll frequency = 4186.009 real frequency = 4185.268 'Period[109]= 423 ' soll frequency = 4434.922 real frequency = 4432.624 'Period[110]= 399 ' soll frequency = 4698.636 real frequency = 4699.248 'Period[111]= 377 ' soll frequency = 4978.032 real frequency = 4973.475 'Period[112]= 356 ' soll frequency = 5274.041 real frequency = 5266.854 'Period[113]= 336 ' soll frequency = 5587.652 real frequency = 5580.357 'Period[114]= 317 ' soll frequency = 5919.911 real frequency = 5914.827 'Period[115]= 299 ' soll frequency = 6271.927 real frequency = 6270.903 'Period[116]= 282 ' soll frequency = 6644.875 real frequency = 6648.936 'Period[117]= 266 ' soll frequency = 7040 real frequency = 7048.872 'Period[118]= 251 ' soll frequency = 7458.62 real frequency = 7470.12 'Period[119]= 237 ' soll frequency = 7902.133 real frequency = 7911.392 'Period[120]= 224 ' soll frequency = 8372.018 real frequency = 8370.536 'Period[121]= 211 ' soll frequency = 8869.844 real frequency = 8886.256 'Period[122]= 200 ' soll frequency = 9397.272 real frequency = 9375 'Period[123]= 188 ' soll frequency = 9956.063 real frequency = 9973.404 'Period[124]= 178 ' soll frequency = 10548.08 real frequency = 10533.71 'Period[125]= 168 ' soll frequency = 11175.3 real frequency = 11160.71 'Period[126]= 158 ' soll frequency = 11839.82 real frequency = 11867.09 'Period[127]= 149 ' soll frequency = 12543.85 real frequency = 12583.89 'For i = 0 To 127 ' Samprate[i] = Period[i] >> 2 'Next i ' ' make a lookup for the modulation ranges as well: ' ' PBRange - used for pitchbend and vibrato 'For i = 1 To 126 ' PBrange[i] = Period[i-1] - Period[i+1] ' this is a full tone span, or ' PBrange[i] = PBrange[i] >> 2 ' so now Period[i] + PBrange[i]/2 would bring the pitch a quartertone down ' ' Period[i] - PBrange[i]/2 raises the pitch with a quartertone ' ' measured 17.12.2016: PB=127 gives for a base note of 880Hz 901.5Hz (should be 905.7) ' ' PB=0 gives 852 Hz (shouldbe 855) ' ' PB = 64 gives 878 Hz (should be 880) 'Next i ' PBrange[0] = PBrange[1] ' for safety ' PBrange[127] = PBrange[126] ' the range for Bug is only 52 to 94 , for Flut 48-96 'Return Modulation_range: $ifdef Pitch ' make lookups for the modulation ranges as well: ' PBRange - used for pitchbend ' Vibrange used for vibrato ' for most robots this is set to +/- a quartertone. ' for Hunt we need a much deeper vibrato, so we modified ' the code here to get a +/- semitone span. ' This implemented 18.01.2021: Now PBrange +/- quartertone ' VibRange +/- semitone For i = 1 To 126 VibRange[i] = Samprate[i-1] - Samprate[i+1] ' this is a full tone span ' Samprate[i-1] is always > Samprate[i+1] PBrange[i] = VibRange[i] / 2 ' should be quartertone up or down. ' so now Period[i] + PBrange[i]/2 would bring the pitch a quartertone down ' Period[i] - PBrange[i]/2 raises the pitch with a quartertone ' measured 17.12.2016: PB=127 gives for a base note of 880Hz 901.5Hz (should be 905.7) ' PB=0 gives 852 Hz (shouldbe 855) ' PB = 64 gives 878 Hz (should be 880) Next i PBrange[0] = PBrange[1] ' for safety PBrange[127] = PBrange[126] ' the range for Flut is 48-105 VibRange[0] = VibRange[1] VibRange[127] = VibRange[126] $endif Return ' pwm on/off values for PIC24 with 120MHz clock ' time_unit = 8.33333333333333E-9 $ifdef Ampli PWM_Lookup_Table_60dB: 'Hunt volume scales 60dB PBcc calculated 26.11.2020 'for 11 bit PWM values Ont[0]= 0 ' db= -60 Ont[1]= 1 ' db= -59.0625 Ont[2]= 2 ' db= -58.59375 Ont[3]= 3 ' db= -58.125 Ont[4]= 3 ' db= -57.65625 Ont[5]= 3 ' db= -57.1875 Ont[6]= 3 ' db= -56.71875 Ont[7]= 3 ' db= -56.25 Ont[8]= 3 ' db= -55.78125 Ont[9]= 4 ' db= -55.3125 Ont[10]= 4 ' db= -54.84375 Ont[11]= 4 ' db= -54.375 Ont[12]= 4 ' db= -53.90625 Ont[13]= 4 ' db= -53.4375 Ont[14]= 5 ' db= -52.96875 Ont[15]= 5 ' db= -52.5 Ont[16]= 5 ' db= -52.03125 Ont[17]= 5 ' db= -51.5625 Ont[18]= 6 ' db= -51.09375 Ont[19]= 6 ' db= -50.625 Ont[20]= 6 ' db= -50.15625 Ont[21]= 7 ' db= -49.6875 Ont[22]= 7 ' db= -49.21875 Ont[23]= 7 ' db= -48.75 Ont[24]= 8 ' db= -48.28125 Ont[25]= 8 ' db= -47.8125 Ont[26]= 9 ' db= -47.34375 Ont[27]= 9 ' db= -46.875 Ont[28]= 10 ' db= -46.40625 Ont[29]= 10 ' db= -45.9375 Ont[30]= 11 ' db= -45.46875 Ont[31]= 12 ' db= -45 Ont[32]= 12 ' db= -44.53125 Ont[33]= 13 ' db= -44.0625 Ont[34]= 14 ' db= -43.59375 Ont[35]= 14 ' db= -43.125 Ont[36]= 15 ' db= -42.65625 Ont[37]= 16 ' db= -42.1875 Ont[38]= 17 ' db= -41.71875 Ont[39]= 18 ' db= -41.25 Ont[40]= 19 ' db= -40.78125 Ont[41]= 20 ' db= -40.3125 Ont[42]= 21 ' db= -39.84375 Ont[43]= 22 ' db= -39.375 Ont[44]= 23 ' db= -38.90625 Ont[45]= 25 ' db= -38.4375 Ont[46]= 26 ' db= -37.96875 Ont[47]= 27 ' db= -37.5 Ont[48]= 29 ' db= -37.03125 Ont[49]= 30 ' db= -36.5625 Ont[50]= 32 ' db= -36.09375 Ont[51]= 34 ' db= -35.625 Ont[52]= 36 ' db= -35.15625 Ont[53]= 38 ' db= -34.6875 Ont[54]= 40 ' db= -34.21875 Ont[55]= 42 ' db= -33.75 Ont[56]= 44 ' db= -33.28125 Ont[57]= 47 ' db= -32.8125 Ont[58]= 49 ' db= -32.34375 Ont[59]= 52 ' db= -31.875 Ont[60]= 55 ' db= -31.40625 Ont[61]= 58 ' db= -30.9375 Ont[62]= 61 ' db= -30.46875 Ont[63]= 65 ' db= -30 Ont[64]= 68 ' db= -29.53125 Ont[65]= 72 ' db= -29.0625 Ont[66]= 76 ' db= -28.59375 Ont[67]= 80 ' db= -28.125 Ont[68]= 85 ' db= -27.65625 Ont[69]= 90 ' db= -27.1875 Ont[70]= 94 ' db= -26.71875 Ont[71]= 100 ' db= -26.25 Ont[72]= 105 ' db= -25.78125 Ont[73]= 111 ' db= -25.3125 Ont[74]= 117 ' db= -24.84375 Ont[75]= 124 ' db= -24.375 Ont[76]= 131 ' db= -23.90625 Ont[77]= 138 ' db= -23.4375 Ont[78]= 146 ' db= -22.96875 Ont[79]= 154 ' db= -22.5 Ont[80]= 162 ' db= -22.03125 Ont[81]= 171 ' db= -21.5625 Ont[82]= 181 ' db= -21.09375 Ont[83]= 191 ' db= -20.625 Ont[84]= 201 ' db= -20.15625 Ont[85]= 212 ' db= -19.6875 Ont[86]= 224 ' db= -19.21875 Ont[87]= 236 ' db= -18.75 Ont[88]= 250 ' db= -18.28125 Ont[89]= 263 ' db= -17.8125 Ont[90]= 278 ' db= -17.34375 Ont[91]= 293 ' db= -16.875 Ont[92]= 310 ' db= -16.40625 Ont[93]= 327 ' db= -15.9375 Ont[94]= 345 ' db= -15.46875 Ont[95]= 364 ' db= -15 Ont[96]= 384 ' db= -14.53125 Ont[97]= 406 ' db= -14.0625 Ont[98]= 428 ' db= -13.59375 Ont[99]= 452 ' db= -13.125 Ont[100]= 477 ' db= -12.65625 Ont[101]= 503 ' db= -12.1875 Ont[102]= 531 ' db= -11.71875 Ont[103]= 561 ' db= -11.25 Ont[104]= 592 ' db= -10.78125 Ont[105]= 625 ' db= -10.3125 Ont[106]= 659 ' db= -9.84375 Ont[107]= 696 ' db= -9.375 Ont[108]= 735 ' db= -8.90625 Ont[109]= 775 ' db= -8.4375 Ont[110]= 818 ' db= -7.96875 Ont[111]= 864 ' db= -7.5 Ont[112]= 912 ' db= -7.03125 Ont[113]= 962 ' db= -6.5625 Ont[114]= 1015 ' db= -6.09375 Ont[115]= 1072 ' db= -5.625 Ont[116]= 1131 ' db= -5.15625 Ont[117]= 1194 ' db= -4.6875 Ont[118]= 1260 ' db= -4.21875 Ont[119]= 1330 ' db= -3.75 Ont[120]= 1404 ' db= -3.28125 Ont[121]= 1482 ' db= -2.8125 Ont[122]= 1564 ' db= -2.34375 Ont[123]= 1650 ' db= -1.875 Ont[124]= 1742 ' db= -1.40625 Ont[125]= 1838 ' db= -.9375 Ont[126]= 1940 ' db= -.46875 Ont[127]= 2047 ' db= 0 Return PWM_lookup_table_50dB: 'Hunt volume scales 50dB 'for 11 bit PWM values '------log-scale------ Ont[0]= 0 ' db= -49.609375 Ont[1]= 6 ' db= -49.21875 Ont[2]= 7 ' db= -48.828125 Ont[3]= 8 ' db= -48.4375 Ont[4]= 8 ' db= -48.046875 Ont[5]= 8 ' db= -47.65625 Ont[6]= 9 ' db= -47.265625 Ont[7]= 9 ' db= -46.875 Ont[8]= 10 ' db= -46.484375 Ont[9]= 10 ' db= -46.09375 Ont[10]= 11 ' db= -45.703125 Ont[11]= 11 ' db= -45.3125 Ont[12]= 12 ' db= -44.921875 Ont[13]= 12 ' db= -44.53125 Ont[14]= 13 ' db= -44.140625 Ont[15]= 13 ' db= -43.75 Ont[16]= 14 ' db= -43.359375 Ont[17]= 15 ' db= -42.96875 Ont[18]= 15 ' db= -42.578125 Ont[19]= 16 ' db= -42.1875 Ont[20]= 17 ' db= -41.796875 Ont[21]= 17 ' db= -41.40625 Ont[22]= 18 ' db= -41.015625 Ont[23]= 19 ' db= -40.625 Ont[24]= 20 ' db= -40.234375 Ont[25]= 21 ' db= -39.84375 Ont[26]= 22 ' db= -39.453125 Ont[27]= 23 ' db= -39.0625 Ont[28]= 24 ' db= -38.671875 Ont[29]= 25 ' db= -38.28125 Ont[30]= 26 ' db= -37.890625 Ont[31]= 27 ' db= -37.5 Ont[32]= 29 ' db= -37.109375 Ont[33]= 30 ' db= -36.71875 Ont[34]= 31 ' db= -36.328125 Ont[35]= 33 ' db= -35.9375 Ont[36]= 34 ' db= -35.546875 Ont[37]= 36 ' db= -35.15625 Ont[38]= 37 ' db= -34.765625 Ont[39]= 39 ' db= -34.375 Ont[40]= 41 ' db= -33.984375 Ont[41]= 43 ' db= -33.59375 Ont[42]= 45 ' db= -33.203125 Ont[43]= 47 ' db= -32.8125 Ont[44]= 49 ' db= -32.421875 Ont[45]= 51 ' db= -32.03125 Ont[46]= 54 ' db= -31.640625 Ont[47]= 56 ' db= -31.25 Ont[48]= 59 ' db= -30.859375 Ont[49]= 61 ' db= -30.46875 Ont[50]= 64 ' db= -30.078125 Ont[51]= 67 ' db= -29.6875 Ont[52]= 70 ' db= -29.296875 Ont[53]= 73 ' db= -28.90625 Ont[54]= 77 ' db= -28.515625 Ont[55]= 80 ' db= -28.125 Ont[56]= 84 ' db= -27.734375 Ont[57]= 88 ' db= -27.34375 Ont[58]= 92 ' db= -26.953125 Ont[59]= 96 ' db= -26.5625 Ont[60]= 101 ' db= -26.171875 Ont[61]= 105 ' db= -25.78125 Ont[62]= 110 ' db= -25.390625 Ont[63]= 115 ' db= -25 Ont[64]= 120 ' db= -24.609375 Ont[65]= 126 ' db= -24.21875 Ont[66]= 132 ' db= -23.828125 Ont[67]= 138 ' db= -23.4375 Ont[68]= 144 ' db= -23.046875 Ont[69]= 151 ' db= -22.65625 Ont[70]= 158 ' db= -22.265625 Ont[71]= 165 ' db= -21.875 Ont[72]= 173 ' db= -21.484375 Ont[73]= 181 ' db= -21.09375 Ont[74]= 189 ' db= -20.703125 Ont[75]= 198 ' db= -20.3125 Ont[76]= 207 ' db= -19.921875 Ont[77]= 216 ' db= -19.53125 Ont[78]= 226 ' db= -19.140625 Ont[79]= 236 ' db= -18.75 Ont[80]= 247 ' db= -18.359375 Ont[81]= 259 ' db= -17.96875 Ont[82]= 271 ' db= -17.578125 Ont[83]= 283 ' db= -17.1875 Ont[84]= 296 ' db= -16.796875 Ont[85]= 310 ' db= -16.40625 Ont[86]= 324 ' db= -16.015625 Ont[87]= 339 ' db= -15.625 Ont[88]= 354 ' db= -15.234375 Ont[89]= 371 ' db= -14.84375 Ont[90]= 388 ' db= -14.453125 Ont[91]= 406 ' db= -14.0625 Ont[92]= 424 ' db= -13.671875 Ont[93]= 444 ' db= -13.28125 Ont[94]= 464 ' db= -12.890625 Ont[95]= 486 ' db= -12.5 Ont[96]= 508 ' db= -12.109375 Ont[97]= 531 ' db= -11.71875 Ont[98]= 556 ' db= -11.328125 Ont[99]= 581 ' db= -10.9375 Ont[100]= 608 ' db= -10.546875 Ont[101]= 636 ' db= -10.15625 Ont[102]= 665 ' db= -9.765625 Ont[103]= 696 ' db= -9.375 Ont[104]= 728 ' db= -8.984375 Ont[105]= 761 ' db= -8.59375 Ont[106]= 796 ' db= -8.203125 Ont[107]= 833 ' db= -7.8125 Ont[108]= 871 ' db= -7.421875 Ont[109]= 912 ' db= -7.03125 Ont[110]= 953 ' db= -6.640625 Ont[111]= 997 ' db= -6.25 Ont[112]= 1043 ' db= -5.859375 Ont[113]= 1091 ' db= -5.46875 Ont[114]= 1141 ' db= -5.078125 Ont[115]= 1194 ' db= -4.6875 Ont[116]= 1249 ' db= -4.296875 Ont[117]= 1306 ' db= -3.90625 Ont[118]= 1366 ' db= -3.515625 Ont[119]= 1429 ' db= -3.125 Ont[120]= 1495 ' db= -2.734375 Ont[121]= 1564 ' db= -2.34375 Ont[122]= 1636 ' db= -1.953125 Ont[123]= 1711 ' db= -1.5625 Ont[124]= 1790 ' db= -1.171875 Ont[125]= 1872 ' db= -.78125 Ont[126]= 1958 ' db= -.390625 Ont[127]= 2047 ' db= 0 Return PWM_lookup_table_40dB: ' alternatieve 40dB lookup: ' as used for HybrLo - volume logscales 40dB - works better than 60dB on Flut. 'for 11-bit values: 'Hunt volume scales 40dB - 26.11.2020 '------------ Ont[0]= 0 ' db= -40 '-39.6875 Ont[1]= 21 ' db= -39.375 Ont[2]= 23 ' db= -39.0625 Ont[3]= 24 ' db= -38.75 Ont[4]= 25 ' db= -38.4375 Ont[5]= 25 ' db= -38.125 Ont[6]= 26 ' db= -37.8125 Ont[7]= 27 ' db= -37.5 Ont[8]= 28 ' db= -37.1875 Ont[9]= 29 ' db= -36.875 Ont[10]= 30 ' db= -36.5625 Ont[11]= 32 ' db= -36.25 Ont[12]= 33 ' db= -35.9375 Ont[13]= 34 ' db= -35.625 Ont[14]= 35 ' db= -35.3125 Ont[15]= 36 ' db= -35 Ont[16]= 38 ' db= -34.6875 Ont[17]= 39 ' db= -34.375 Ont[18]= 41 ' db= -34.0625 Ont[19]= 42 ' db= -33.75 Ont[20]= 44 ' db= -33.4375 Ont[21]= 45 ' db= -33.125 Ont[22]= 47 ' db= -32.8125 Ont[23]= 49 ' db= -32.5 Ont[24]= 50 ' db= -32.1875 Ont[25]= 52 ' db= -31.875 Ont[26]= 54 ' db= -31.5625 Ont[27]= 56 ' db= -31.25 Ont[28]= 58 ' db= -30.9375 Ont[29]= 60 ' db= -30.625 Ont[30]= 62 ' db= -30.3125 Ont[31]= 65 ' db= -30 Ont[32]= 67 ' db= -29.6875 Ont[33]= 70 ' db= -29.375 Ont[34]= 72 ' db= -29.0625 Ont[35]= 75 ' db= -28.75 Ont[36]= 78 ' db= -28.4375 Ont[37]= 80 ' db= -28.125 Ont[38]= 83 ' db= -27.8125 Ont[39]= 86 ' db= -27.5 Ont[40]= 90 ' db= -27.1875 Ont[41]= 93 ' db= -26.875 Ont[42]= 96 ' db= -26.5625 Ont[43]= 100 ' db= -26.25 Ont[44]= 103 ' db= -25.9375 Ont[45]= 107 ' db= -25.625 Ont[46]= 111 ' db= -25.3125 Ont[47]= 115 ' db= -25 Ont[48]= 119 ' db= -24.6875 Ont[49]= 124 ' db= -24.375 Ont[50]= 128 ' db= -24.0625 Ont[51]= 133 ' db= -23.75 Ont[52]= 138 ' db= -23.4375 Ont[53]= 143 ' db= -23.125 Ont[54]= 148 ' db= -22.8125 Ont[55]= 154 ' db= -22.5 Ont[56]= 159 ' db= -22.1875 Ont[57]= 165 ' db= -21.875 Ont[58]= 171 ' db= -21.5625 Ont[59]= 177 ' db= -21.25 Ont[60]= 184 ' db= -20.9375 Ont[61]= 191 ' db= -20.625 Ont[62]= 198 ' db= -20.3125 Ont[63]= 205 ' db= -20 Ont[64]= 212 ' db= -19.6875 Ont[65]= 220 ' db= -19.375 Ont[66]= 228 ' db= -19.0625 Ont[67]= 236 ' db= -18.75 Ont[68]= 245 ' db= -18.4375 Ont[69]= 254 ' db= -18.125 Ont[70]= 263 ' db= -17.8125 Ont[71]= 273 ' db= -17.5 Ont[72]= 283 ' db= -17.1875 Ont[73]= 293 ' db= -16.875 Ont[74]= 304 ' db= -16.5625 Ont[75]= 315 ' db= -16.25 Ont[76]= 327 ' db= -15.9375 Ont[77]= 339 ' db= -15.625 Ont[78]= 351 ' db= -15.3125 Ont[79]= 364 ' db= -15 Ont[80]= 378 ' db= -14.6875 Ont[81]= 391 ' db= -14.375 Ont[82]= 406 ' db= -14.0625 Ont[83]= 421 ' db= -13.75 Ont[84]= 436 ' db= -13.4375 Ont[85]= 452 ' db= -13.125 Ont[86]= 468 ' db= -12.8125 Ont[87]= 486 ' db= -12.5 Ont[88]= 503 ' db= -12.1875 Ont[89]= 522 ' db= -11.875 Ont[90]= 541 ' db= -11.5625 Ont[91]= 561 ' db= -11.25 Ont[92]= 581 ' db= -10.9375 Ont[93]= 603 ' db= -10.625 Ont[94]= 625 ' db= -10.3125 Ont[95]= 648 ' db= -10 Ont[96]= 671 ' db= -9.6875 Ont[97]= 696 ' db= -9.375 Ont[98]= 721 ' db= -9.0625 Ont[99]= 748 ' db= -8.75 Ont[100]= 775 ' db= -8.4375 Ont[101]= 804 ' db= -8.125 Ont[102]= 833 ' db= -7.8125 Ont[103]= 864 ' db= -7.5 Ont[104]= 895 ' db= -7.1875 Ont[105]= 928 ' db= -6.875 Ont[106]= 962 ' db= -6.5625 Ont[107]= 997 ' db= -6.25 Ont[108]= 1034 ' db= -5.9375 Ont[109]= 1072 ' db= -5.625 Ont[110]= 1111 ' db= -5.3125 Ont[111]= 1152 ' db= -5 Ont[112]= 1194 ' db= -4.6875 Ont[113]= 1238 ' db= -4.375 Ont[114]= 1283 ' db= -4.0625 Ont[115]= 1330 ' db= -3.75 Ont[116]= 1379 ' db= -3.4375 Ont[117]= 1429 ' db= -3.125 Ont[118]= 1482 ' db= -2.8125 Ont[119]= 1536 ' db= -2.5 Ont[120]= 1592 ' db= -2.1875 Ont[121]= 1650 ' db= -1.875 Ont[122]= 1711 ' db= -1.5625 Ont[123]= 1773 ' db= -1.25 Ont[124]= 1838 ' db= -.9375 Ont[125]= 1906 ' db= -.625 Ont[126]= 1976 ' db= -.3125 Ont[127]= 2047 ' db= 0 Return PWM_Lookup_table_30dB: 'Hunt volume scales 30dB 'for 11 bit PWM values '------log-scale------ Ont[0]= 0 '67 ' db= -29.765625 Ont[1]= 68 ' db= -29.53125 Ont[2]= 70 ' db= -29.296875 Ont[3]= 72 ' db= -29.0625 Ont[4]= 74 ' db= -28.828125 Ont[5]= 76 ' db= -28.59375 Ont[6]= 78 ' db= -28.359375 Ont[7]= 80 ' db= -28.125 Ont[8]= 83 ' db= -27.890625 Ont[9]= 85 ' db= -27.65625 Ont[10]= 87 ' db= -27.421875 Ont[11]= 90 ' db= -27.1875 Ont[12]= 92 ' db= -26.953125 Ont[13]= 94 ' db= -26.71875 Ont[14]= 97 ' db= -26.484375 Ont[15]= 100 ' db= -26.25 Ont[16]= 102 ' db= -26.015625 Ont[17]= 105 ' db= -25.78125 Ont[18]= 108 ' db= -25.546875 Ont[19]= 111 ' db= -25.3125 Ont[20]= 114 ' db= -25.078125 Ont[21]= 117 ' db= -24.84375 Ont[22]= 120 ' db= -24.609375 Ont[23]= 124 ' db= -24.375 Ont[24]= 127 ' db= -24.140625 Ont[25]= 131 ' db= -23.90625 Ont[26]= 134 ' db= -23.671875 Ont[27]= 138 ' db= -23.4375 Ont[28]= 142 ' db= -23.203125 Ont[29]= 146 ' db= -22.96875 Ont[30]= 149 ' db= -22.734375 Ont[31]= 154 ' db= -22.5 Ont[32]= 158 ' db= -22.265625 Ont[33]= 162 ' db= -22.03125 Ont[34]= 167 ' db= -21.796875 Ont[35]= 171 ' db= -21.5625 Ont[36]= 176 ' db= -21.328125 Ont[37]= 181 ' db= -21.09375 Ont[38]= 186 ' db= -20.859375 Ont[39]= 191 ' db= -20.625 Ont[40]= 196 ' db= -20.390625 Ont[41]= 201 ' db= -20.15625 Ont[42]= 207 ' db= -19.921875 Ont[43]= 212 ' db= -19.6875 Ont[44]= 218 ' db= -19.453125 Ont[45]= 224 ' db= -19.21875 Ont[46]= 230 ' db= -18.984375 Ont[47]= 236 ' db= -18.75 Ont[48]= 243 ' db= -18.515625 Ont[49]= 250 ' db= -18.28125 Ont[50]= 256 ' db= -18.046875 Ont[51]= 263 ' db= -17.8125 Ont[52]= 271 ' db= -17.578125 Ont[53]= 278 ' db= -17.34375 Ont[54]= 286 ' db= -17.109375 Ont[55]= 293 ' db= -16.875 Ont[56]= 302 ' db= -16.640625 Ont[57]= 310 ' db= -16.40625 Ont[58]= 318 ' db= -16.171875 Ont[59]= 327 ' db= -15.9375 Ont[60]= 336 ' db= -15.703125 Ont[61]= 345 ' db= -15.46875 Ont[62]= 354 ' db= -15.234375 Ont[63]= 364 ' db= -15 Ont[64]= 374 ' db= -14.765625 Ont[65]= 384 ' db= -14.53125 Ont[66]= 395 ' db= -14.296875 Ont[67]= 406 ' db= -14.0625 Ont[68]= 417 ' db= -13.828125 Ont[69]= 428 ' db= -13.59375 Ont[70]= 440 ' db= -13.359375 Ont[71]= 452 ' db= -13.125 Ont[72]= 464 ' db= -12.890625 Ont[73]= 477 ' db= -12.65625 Ont[74]= 490 ' db= -12.421875 Ont[75]= 503 ' db= -12.1875 Ont[76]= 517 ' db= -11.953125 Ont[77]= 531 ' db= -11.71875 Ont[78]= 546 ' db= -11.484375 Ont[79]= 561 ' db= -11.25 Ont[80]= 576 ' db= -11.015625 Ont[81]= 592 ' db= -10.78125 Ont[82]= 608 ' db= -10.546875 Ont[83]= 625 ' db= -10.3125 Ont[84]= 642 ' db= -10.078125 Ont[85]= 659 ' db= -9.84375 Ont[86]= 677 ' db= -9.609375 Ont[87]= 696 ' db= -9.375 Ont[88]= 715 ' db= -9.140625 Ont[89]= 735 ' db= -8.90625 Ont[90]= 755 ' db= -8.671875 Ont[91]= 775 ' db= -8.4375 Ont[92]= 796 ' db= -8.203125 Ont[93]= 818 ' db= -7.96875 Ont[94]= 841 ' db= -7.734375 Ont[95]= 864 ' db= -7.5 Ont[96]= 887 ' db= -7.265625 Ont[97]= 912 ' db= -7.03125 Ont[98]= 936 ' db= -6.796875 Ont[99]= 962 ' db= -6.5625 Ont[100]= 988 ' db= -6.328125 Ont[101]= 1015 ' db= -6.09375 Ont[102]= 1043 ' db= -5.859375 Ont[103]= 1072 ' db= -5.625 Ont[104]= 1101 ' db= -5.390625 Ont[105]= 1131 ' db= -5.15625 Ont[106]= 1162 ' db= -4.921875 Ont[107]= 1194 ' db= -4.6875 Ont[108]= 1227 ' db= -4.453125 Ont[109]= 1260 ' db= -4.21875 Ont[110]= 1295 ' db= -3.984375 Ont[111]= 1330 ' db= -3.75 Ont[112]= 1366 ' db= -3.515625 Ont[113]= 1404 ' db= -3.28125 Ont[114]= 1442 ' db= -3.046875 Ont[115]= 1482 ' db= -2.8125 Ont[116]= 1522 ' db= -2.578125 Ont[117]= 1564 ' db= -2.34375 Ont[118]= 1606 ' db= -2.109375 Ont[119]= 1650 ' db= -1.875 Ont[120]= 1696 ' db= -1.640625 Ont[121]= 1742 ' db= -1.40625 Ont[122]= 1790 ' db= -1.171875 Ont[123]= 1838 ' db= -.9375 Ont[124]= 1889 ' db= -.703125 Ont[125]= 1940 ' db= -.46875 Ont[126]= 1993 ' db= -.234375 Ont[127]= 2047 ' db= 0 Return PWM_Lookup_table_20dB: 'Hunt volume scales 20dB 'for 11 bit PWM values '02.12.2020: This seems to work even better than 40dB scales '------------ Ont[0]= 0 ' 209 ' db= -19.84375 Ont[1]= 100 '212 ' db= -19.6875 Ont[2]= 216 ' db= -19.53125 Ont[3]= 220 ' db= -19.375 Ont[4]= 224 ' db= -19.21875 Ont[5]= 228 ' db= -19.0625 Ont[6]= 232 ' db= -18.90625 Ont[7]= 236 ' db= -18.75 Ont[8]= 241 ' db= -18.59375 Ont[9]= 245 ' db= -18.4375 Ont[10]= 250 ' db= -18.28125 Ont[11]= 254 ' db= -18.125 Ont[12]= 259 ' db= -17.96875 Ont[13]= 263 ' db= -17.8125 Ont[14]= 268 ' db= -17.65625 Ont[15]= 273 ' db= -17.5 Ont[16]= 278 ' db= -17.34375 Ont[17]= 283 ' db= -17.1875 Ont[18]= 288 ' db= -17.03125 Ont[19]= 293 ' db= -16.875 Ont[20]= 299 ' db= -16.71875 Ont[21]= 304 ' db= -16.5625 Ont[22]= 310 ' db= -16.40625 Ont[23]= 315 ' db= -16.25 Ont[24]= 321 ' db= -16.09375 Ont[25]= 327 ' db= -15.9375 Ont[26]= 333 ' db= -15.78125 Ont[27]= 339 ' db= -15.625 Ont[28]= 345 ' db= -15.46875 Ont[29]= 351 ' db= -15.3125 Ont[30]= 358 ' db= -15.15625 Ont[31]= 364 ' db= -15 Ont[32]= 371 ' db= -14.84375 Ont[33]= 378 ' db= -14.6875 Ont[34]= 384 ' db= -14.53125 Ont[35]= 391 ' db= -14.375 Ont[36]= 398 ' db= -14.21875 Ont[37]= 406 ' db= -14.0625 Ont[38]= 413 ' db= -13.90625 Ont[39]= 421 ' db= -13.75 Ont[40]= 428 ' db= -13.59375 Ont[41]= 436 ' db= -13.4375 Ont[42]= 444 ' db= -13.28125 Ont[43]= 452 ' db= -13.125 Ont[44]= 460 ' db= -12.96875 Ont[45]= 468 ' db= -12.8125 Ont[46]= 477 ' db= -12.65625 Ont[47]= 486 ' db= -12.5 Ont[48]= 494 ' db= -12.34375 Ont[49]= 503 ' db= -12.1875 Ont[50]= 513 ' db= -12.03125 Ont[51]= 522 ' db= -11.875 Ont[52]= 531 ' db= -11.71875 Ont[53]= 541 ' db= -11.5625 Ont[54]= 551 ' db= -11.40625 Ont[55]= 561 ' db= -11.25 Ont[56]= 571 ' db= -11.09375 Ont[57]= 581 ' db= -10.9375 Ont[58]= 592 ' db= -10.78125 Ont[59]= 603 ' db= -10.625 Ont[60]= 614 ' db= -10.46875 Ont[61]= 625 ' db= -10.3125 Ont[62]= 636 ' db= -10.15625 Ont[63]= 648 ' db= -10 Ont[64]= 659 ' db= -9.84375 Ont[65]= 671 ' db= -9.6875 Ont[66]= 684 ' db= -9.53125 Ont[67]= 696 ' db= -9.375 Ont[68]= 709 ' db= -9.21875 Ont[69]= 721 ' db= -9.0625 Ont[70]= 735 ' db= -8.90625 Ont[71]= 748 ' db= -8.75 Ont[72]= 761 ' db= -8.59375 Ont[73]= 775 ' db= -8.4375 Ont[74]= 789 ' db= -8.28125 Ont[75]= 804 ' db= -8.125 Ont[76]= 818 ' db= -7.96875 Ont[77]= 833 ' db= -7.8125 Ont[78]= 848 ' db= -7.65625 Ont[79]= 864 ' db= -7.5 Ont[80]= 879 ' db= -7.34375 Ont[81]= 895 ' db= -7.1875 Ont[82]= 912 ' db= -7.03125 Ont[83]= 928 ' db= -6.875 Ont[84]= 945 ' db= -6.71875 Ont[85]= 962 ' db= -6.5625 Ont[86]= 980 ' db= -6.40625 Ont[87]= 997 ' db= -6.25 Ont[88]= 1015 ' db= -6.09375 Ont[89]= 1034 ' db= -5.9375 Ont[90]= 1053 ' db= -5.78125 Ont[91]= 1072 ' db= -5.625 Ont[92]= 1091 ' db= -5.46875 Ont[93]= 1111 ' db= -5.3125 Ont[94]= 1131 ' db= -5.15625 Ont[95]= 1152 ' db= -5 Ont[96]= 1173 ' db= -4.84375 Ont[97]= 1194 ' db= -4.6875 Ont[98]= 1216 ' db= -4.53125 Ont[99]= 1238 ' db= -4.375 Ont[100]= 1260 ' db= -4.21875 Ont[101]= 1283 ' db= -4.0625 Ont[102]= 1306 ' db= -3.90625 Ont[103]= 1330 ' db= -3.75 Ont[104]= 1354 ' db= -3.59375 Ont[105]= 1379 ' db= -3.4375 Ont[106]= 1404 ' db= -3.28125 Ont[107]= 1429 ' db= -3.125 Ont[108]= 1455 ' db= -2.96875 Ont[109]= 1482 ' db= -2.8125 Ont[110]= 1508 ' db= -2.65625 Ont[111]= 1536 ' db= -2.5 Ont[112]= 1564 ' db= -2.34375 Ont[113]= 1592 ' db= -2.1875 Ont[114]= 1621 ' db= -2.03125 Ont[115]= 1650 ' db= -1.875 Ont[116]= 1680 ' db= -1.71875 Ont[117]= 1711 ' db= -1.5625 Ont[118]= 1742 ' db= -1.40625 Ont[119]= 1773 ' db= -1.25 Ont[120]= 1806 ' db= -1.09375 Ont[121]= 1838 ' db= -.9375 Ont[122]= 1872 ' db= -.78125 Ont[123]= 1906 ' db= -.625 Ont[124]= 1940 ' db= -.46875 Ont[125]= 1976 ' db= -.3125 Ont[126]= 2011 ' db= -.15625 Ont[127]= 2047 ' db= 0 Return $endif $ifdef Pitch Teno_Wave0: ' attack-wave only! ' derived from sample C:\b\pb\gmt\robots\flut\CA_aanzet_12p.wav ' rec. on alto by Godfried-Willem Raes ' sample prepared by Kristof Lauwers 07.10.2021 ' soll-wave for calculation of excitation wave. ' nr of periods = 12 ' 07.10.2021 - gwr. Wave0[0] = 1035 Wave0[1] = 1044 Wave0[2] = 1052 Wave0[3] = 1062 Wave0[4] = 1079 Wave0[5] = 1105 Wave0[6] = 1152 Wave0[7] = 1178 Wave0[8] = 1198 Wave0[9] = 1214 Wave0[10] = 1228 Wave0[11] = 1239 Wave0[12] = 1244 Wave0[13] = 1238 Wave0[14] = 1222 Wave0[15] = 1201 Wave0[16] = 1174 Wave0[17] = 1145 Wave0[18] = 1113 Wave0[19] = 1066 Wave0[20] = 1036 Wave0[21] = 1010 Wave0[22] = 988 Wave0[23] = 972 Wave0[24] = 960 Wave0[25] = 954 Wave0[26] = 957 Wave0[27] = 962 Wave0[28] = 966 Wave0[29] = 966 Wave0[30] = 963 Wave0[31] = 961 Wave0[32] = 965 Wave0[33] = 971 Wave0[34] = 974 Wave0[35] = 974 Wave0[36] = 969 Wave0[37] = 961 Wave0[38] = 954 Wave0[39] = 955 Wave0[40] = 958 Wave0[41] = 962 Wave0[42] = 964 Wave0[43] = 962 Wave0[44] = 958 Wave0[45] = 958 Wave0[46] = 963 Wave0[47] = 970 Wave0[48] = 978 Wave0[49] = 987 Wave0[50] = 997 Wave0[51] = 1003 Wave0[52] = 1007 Wave0[53] = 1012 Wave0[54] = 1016 Wave0[55] = 1021 Wave0[56] = 1025 Wave0[57] = 1029 Wave0[58] = 1025 Wave0[59] = 1019 Wave0[60] = 1012 Wave0[61] = 1007 Wave0[62] = 1005 Wave0[63] = 1003 Wave0[64] = 1001 Wave0[65] = 996 Wave0[66] = 989 Wave0[67] = 981 Wave0[68] = 976 Wave0[69] = 976 Wave0[70] = 978 Wave0[71] = 980 Wave0[72] = 979 Wave0[73] = 977 Wave0[74] = 976 Wave0[75] = 978 Wave0[76] = 982 Wave0[77] = 986 Wave0[78] = 990 Wave0[79] = 991 Wave0[80] = 992 Wave0[81] = 994 Wave0[82] = 1000 Wave0[83] = 1005 Wave0[84] = 1009 Wave0[85] = 1013 Wave0[86] = 1018 Wave0[87] = 1021 Wave0[88] = 1025 Wave0[89] = 1026 Wave0[90] = 1027 Wave0[91] = 1033 Wave0[92] = 1042 Wave0[93] = 1049 Wave0[94] = 1054 Wave0[95] = 1055 Wave0[96] = 1056 Wave0[97] = 1058 Wave0[98] = 1064 Wave0[99] = 1070 Wave0[100] = 1072 Wave0[101] = 1063 Wave0[102] = 1052 Wave0[103] = 1043 Wave0[104] = 1039 Wave0[105] = 1036 Wave0[106] = 1035 Wave0[107] = 1027 Wave0[108] = 1018 Wave0[109] = 1009 Wave0[110] = 1006 Wave0[111] = 1007 Wave0[112] = 1010 Wave0[113] = 1008 Wave0[114] = 998 Wave0[115] = 985 Wave0[116] = 972 Wave0[117] = 963 Wave0[118] = 957 Wave0[119] = 952 Wave0[120] = 948 Wave0[121] = 950 Wave0[122] = 953 Wave0[123] = 956 Wave0[124] = 961 Wave0[125] = 964 Wave0[126] = 974 Wave0[127] = 988 Wave0[128] = 1007 Wave0[129] = 1025 Wave0[130] = 1043 Wave0[131] = 1059 Wave0[132] = 1084 Wave0[133] = 1112 Wave0[134] = 1140 Wave0[135] = 1168 Wave0[136] = 1199 Wave0[137] = 1232 Wave0[138] = 1284 Wave0[139] = 1318 Wave0[140] = 1337 Wave0[141] = 1345 Wave0[142] = 1338 Wave0[143] = 1317 Wave0[144] = 1288 Wave0[145] = 1222 Wave0[146] = 1171 Wave0[147] = 1119 Wave0[148] = 1071 Wave0[149] = 1038 Wave0[150] = 1019 Wave0[151] = 1006 Wave0[152] = 999 Wave0[153] = 990 Wave0[154] = 981 Wave0[155] = 978 Wave0[156] = 976 Wave0[157] = 971 Wave0[158] = 959 Wave0[159] = 945 Wave0[160] = 934 Wave0[161] = 930 Wave0[162] = 931 Wave0[163] = 932 Wave0[164] = 933 Wave0[165] = 932 Wave0[166] = 932 Wave0[167] = 933 Wave0[168] = 932 Wave0[169] = 931 Wave0[170] = 931 Wave0[171] = 936 Wave0[172] = 943 Wave0[173] = 948 Wave0[174] = 950 Wave0[175] = 952 Wave0[176] = 951 Wave0[177] = 957 Wave0[178] = 969 Wave0[179] = 982 Wave0[180] = 994 Wave0[181] = 1003 Wave0[182] = 1010 Wave0[183] = 1016 Wave0[184] = 1026 Wave0[185] = 1035 Wave0[186] = 1040 Wave0[187] = 1040 Wave0[188] = 1036 Wave0[189] = 1023 Wave0[190] = 1013 Wave0[191] = 1003 Wave0[192] = 995 Wave0[193] = 991 Wave0[194] = 988 Wave0[195] = 986 Wave0[196] = 986 Wave0[197] = 986 Wave0[198] = 990 Wave0[199] = 997 Wave0[200] = 1004 Wave0[201] = 1008 Wave0[202] = 1006 Wave0[203] = 1002 Wave0[204] = 997 Wave0[205] = 993 Wave0[206] = 988 Wave0[207] = 989 Wave0[208] = 997 Wave0[209] = 1003 Wave0[210] = 1006 Wave0[211] = 1005 Wave0[212] = 999 Wave0[213] = 993 Wave0[214] = 990 Wave0[215] = 995 Wave0[216] = 1003 Wave0[217] = 1012 Wave0[218] = 1019 Wave0[219] = 1021 Wave0[220] = 1017 Wave0[221] = 1017 Wave0[222] = 1021 Wave0[223] = 1030 Wave0[224] = 1048 Wave0[225] = 1063 Wave0[226] = 1070 Wave0[227] = 1064 Wave0[228] = 1054 Wave0[229] = 1049 Wave0[230] = 1043 Wave0[231] = 1033 Wave0[232] = 1019 Wave0[233] = 994 Wave0[234] = 983 Wave0[235] = 978 Wave0[236] = 976 Wave0[237] = 975 Wave0[238] = 975 Wave0[239] = 972 Wave0[240] = 971 Wave0[241] = 972 Wave0[242] = 977 Wave0[243] = 982 Wave0[244] = 988 Wave0[245] = 994 Wave0[246] = 996 Wave0[247] = 998 Wave0[248] = 1003 Wave0[249] = 1012 Wave0[250] = 1026 Wave0[251] = 1045 Wave0[252] = 1080 Wave0[253] = 1111 Wave0[254] = 1147 Wave0[255] = 1187 Wave0[256] = 1234 Wave0[257] = 1280 Wave0[258] = 1351 Wave0[259] = 1397 Wave0[260] = 1434 Wave0[261] = 1459 Wave0[262] = 1465 Wave0[263] = 1458 Wave0[264] = 1409 Wave0[265] = 1352 Wave0[266] = 1278 Wave0[267] = 1202 Wave0[268] = 1133 Wave0[269] = 1067 Wave0[270] = 1005 Wave0[271] = 922 Wave0[272] = 875 Wave0[273] = 842 Wave0[274] = 818 Wave0[275] = 801 Wave0[276] = 794 Wave0[277] = 798 Wave0[278] = 812 Wave0[279] = 830 Wave0[280] = 849 Wave0[281] = 867 Wave0[282] = 878 Wave0[283] = 887 Wave0[284] = 891 Wave0[285] = 896 Wave0[286] = 903 Wave0[287] = 908 Wave0[288] = 910 Wave0[289] = 917 Wave0[290] = 923 Wave0[291] = 929 Wave0[292] = 932 Wave0[293] = 931 Wave0[294] = 929 Wave0[295] = 929 Wave0[296] = 938 Wave0[297] = 948 Wave0[298] = 957 Wave0[299] = 966 Wave0[300] = 976 Wave0[301] = 986 Wave0[302] = 1006 Wave0[303] = 1017 Wave0[304] = 1029 Wave0[305] = 1039 Wave0[306] = 1045 Wave0[307] = 1048 Wave0[308] = 1046 Wave0[309] = 1039 Wave0[310] = 1032 Wave0[311] = 1020 Wave0[312] = 1008 Wave0[313] = 995 Wave0[314] = 984 Wave0[315] = 972 Wave0[316] = 967 Wave0[317] = 964 Wave0[318] = 962 Wave0[319] = 960 Wave0[320] = 960 Wave0[321] = 966 Wave0[322] = 971 Wave0[323] = 977 Wave0[324] = 983 Wave0[325] = 991 Wave0[326] = 1000 Wave0[327] = 1014 Wave0[328] = 1024 Wave0[329] = 1035 Wave0[330] = 1043 Wave0[331] = 1049 Wave0[332] = 1052 Wave0[333] = 1058 Wave0[334] = 1064 Wave0[335] = 1069 Wave0[336] = 1072 Wave0[337] = 1071 Wave0[338] = 1072 Wave0[339] = 1075 Wave0[340] = 1080 Wave0[341] = 1080 Wave0[342] = 1077 Wave0[343] = 1077 Wave0[344] = 1082 Wave0[345] = 1092 Wave0[346] = 1106 Wave0[347] = 1108 Wave0[348] = 1103 Wave0[349] = 1093 Wave0[350] = 1083 Wave0[351] = 1073 Wave0[352] = 1062 Wave0[353] = 1055 Wave0[354] = 1047 Wave0[355] = 1037 Wave0[356] = 1024 Wave0[357] = 1011 Wave0[358] = 1001 Wave0[359] = 987 Wave0[360] = 978 Wave0[361] = 970 Wave0[362] = 965 Wave0[363] = 962 Wave0[364] = 960 Wave0[365] = 956 Wave0[366] = 952 Wave0[367] = 948 Wave0[368] = 944 Wave0[369] = 945 Wave0[370] = 950 Wave0[371] = 964 Wave0[372] = 977 Wave0[373] = 991 Wave0[374] = 1009 Wave0[375] = 1030 Wave0[376] = 1056 Wave0[377] = 1097 Wave0[378] = 1124 Wave0[379] = 1150 Wave0[380] = 1176 Wave0[381] = 1200 Wave0[382] = 1226 Wave0[383] = 1251 Wave0[384] = 1283 Wave0[385] = 1297 Wave0[386] = 1303 Wave0[387] = 1305 Wave0[388] = 1302 Wave0[389] = 1293 Wave0[390] = 1268 Wave0[391] = 1242 Wave0[392] = 1214 Wave0[393] = 1188 Wave0[394] = 1159 Wave0[395] = 1132 Wave0[396] = 1092 Wave0[397] = 1065 Wave0[398] = 1041 Wave0[399] = 1018 Wave0[400] = 998 Wave0[401] = 983 Wave0[402] = 970 Wave0[403] = 953 Wave0[404] = 933 Wave0[405] = 906 Wave0[406] = 871 Wave0[407] = 836 Wave0[408] = 807 Wave0[409] = 783 Wave0[410] = 784 Wave0[411] = 793 Wave0[412] = 811 Wave0[413] = 833 Wave0[414] = 850 Wave0[415] = 872 Wave0[416] = 885 Wave0[417] = 894 Wave0[418] = 907 Wave0[419] = 919 Wave0[420] = 930 Wave0[421] = 944 Wave0[422] = 950 Wave0[423] = 958 Wave0[424] = 967 Wave0[425] = 974 Wave0[426] = 977 Wave0[427] = 974 Wave0[428] = 971 Wave0[429] = 976 Wave0[430] = 984 Wave0[431] = 993 Wave0[432] = 997 Wave0[433] = 996 Wave0[434] = 999 Wave0[435] = 1003 Wave0[436] = 1005 Wave0[437] = 1005 Wave0[438] = 1002 Wave0[439] = 999 Wave0[440] = 993 Wave0[441] = 989 Wave0[442] = 986 Wave0[443] = 986 Wave0[444] = 988 Wave0[445] = 991 Wave0[446] = 992 Wave0[447] = 994 Wave0[448] = 998 Wave0[449] = 1006 Wave0[450] = 1016 Wave0[451] = 1023 Wave0[452] = 1028 Wave0[453] = 1033 Wave0[454] = 1038 Wave0[455] = 1043 Wave0[456] = 1048 Wave0[457] = 1050 Wave0[458] = 1050 Wave0[459] = 1053 Wave0[460] = 1057 Wave0[461] = 1060 Wave0[462] = 1060 Wave0[463] = 1058 Wave0[464] = 1055 Wave0[465] = 1051 Wave0[466] = 1044 Wave0[467] = 1043 Wave0[468] = 1046 Wave0[469] = 1053 Wave0[470] = 1062 Wave0[471] = 1067 Wave0[472] = 1071 Wave0[473] = 1072 Wave0[474] = 1074 Wave0[475] = 1073 Wave0[476] = 1069 Wave0[477] = 1063 Wave0[478] = 1053 Wave0[479] = 1045 Wave0[480] = 1036 Wave0[481] = 1027 Wave0[482] = 1018 Wave0[483] = 1010 Wave0[484] = 996 Wave0[485] = 984 Wave0[486] = 972 Wave0[487] = 964 Wave0[488] = 958 Wave0[489] = 954 Wave0[490] = 951 Wave0[491] = 946 Wave0[492] = 942 Wave0[493] = 940 Wave0[494] = 938 Wave0[495] = 939 Wave0[496] = 940 Wave0[497] = 940 Wave0[498] = 940 Wave0[499] = 943 Wave0[500] = 949 Wave0[501] = 959 Wave0[502] = 973 Wave0[503] = 1004 Wave0[504] = 1032 Wave0[505] = 1069 Wave0[506] = 1115 Wave0[507] = 1166 Wave0[508] = 1228 Wave0[509] = 1293 Wave0[510] = 1403 Wave0[511] = 1475 Wave0[512] = 1542 Wave0[513] = 1601 Wave0[514] = 1646 Wave0[515] = 1664 Wave0[516] = 1628 Wave0[517] = 1560 Wave0[518] = 1461 Wave0[519] = 1342 Wave0[520] = 1216 Wave0[521] = 1099 Wave0[522] = 954 Wave0[523] = 882 Wave0[524] = 829 Wave0[525] = 794 Wave0[526] = 776 Wave0[527] = 773 Wave0[528] = 779 Wave0[529] = 786 Wave0[530] = 792 Wave0[531] = 800 Wave0[532] = 808 Wave0[533] = 813 Wave0[534] = 817 Wave0[535] = 824 Wave0[536] = 832 Wave0[537] = 845 Wave0[538] = 857 Wave0[539] = 869 Wave0[540] = 880 Wave0[541] = 890 Wave0[542] = 891 Wave0[543] = 886 Wave0[544] = 879 Wave0[545] = 873 Wave0[546] = 870 Wave0[547] = 873 Wave0[548] = 881 Wave0[549] = 892 Wave0[550] = 906 Wave0[551] = 924 Wave0[552] = 942 Wave0[553] = 959 Wave0[554] = 983 Wave0[555] = 1001 Wave0[556] = 1018 Wave0[557] = 1035 Wave0[558] = 1050 Wave0[559] = 1061 Wave0[560] = 1069 Wave0[561] = 1066 Wave0[562] = 1058 Wave0[563] = 1044 Wave0[564] = 1030 Wave0[565] = 1014 Wave0[566] = 997 Wave0[567] = 991 Wave0[568] = 987 Wave0[569] = 987 Wave0[570] = 992 Wave0[571] = 998 Wave0[572] = 1008 Wave0[573] = 1012 Wave0[574] = 1016 Wave0[575] = 1020 Wave0[576] = 1023 Wave0[577] = 1026 Wave0[578] = 1029 Wave0[579] = 1031 Wave0[580] = 1030 Wave0[581] = 1031 Wave0[582] = 1033 Wave0[583] = 1038 Wave0[584] = 1041 Wave0[585] = 1042 Wave0[586] = 1041 Wave0[587] = 1039 Wave0[588] = 1039 Wave0[589] = 1040 Wave0[590] = 1043 Wave0[591] = 1049 Wave0[592] = 1057 Wave0[593] = 1067 Wave0[594] = 1078 Wave0[595] = 1089 Wave0[596] = 1098 Wave0[597] = 1105 Wave0[598] = 1112 Wave0[599] = 1112 Wave0[600] = 1109 Wave0[601] = 1101 Wave0[602] = 1088 Wave0[603] = 1075 Wave0[604] = 1055 Wave0[605] = 1040 Wave0[606] = 1024 Wave0[607] = 1006 Wave0[608] = 987 Wave0[609] = 967 Wave0[610] = 939 Wave0[611] = 923 Wave0[612] = 909 Wave0[613] = 899 Wave0[614] = 889 Wave0[615] = 882 Wave0[616] = 877 Wave0[617] = 875 Wave0[618] = 879 Wave0[619] = 887 Wave0[620] = 895 Wave0[621] = 905 Wave0[622] = 918 Wave0[623] = 940 Wave0[624] = 960 Wave0[625] = 984 Wave0[626] = 1013 Wave0[627] = 1047 Wave0[628] = 1087 Wave0[629] = 1150 Wave0[630] = 1193 Wave0[631] = 1235 Wave0[632] = 1276 Wave0[633] = 1315 Wave0[634] = 1355 Wave0[635] = 1418 Wave0[636] = 1462 Wave0[637] = 1499 Wave0[638] = 1525 Wave0[639] = 1537 Wave0[640] = 1533 Wave0[641] = 1513 Wave0[642] = 1452 Wave0[643] = 1391 Wave0[644] = 1317 Wave0[645] = 1237 Wave0[646] = 1159 Wave0[647] = 1084 Wave0[648] = 971 Wave0[649] = 905 Wave0[650] = 852 Wave0[651] = 811 Wave0[652] = 782 Wave0[653] = 765 Wave0[654] = 755 Wave0[655] = 755 Wave0[656] = 761 Wave0[657] = 766 Wave0[658] = 775 Wave0[659] = 782 Wave0[660] = 788 Wave0[661] = 797 Wave0[662] = 806 Wave0[663] = 810 Wave0[664] = 814 Wave0[665] = 819 Wave0[666] = 826 Wave0[667] = 842 Wave0[668] = 856 Wave0[669] = 870 Wave0[670] = 885 Wave0[671] = 900 Wave0[672] = 913 Wave0[673] = 928 Wave0[674] = 938 Wave0[675] = 949 Wave0[676] = 961 Wave0[677] = 975 Wave0[678] = 992 Wave0[679] = 1017 Wave0[680] = 1034 Wave0[681] = 1050 Wave0[682] = 1062 Wave0[683] = 1072 Wave0[684] = 1075 Wave0[685] = 1072 Wave0[686] = 1058 Wave0[687] = 1045 Wave0[688] = 1033 Wave0[689] = 1020 Wave0[690] = 1009 Wave0[691] = 998 Wave0[692] = 983 Wave0[693] = 974 Wave0[694] = 969 Wave0[695] = 970 Wave0[696] = 974 Wave0[697] = 981 Wave0[698] = 989 Wave0[699] = 992 Wave0[700] = 997 Wave0[701] = 1005 Wave0[702] = 1014 Wave0[703] = 1025 Wave0[704] = 1034 Wave0[705] = 1043 Wave0[706] = 1046 Wave0[707] = 1050 Wave0[708] = 1053 Wave0[709] = 1058 Wave0[710] = 1059 Wave0[711] = 1058 Wave0[712] = 1057 Wave0[713] = 1056 Wave0[714] = 1056 Wave0[715] = 1056 Wave0[716] = 1057 Wave0[717] = 1059 Wave0[718] = 1060 Wave0[719] = 1062 Wave0[720] = 1067 Wave0[721] = 1073 Wave0[722] = 1080 Wave0[723] = 1091 Wave0[724] = 1097 Wave0[725] = 1103 Wave0[726] = 1107 Wave0[727] = 1109 Wave0[728] = 1107 Wave0[729] = 1102 Wave0[730] = 1086 Wave0[731] = 1073 Wave0[732] = 1058 Wave0[733] = 1041 Wave0[734] = 1023 Wave0[735] = 1003 Wave0[736] = 974 Wave0[737] = 957 Wave0[738] = 942 Wave0[739] = 928 Wave0[740] = 915 Wave0[741] = 905 Wave0[742] = 894 Wave0[743] = 890 Wave0[744] = 887 Wave0[745] = 884 Wave0[746] = 883 Wave0[747] = 882 Wave0[748] = 882 Wave0[749] = 886 Wave0[750] = 891 Wave0[751] = 898 Wave0[752] = 908 Wave0[753] = 920 Wave0[754] = 935 Wave0[755] = 967 Wave0[756] = 995 Wave0[757] = 1030 Wave0[758] = 1072 Wave0[759] = 1118 Wave0[760] = 1172 Wave0[761] = 1259 Wave0[762] = 1322 Wave0[763] = 1384 Wave0[764] = 1448 Wave0[765] = 1514 Wave0[766] = 1583 Wave0[767] = 1674 Wave0[768] = 1724 Wave0[769] = 1751 Wave0[770] = 1742 Wave0[771] = 1692 Wave0[772] = 1599 Wave0[773] = 1470 Wave0[774] = 1241 Wave0[775] = 1083 Wave0[776] = 940 Wave0[777] = 818 Wave0[778] = 720 Wave0[779] = 651 Wave0[780] = 601 Wave0[781] = 602 Wave0[782] = 621 Wave0[783] = 651 Wave0[784] = 687 Wave0[785] = 724 Wave0[786] = 777 Wave0[787] = 810 Wave0[788] = 835 Wave0[789] = 853 Wave0[790] = 865 Wave0[791] = 874 Wave0[792] = 880 Wave0[793] = 886 Wave0[794] = 884 Wave0[795] = 880 Wave0[796] = 873 Wave0[797] = 868 Wave0[798] = 865 Wave0[799] = 864 Wave0[800] = 865 Wave0[801] = 867 Wave0[802] = 872 Wave0[803] = 881 Wave0[804] = 895 Wave0[805] = 922 Wave0[806] = 941 Wave0[807] = 959 Wave0[808] = 976 Wave0[809] = 996 Wave0[810] = 1018 Wave0[811] = 1043 Wave0[812] = 1078 Wave0[813] = 1097 Wave0[814] = 1107 Wave0[815] = 1110 Wave0[816] = 1109 Wave0[817] = 1101 Wave0[818] = 1083 Wave0[819] = 1067 Wave0[820] = 1049 Wave0[821] = 1033 Wave0[822] = 1020 Wave0[823] = 1007 Wave0[824] = 996 Wave0[825] = 993 Wave0[826] = 996 Wave0[827] = 1003 Wave0[828] = 1011 Wave0[829] = 1017 Wave0[830] = 1024 Wave0[831] = 1027 Wave0[832] = 1030 Wave0[833] = 1032 Wave0[834] = 1034 Wave0[835] = 1033 Wave0[836] = 1029 Wave0[837] = 1019 Wave0[838] = 1011 Wave0[839] = 1004 Wave0[840] = 999 Wave0[841] = 996 Wave0[842] = 998 Wave0[843] = 1010 Wave0[844] = 1021 Wave0[845] = 1035 Wave0[846] = 1048 Wave0[847] = 1062 Wave0[848] = 1077 Wave0[849] = 1099 Wave0[850] = 1113 Wave0[851] = 1124 Wave0[852] = 1133 Wave0[853] = 1138 Wave0[854] = 1138 Wave0[855] = 1133 Wave0[856] = 1121 Wave0[857] = 1107 Wave0[858] = 1090 Wave0[859] = 1069 Wave0[860] = 1048 Wave0[861] = 1026 Wave0[862] = 995 Wave0[863] = 977 Wave0[864] = 957 Wave0[865] = 940 Wave0[866] = 924 Wave0[867] = 911 Wave0[868] = 900 Wave0[869] = 898 Wave0[870] = 899 Wave0[871] = 901 Wave0[872] = 902 Wave0[873] = 902 Wave0[874] = 904 Wave0[875] = 903 Wave0[876] = 903 Wave0[877] = 901 Wave0[878] = 900 Wave0[879] = 898 Wave0[880] = 898 Wave0[881] = 905 Wave0[882] = 913 Wave0[883] = 930 Wave0[884] = 951 Wave0[885] = 982 Wave0[886] = 1021 Wave0[887] = 1097 Wave0[888] = 1161 Wave0[889] = 1233 Wave0[890] = 1314 Wave0[891] = 1403 Wave0[892] = 1500 Wave0[893] = 1668 Wave0[894] = 1780 Wave0[895] = 1872 Wave0[896] = 1929 Wave0[897] = 1931 Wave0[898] = 1873 Wave0[899] = 1756 Wave0[900] = 1497 Wave0[901] = 1297 Wave0[902] = 1101 Wave0[903] = 924 Wave0[904] = 779 Wave0[905] = 672 Wave0[906] = 578 Wave0[907] = 554 Wave0[908] = 556 Wave0[909] = 578 Wave0[910] = 613 Wave0[911] = 656 Wave0[912] = 717 Wave0[913] = 752 Wave0[914] = 781 Wave0[915] = 807 Wave0[916] = 828 Wave0[917] = 845 Wave0[918] = 864 Wave0[919] = 871 Wave0[920] = 872 Wave0[921] = 869 Wave0[922] = 864 Wave0[923] = 860 Wave0[924] = 857 Wave0[925] = 857 Wave0[926] = 858 Wave0[927] = 860 Wave0[928] = 866 Wave0[929] = 873 Wave0[930] = 885 Wave0[931] = 904 Wave0[932] = 923 Wave0[933] = 946 Wave0[934] = 973 Wave0[935] = 1004 Wave0[936] = 1035 Wave0[937] = 1080 Wave0[938] = 1107 Wave0[939] = 1128 Wave0[940] = 1143 Wave0[941] = 1149 Wave0[942] = 1146 Wave0[943] = 1133 Wave0[944] = 1100 Wave0[945] = 1073 Wave0[946] = 1044 Wave0[947] = 1019 Wave0[948] = 999 Wave0[949] = 983 Wave0[950] = 966 Wave0[951] = 961 Wave0[952] = 961 Wave0[953] = 965 Wave0[954] = 974 Wave0[955] = 984 Wave0[956] = 1001 Wave0[957] = 1013 Wave0[958] = 1022 Wave0[959] = 1031 Wave0[960] = 1039 Wave0[961] = 1045 Wave0[962] = 1048 Wave0[963] = 1047 Wave0[964] = 1042 Wave0[965] = 1037 Wave0[966] = 1031 Wave0[967] = 1027 Wave0[968] = 1022 Wave0[969] = 1020 Wave0[970] = 1021 Wave0[971] = 1024 Wave0[972] = 1029 Wave0[973] = 1036 Wave0[974] = 1046 Wave0[975] = 1066 Wave0[976] = 1081 Wave0[977] = 1097 Wave0[978] = 1112 Wave0[979] = 1123 Wave0[980] = 1134 Wave0[981] = 1143 Wave0[982] = 1146 Wave0[983] = 1145 Wave0[984] = 1138 Wave0[985] = 1126 Wave0[986] = 1110 Wave0[987] = 1089 Wave0[988] = 1053 Wave0[989] = 1027 Wave0[990] = 1001 Wave0[991] = 976 Wave0[992] = 953 Wave0[993] = 933 Wave0[994] = 915 Wave0[995] = 910 Wave0[996] = 908 Wave0[997] = 909 Wave0[998] = 910 Wave0[999] = 912 Wave0[1000] = 919 Wave0[1001] = 924 Wave0[1002] = 928 Wave0[1003] = 927 Wave0[1004] = 923 Wave0[1005] = 917 Wave0[1006] = 912 Wave0[1007] = 905 Wave0[1008] = 901 Wave0[1009] = 897 Wave0[1010] = 895 Wave0[1011] = 899 Wave0[1012] = 907 Wave0[1013] = 931 Wave0[1014] = 955 Wave0[1015] = 985 Wave0[1016] = 1024 Wave0[1017] = 1073 Wave0[1018] = 1137 Wave0[1019] = 1251 Wave0[1020] = 1340 Wave0[1021] = 1433 Wave0[1022] = 1534 Wave0[1023] = 1650 Wave0[1024] = 1775 Wave0[1025] = 1922 Wave0[1026] = 1967 Wave0[1027] = 1940 Wave0[1028] = 1839 Wave0[1029] = 1673 Wave0[1030] = 1463 Wave0[1031] = 1237 Wave0[1032] = 922 Wave0[1033] = 755 Wave0[1034] = 634 Wave0[1035] = 558 Wave0[1036] = 521 Wave0[1037] = 517 Wave0[1038] = 562 Wave0[1039] = 613 Wave0[1040] = 669 Wave0[1041] = 722 Wave0[1042] = 764 Wave0[1043] = 795 Wave0[1044] = 833 Wave0[1045] = 857 Wave0[1046] = 879 Wave0[1047] = 898 Wave0[1048] = 914 Wave0[1049] = 927 Wave0[1050] = 935 Wave0[1051] = 931 Wave0[1052] = 922 Wave0[1053] = 909 Wave0[1054] = 893 Wave0[1055] = 874 Wave0[1056] = 859 Wave0[1057] = 847 Wave0[1058] = 848 Wave0[1059] = 854 Wave0[1060] = 865 Wave0[1061] = 883 Wave0[1062] = 904 Wave0[1063] = 943 Wave0[1064] = 972 Wave0[1065] = 1001 Wave0[1066] = 1032 Wave0[1067] = 1062 Wave0[1068] = 1090 Wave0[1069] = 1128 Wave0[1070] = 1147 Wave0[1071] = 1158 Wave0[1072] = 1157 Wave0[1073] = 1145 Wave0[1074] = 1121 Wave0[1075] = 1090 Wave0[1076] = 1042 Wave0[1077] = 1015 Wave0[1078] = 994 Wave0[1079] = 980 Wave0[1080] = 971 Wave0[1081] = 969 Wave0[1082] = 982 Wave0[1083] = 996 Wave0[1084] = 1012 Wave0[1085] = 1024 Wave0[1086] = 1032 Wave0[1087] = 1037 Wave0[1088] = 1039 Wave0[1089] = 1040 Wave0[1090] = 1040 Wave0[1091] = 1040 Wave0[1092] = 1037 Wave0[1093] = 1031 Wave0[1094] = 1023 Wave0[1095] = 1010 Wave0[1096] = 1003 Wave0[1097] = 996 Wave0[1098] = 990 Wave0[1099] = 985 Wave0[1100] = 985 Wave0[1101] = 996 Wave0[1102] = 1011 Wave0[1103] = 1030 Wave0[1104] = 1050 Wave0[1105] = 1072 Wave0[1106] = 1096 Wave0[1107] = 1128 Wave0[1108] = 1148 Wave0[1109] = 1163 Wave0[1110] = 1174 Wave0[1111] = 1177 Wave0[1112] = 1170 Wave0[1113] = 1155 Wave0[1114] = 1119 Wave0[1115] = 1091 Wave0[1116] = 1063 Wave0[1117] = 1035 Wave0[1118] = 1009 Wave0[1119] = 983 Wave0[1120] = 948 Wave0[1121] = 929 Wave0[1122] = 914 Wave0[1123] = 903 Wave0[1124] = 896 Wave0[1125] = 894 Wave0[1126] = 895 Wave0[1127] = 899 Wave0[1128] = 906 Wave0[1129] = 915 Wave0[1130] = 923 Wave0[1131] = 930 Wave0[1132] = 936 Wave0[1133] = 938 Wave0[1134] = 938 Wave0[1135] = 936 Wave0[1136] = 932 Wave0[1137] = 929 Wave0[1138] = 922 Wave0[1139] = 911 Wave0[1140] = 905 Wave0[1141] = 904 Wave0[1142] = 915 Wave0[1143] = 930 Wave0[1144] = 954 Wave0[1145] = 1006 Wave0[1146] = 1055 Wave0[1147] = 1118 Wave0[1148] = 1196 Wave0[1149] = 1286 Wave0[1150] = 1390 Wave0[1151] = 1563 Wave0[1152] = 1694 Wave0[1153] = 1837 Wave0[1154] = 1961 Wave0[1155] = 2037 Wave0[1156] = 2035 Wave0[1157] = 1940 Wave0[1158] = 1656 Wave0[1159] = 1413 Wave0[1160] = 1167 Wave0[1161] = 945 Wave0[1162] = 760 Wave0[1163] = 622 Wave0[1164] = 506 Wave0[1165] = 484 Wave0[1166] = 496 Wave0[1167] = 532 Wave0[1168] = 584 Wave0[1169] = 643 Wave0[1170] = 722 Wave0[1171] = 764 Wave0[1172] = 795 Wave0[1173] = 818 Wave0[1174] = 838 Wave0[1175] = 857 Wave0[1176] = 884 Wave0[1177] = 901 Wave0[1178] = 918 Wave0[1179] = 932 Wave0[1180] = 938 Wave0[1181] = 936 Wave0[1182] = 927 Wave0[1183] = 903 Wave0[1184] = 884 Wave0[1185] = 867 Wave0[1186] = 856 Wave0[1187] = 852 Wave0[1188] = 855 Wave0[1189] = 877 Wave0[1190] = 901 Wave0[1191] = 930 Wave0[1192] = 964 Wave0[1193] = 999 Wave0[1194] = 1034 Wave0[1195] = 1086 Wave0[1196] = 1118 Wave0[1197] = 1146 Wave0[1198] = 1165 Wave0[1199] = 1174 Wave0[1200] = 1174 Wave0[1201] = 1163 Wave0[1202] = 1126 Wave0[1203] = 1090 Wave0[1204] = 1049 Wave0[1205] = 1008 Wave0[1206] = 973 Wave0[1207] = 948 Wave0[1208] = 933 Wave0[1209] = 936 Wave0[1210] = 943 Wave0[1211] = 957 Wave0[1212] = 974 Wave0[1213] = 993 Wave0[1214] = 1023 Wave0[1215] = 1041 Wave0[1216] = 1056 Wave0[1217] = 1069 Wave0[1218] = 1077 Wave0[1219] = 1080 Wave0[1220] = 1078 Wave0[1221] = 1072 Wave0[1222] = 1064 Wave0[1223] = 1053 Wave0[1224] = 1042 Wave0[1225] = 1029 Wave0[1226] = 1017 Wave0[1227] = 1002 Wave0[1228] = 994 Wave0[1229] = 989 Wave0[1230] = 986 Wave0[1231] = 986 Wave0[1232] = 992 Wave0[1233] = 1012 Wave0[1234] = 1032 Wave0[1235] = 1055 Wave0[1236] = 1078 Wave0[1237] = 1099 Wave0[1238] = 1119 Wave0[1239] = 1145 Wave0[1240] = 1157 Wave0[1241] = 1160 Wave0[1242] = 1154 Wave0[1243] = 1140 Wave0[1244] = 1119 Wave0[1245] = 1094 Wave0[1246] = 1054 Wave0[1247] = 1026 Wave0[1248] = 998 Wave0[1249] = 970 Wave0[1250] = 945 Wave0[1251] = 925 Wave0[1252] = 904 Wave0[1253] = 896 Wave0[1254] = 893 Wave0[1255] = 896 Wave0[1256] = 903 Wave0[1257] = 913 Wave0[1258] = 931 Wave0[1259] = 944 Wave0[1260] = 955 Wave0[1261] = 964 Wave0[1262] = 971 Wave0[1263] = 973 Wave0[1264] = 970 Wave0[1265] = 961 Wave0[1266] = 949 Wave0[1267] = 936 Wave0[1268] = 921 Wave0[1269] = 903 Wave0[1270] = 885 Wave0[1271] = 867 Wave0[1272] = 867 Wave0[1273] = 882 Wave0[1274] = 910 Wave0[1275] = 952 Wave0[1276] = 1009 Wave0[1277] = 1118 Wave0[1278] = 1213 Wave0[1279] = 1318 Wave0[1280] = 1435 Wave0[1281] = 1564 Wave0[1282] = 1704 Wave0[1283] = 1911 Wave0[1284] = 2010 Wave0[1285] = 2040 Wave0[1286] = 1983 Wave0[1287] = 1837 Wave0[1288] = 1626 Wave0[1289] = 1382 Wave0[1290] = 1024 Wave0[1291] = 825 Wave0[1292] = 672 Wave0[1293] = 567 Wave0[1294] = 512 Wave0[1295] = 499 Wave0[1296] = 543 Wave0[1297] = 598 Wave0[1298] = 661 Wave0[1299] = 723 Wave0[1300] = 777 Wave0[1301] = 819 Wave0[1302] = 861 Wave0[1303] = 881 Wave0[1304] = 899 Wave0[1305] = 917 Wave0[1306] = 935 Wave0[1307] = 951 Wave0[1308] = 963 Wave0[1309] = 965 Wave0[1310] = 957 Wave0[1311] = 942 Wave0[1312] = 920 Wave0[1313] = 894 Wave0[1314] = 865 Wave0[1315] = 832 Wave0[1316] = 818 Wave0[1317] = 815 Wave0[1318] = 823 Wave0[1319] = 840 Wave0[1320] = 868 Wave0[1321] = 917 Wave0[1322] = 951 Wave0[1323] = 987 Wave0[1324] = 1022 Wave0[1325] = 1059 Wave0[1326] = 1095 Wave0[1327] = 1142 Wave0[1328] = 1165 Wave0[1329] = 1176 Wave0[1330] = 1176 Wave0[1331] = 1165 Wave0[1332] = 1142 Wave0[1333] = 1109 Wave0[1334] = 1051 Wave0[1335] = 1013 Wave0[1336] = 982 Wave0[1337] = 957 Wave0[1338] = 943 Wave0[1339] = 939 Wave0[1340] = 954 Wave0[1341] = 974 Wave0[1342] = 997 Wave0[1343] = 1019 Wave0[1344] = 1040 Wave0[1345] = 1056 Wave0[1346] = 1076 Wave0[1347] = 1083 Wave0[1348] = 1085 Wave0[1349] = 1081 Wave0[1350] = 1072 Wave0[1351] = 1059 Wave0[1352] = 1044 Wave0[1353] = 1018 Wave0[1354] = 1001 Wave0[1355] = 985 Wave0[1356] = 972 Wave0[1357] = 964 Wave0[1358] = 957 Wave0[1359] = 954 Wave0[1360] = 959 Wave0[1361] = 970 Wave0[1362] = 988 Wave0[1363] = 1012 Wave0[1364] = 1039 Wave0[1365] = 1087 Wave0[1366] = 1119 Wave0[1367] = 1150 Wave0[1368] = 1177 Wave0[1369] = 1198 Wave0[1370] = 1209 Wave0[1371] = 1201 Wave0[1372] = 1179 Wave0[1373] = 1147 Wave0[1374] = 1109 Wave0[1375] = 1071 Wave0[1376] = 1035 Wave0[1377] = 1001 Wave0[1378] = 957 Wave0[1379] = 931 Wave0[1380] = 908 Wave0[1381] = 892 Wave0[1382] = 881 Wave0[1383] = 877 Wave0[1384] = 880 Wave0[1385] = 887 Wave0[1386] = 896 Wave0[1387] = 907 Wave0[1388] = 920 Wave0[1389] = 933 Wave0[1390] = 950 Wave0[1391] = 958 Wave0[1392] = 964 Wave0[1393] = 966 Wave0[1394] = 963 Wave0[1395] = 956 Wave0[1396] = 946 Wave0[1397] = 926 Wave0[1398] = 909 Wave0[1399] = 893 Wave0[1400] = 884 Wave0[1401] = 880 Wave0[1402] = 887 Wave0[1403] = 924 Wave0[1404] = 963 Wave0[1405] = 1015 Wave0[1406] = 1082 Wave0[1407] = 1160 Wave0[1408] = 1252 Wave0[1409] = 1415 Wave0[1410] = 1537 Wave0[1411] = 1664 Wave0[1412] = 1789 Wave0[1413] = 1897 Wave0[1414] = 1965 Wave0[1415] = 1941 Wave0[1416] = 1825 Wave0[1417] = 1644 Wave0[1418] = 1425 Wave0[1419] = 1200 Wave0[1420] = 992 Wave0[1421] = 819 Wave0[1422] = 637 Wave0[1423] = 569 Wave0[1424] = 544 Wave0[1425] = 552 Wave0[1426] = 587 Wave0[1427] = 636 Wave0[1428] = 716 Wave0[1429] = 763 Wave0[1430] = 801 Wave0[1431] = 830 Wave0[1432] = 851 Wave0[1433] = 869 Wave0[1434] = 895 Wave0[1435] = 913 Wave0[1436] = 931 Wave0[1437] = 947 Wave0[1438] = 958 Wave0[1439] = 963 Wave0[1440] = 960 Wave0[1441] = 940 Wave0[1442] = 920 Wave0[1443] = 898 Wave0[1444] = 877 Wave0[1445] = 861 Wave0[1446] = 850 Wave0[1447] = 847 Wave0[1448] = 858 Wave0[1449] = 876 Wave0[1450] = 903 Wave0[1451] = 935 Wave0[1452] = 971 Wave0[1453] = 1029 Wave0[1454] = 1064 Wave0[1455] = 1098 Wave0[1456] = 1129 Wave0[1457] = 1151 Wave0[1458] = 1163 Wave0[1459] = 1163 Wave0[1460] = 1139 Wave0[1461] = 1113 Wave0[1462] = 1081 Wave0[1463] = 1046 Wave0[1464] = 1011 Wave0[1465] = 978 Wave0[1466] = 939 Wave0[1467] = 925 Wave0[1468] = 921 Wave0[1469] = 926 Wave0[1470] = 940 Wave0[1471] = 963 Wave0[1472] = 1005 Wave0[1473] = 1033 Wave0[1474] = 1058 Wave0[1475] = 1077 Wave0[1476] = 1091 Wave0[1477] = 1100 Wave0[1478] = 1102 Wave0[1479] = 1096 Wave0[1480] = 1083 Wave0[1481] = 1066 Wave0[1482] = 1046 Wave0[1483] = 1027 Wave0[1484] = 1007 Wave0[1485] = 980 Wave0[1486] = 967 Wave0[1487] = 957 Wave0[1488] = 951 Wave0[1489] = 952 Wave0[1490] = 957 Wave0[1491] = 976 Wave0[1492] = 997 Wave0[1493] = 1025 Wave0[1494] = 1054 Wave0[1495] = 1084 Wave0[1496] = 1114 Wave0[1497] = 1154 Wave0[1498] = 1176 Wave0[1499] = 1191 Wave0[1500] = 1194 Wave0[1501] = 1182 Wave0[1502] = 1159 Wave0[1503] = 1128 Wave0[1504] = 1076 Wave0[1505] = 1041 Wave0[1506] = 1005 Wave0[1507] = 970 Wave0[1508] = 938 Wave0[1509] = 910 Wave0[1510] = 885 Wave0[1511] = 877 Wave0[1512] = 877 Wave0[1513] = 885 Wave0[1514] = 897 Wave0[1515] = 913 Wave0[1516] = 940 Wave0[1517] = 958 Wave0[1518] = 974 Wave0[1519] = 989 Wave0[1520] = 1001 Wave0[1521] = 1008 Wave0[1522] = 1005 Wave0[1523] = 993 Wave0[1524] = 975 Wave0[1525] = 953 Wave0[1526] = 928 Wave0[1527] = 902 Wave0[1528] = 877 Wave0[1529] = 844 Wave0[1530] = 836 Wave0[1531] = 840 Wave0[1532] = 861 Wave0[1533] = 895 Wave0[1534] = 940 Wave0[1535] = 1023 Return Teno_Wave1: ' = Hunt_Wave1: ' copied from wave1: ' C:\b\pb\gmt\robots\so\wave8_noot24_excit.inc ' EXCITATIONWAVE ' excitation waveform = (2.InWav - Outwav) ' should be 11-bits ' for inclusion in the PIC firmware ' size = 511 ' normalized ' 19.03.2020 17:18:21 ' 02.12.2020: Test to be done on ' 23.06.2021: Tested acceptable on - used for mid-range ' to be evaluated for . ' 08.10.2021: on cornalto only usefull for extreme high Wave1[0] = 992 Wave1[1] = 900 Wave1[2] = 838 Wave1[3] = 994 Wave1[4] = 1211 Wave1[5] = 1300 Wave1[6] = 1301 Wave1[7] = 1281 Wave1[8] = 1279 Wave1[9] = 1270 Wave1[10] = 1252 Wave1[11] = 1235 Wave1[12] = 1242 Wave1[13] = 1283 Wave1[14] = 1314 Wave1[15] = 1351 Wave1[16] = 1378 Wave1[17] = 1410 Wave1[18] = 1428 Wave1[19] = 1438 Wave1[20] = 1480 Wave1[21] = 1577 Wave1[22] = 1801 Wave1[23] = 1996 Wave1[24] = 1870 Wave1[25] = 1517 Wave1[26] = 1346 Wave1[27] = 1160 Wave1[28] = 1107 Wave1[29] = 1012 Wave1[30] = 892 Wave1[31] = 810 Wave1[32] = 715 Wave1[33] = 638 Wave1[34] = 468 Wave1[35] = 371 Wave1[36] = 267 Wave1[37] = 249 Wave1[38] = 260 Wave1[39] = 291 Wave1[40] = 284 Wave1[41] = 201 Wave1[42] = 238 Wave1[43] = 610 Wave1[44] = 796 Wave1[45] = 887 Wave1[46] = 912 Wave1[47] = 933 Wave1[48] = 978 Wave1[49] = 989 Wave1[50] = 991 Wave1[51] = 977 Wave1[52] = 1020 Wave1[53] = 1061 Wave1[54] = 1100 Wave1[55] = 1132 Wave1[56] = 1130 Wave1[57] = 1108 Wave1[58] = 1065 Wave1[59] = 1048 Wave1[60] = 1060 Wave1[61] = 1083 Wave1[62] = 1095 Wave1[63] = 1109 Wave1[64] = 1107 Wave1[65] = 1110 Wave1[66] = 1118 Wave1[67] = 1106 Wave1[68] = 1098 Wave1[69] = 1093 Wave1[70] = 1067 Wave1[71] = 1044 Wave1[72] = 1035 Wave1[73] = 1025 Wave1[74] = 1010 Wave1[75] = 1016 Wave1[76] = 1041 Wave1[77] = 1052 Wave1[78] = 1050 Wave1[79] = 1035 Wave1[80] = 1031 Wave1[81] = 1042 Wave1[82] = 1037 Wave1[83] = 1046 Wave1[84] = 1050 Wave1[85] = 1067 Wave1[86] = 1073 Wave1[87] = 1047 Wave1[88] = 1030 Wave1[89] = 1014 Wave1[90] = 1004 Wave1[91] = 982 Wave1[92] = 982 Wave1[93] = 979 Wave1[94] = 992 Wave1[95] = 1005 Wave1[96] = 1008 Wave1[97] = 1012 Wave1[98] = 1008 Wave1[99] = 1016 Wave1[100] = 1025 Wave1[101] = 1021 Wave1[102] = 998 Wave1[103] = 961 Wave1[104] = 938 Wave1[105] = 938 Wave1[106] = 944 Wave1[107] = 945 Wave1[108] = 942 Wave1[109] = 936 Wave1[110] = 927 Wave1[111] = 929 Wave1[112] = 926 Wave1[113] = 919 Wave1[114] = 919 Wave1[115] = 932 Wave1[116] = 951 Wave1[117] = 955 Wave1[118] = 953 Wave1[119] = 948 Wave1[120] = 946 Wave1[121] = 957 Wave1[122] = 984 Wave1[123] = 1010 Wave1[124] = 1025 Wave1[125] = 1037 Wave1[126] = 1047 Wave1[127] = 1043 Wave1[128] = 1010 Wave1[129] = 893 Wave1[130] = 852 Wave1[131] = 1038 Wave1[132] = 1211 Wave1[133] = 1273 Wave1[134] = 1272 Wave1[135] = 1259 Wave1[136] = 1259 Wave1[137] = 1243 Wave1[138] = 1220 Wave1[139] = 1217 Wave1[140] = 1242 Wave1[141] = 1279 Wave1[142] = 1307 Wave1[143] = 1346 Wave1[144] = 1370 Wave1[145] = 1400 Wave1[146] = 1429 Wave1[147] = 1459 Wave1[148] = 1501 Wave1[149] = 1605 Wave1[150] = 1826 Wave1[151] = 2002 Wave1[152] = 1844 Wave1[153] = 1558 Wave1[154] = 1371 Wave1[155] = 1199 Wave1[156] = 1161 Wave1[157] = 1042 Wave1[158] = 919 Wave1[159] = 840 Wave1[160] = 741 Wave1[161] = 646 Wave1[162] = 470 Wave1[163] = 355 Wave1[164] = 259 Wave1[165] = 229 Wave1[166] = 239 Wave1[167] = 280 Wave1[168] = 283 Wave1[169] = 189 Wave1[170] = 247 Wave1[171] = 650 Wave1[172] = 793 Wave1[173] = 875 Wave1[174] = 886 Wave1[175] = 922 Wave1[176] = 962 Wave1[177] = 982 Wave1[178] = 982 Wave1[179] = 978 Wave1[180] = 1032 Wave1[181] = 1060 Wave1[182] = 1096 Wave1[183] = 1125 Wave1[184] = 1123 Wave1[185] = 1095 Wave1[186] = 1069 Wave1[187] = 1059 Wave1[188] = 1068 Wave1[189] = 1083 Wave1[190] = 1092 Wave1[191] = 1108 Wave1[192] = 1112 Wave1[193] = 1121 Wave1[194] = 1126 Wave1[195] = 1111 Wave1[196] = 1102 Wave1[197] = 1091 Wave1[198] = 1063 Wave1[199] = 1041 Wave1[200] = 1036 Wave1[201] = 1019 Wave1[202] = 1009 Wave1[203] = 1026 Wave1[204] = 1046 Wave1[205] = 1055 Wave1[206] = 1055 Wave1[207] = 1039 Wave1[208] = 1030 Wave1[209] = 1035 Wave1[210] = 1029 Wave1[211] = 1038 Wave1[212] = 1054 Wave1[213] = 1071 Wave1[214] = 1072 Wave1[215] = 1050 Wave1[216] = 1033 Wave1[217] = 1020 Wave1[218] = 1008 Wave1[219] = 994 Wave1[220] = 988 Wave1[221] = 984 Wave1[222] = 989 Wave1[223] = 999 Wave1[224] = 1006 Wave1[225] = 1007 Wave1[226] = 1005 Wave1[227] = 1008 Wave1[228] = 1019 Wave1[229] = 1022 Wave1[230] = 998 Wave1[231] = 964 Wave1[232] = 938 Wave1[233] = 944 Wave1[234] = 945 Wave1[235] = 937 Wave1[236] = 927 Wave1[237] = 923 Wave1[238] = 918 Wave1[239] = 923 Wave1[240] = 924 Wave1[241] = 917 Wave1[242] = 927 Wave1[243] = 944 Wave1[244] = 961 Wave1[245] = 968 Wave1[246] = 966 Wave1[247] = 958 Wave1[248] = 954 Wave1[249] = 963 Wave1[250] = 988 Wave1[251] = 1005 Wave1[252] = 1020 Wave1[253] = 1034 Wave1[254] = 1038 Wave1[255] = 1016 Wave1[256] = 954 Wave1[257] = 832 Wave1[258] = 864 Wave1[259] = 1132 Wave1[260] = 1223 Wave1[261] = 1290 Wave1[262] = 1278 Wave1[263] = 1272 Wave1[264] = 1269 Wave1[265] = 1229 Wave1[266] = 1209 Wave1[267] = 1211 Wave1[268] = 1249 Wave1[269] = 1282 Wave1[270] = 1323 Wave1[271] = 1359 Wave1[272] = 1383 Wave1[273] = 1417 Wave1[274] = 1443 Wave1[275] = 1478 Wave1[276] = 1531 Wave1[277] = 1664 Wave1[278] = 1899 Wave1[279] = 2047 Wave1[280] = 1768 Wave1[281] = 1470 Wave1[282] = 1302 Wave1[283] = 1122 Wave1[284] = 1161 Wave1[285] = 1002 Wave1[286] = 915 Wave1[287] = 822 Wave1[288] = 723 Wave1[289] = 617 Wave1[290] = 460 Wave1[291] = 363 Wave1[292] = 269 Wave1[293] = 247 Wave1[294] = 254 Wave1[295] = 279 Wave1[296] = 248 Wave1[297] = 170 Wave1[298] = 316 Wave1[299] = 755 Wave1[300] = 847 Wave1[301] = 916 Wave1[302] = 938 Wave1[303] = 932 Wave1[304] = 957 Wave1[305] = 962 Wave1[306] = 967 Wave1[307] = 977 Wave1[308] = 1033 Wave1[309] = 1062 Wave1[310] = 1105 Wave1[311] = 1137 Wave1[312] = 1126 Wave1[313] = 1094 Wave1[314] = 1068 Wave1[315] = 1049 Wave1[316] = 1066 Wave1[317] = 1087 Wave1[318] = 1099 Wave1[319] = 1117 Wave1[320] = 1120 Wave1[321] = 1128 Wave1[322] = 1122 Wave1[323] = 1107 Wave1[324] = 1101 Wave1[325] = 1088 Wave1[326] = 1054 Wave1[327] = 1039 Wave1[328] = 1026 Wave1[329] = 1013 Wave1[330] = 1007 Wave1[331] = 1018 Wave1[332] = 1039 Wave1[333] = 1051 Wave1[334] = 1051 Wave1[335] = 1036 Wave1[336] = 1037 Wave1[337] = 1037 Wave1[338] = 1029 Wave1[339] = 1042 Wave1[340] = 1057 Wave1[341] = 1077 Wave1[342] = 1072 Wave1[343] = 1043 Wave1[344] = 1034 Wave1[345] = 1025 Wave1[346] = 1013 Wave1[347] = 995 Wave1[348] = 987 Wave1[349] = 989 Wave1[350] = 997 Wave1[351] = 1008 Wave1[352] = 1008 Wave1[353] = 1013 Wave1[354] = 1012 Wave1[355] = 1008 Wave1[356] = 1015 Wave1[357] = 1014 Wave1[358] = 991 Wave1[359] = 959 Wave1[360] = 942 Wave1[361] = 943 Wave1[362] = 935 Wave1[363] = 924 Wave1[364] = 924 Wave1[365] = 913 Wave1[366] = 916 Wave1[367] = 924 Wave1[368] = 924 Wave1[369] = 918 Wave1[370] = 934 Wave1[371] = 954 Wave1[372] = 966 Wave1[373] = 978 Wave1[374] = 978 Wave1[375] = 967 Wave1[376] = 959 Wave1[377] = 967 Wave1[378] = 986 Wave1[379] = 1003 Wave1[380] = 1012 Wave1[381] = 1029 Wave1[382] = 1023 Wave1[383] = 990 Wave1[384] = 891 Wave1[385] = 828 Wave1[386] = 974 Wave1[387] = 1188 Wave1[388] = 1255 Wave1[389] = 1271 Wave1[390] = 1265 Wave1[391] = 1264 Wave1[392] = 1245 Wave1[393] = 1217 Wave1[394] = 1218 Wave1[395] = 1234 Wave1[396] = 1273 Wave1[397] = 1294 Wave1[398] = 1332 Wave1[399] = 1361 Wave1[400] = 1384 Wave1[401] = 1411 Wave1[402] = 1442 Wave1[403] = 1482 Wave1[404] = 1571 Wave1[405] = 1738 Wave1[406] = 1960 Wave1[407] = 1953 Wave1[408] = 1636 Wave1[409] = 1415 Wave1[410] = 1248 Wave1[411] = 1147 Wave1[412] = 1079 Wave1[413] = 938 Wave1[414] = 853 Wave1[415] = 759 Wave1[416] = 730 Wave1[417] = 579 Wave1[418] = 434 Wave1[419] = 318 Wave1[420] = 247 Wave1[421] = 236 Wave1[422] = 255 Wave1[423] = 234 Wave1[424] = 135 Wave1[425] = 221 Wave1[426] = 638 Wave1[427] = 782 Wave1[428] = 867 Wave1[429] = 879 Wave1[430] = 926 Wave1[431] = 953 Wave1[432] = 972 Wave1[433] = 966 Wave1[434] = 972 Wave1[435] = 1010 Wave1[436] = 1033 Wave1[437] = 1084 Wave1[438] = 1113 Wave1[439] = 1130 Wave1[440] = 1105 Wave1[441] = 1076 Wave1[442] = 1055 Wave1[443] = 1056 Wave1[444] = 1085 Wave1[445] = 1091 Wave1[446] = 1110 Wave1[447] = 1116 Wave1[448] = 1120 Wave1[449] = 1124 Wave1[450] = 1108 Wave1[451] = 1099 Wave1[452] = 1094 Wave1[453] = 1064 Wave1[454] = 1045 Wave1[455] = 1032 Wave1[456] = 1017 Wave1[457] = 1005 Wave1[458] = 1011 Wave1[459] = 1029 Wave1[460] = 1043 Wave1[461] = 1050 Wave1[462] = 1046 Wave1[463] = 1039 Wave1[464] = 1039 Wave1[465] = 1040 Wave1[466] = 1035 Wave1[467] = 1049 Wave1[468] = 1065 Wave1[469] = 1075 Wave1[470] = 1060 Wave1[471] = 1032 Wave1[472] = 1027 Wave1[473] = 1023 Wave1[474] = 1012 Wave1[475] = 996 Wave1[476] = 989 Wave1[477] = 984 Wave1[478] = 994 Wave1[479] = 1005 Wave1[480] = 1007 Wave1[481] = 1012 Wave1[482] = 1004 Wave1[483] = 1005 Wave1[484] = 1002 Wave1[485] = 998 Wave1[486] = 971 Wave1[487] = 949 Wave1[488] = 943 Wave1[489] = 938 Wave1[490] = 935 Wave1[491] = 928 Wave1[492] = 929 Wave1[493] = 923 Wave1[494] = 927 Wave1[495] = 933 Wave1[496] = 925 Wave1[497] = 921 Wave1[498] = 936 Wave1[499] = 951 Wave1[500] = 966 Wave1[501] = 980 Wave1[502] = 981 Wave1[503] = 972 Wave1[504] = 976 Wave1[505] = 986 Wave1[506] = 1011 Wave1[507] = 1028 Wave1[508] = 1037 Wave1[509] = 1049 Wave1[510] = 1033 Wave1[511] = 1023 Return Teno_Wave2: ' SmoothSquare prog 6 0n ' wave2 on ' square wave with variable symmetry ' no good, synthetic sound ' works for the extreme high on cornalto ' Wav2p1 = 42 For i = 0 To Wav2p1 Wave2[i] = 2.0 * PWM_reset Next i For i = Wav2p1+1 To 127 Wave2[i] = 0 Next i For i = 128 To 255 Wave2[i] = Wave2[i - 128] Next i ' smooth this now: Wave2[0] = 0 For i = 1 To 255 Wave2[i] = ((Wave2[i-1] * 7 ) + Wave2[i] ) / 8 Next i Return Teno_Wave3: ' =Hunt_Wave3: ' Sax_Wave3: ' derived from sample c:\b\pb\gmt\robots\autosax\samples\Tsax_C_p_4p_01.wav ' nr of periods = 4 ' sounds a bit cuivre on Hunt. ' 02.12.2020: possible, not great. ' 23.06.2021: on o.k. for very high ' 08.10.2021: not very usefull on Cornalto Wave3[0] = 1047 Wave3[1] = 1099 Wave3[2] = 1194 Wave3[3] = 1308 Wave3[4] = 1378 Wave3[5] = 1527 Wave3[6] = 1698 Wave3[7] = 1825 Wave3[8] = 1977 Wave3[9] = 2022 Wave3[10] = 2007 Wave3[11] = 1930 Wave3[12] = 1933 Wave3[13] = 1888 Wave3[14] = 1892 Wave3[15] = 1854 Wave3[16] = 1774 Wave3[17] = 1715 Wave3[18] = 1664 Wave3[19] = 1652 Wave3[20] = 1595 Wave3[21] = 1522 Wave3[22] = 1404 Wave3[23] = 1359 Wave3[24] = 1284 Wave3[25] = 1202 Wave3[26] = 1131 Wave3[27] = 950 Wave3[28] = 768 Wave3[29] = 657 Wave3[30] = 591 Wave3[31] = 564 Wave3[32] = 578 Wave3[33] = 570 Wave3[34] = 550 Wave3[35] = 570 Wave3[36] = 604 Wave3[37] = 657 Wave3[38] = 694 Wave3[39] = 715 Wave3[40] = 719 Wave3[41] = 701 Wave3[42] = 679 Wave3[43] = 651 Wave3[44] = 613 Wave3[45] = 581 Wave3[46] = 557 Wave3[47] = 550 Wave3[48] = 560 Wave3[49] = 576 Wave3[50] = 596 Wave3[51] = 623 Wave3[52] = 661 Wave3[53] = 692 Wave3[54] = 767 Wave3[55] = 829 Wave3[56] = 879 Wave3[57] = 940 Wave3[58] = 975 Wave3[59] = 995 Wave3[60] = 1025 Wave3[61] = 1016 Wave3[62] = 1007 Wave3[63] = 998 Wave3[64] = 961 Wave3[65] = 937 Wave3[66] = 905 Wave3[67] = 863 Wave3[68] = 823 Wave3[69] = 780 Wave3[70] = 737 Wave3[71] = 723 Wave3[72] = 713 Wave3[73] = 712 Wave3[74] = 714 Wave3[75] = 717 Wave3[76] = 737 Wave3[77] = 776 Wave3[78] = 839 Wave3[79] = 900 Wave3[80] = 942 Wave3[81] = 1027 Wave3[82] = 1102 Wave3[83] = 1145 Wave3[84] = 1205 Wave3[85] = 1258 Wave3[86] = 1292 Wave3[87] = 1325 Wave3[88] = 1346 Wave3[89] = 1346 Wave3[90] = 1338 Wave3[91] = 1332 Wave3[92] = 1319 Wave3[93] = 1292 Wave3[94] = 1274 Wave3[95] = 1243 Wave3[96] = 1226 Wave3[97] = 1188 Wave3[98] = 1170 Wave3[99] = 1147 Wave3[100] = 1110 Wave3[101] = 1106 Wave3[102] = 1095 Wave3[103] = 1088 Wave3[104] = 1062 Wave3[105] = 1033 Wave3[106] = 982 Wave3[107] = 940 Wave3[108] = 880 Wave3[109] = 810 Wave3[110] = 787 Wave3[111] = 731 Wave3[112] = 691 Wave3[113] = 675 Wave3[114] = 650 Wave3[115] = 651 Wave3[116] = 649 Wave3[117] = 660 Wave3[118] = 671 Wave3[119] = 701 Wave3[120] = 724 Wave3[121] = 751 Wave3[122] = 785 Wave3[123] = 815 Wave3[124] = 847 Wave3[125] = 908 Wave3[126] = 953 Wave3[127] = 1014 Wave3[128] = 1072 Wave3[129] = 1108 Wave3[130] = 1176 Wave3[131] = 1307 Wave3[132] = 1398 Wave3[133] = 1563 Wave3[134] = 1720 Wave3[135] = 1831 Wave3[136] = 1966 Wave3[137] = 2010 Wave3[138] = 2008 Wave3[139] = 1949 Wave3[140] = 1958 Wave3[141] = 1900 Wave3[142] = 1880 Wave3[143] = 1848 Wave3[144] = 1760 Wave3[145] = 1752 Wave3[146] = 1679 Wave3[147] = 1639 Wave3[148] = 1579 Wave3[149] = 1508 Wave3[150] = 1417 Wave3[151] = 1376 Wave3[152] = 1283 Wave3[153] = 1161 Wave3[154] = 1070 Wave3[155] = 854 Wave3[156] = 740 Wave3[157] = 602 Wave3[158] = 581 Wave3[159] = 573 Wave3[160] = 573 Wave3[161] = 561 Wave3[162] = 545 Wave3[163] = 578 Wave3[164] = 608 Wave3[165] = 699 Wave3[166] = 722 Wave3[167] = 730 Wave3[168] = 732 Wave3[169] = 704 Wave3[170] = 691 Wave3[171] = 653 Wave3[172] = 603 Wave3[173] = 562 Wave3[174] = 541 Wave3[175] = 531 Wave3[176] = 548 Wave3[177] = 565 Wave3[178] = 586 Wave3[179] = 618 Wave3[180] = 669 Wave3[181] = 692 Wave3[182] = 771 Wave3[183] = 820 Wave3[184] = 886 Wave3[185] = 948 Wave3[186] = 985 Wave3[187] = 995 Wave3[188] = 1009 Wave3[189] = 1023 Wave3[190] = 1016 Wave3[191] = 1002 Wave3[192] = 981 Wave3[193] = 946 Wave3[194] = 929 Wave3[195] = 869 Wave3[196] = 816 Wave3[197] = 768 Wave3[198] = 731 Wave3[199] = 711 Wave3[200] = 706 Wave3[201] = 703 Wave3[202] = 693 Wave3[203] = 717 Wave3[204] = 762 Wave3[205] = 803 Wave3[206] = 859 Wave3[207] = 905 Wave3[208] = 959 Wave3[209] = 1033 Wave3[210] = 1114 Wave3[211] = 1169 Wave3[212] = 1231 Wave3[213] = 1266 Wave3[214] = 1309 Wave3[215] = 1340 Wave3[216] = 1350 Wave3[217] = 1353 Wave3[218] = 1342 Wave3[219] = 1329 Wave3[220] = 1299 Wave3[221] = 1267 Wave3[222] = 1260 Wave3[223] = 1234 Wave3[224] = 1218 Wave3[225] = 1180 Wave3[226] = 1146 Wave3[227] = 1131 Wave3[228] = 1122 Wave3[229] = 1111 Wave3[230] = 1096 Wave3[231] = 1067 Wave3[232] = 1040 Wave3[233] = 1013 Wave3[234] = 976 Wave3[235] = 956 Wave3[236] = 874 Wave3[237] = 801 Wave3[238] = 760 Wave3[239] = 715 Wave3[240] = 699 Wave3[241] = 671 Wave3[242] = 662 Wave3[243] = 659 Wave3[244] = 656 Wave3[245] = 679 Wave3[246] = 682 Wave3[247] = 705 Wave3[248] = 730 Wave3[249] = 761 Wave3[250] = 796 Wave3[251] = 814 Wave3[252] = 859 Wave3[253] = 897 Wave3[254] = 943 Wave3[255] = 1018 Wave3[256] = 1079 Wave3[257] = 1126 Wave3[258] = 1202 Wave3[259] = 1310 Wave3[260] = 1401 Wave3[261] = 1551 Wave3[262] = 1691 Wave3[263] = 1859 Wave3[264] = 1994 Wave3[265] = 2047 Wave3[266] = 1998 Wave3[267] = 1904 Wave3[268] = 1940 Wave3[269] = 1897 Wave3[270] = 1919 Wave3[271] = 1885 Wave3[272] = 1775 Wave3[273] = 1758 Wave3[274] = 1679 Wave3[275] = 1651 Wave3[276] = 1590 Wave3[277] = 1519 Wave3[278] = 1425 Wave3[279] = 1370 Wave3[280] = 1257 Wave3[281] = 1176 Wave3[282] = 1021 Wave3[283] = 801 Wave3[284] = 690 Wave3[285] = 580 Wave3[286] = 574 Wave3[287] = 575 Wave3[288] = 582 Wave3[289] = 560 Wave3[290] = 561 Wave3[291] = 614 Wave3[292] = 651 Wave3[293] = 726 Wave3[294] = 735 Wave3[295] = 753 Wave3[296] = 735 Wave3[297] = 718 Wave3[298] = 695 Wave3[299] = 635 Wave3[300] = 608 Wave3[301] = 544 Wave3[302] = 526 Wave3[303] = 514 Wave3[304] = 531 Wave3[305] = 558 Wave3[306] = 580 Wave3[307] = 608 Wave3[308] = 658 Wave3[309] = 681 Wave3[310] = 779 Wave3[311] = 819 Wave3[312] = 910 Wave3[313] = 963 Wave3[314] = 988 Wave3[315] = 1014 Wave3[316] = 1031 Wave3[317] = 1040 Wave3[318] = 1018 Wave3[319] = 1023 Wave3[320] = 985 Wave3[321] = 933 Wave3[322] = 903 Wave3[323] = 840 Wave3[324] = 804 Wave3[325] = 779 Wave3[326] = 749 Wave3[327] = 719 Wave3[328] = 709 Wave3[329] = 698 Wave3[330] = 699 Wave3[331] = 719 Wave3[332] = 763 Wave3[333] = 807 Wave3[334] = 859 Wave3[335] = 923 Wave3[336] = 979 Wave3[337] = 1053 Wave3[338] = 1101 Wave3[339] = 1166 Wave3[340] = 1236 Wave3[341] = 1274 Wave3[342] = 1324 Wave3[343] = 1351 Wave3[344] = 1351 Wave3[345] = 1350 Wave3[346] = 1334 Wave3[347] = 1324 Wave3[348] = 1298 Wave3[349] = 1278 Wave3[350] = 1259 Wave3[351] = 1219 Wave3[352] = 1203 Wave3[353] = 1170 Wave3[354] = 1148 Wave3[355] = 1142 Wave3[356] = 1122 Wave3[357] = 1106 Wave3[358] = 1085 Wave3[359] = 1067 Wave3[360] = 1049 Wave3[361] = 1024 Wave3[362] = 965 Wave3[363] = 918 Wave3[364] = 862 Wave3[365] = 806 Wave3[366] = 770 Wave3[367] = 743 Wave3[368] = 707 Wave3[369] = 683 Wave3[370] = 679 Wave3[371] = 665 Wave3[372] = 668 Wave3[373] = 666 Wave3[374] = 686 Wave3[375] = 716 Wave3[376] = 733 Wave3[377] = 773 Wave3[378] = 803 Wave3[379] = 827 Wave3[380] = 853 Wave3[381] = 894 Wave3[382] = 943 Wave3[383] = 1017 Wave3[384] = 1091 Wave3[385] = 1139 Wave3[386] = 1202 Wave3[387] = 1274 Wave3[388] = 1402 Wave3[389] = 1568 Wave3[390] = 1676 Wave3[391] = 1848 Wave3[392] = 1973 Wave3[393] = 2014 Wave3[394] = 1982 Wave3[395] = 1984 Wave3[396] = 1948 Wave3[397] = 1888 Wave3[398] = 1910 Wave3[399] = 1840 Wave3[400] = 1793 Wave3[401] = 1762 Wave3[402] = 1718 Wave3[403] = 1654 Wave3[404] = 1580 Wave3[405] = 1530 Wave3[406] = 1470 Wave3[407] = 1397 Wave3[408] = 1270 Wave3[409] = 1167 Wave3[410] = 959 Wave3[411] = 757 Wave3[412] = 664 Wave3[413] = 590 Wave3[414] = 585 Wave3[415] = 557 Wave3[416] = 559 Wave3[417] = 533 Wave3[418] = 558 Wave3[419] = 632 Wave3[420] = 682 Wave3[421] = 740 Wave3[422] = 751 Wave3[423] = 762 Wave3[424] = 746 Wave3[425] = 745 Wave3[426] = 708 Wave3[427] = 649 Wave3[428] = 611 Wave3[429] = 548 Wave3[430] = 537 Wave3[431] = 515 Wave3[432] = 535 Wave3[433] = 536 Wave3[434] = 566 Wave3[435] = 587 Wave3[436] = 616 Wave3[437] = 684 Wave3[438] = 775 Wave3[439] = 831 Wave3[440] = 903 Wave3[441] = 953 Wave3[442] = 998 Wave3[443] = 1019 Wave3[444] = 1043 Wave3[445] = 1029 Wave3[446] = 1004 Wave3[447] = 1001 Wave3[448] = 984 Wave3[449] = 958 Wave3[450] = 932 Wave3[451] = 867 Wave3[452] = 795 Wave3[453] = 764 Wave3[454] = 734 Wave3[455] = 722 Wave3[456] = 718 Wave3[457] = 692 Wave3[458] = 694 Wave3[459] = 709 Wave3[460] = 767 Wave3[461] = 799 Wave3[462] = 863 Wave3[463] = 914 Wave3[464] = 991 Wave3[465] = 1070 Wave3[466] = 1107 Wave3[467] = 1183 Wave3[468] = 1243 Wave3[469] = 1282 Wave3[470] = 1326 Wave3[471] = 1346 Wave3[472] = 1343 Wave3[473] = 1348 Wave3[474] = 1352 Wave3[475] = 1330 Wave3[476] = 1303 Wave3[477] = 1281 Wave3[478] = 1242 Wave3[479] = 1201 Wave3[480] = 1192 Wave3[481] = 1167 Wave3[482] = 1154 Wave3[483] = 1134 Wave3[484] = 1114 Wave3[485] = 1102 Wave3[486] = 1082 Wave3[487] = 1074 Wave3[488] = 1052 Wave3[489] = 1021 Wave3[490] = 959 Wave3[491] = 926 Wave3[492] = 848 Wave3[493] = 815 Wave3[494] = 764 Wave3[495] = 733 Wave3[496] = 713 Wave3[497] = 695 Wave3[498] = 699 Wave3[499] = 684 Wave3[500] = 674 Wave3[501] = 677 Wave3[502] = 687 Wave3[503] = 717 Wave3[504] = 753 Wave3[505] = 786 Wave3[506] = 813 Wave3[507] = 829 Wave3[508] = 857 Wave3[509] = 908 Wave3[510] = 937 Wave3[511] = 1023 Return 'Trumpeter_Wave4: ' 'Triangle ' prog 7 op ' ' triangle wave with variable symmetry ' 'p6 = 42 ' 'p7 = 85 ' 'no good for ' For i = 0 To p6 ' Wave4[i] = PWM_reset + (((PWM_reset-1) * i )/ p6) ' Next i ' For i = p6 + 1 To p7 ' trajekt = p7 - (p6+1) ' Wave4[i] = PWM_Range - ((PWM_Range * (i - p6)) /(p7 - p6 -1)) ' Next i ' For i = p7 + 1 To 127 ' trajekt = 127 - (p7 +1) ' Wave4[i] = ((i - p7) * PWM_reset) /(127 - p7 - 1) ' Next i ' For i = 128 To 255 ' Wave4[i] = Wave4[i - 128] ' Next i ' ' smoothing: ' Wave4[0] = 0 ' For i = 1 To 255 ' Wave4[i] = ((Wave4[i-1] * 7 ) + Wave4[i] ) / 8 ' Next i 'Return Teno_Wave4: ' = Hunt_Wave5: ' ' 8 periods, 1023 samples is o.k. here. ' ' 03.12.2020 - file prepared by Lara Van Wynsberghe ' ' jachthoorn. ' ' derived from sample C:\b\pb\gmt\robots\rumo\hunt_8p16_6.wav ' ' nr of periods = 8 ' ' first judgement: it is acceptable! ' ' rejected for ' 08.10.2021: reintroduced for , to be evaluated. Wave4[0] = 991 Wave4[1] = 1036 Wave4[2] = 1084 Wave4[3] = 1134 Wave4[4] = 1186 Wave4[5] = 1240 Wave4[6] = 1291 Wave4[7] = 1341 Wave4[8] = 1390 Wave4[9] = 1435 Wave4[10] = 1477 Wave4[11] = 1517 Wave4[12] = 1591 Wave4[13] = 1627 Wave4[14] = 1666 Wave4[15] = 1710 Wave4[16] = 1752 Wave4[17] = 1797 Wave4[18] = 1844 Wave4[19] = 1890 Wave4[20] = 1934 Wave4[21] = 1974 Wave4[22] = 2004 Wave4[23] = 2019 Wave4[24] = 2016 Wave4[25] = 1994 Wave4[26] = 1947 Wave4[27] = 1879 Wave4[28] = 1797 Wave4[29] = 1701 Wave4[30] = 1596 Wave4[31] = 1487 Wave4[32] = 1379 Wave4[33] = 1275 Wave4[34] = 1178 Wave4[35] = 1091 Wave4[36] = 1015 Wave4[37] = 896 Wave4[38] = 853 Wave4[39] = 817 Wave4[40] = 788 Wave4[41] = 763 Wave4[42] = 740 Wave4[43] = 718 Wave4[44] = 698 Wave4[45] = 678 Wave4[46] = 660 Wave4[47] = 642 Wave4[48] = 624 Wave4[49] = 608 Wave4[50] = 595 Wave4[51] = 584 Wave4[52] = 578 Wave4[53] = 575 Wave4[54] = 575 Wave4[55] = 581 Wave4[56] = 592 Wave4[57] = 608 Wave4[58] = 629 Wave4[59] = 656 Wave4[60] = 686 Wave4[61] = 717 Wave4[62] = 783 Wave4[63] = 813 Wave4[64] = 842 Wave4[65] = 868 Wave4[66] = 891 Wave4[67] = 910 Wave4[68] = 927 Wave4[69] = 942 Wave4[70] = 953 Wave4[71] = 961 Wave4[72] = 966 Wave4[73] = 970 Wave4[74] = 972 Wave4[75] = 974 Wave4[76] = 975 Wave4[77] = 975 Wave4[78] = 975 Wave4[79] = 976 Wave4[80] = 976 Wave4[81] = 976 Wave4[82] = 976 Wave4[83] = 974 Wave4[84] = 972 Wave4[85] = 968 Wave4[86] = 963 Wave4[87] = 951 Wave4[88] = 945 Wave4[89] = 940 Wave4[90] = 935 Wave4[91] = 929 Wave4[92] = 924 Wave4[93] = 919 Wave4[94] = 912 Wave4[95] = 906 Wave4[96] = 898 Wave4[97] = 890 Wave4[98] = 881 Wave4[99] = 869 Wave4[100] = 857 Wave4[101] = 842 Wave4[102] = 825 Wave4[103] = 807 Wave4[104] = 789 Wave4[105] = 770 Wave4[106] = 753 Wave4[107] = 737 Wave4[108] = 723 Wave4[109] = 713 Wave4[110] = 705 Wave4[111] = 701 Wave4[112] = 699 Wave4[113] = 702 Wave4[114] = 707 Wave4[115] = 713 Wave4[116] = 720 Wave4[117] = 728 Wave4[118] = 738 Wave4[119] = 749 Wave4[120] = 762 Wave4[121] = 777 Wave4[122] = 795 Wave4[123] = 816 Wave4[124] = 843 Wave4[125] = 874 Wave4[126] = 907 Wave4[127] = 945 Wave4[128] = 986 Wave4[129] = 1031 Wave4[130] = 1078 Wave4[131] = 1127 Wave4[132] = 1176 Wave4[133] = 1226 Wave4[134] = 1276 Wave4[135] = 1327 Wave4[136] = 1375 Wave4[137] = 1461 Wave4[138] = 1500 Wave4[139] = 1537 Wave4[140] = 1573 Wave4[141] = 1608 Wave4[142] = 1644 Wave4[143] = 1683 Wave4[144] = 1724 Wave4[145] = 1769 Wave4[146] = 1818 Wave4[147] = 1865 Wave4[148] = 1911 Wave4[149] = 1954 Wave4[150] = 1988 Wave4[151] = 2009 Wave4[152] = 2012 Wave4[153] = 1995 Wave4[154] = 1956 Wave4[155] = 1899 Wave4[156] = 1823 Wave4[157] = 1726 Wave4[158] = 1625 Wave4[159] = 1519 Wave4[160] = 1411 Wave4[161] = 1308 Wave4[162] = 1123 Wave4[163] = 1047 Wave4[164] = 981 Wave4[165] = 926 Wave4[166] = 880 Wave4[167] = 841 Wave4[168] = 808 Wave4[169] = 781 Wave4[170] = 755 Wave4[171] = 732 Wave4[172] = 709 Wave4[173] = 687 Wave4[174] = 666 Wave4[175] = 646 Wave4[176] = 628 Wave4[177] = 612 Wave4[178] = 597 Wave4[179] = 585 Wave4[180] = 577 Wave4[181] = 572 Wave4[182] = 571 Wave4[183] = 574 Wave4[184] = 582 Wave4[185] = 595 Wave4[186] = 614 Wave4[187] = 665 Wave4[188] = 695 Wave4[189] = 728 Wave4[190] = 759 Wave4[191] = 789 Wave4[192] = 817 Wave4[193] = 843 Wave4[194] = 867 Wave4[195] = 888 Wave4[196] = 906 Wave4[197] = 922 Wave4[198] = 935 Wave4[199] = 946 Wave4[200] = 955 Wave4[201] = 962 Wave4[202] = 968 Wave4[203] = 972 Wave4[204] = 976 Wave4[205] = 978 Wave4[206] = 980 Wave4[207] = 981 Wave4[208] = 982 Wave4[209] = 982 Wave4[210] = 982 Wave4[211] = 981 Wave4[212] = 978 Wave4[213] = 974 Wave4[214] = 970 Wave4[215] = 965 Wave4[216] = 961 Wave4[217] = 956 Wave4[218] = 952 Wave4[219] = 947 Wave4[220] = 942 Wave4[221] = 935 Wave4[222] = 928 Wave4[223] = 920 Wave4[224] = 910 Wave4[225] = 899 Wave4[226] = 886 Wave4[227] = 872 Wave4[228] = 856 Wave4[229] = 839 Wave4[230] = 820 Wave4[231] = 800 Wave4[232] = 780 Wave4[233] = 759 Wave4[234] = 740 Wave4[235] = 723 Wave4[236] = 709 Wave4[237] = 689 Wave4[238] = 683 Wave4[239] = 681 Wave4[240] = 682 Wave4[241] = 685 Wave4[242] = 690 Wave4[243] = 697 Wave4[244] = 705 Wave4[245] = 714 Wave4[246] = 725 Wave4[247] = 738 Wave4[248] = 752 Wave4[249] = 768 Wave4[250] = 787 Wave4[251] = 809 Wave4[252] = 835 Wave4[253] = 865 Wave4[254] = 900 Wave4[255] = 940 Wave4[256] = 981 Wave4[257] = 1025 Wave4[258] = 1071 Wave4[259] = 1120 Wave4[260] = 1169 Wave4[261] = 1219 Wave4[262] = 1318 Wave4[263] = 1365 Wave4[264] = 1411 Wave4[265] = 1456 Wave4[266] = 1497 Wave4[267] = 1536 Wave4[268] = 1573 Wave4[269] = 1609 Wave4[270] = 1646 Wave4[271] = 1686 Wave4[272] = 1728 Wave4[273] = 1773 Wave4[274] = 1820 Wave4[275] = 1868 Wave4[276] = 1918 Wave4[277] = 1963 Wave4[278] = 1999 Wave4[279] = 2022 Wave4[280] = 2029 Wave4[281] = 2016 Wave4[282] = 1982 Wave4[283] = 1928 Wave4[284] = 1854 Wave4[285] = 1766 Wave4[286] = 1666 Wave4[287] = 1441 Wave4[288] = 1334 Wave4[289] = 1235 Wave4[290] = 1144 Wave4[291] = 1065 Wave4[292] = 996 Wave4[293] = 938 Wave4[294] = 890 Wave4[295] = 850 Wave4[296] = 816 Wave4[297] = 786 Wave4[298] = 757 Wave4[299] = 732 Wave4[300] = 708 Wave4[301] = 685 Wave4[302] = 663 Wave4[303] = 641 Wave4[304] = 621 Wave4[305] = 603 Wave4[306] = 587 Wave4[307] = 574 Wave4[308] = 564 Wave4[309] = 557 Wave4[310] = 556 Wave4[311] = 560 Wave4[312] = 583 Wave4[313] = 603 Wave4[314] = 627 Wave4[315] = 656 Wave4[316] = 688 Wave4[317] = 721 Wave4[318] = 755 Wave4[319] = 789 Wave4[320] = 821 Wave4[321] = 849 Wave4[322] = 875 Wave4[323] = 898 Wave4[324] = 918 Wave4[325] = 935 Wave4[326] = 950 Wave4[327] = 962 Wave4[328] = 971 Wave4[329] = 978 Wave4[330] = 982 Wave4[331] = 986 Wave4[332] = 988 Wave4[333] = 990 Wave4[334] = 991 Wave4[335] = 992 Wave4[336] = 991 Wave4[337] = 989 Wave4[338] = 986 Wave4[339] = 984 Wave4[340] = 982 Wave4[341] = 979 Wave4[342] = 976 Wave4[343] = 974 Wave4[344] = 971 Wave4[345] = 968 Wave4[346] = 964 Wave4[347] = 960 Wave4[348] = 954 Wave4[349] = 946 Wave4[350] = 938 Wave4[351] = 927 Wave4[352] = 915 Wave4[353] = 901 Wave4[354] = 886 Wave4[355] = 868 Wave4[356] = 849 Wave4[357] = 830 Wave4[358] = 809 Wave4[359] = 789 Wave4[360] = 769 Wave4[361] = 750 Wave4[362] = 717 Wave4[363] = 704 Wave4[364] = 694 Wave4[365] = 686 Wave4[366] = 681 Wave4[367] = 678 Wave4[368] = 679 Wave4[369] = 682 Wave4[370] = 687 Wave4[371] = 694 Wave4[372] = 702 Wave4[373] = 712 Wave4[374] = 724 Wave4[375] = 737 Wave4[376] = 751 Wave4[377] = 767 Wave4[378] = 787 Wave4[379] = 809 Wave4[380] = 835 Wave4[381] = 864 Wave4[382] = 898 Wave4[383] = 934 Wave4[384] = 974 Wave4[385] = 1020 Wave4[386] = 1068 Wave4[387] = 1165 Wave4[388] = 1214 Wave4[389] = 1264 Wave4[390] = 1312 Wave4[391] = 1359 Wave4[392] = 1405 Wave4[393] = 1448 Wave4[394] = 1489 Wave4[395] = 1528 Wave4[396] = 1567 Wave4[397] = 1604 Wave4[398] = 1642 Wave4[399] = 1683 Wave4[400] = 1726 Wave4[401] = 1772 Wave4[402] = 1819 Wave4[403] = 1868 Wave4[404] = 1916 Wave4[405] = 1961 Wave4[406] = 1999 Wave4[407] = 2027 Wave4[408] = 2036 Wave4[409] = 2025 Wave4[410] = 1994 Wave4[411] = 1942 Wave4[412] = 1786 Wave4[413] = 1688 Wave4[414] = 1582 Wave4[415] = 1473 Wave4[416] = 1366 Wave4[417] = 1259 Wave4[418] = 1163 Wave4[419] = 1081 Wave4[420] = 1010 Wave4[421] = 949 Wave4[422] = 898 Wave4[423] = 855 Wave4[424] = 817 Wave4[425] = 785 Wave4[426] = 755 Wave4[427] = 727 Wave4[428] = 700 Wave4[429] = 674 Wave4[430] = 651 Wave4[431] = 629 Wave4[432] = 609 Wave4[433] = 592 Wave4[434] = 577 Wave4[435] = 564 Wave4[436] = 555 Wave4[437] = 548 Wave4[438] = 550 Wave4[439] = 558 Wave4[440] = 570 Wave4[441] = 587 Wave4[442] = 608 Wave4[443] = 633 Wave4[444] = 662 Wave4[445] = 693 Wave4[446] = 725 Wave4[447] = 758 Wave4[448] = 791 Wave4[449] = 822 Wave4[450] = 853 Wave4[451] = 881 Wave4[452] = 905 Wave4[453] = 926 Wave4[454] = 945 Wave4[455] = 960 Wave4[456] = 973 Wave4[457] = 984 Wave4[458] = 993 Wave4[459] = 1000 Wave4[460] = 1005 Wave4[461] = 1008 Wave4[462] = 1011 Wave4[463] = 1012 Wave4[464] = 1012 Wave4[465] = 1011 Wave4[466] = 1010 Wave4[467] = 1008 Wave4[468] = 1005 Wave4[469] = 1001 Wave4[470] = 997 Wave4[471] = 992 Wave4[472] = 987 Wave4[473] = 980 Wave4[474] = 974 Wave4[475] = 967 Wave4[476] = 960 Wave4[477] = 952 Wave4[478] = 943 Wave4[479] = 932 Wave4[480] = 919 Wave4[481] = 905 Wave4[482] = 890 Wave4[483] = 873 Wave4[484] = 854 Wave4[485] = 834 Wave4[486] = 813 Wave4[487] = 772 Wave4[488] = 751 Wave4[489] = 732 Wave4[490] = 714 Wave4[491] = 699 Wave4[492] = 686 Wave4[493] = 676 Wave4[494] = 670 Wave4[495] = 667 Wave4[496] = 666 Wave4[497] = 669 Wave4[498] = 674 Wave4[499] = 680 Wave4[500] = 687 Wave4[501] = 696 Wave4[502] = 707 Wave4[503] = 720 Wave4[504] = 735 Wave4[505] = 753 Wave4[506] = 772 Wave4[507] = 794 Wave4[508] = 820 Wave4[509] = 848 Wave4[510] = 880 Wave4[511] = 916 Wave4[512] = 996 Wave4[513] = 1041 Wave4[514] = 1088 Wave4[515] = 1139 Wave4[516] = 1190 Wave4[517] = 1239 Wave4[518] = 1289 Wave4[519] = 1337 Wave4[520] = 1385 Wave4[521] = 1430 Wave4[522] = 1473 Wave4[523] = 1514 Wave4[524] = 1554 Wave4[525] = 1593 Wave4[526] = 1634 Wave4[527] = 1677 Wave4[528] = 1722 Wave4[529] = 1770 Wave4[530] = 1819 Wave4[531] = 1869 Wave4[532] = 1918 Wave4[533] = 1965 Wave4[534] = 2005 Wave4[535] = 2034 Wave4[536] = 2040 Wave4[537] = 2009 Wave4[538] = 1959 Wave4[539] = 1888 Wave4[540] = 1803 Wave4[541] = 1705 Wave4[542] = 1599 Wave4[543] = 1490 Wave4[544] = 1382 Wave4[545] = 1279 Wave4[546] = 1186 Wave4[547] = 1102 Wave4[548] = 1025 Wave4[549] = 964 Wave4[550] = 913 Wave4[551] = 869 Wave4[552] = 832 Wave4[553] = 799 Wave4[554] = 770 Wave4[555] = 742 Wave4[556] = 715 Wave4[557] = 689 Wave4[558] = 664 Wave4[559] = 640 Wave4[560] = 618 Wave4[561] = 582 Wave4[562] = 568 Wave4[563] = 556 Wave4[564] = 549 Wave4[565] = 544 Wave4[566] = 544 Wave4[567] = 549 Wave4[568] = 559 Wave4[569] = 575 Wave4[570] = 597 Wave4[571] = 624 Wave4[572] = 653 Wave4[573] = 685 Wave4[574] = 718 Wave4[575] = 750 Wave4[576] = 782 Wave4[577] = 811 Wave4[578] = 838 Wave4[579] = 862 Wave4[580] = 884 Wave4[581] = 904 Wave4[582] = 920 Wave4[583] = 934 Wave4[584] = 946 Wave4[585] = 956 Wave4[586] = 970 Wave4[587] = 976 Wave4[588] = 981 Wave4[589] = 985 Wave4[590] = 989 Wave4[591] = 993 Wave4[592] = 996 Wave4[593] = 998 Wave4[594] = 1000 Wave4[595] = 1000 Wave4[596] = 1000 Wave4[597] = 999 Wave4[598] = 998 Wave4[599] = 995 Wave4[600] = 993 Wave4[601] = 989 Wave4[602] = 985 Wave4[603] = 979 Wave4[604] = 973 Wave4[605] = 967 Wave4[606] = 958 Wave4[607] = 948 Wave4[608] = 936 Wave4[609] = 923 Wave4[610] = 908 Wave4[611] = 874 Wave4[612] = 855 Wave4[613] = 833 Wave4[614] = 812 Wave4[615] = 791 Wave4[616] = 770 Wave4[617] = 751 Wave4[618] = 733 Wave4[619] = 718 Wave4[620] = 705 Wave4[621] = 695 Wave4[622] = 689 Wave4[623] = 684 Wave4[624] = 683 Wave4[625] = 685 Wave4[626] = 689 Wave4[627] = 695 Wave4[628] = 703 Wave4[629] = 711 Wave4[630] = 722 Wave4[631] = 733 Wave4[632] = 747 Wave4[633] = 763 Wave4[634] = 780 Wave4[635] = 801 Wave4[636] = 852 Wave4[637] = 883 Wave4[638] = 917 Wave4[639] = 954 Wave4[640] = 994 Wave4[641] = 1038 Wave4[642] = 1083 Wave4[643] = 1130 Wave4[644] = 1178 Wave4[645] = 1227 Wave4[646] = 1278 Wave4[647] = 1326 Wave4[648] = 1372 Wave4[649] = 1417 Wave4[650] = 1460 Wave4[651] = 1501 Wave4[652] = 1540 Wave4[653] = 1579 Wave4[654] = 1619 Wave4[655] = 1660 Wave4[656] = 1704 Wave4[657] = 1755 Wave4[658] = 1806 Wave4[659] = 1857 Wave4[660] = 1907 Wave4[661] = 1994 Wave4[662] = 2024 Wave4[663] = 2038 Wave4[664] = 2031 Wave4[665] = 2004 Wave4[666] = 1956 Wave4[667] = 1885 Wave4[668] = 1798 Wave4[669] = 1701 Wave4[670] = 1597 Wave4[671] = 1490 Wave4[672] = 1384 Wave4[673] = 1284 Wave4[674] = 1191 Wave4[675] = 1108 Wave4[676] = 1036 Wave4[677] = 973 Wave4[678] = 920 Wave4[679] = 874 Wave4[680] = 837 Wave4[681] = 804 Wave4[682] = 775 Wave4[683] = 747 Wave4[684] = 721 Wave4[685] = 696 Wave4[686] = 652 Wave4[687] = 633 Wave4[688] = 615 Wave4[689] = 597 Wave4[690] = 581 Wave4[691] = 568 Wave4[692] = 557 Wave4[693] = 550 Wave4[694] = 547 Wave4[695] = 549 Wave4[696] = 558 Wave4[697] = 572 Wave4[698] = 592 Wave4[699] = 616 Wave4[700] = 647 Wave4[701] = 680 Wave4[702] = 715 Wave4[703] = 749 Wave4[704] = 783 Wave4[705] = 815 Wave4[706] = 844 Wave4[707] = 871 Wave4[708] = 894 Wave4[709] = 914 Wave4[710] = 931 Wave4[711] = 956 Wave4[712] = 965 Wave4[713] = 972 Wave4[714] = 977 Wave4[715] = 981 Wave4[716] = 985 Wave4[717] = 989 Wave4[718] = 992 Wave4[719] = 995 Wave4[720] = 998 Wave4[721] = 999 Wave4[722] = 1000 Wave4[723] = 1001 Wave4[724] = 1001 Wave4[725] = 1000 Wave4[726] = 998 Wave4[727] = 995 Wave4[728] = 991 Wave4[729] = 987 Wave4[730] = 982 Wave4[731] = 976 Wave4[732] = 969 Wave4[733] = 961 Wave4[734] = 951 Wave4[735] = 941 Wave4[736] = 917 Wave4[737] = 902 Wave4[738] = 885 Wave4[739] = 868 Wave4[740] = 848 Wave4[741] = 828 Wave4[742] = 807 Wave4[743] = 784 Wave4[744] = 762 Wave4[745] = 743 Wave4[746] = 724 Wave4[747] = 706 Wave4[748] = 692 Wave4[749] = 681 Wave4[750] = 672 Wave4[751] = 667 Wave4[752] = 665 Wave4[753] = 667 Wave4[754] = 671 Wave4[755] = 679 Wave4[756] = 688 Wave4[757] = 699 Wave4[758] = 712 Wave4[759] = 726 Wave4[760] = 742 Wave4[761] = 779 Wave4[762] = 801 Wave4[763] = 826 Wave4[764] = 853 Wave4[765] = 886 Wave4[766] = 921 Wave4[767] = 958 Wave4[768] = 998 Wave4[769] = 1041 Wave4[770] = 1086 Wave4[771] = 1134 Wave4[772] = 1182 Wave4[773] = 1231 Wave4[774] = 1280 Wave4[775] = 1328 Wave4[776] = 1378 Wave4[777] = 1426 Wave4[778] = 1471 Wave4[779] = 1513 Wave4[780] = 1553 Wave4[781] = 1594 Wave4[782] = 1634 Wave4[783] = 1675 Wave4[784] = 1719 Wave4[785] = 1765 Wave4[786] = 1863 Wave4[787] = 1914 Wave4[788] = 1959 Wave4[789] = 1996 Wave4[790] = 2022 Wave4[791] = 2032 Wave4[792] = 2022 Wave4[793] = 1991 Wave4[794] = 1941 Wave4[795] = 1872 Wave4[796] = 1788 Wave4[797] = 1691 Wave4[798] = 1580 Wave4[799] = 1472 Wave4[800] = 1367 Wave4[801] = 1267 Wave4[802] = 1175 Wave4[803] = 1094 Wave4[804] = 1023 Wave4[805] = 962 Wave4[806] = 911 Wave4[807] = 869 Wave4[808] = 831 Wave4[809] = 798 Wave4[810] = 768 Wave4[811] = 716 Wave4[812] = 692 Wave4[813] = 670 Wave4[814] = 649 Wave4[815] = 629 Wave4[816] = 611 Wave4[817] = 595 Wave4[818] = 580 Wave4[819] = 569 Wave4[820] = 560 Wave4[821] = 556 Wave4[822] = 555 Wave4[823] = 559 Wave4[824] = 568 Wave4[825] = 582 Wave4[826] = 601 Wave4[827] = 625 Wave4[828] = 653 Wave4[829] = 683 Wave4[830] = 714 Wave4[831] = 748 Wave4[832] = 779 Wave4[833] = 808 Wave4[834] = 835 Wave4[835] = 861 Wave4[836] = 904 Wave4[837] = 922 Wave4[838] = 937 Wave4[839] = 950 Wave4[840] = 959 Wave4[841] = 967 Wave4[842] = 972 Wave4[843] = 976 Wave4[844] = 978 Wave4[845] = 980 Wave4[846] = 981 Wave4[847] = 983 Wave4[848] = 984 Wave4[849] = 986 Wave4[850] = 987 Wave4[851] = 989 Wave4[852] = 989 Wave4[853] = 989 Wave4[854] = 989 Wave4[855] = 988 Wave4[856] = 985 Wave4[857] = 982 Wave4[858] = 977 Wave4[859] = 972 Wave4[860] = 965 Wave4[861] = 946 Wave4[862] = 935 Wave4[863] = 921 Wave4[864] = 907 Wave4[865] = 893 Wave4[866] = 877 Wave4[867] = 860 Wave4[868] = 841 Wave4[869] = 821 Wave4[870] = 800 Wave4[871] = 779 Wave4[872] = 758 Wave4[873] = 738 Wave4[874] = 719 Wave4[875] = 703 Wave4[876] = 691 Wave4[877] = 681 Wave4[878] = 676 Wave4[879] = 673 Wave4[880] = 673 Wave4[881] = 677 Wave4[882] = 683 Wave4[883] = 692 Wave4[884] = 703 Wave4[885] = 714 Wave4[886] = 741 Wave4[887] = 757 Wave4[888] = 773 Wave4[889] = 792 Wave4[890] = 813 Wave4[891] = 837 Wave4[892] = 864 Wave4[893] = 895 Wave4[894] = 929 Wave4[895] = 966 Wave4[896] = 1008 Wave4[897] = 1051 Wave4[898] = 1096 Wave4[899] = 1143 Wave4[900] = 1191 Wave4[901] = 1240 Wave4[902] = 1288 Wave4[903] = 1335 Wave4[904] = 1380 Wave4[905] = 1423 Wave4[906] = 1465 Wave4[907] = 1507 Wave4[908] = 1546 Wave4[909] = 1583 Wave4[910] = 1621 Wave4[911] = 1705 Wave4[912] = 1752 Wave4[913] = 1801 Wave4[914] = 1851 Wave4[915] = 1901 Wave4[916] = 1948 Wave4[917] = 1991 Wave4[918] = 2022 Wave4[919] = 2035 Wave4[920] = 2027 Wave4[921] = 1997 Wave4[922] = 1947 Wave4[923] = 1878 Wave4[924] = 1792 Wave4[925] = 1694 Wave4[926] = 1588 Wave4[927] = 1479 Wave4[928] = 1370 Wave4[929] = 1262 Wave4[930] = 1170 Wave4[931] = 1088 Wave4[932] = 1018 Wave4[933] = 958 Wave4[934] = 908 Wave4[935] = 865 Wave4[936] = 796 Wave4[937] = 767 Wave4[938] = 739 Wave4[939] = 712 Wave4[940] = 688 Wave4[941] = 665 Wave4[942] = 645 Wave4[943] = 627 Wave4[944] = 611 Wave4[945] = 596 Wave4[946] = 583 Wave4[947] = 573 Wave4[948] = 566 Wave4[949] = 562 Wave4[950] = 562 Wave4[951] = 567 Wave4[952] = 577 Wave4[953] = 592 Wave4[954] = 612 Wave4[955] = 636 Wave4[956] = 664 Wave4[957] = 694 Wave4[958] = 726 Wave4[959] = 757 Wave4[960] = 789 Wave4[961] = 850 Wave4[962] = 875 Wave4[963] = 899 Wave4[964] = 919 Wave4[965] = 937 Wave4[966] = 952 Wave4[967] = 964 Wave4[968] = 974 Wave4[969] = 980 Wave4[970] = 985 Wave4[971] = 988 Wave4[972] = 989 Wave4[973] = 990 Wave4[974] = 991 Wave4[975] = 992 Wave4[976] = 992 Wave4[977] = 994 Wave4[978] = 995 Wave4[979] = 997 Wave4[980] = 998 Wave4[981] = 999 Wave4[982] = 1000 Wave4[983] = 999 Wave4[984] = 996 Wave4[985] = 992 Wave4[986] = 981 Wave4[987] = 973 Wave4[988] = 964 Wave4[989] = 954 Wave4[990] = 942 Wave4[991] = 929 Wave4[992] = 914 Wave4[993] = 898 Wave4[994] = 880 Wave4[995] = 861 Wave4[996] = 842 Wave4[997] = 822 Wave4[998] = 802 Wave4[999] = 781 Wave4[1000] = 760 Wave4[1001] = 740 Wave4[1002] = 722 Wave4[1003] = 705 Wave4[1004] = 692 Wave4[1005] = 681 Wave4[1006] = 674 Wave4[1007] = 670 Wave4[1008] = 670 Wave4[1009] = 672 Wave4[1010] = 678 Wave4[1011] = 696 Wave4[1012] = 707 Wave4[1013] = 721 Wave4[1014] = 735 Wave4[1015] = 752 Wave4[1016] = 771 Wave4[1017] = 791 Wave4[1018] = 813 Wave4[1019] = 838 Wave4[1020] = 867 Wave4[1021] = 899 Wave4[1022] = 934 Wave4[1023] = 1023 Return Teno_Wave5: ' derived from sample C:\b\pb\gmt\robots\flut\CA_eb_4p_corr.wav ' nr of periods = 4 ' done 06.10.2021 - gwr - kl on alto. ' used as input wave for calculation of excitation wave. Wave5[0] = 1077 Wave5[1] = 1183 Wave5[2] = 1306 Wave5[3] = 1435 Wave5[4] = 1562 Wave5[5] = 1682 Wave5[6] = 1792 Wave5[7] = 1889 Wave5[8] = 1998 Wave5[9] = 2031 Wave5[10] = 2028 Wave5[11] = 1981 Wave5[12] = 1899 Wave5[13] = 1790 Wave5[14] = 1661 Wave5[15] = 1518 Wave5[16] = 1371 Wave5[17] = 1171 Wave5[18] = 1060 Wave5[19] = 983 Wave5[20] = 939 Wave5[21] = 936 Wave5[22] = 973 Wave5[23] = 1024 Wave5[24] = 1078 Wave5[25] = 1109 Wave5[26] = 1062 Wave5[27] = 959 Wave5[28] = 822 Wave5[29] = 676 Wave5[30] = 549 Wave5[31] = 460 Wave5[32] = 411 Wave5[33] = 405 Wave5[34] = 460 Wave5[35] = 521 Wave5[36] = 584 Wave5[37] = 643 Wave5[38] = 681 Wave5[39] = 705 Wave5[40] = 717 Wave5[41] = 725 Wave5[42] = 741 Wave5[43] = 761 Wave5[44] = 788 Wave5[45] = 822 Wave5[46] = 858 Wave5[47] = 898 Wave5[48] = 935 Wave5[49] = 967 Wave5[50] = 995 Wave5[51] = 992 Wave5[52] = 980 Wave5[53] = 965 Wave5[54] = 959 Wave5[55] = 964 Wave5[56] = 979 Wave5[57] = 991 Wave5[58] = 997 Wave5[59] = 1003 Wave5[60] = 1009 Wave5[61] = 1021 Wave5[62] = 1032 Wave5[63] = 1037 Wave5[64] = 1037 Wave5[65] = 1034 Wave5[66] = 1035 Wave5[67] = 1049 Wave5[68] = 1062 Wave5[69] = 1073 Wave5[70] = 1071 Wave5[71] = 1058 Wave5[72] = 1031 Wave5[73] = 997 Wave5[74] = 964 Wave5[75] = 922 Wave5[76] = 901 Wave5[77] = 893 Wave5[78] = 894 Wave5[79] = 907 Wave5[80] = 931 Wave5[81] = 964 Wave5[82] = 998 Wave5[83] = 1031 Wave5[84] = 1065 Wave5[85] = 1082 Wave5[86] = 1101 Wave5[87] = 1121 Wave5[88] = 1143 Wave5[89] = 1162 Wave5[90] = 1175 Wave5[91] = 1185 Wave5[92] = 1190 Wave5[93] = 1188 Wave5[94] = 1181 Wave5[95] = 1168 Wave5[96] = 1150 Wave5[97] = 1126 Wave5[98] = 1100 Wave5[99] = 1074 Wave5[100] = 1052 Wave5[101] = 1026 Wave5[102] = 1012 Wave5[103] = 1002 Wave5[104] = 993 Wave5[105] = 987 Wave5[106] = 982 Wave5[107] = 979 Wave5[108] = 976 Wave5[109] = 967 Wave5[110] = 951 Wave5[111] = 927 Wave5[112] = 896 Wave5[113] = 863 Wave5[114] = 833 Wave5[115] = 804 Wave5[116] = 777 Wave5[117] = 731 Wave5[118] = 696 Wave5[119] = 668 Wave5[120] = 652 Wave5[121] = 653 Wave5[122] = 671 Wave5[123] = 704 Wave5[124] = 746 Wave5[125] = 800 Wave5[126] = 903 Wave5[127] = 985 Wave5[128] = 1086 Wave5[129] = 1199 Wave5[130] = 1324 Wave5[131] = 1454 Wave5[132] = 1581 Wave5[133] = 1703 Wave5[134] = 1865 Wave5[135] = 1954 Wave5[136] = 2016 Wave5[137] = 2046 Wave5[138] = 2038 Wave5[139] = 1990 Wave5[140] = 1905 Wave5[141] = 1790 Wave5[142] = 1583 Wave5[143] = 1431 Wave5[144] = 1287 Wave5[145] = 1157 Wave5[146] = 1047 Wave5[147] = 969 Wave5[148] = 928 Wave5[149] = 928 Wave5[150] = 971 Wave5[151] = 1062 Wave5[152] = 1106 Wave5[153] = 1114 Wave5[154] = 1060 Wave5[155] = 955 Wave5[156] = 819 Wave5[157] = 672 Wave5[158] = 547 Wave5[159] = 430 Wave5[160] = 406 Wave5[161] = 417 Wave5[162] = 463 Wave5[163] = 523 Wave5[164] = 586 Wave5[165] = 641 Wave5[166] = 677 Wave5[167] = 699 Wave5[168] = 717 Wave5[169] = 726 Wave5[170] = 740 Wave5[171] = 761 Wave5[172] = 788 Wave5[173] = 819 Wave5[174] = 854 Wave5[175] = 893 Wave5[176] = 952 Wave5[177] = 979 Wave5[178] = 992 Wave5[179] = 989 Wave5[180] = 978 Wave5[181] = 968 Wave5[182] = 967 Wave5[183] = 973 Wave5[184] = 991 Wave5[185] = 1001 Wave5[186] = 1008 Wave5[187] = 1015 Wave5[188] = 1021 Wave5[189] = 1028 Wave5[190] = 1031 Wave5[191] = 1030 Wave5[192] = 1027 Wave5[193] = 1025 Wave5[194] = 1032 Wave5[195] = 1048 Wave5[196] = 1063 Wave5[197] = 1075 Wave5[198] = 1075 Wave5[199] = 1057 Wave5[200] = 1028 Wave5[201] = 977 Wave5[202] = 946 Wave5[203] = 922 Wave5[204] = 903 Wave5[205] = 895 Wave5[206] = 895 Wave5[207] = 906 Wave5[208] = 930 Wave5[209] = 980 Wave5[210] = 1014 Wave5[211] = 1043 Wave5[212] = 1065 Wave5[213] = 1082 Wave5[214] = 1100 Wave5[215] = 1119 Wave5[216] = 1140 Wave5[217] = 1159 Wave5[218] = 1179 Wave5[219] = 1186 Wave5[220] = 1187 Wave5[221] = 1183 Wave5[222] = 1173 Wave5[223] = 1160 Wave5[224] = 1143 Wave5[225] = 1123 Wave5[226] = 1089 Wave5[227] = 1065 Wave5[228] = 1042 Wave5[229] = 1025 Wave5[230] = 1012 Wave5[231] = 1003 Wave5[232] = 994 Wave5[233] = 986 Wave5[234] = 977 Wave5[235] = 970 Wave5[236] = 967 Wave5[237] = 961 Wave5[238] = 946 Wave5[239] = 924 Wave5[240] = 895 Wave5[241] = 861 Wave5[242] = 826 Wave5[243] = 776 Wave5[244] = 751 Wave5[245] = 729 Wave5[246] = 705 Wave5[247] = 683 Wave5[248] = 666 Wave5[249] = 659 Wave5[250] = 674 Wave5[251] = 725 Wave5[252] = 778 Wave5[253] = 841 Wave5[254] = 910 Wave5[255] = 992 Wave5[256] = 1093 Wave5[257] = 1214 Wave5[258] = 1347 Wave5[259] = 1484 Wave5[260] = 1680 Wave5[261] = 1797 Wave5[262] = 1900 Wave5[263] = 1980 Wave5[264] = 2030 Wave5[265] = 2045 Wave5[266] = 2021 Wave5[267] = 1957 Wave5[268] = 1804 Wave5[269] = 1677 Wave5[270] = 1537 Wave5[271] = 1390 Wave5[272] = 1254 Wave5[273] = 1134 Wave5[274] = 1037 Wave5[275] = 977 Wave5[276] = 956 Wave5[277] = 984 Wave5[278] = 1042 Wave5[279] = 1102 Wave5[280] = 1142 Wave5[281] = 1138 Wave5[282] = 1065 Wave5[283] = 938 Wave5[284] = 784 Wave5[285] = 565 Wave5[286] = 460 Wave5[287] = 398 Wave5[288] = 381 Wave5[289] = 402 Wave5[290] = 458 Wave5[291] = 526 Wave5[292] = 593 Wave5[293] = 665 Wave5[294] = 690 Wave5[295] = 703 Wave5[296] = 714 Wave5[297] = 723 Wave5[298] = 739 Wave5[299] = 760 Wave5[300] = 790 Wave5[301] = 825 Wave5[302] = 887 Wave5[303] = 930 Wave5[304] = 967 Wave5[305] = 993 Wave5[306] = 1002 Wave5[307] = 995 Wave5[308] = 981 Wave5[309] = 968 Wave5[310] = 967 Wave5[311] = 976 Wave5[312] = 984 Wave5[313] = 989 Wave5[314] = 993 Wave5[315] = 1000 Wave5[316] = 1009 Wave5[317] = 1019 Wave5[318] = 1030 Wave5[319] = 1031 Wave5[320] = 1033 Wave5[321] = 1037 Wave5[322] = 1045 Wave5[323] = 1061 Wave5[324] = 1075 Wave5[325] = 1084 Wave5[326] = 1079 Wave5[327] = 1042 Wave5[328] = 1006 Wave5[329] = 968 Wave5[330] = 936 Wave5[331] = 911 Wave5[332] = 895 Wave5[333] = 887 Wave5[334] = 888 Wave5[335] = 915 Wave5[336] = 947 Wave5[337] = 983 Wave5[338] = 1017 Wave5[339] = 1048 Wave5[340] = 1073 Wave5[341] = 1094 Wave5[342] = 1115 Wave5[343] = 1144 Wave5[344] = 1159 Wave5[345] = 1174 Wave5[346] = 1186 Wave5[347] = 1194 Wave5[348] = 1197 Wave5[349] = 1191 Wave5[350] = 1178 Wave5[351] = 1162 Wave5[352] = 1131 Wave5[353] = 1105 Wave5[354] = 1075 Wave5[355] = 1047 Wave5[356] = 1026 Wave5[357] = 1014 Wave5[358] = 1005 Wave5[359] = 1001 Wave5[360] = 992 Wave5[361] = 989 Wave5[362] = 983 Wave5[363] = 978 Wave5[364] = 968 Wave5[365] = 953 Wave5[366] = 932 Wave5[367] = 905 Wave5[368] = 873 Wave5[369] = 827 Wave5[370] = 800 Wave5[371] = 775 Wave5[372] = 748 Wave5[373] = 718 Wave5[374] = 689 Wave5[375] = 667 Wave5[376] = 656 Wave5[377] = 670 Wave5[378] = 707 Wave5[379] = 761 Wave5[380] = 827 Wave5[381] = 898 Wave5[382] = 967 Wave5[383] = 1047 Wave5[384] = 1143 Wave5[385] = 1315 Wave5[386] = 1436 Wave5[387] = 1555 Wave5[388] = 1665 Wave5[389] = 1765 Wave5[390] = 1853 Wave5[391] = 1923 Wave5[392] = 1968 Wave5[393] = 1986 Wave5[394] = 1946 Wave5[395] = 1877 Wave5[396] = 1782 Wave5[397] = 1670 Wave5[398] = 1545 Wave5[399] = 1412 Wave5[400] = 1286 Wave5[401] = 1170 Wave5[402] = 1031 Wave5[403] = 982 Wave5[404] = 973 Wave5[405] = 1005 Wave5[406] = 1063 Wave5[407] = 1118 Wave5[408] = 1146 Wave5[409] = 1123 Wave5[410] = 978 Wave5[411] = 831 Wave5[412] = 673 Wave5[413] = 534 Wave5[414] = 433 Wave5[415] = 378 Wave5[416] = 374 Wave5[417] = 407 Wave5[418] = 466 Wave5[419] = 566 Wave5[420] = 624 Wave5[421] = 665 Wave5[422] = 691 Wave5[423] = 708 Wave5[424] = 720 Wave5[425] = 734 Wave5[426] = 751 Wave5[427] = 790 Wave5[428] = 824 Wave5[429] = 860 Wave5[430] = 900 Wave5[431] = 937 Wave5[432] = 968 Wave5[433] = 986 Wave5[434] = 992 Wave5[435] = 985 Wave5[436] = 968 Wave5[437] = 961 Wave5[438] = 960 Wave5[439] = 967 Wave5[440] = 975 Wave5[441] = 983 Wave5[442] = 992 Wave5[443] = 1002 Wave5[444] = 1020 Wave5[445] = 1030 Wave5[446] = 1035 Wave5[447] = 1034 Wave5[448] = 1032 Wave5[449] = 1034 Wave5[450] = 1043 Wave5[451] = 1060 Wave5[452] = 1080 Wave5[453] = 1081 Wave5[454] = 1066 Wave5[455] = 1038 Wave5[456] = 1004 Wave5[457] = 970 Wave5[458] = 939 Wave5[459] = 916 Wave5[460] = 901 Wave5[461] = 895 Wave5[462] = 903 Wave5[463] = 924 Wave5[464] = 957 Wave5[465] = 995 Wave5[466] = 1029 Wave5[467] = 1058 Wave5[468] = 1079 Wave5[469] = 1106 Wave5[470] = 1124 Wave5[471] = 1143 Wave5[472] = 1159 Wave5[473] = 1173 Wave5[474] = 1180 Wave5[475] = 1184 Wave5[476] = 1183 Wave5[477] = 1172 Wave5[478] = 1160 Wave5[479] = 1145 Wave5[480] = 1128 Wave5[481] = 1106 Wave5[482] = 1083 Wave5[483] = 1057 Wave5[484] = 1034 Wave5[485] = 1017 Wave5[486] = 1001 Wave5[487] = 996 Wave5[488] = 992 Wave5[489] = 988 Wave5[490] = 984 Wave5[491] = 978 Wave5[492] = 966 Wave5[493] = 949 Wave5[494] = 913 Wave5[495] = 886 Wave5[496] = 859 Wave5[497] = 836 Wave5[498] = 812 Wave5[499] = 785 Wave5[500] = 758 Wave5[501] = 729 Wave5[502] = 700 Wave5[503] = 671 Wave5[504] = 664 Wave5[505] = 673 Wave5[506] = 701 Wave5[507] = 741 Wave5[508] = 797 Wave5[509] = 863 Wave5[510] = 934 Wave5[511] = 1023 Return Teno_Wave6: ' = Hunt_Wave6: ' = So_Wave7: - now used for Hunt as Hunt_Wave6 ' = Trumpeter_Wave6 ' 03-06-2020 ' derived from sample c:\b\pb\gmt\robots\so\tuba4p_2.wav ' nr of periods = 4 ' original pitch 41 (F3) ' used in as Wave7. ' 01.12.2020: in ' 08.10.2021: a bit too round for Wave6[0] = 1023 Wave6[1] = 1048 Wave6[2] = 1070 Wave6[3] = 1098 Wave6[4] = 1123 Wave6[5] = 1146 Wave6[6] = 1171 Wave6[7] = 1198 Wave6[8] = 1231 Wave6[9] = 1261 Wave6[10] = 1293 Wave6[11] = 1324 Wave6[12] = 1357 Wave6[13] = 1393 Wave6[14] = 1429 Wave6[15] = 1469 Wave6[16] = 1513 Wave6[17] = 1559 Wave6[18] = 1604 Wave6[19] = 1626 Wave6[20] = 1677 Wave6[21] = 1724 Wave6[22] = 1754 Wave6[23] = 1768 Wave6[24] = 1764 Wave6[25] = 1738 Wave6[26] = 1679 Wave6[27] = 1586 Wave6[28] = 1462 Wave6[29] = 1302 Wave6[30] = 1115 Wave6[31] = 901 Wave6[32] = 683 Wave6[33] = 488 Wave6[34] = 320 Wave6[35] = 186 Wave6[36] = 96 Wave6[37] = 47 Wave6[38] = 34 Wave6[39] = 35 Wave6[40] = 69 Wave6[41] = 135 Wave6[42] = 219 Wave6[43] = 317 Wave6[44] = 427 Wave6[45] = 530 Wave6[46] = 633 Wave6[47] = 744 Wave6[48] = 835 Wave6[49] = 916 Wave6[50] = 990 Wave6[51] = 1037 Wave6[52] = 1073 Wave6[53] = 1098 Wave6[54] = 1121 Wave6[55] = 1133 Wave6[56] = 1135 Wave6[57] = 1138 Wave6[58] = 1135 Wave6[59] = 1131 Wave6[60] = 1138 Wave6[61] = 1140 Wave6[62] = 1144 Wave6[63] = 1147 Wave6[64] = 1143 Wave6[65] = 1137 Wave6[66] = 1131 Wave6[67] = 1132 Wave6[68] = 1124 Wave6[69] = 1113 Wave6[70] = 1100 Wave6[71] = 1086 Wave6[72] = 1072 Wave6[73] = 1060 Wave6[74] = 1046 Wave6[75] = 1034 Wave6[76] = 1030 Wave6[77] = 1027 Wave6[78] = 1025 Wave6[79] = 1024 Wave6[80] = 1030 Wave6[81] = 1040 Wave6[82] = 1045 Wave6[83] = 1050 Wave6[84] = 1048 Wave6[85] = 1046 Wave6[86] = 1042 Wave6[87] = 1039 Wave6[88] = 1028 Wave6[89] = 1017 Wave6[90] = 1007 Wave6[91] = 995 Wave6[92] = 988 Wave6[93] = 986 Wave6[94] = 992 Wave6[95] = 993 Wave6[96] = 999 Wave6[97] = 1004 Wave6[98] = 1005 Wave6[99] = 1006 Wave6[100] = 1004 Wave6[101] = 1000 Wave6[102] = 994 Wave6[103] = 983 Wave6[104] = 972 Wave6[105] = 968 Wave6[106] = 964 Wave6[107] = 960 Wave6[108] = 955 Wave6[109] = 946 Wave6[110] = 935 Wave6[111] = 918 Wave6[112] = 904 Wave6[113] = 894 Wave6[114] = 889 Wave6[115] = 881 Wave6[116] = 877 Wave6[117] = 878 Wave6[118] = 884 Wave6[119] = 892 Wave6[120] = 902 Wave6[121] = 915 Wave6[122] = 932 Wave6[123] = 952 Wave6[124] = 972 Wave6[125] = 995 Wave6[126] = 1016 Wave6[127] = 1035 Wave6[128] = 1048 Wave6[129] = 1063 Wave6[130] = 1080 Wave6[131] = 1100 Wave6[132] = 1110 Wave6[133] = 1132 Wave6[134] = 1160 Wave6[135] = 1189 Wave6[136] = 1223 Wave6[137] = 1253 Wave6[138] = 1283 Wave6[139] = 1314 Wave6[140] = 1352 Wave6[141] = 1384 Wave6[142] = 1419 Wave6[143] = 1462 Wave6[144] = 1505 Wave6[145] = 1551 Wave6[146] = 1595 Wave6[147] = 1645 Wave6[148] = 1697 Wave6[149] = 1742 Wave6[150] = 1769 Wave6[151] = 1776 Wave6[152] = 1781 Wave6[153] = 1761 Wave6[154] = 1702 Wave6[155] = 1609 Wave6[156] = 1488 Wave6[157] = 1330 Wave6[158] = 1140 Wave6[159] = 927 Wave6[160] = 703 Wave6[161] = 500 Wave6[162] = 320 Wave6[163] = 173 Wave6[164] = 78 Wave6[165] = 25 Wave6[166] = 10 Wave6[167] = 33 Wave6[168] = 84 Wave6[169] = 158 Wave6[170] = 202 Wave6[171] = 305 Wave6[172] = 418 Wave6[173] = 522 Wave6[174] = 635 Wave6[175] = 744 Wave6[176] = 833 Wave6[177] = 923 Wave6[178] = 993 Wave6[179] = 1038 Wave6[180] = 1076 Wave6[181] = 1101 Wave6[182] = 1119 Wave6[183] = 1127 Wave6[184] = 1134 Wave6[185] = 1133 Wave6[186] = 1134 Wave6[187] = 1140 Wave6[188] = 1139 Wave6[189] = 1137 Wave6[190] = 1143 Wave6[191] = 1146 Wave6[192] = 1145 Wave6[193] = 1142 Wave6[194] = 1141 Wave6[195] = 1136 Wave6[196] = 1127 Wave6[197] = 1115 Wave6[198] = 1100 Wave6[199] = 1084 Wave6[200] = 1072 Wave6[201] = 1057 Wave6[202] = 1044 Wave6[203] = 1035 Wave6[204] = 1029 Wave6[205] = 1025 Wave6[206] = 1027 Wave6[207] = 1027 Wave6[208] = 1030 Wave6[209] = 1039 Wave6[210] = 1045 Wave6[211] = 1049 Wave6[212] = 1051 Wave6[213] = 1050 Wave6[214] = 1045 Wave6[215] = 1040 Wave6[216] = 1031 Wave6[217] = 1019 Wave6[218] = 1008 Wave6[219] = 1000 Wave6[220] = 994 Wave6[221] = 991 Wave6[222] = 992 Wave6[223] = 992 Wave6[224] = 997 Wave6[225] = 1001 Wave6[226] = 1003 Wave6[227] = 1003 Wave6[228] = 1000 Wave6[229] = 998 Wave6[230] = 989 Wave6[231] = 979 Wave6[232] = 970 Wave6[233] = 963 Wave6[234] = 957 Wave6[235] = 948 Wave6[236] = 937 Wave6[237] = 929 Wave6[238] = 919 Wave6[239] = 910 Wave6[240] = 901 Wave6[241] = 897 Wave6[242] = 895 Wave6[243] = 896 Wave6[244] = 898 Wave6[245] = 903 Wave6[246] = 904 Wave6[247] = 908 Wave6[248] = 911 Wave6[249] = 920 Wave6[250] = 933 Wave6[251] = 951 Wave6[252] = 971 Wave6[253] = 994 Wave6[254] = 1011 Wave6[255] = 1022 Wave6[256] = 1034 Wave6[257] = 1046 Wave6[258] = 1064 Wave6[259] = 1089 Wave6[260] = 1116 Wave6[261] = 1150 Wave6[262] = 1181 Wave6[263] = 1210 Wave6[264] = 1239 Wave6[265] = 1252 Wave6[266] = 1286 Wave6[267] = 1318 Wave6[268] = 1352 Wave6[269] = 1389 Wave6[270] = 1429 Wave6[271] = 1474 Wave6[272] = 1523 Wave6[273] = 1572 Wave6[274] = 1618 Wave6[275] = 1667 Wave6[276] = 1718 Wave6[277] = 1758 Wave6[278] = 1783 Wave6[279] = 1795 Wave6[280] = 1779 Wave6[281] = 1732 Wave6[282] = 1645 Wave6[283] = 1523 Wave6[284] = 1453 Wave6[285] = 1285 Wave6[286] = 1089 Wave6[287] = 876 Wave6[288] = 666 Wave6[289] = 476 Wave6[290] = 313 Wave6[291] = 183 Wave6[292] = 97 Wave6[293] = 40 Wave6[294] = 19 Wave6[295] = 32 Wave6[296] = 74 Wave6[297] = 151 Wave6[298] = 253 Wave6[299] = 371 Wave6[300] = 491 Wave6[301] = 603 Wave6[302] = 711 Wave6[303] = 757 Wave6[304] = 844 Wave6[305] = 925 Wave6[306] = 989 Wave6[307] = 1037 Wave6[308] = 1074 Wave6[309] = 1099 Wave6[310] = 1120 Wave6[311] = 1134 Wave6[312] = 1139 Wave6[313] = 1135 Wave6[314] = 1136 Wave6[315] = 1133 Wave6[316] = 1133 Wave6[317] = 1134 Wave6[318] = 1141 Wave6[319] = 1146 Wave6[320] = 1147 Wave6[321] = 1147 Wave6[322] = 1146 Wave6[323] = 1141 Wave6[324] = 1135 Wave6[325] = 1120 Wave6[326] = 1099 Wave6[327] = 1080 Wave6[328] = 1061 Wave6[329] = 1045 Wave6[330] = 1033 Wave6[331] = 1024 Wave6[332] = 1020 Wave6[333] = 1021 Wave6[334] = 1023 Wave6[335] = 1025 Wave6[336] = 1034 Wave6[337] = 1043 Wave6[338] = 1050 Wave6[339] = 1055 Wave6[340] = 1057 Wave6[341] = 1057 Wave6[342] = 1051 Wave6[343] = 1044 Wave6[344] = 1033 Wave6[345] = 1020 Wave6[346] = 1010 Wave6[347] = 998 Wave6[348] = 994 Wave6[349] = 994 Wave6[350] = 995 Wave6[351] = 1000 Wave6[352] = 1001 Wave6[353] = 1001 Wave6[354] = 1001 Wave6[355] = 999 Wave6[356] = 997 Wave6[357] = 994 Wave6[358] = 985 Wave6[359] = 974 Wave6[360] = 968 Wave6[361] = 962 Wave6[362] = 951 Wave6[363] = 940 Wave6[364] = 931 Wave6[365] = 921 Wave6[366] = 914 Wave6[367] = 908 Wave6[368] = 901 Wave6[369] = 901 Wave6[370] = 905 Wave6[371] = 909 Wave6[372] = 909 Wave6[373] = 915 Wave6[374] = 917 Wave6[375] = 919 Wave6[376] = 922 Wave6[377] = 929 Wave6[378] = 940 Wave6[379] = 948 Wave6[380] = 963 Wave6[381] = 987 Wave6[382] = 1003 Wave6[383] = 1018 Wave6[384] = 1035 Wave6[385] = 1048 Wave6[386] = 1067 Wave6[387] = 1090 Wave6[388] = 1118 Wave6[389] = 1148 Wave6[390] = 1180 Wave6[391] = 1213 Wave6[392] = 1241 Wave6[393] = 1273 Wave6[394] = 1307 Wave6[395] = 1341 Wave6[396] = 1379 Wave6[397] = 1399 Wave6[398] = 1440 Wave6[399] = 1483 Wave6[400] = 1532 Wave6[401] = 1583 Wave6[402] = 1627 Wave6[403] = 1676 Wave6[404] = 1723 Wave6[405] = 1755 Wave6[406] = 1774 Wave6[407] = 1782 Wave6[408] = 1762 Wave6[409] = 1712 Wave6[410] = 1629 Wave6[411] = 1513 Wave6[412] = 1365 Wave6[413] = 1184 Wave6[414] = 978 Wave6[415] = 758 Wave6[416] = 650 Wave6[417] = 453 Wave6[418] = 278 Wave6[419] = 141 Wave6[420] = 54 Wave6[421] = 8 Wave6[422] = 2 Wave6[423] = 38 Wave6[424] = 102 Wave6[425] = 183 Wave6[426] = 281 Wave6[427] = 397 Wave6[428] = 508 Wave6[429] = 615 Wave6[430] = 721 Wave6[431] = 813 Wave6[432] = 903 Wave6[433] = 980 Wave6[434] = 1030 Wave6[435] = 1046 Wave6[436] = 1079 Wave6[437] = 1107 Wave6[438] = 1125 Wave6[439] = 1132 Wave6[440] = 1135 Wave6[441] = 1132 Wave6[442] = 1132 Wave6[443] = 1138 Wave6[444] = 1139 Wave6[445] = 1138 Wave6[446] = 1146 Wave6[447] = 1144 Wave6[448] = 1142 Wave6[449] = 1142 Wave6[450] = 1139 Wave6[451] = 1131 Wave6[452] = 1118 Wave6[453] = 1104 Wave6[454] = 1095 Wave6[455] = 1076 Wave6[456] = 1061 Wave6[457] = 1043 Wave6[458] = 1030 Wave6[459] = 1022 Wave6[460] = 1019 Wave6[461] = 1019 Wave6[462] = 1020 Wave6[463] = 1029 Wave6[464] = 1037 Wave6[465] = 1044 Wave6[466] = 1050 Wave6[467] = 1052 Wave6[468] = 1055 Wave6[469] = 1050 Wave6[470] = 1046 Wave6[471] = 1037 Wave6[472] = 1024 Wave6[473] = 1019 Wave6[474] = 1007 Wave6[475] = 997 Wave6[476] = 991 Wave6[477] = 989 Wave6[478] = 989 Wave6[479] = 994 Wave6[480] = 997 Wave6[481] = 996 Wave6[482] = 997 Wave6[483] = 994 Wave6[484] = 988 Wave6[485] = 984 Wave6[486] = 975 Wave6[487] = 968 Wave6[488] = 960 Wave6[489] = 956 Wave6[490] = 950 Wave6[491] = 943 Wave6[492] = 938 Wave6[493] = 932 Wave6[494] = 925 Wave6[495] = 919 Wave6[496] = 912 Wave6[497] = 907 Wave6[498] = 905 Wave6[499] = 904 Wave6[500] = 906 Wave6[501] = 915 Wave6[502] = 921 Wave6[503] = 927 Wave6[504] = 936 Wave6[505] = 951 Wave6[506] = 966 Wave6[507] = 979 Wave6[508] = 994 Wave6[509] = 1011 Wave6[510] = 1018 Wave6[511] = 1023 Return 'Trumpeter_Wave7: ' ' Sine_Wave: ' For i = 0 To 255 ' Wave7[i] = (1.0 + Sin(angle7 * i)) * PWM_reset ' Next i 'Return Teno_Wave7: ' derived from sample C:\b\pb\gmt\robots\flut\CA_valve.wav ' recorded with wave5 as input and semitone valve depressed ' 07.10.2021 gwr ' nr of periods = 4 Wave7[0] = 1104 Wave7[1] = 1244 Wave7[2] = 1377 Wave7[3] = 1494 Wave7[4] = 1613 Wave7[5] = 1772 Wave7[6] = 1840 Wave7[7] = 1874 Wave7[8] = 1898 Wave7[9] = 1932 Wave7[10] = 1898 Wave7[11] = 1819 Wave7[12] = 1709 Wave7[13] = 1561 Wave7[14] = 1327 Wave7[15] = 1171 Wave7[16] = 1028 Wave7[17] = 915 Wave7[18] = 816 Wave7[19] = 802 Wave7[20] = 796 Wave7[21] = 791 Wave7[22] = 794 Wave7[23] = 779 Wave7[24] = 773 Wave7[25] = 768 Wave7[26] = 757 Wave7[27] = 720 Wave7[28] = 678 Wave7[29] = 630 Wave7[30] = 593 Wave7[31] = 567 Wave7[32] = 547 Wave7[33] = 531 Wave7[34] = 513 Wave7[35] = 493 Wave7[36] = 485 Wave7[37] = 512 Wave7[38] = 564 Wave7[39] = 635 Wave7[40] = 725 Wave7[41] = 883 Wave7[42] = 992 Wave7[43] = 1095 Wave7[44] = 1191 Wave7[45] = 1275 Wave7[46] = 1390 Wave7[47] = 1465 Wave7[48] = 1537 Wave7[49] = 1593 Wave7[50] = 1634 Wave7[51] = 1624 Wave7[52] = 1593 Wave7[53] = 1541 Wave7[54] = 1473 Wave7[55] = 1336 Wave7[56] = 1233 Wave7[57] = 1130 Wave7[58] = 1037 Wave7[59] = 912 Wave7[60] = 845 Wave7[61] = 791 Wave7[62] = 746 Wave7[63] = 709 Wave7[64] = 690 Wave7[65] = 702 Wave7[66] = 740 Wave7[67] = 793 Wave7[68] = 879 Wave7[69] = 923 Wave7[70] = 953 Wave7[71] = 978 Wave7[72] = 1005 Wave7[73] = 1042 Wave7[74] = 1058 Wave7[75] = 1072 Wave7[76] = 1080 Wave7[77] = 1076 Wave7[78] = 1055 Wave7[79] = 1044 Wave7[80] = 1039 Wave7[81] = 1041 Wave7[82] = 1055 Wave7[83] = 1073 Wave7[84] = 1092 Wave7[85] = 1111 Wave7[86] = 1129 Wave7[87] = 1163 Wave7[88] = 1200 Wave7[89] = 1236 Wave7[90] = 1262 Wave7[91] = 1283 Wave7[92] = 1281 Wave7[93] = 1256 Wave7[94] = 1221 Wave7[95] = 1182 Wave7[96] = 1112 Wave7[97] = 1057 Wave7[98] = 1006 Wave7[99] = 960 Wave7[100] = 894 Wave7[101] = 861 Wave7[102] = 832 Wave7[103] = 810 Wave7[104] = 798 Wave7[105] = 840 Wave7[106] = 916 Wave7[107] = 980 Wave7[108] = 1019 Wave7[109] = 1042 Wave7[110] = 1039 Wave7[111] = 1034 Wave7[112] = 1016 Wave7[113] = 988 Wave7[114] = 912 Wave7[115] = 829 Wave7[116] = 742 Wave7[117] = 667 Wave7[118] = 609 Wave7[119] = 544 Wave7[120] = 506 Wave7[121] = 479 Wave7[122] = 474 Wave7[123] = 512 Wave7[124] = 570 Wave7[125] = 650 Wave7[126] = 746 Wave7[127] = 851 Wave7[128] = 1034 Wave7[129] = 1179 Wave7[130] = 1324 Wave7[131] = 1463 Wave7[132] = 1655 Wave7[133] = 1778 Wave7[134] = 1869 Wave7[135] = 1936 Wave7[136] = 2002 Wave7[137] = 2042 Wave7[138] = 1985 Wave7[139] = 1889 Wave7[140] = 1757 Wave7[141] = 1507 Wave7[142] = 1330 Wave7[143] = 1151 Wave7[144] = 987 Wave7[145] = 856 Wave7[146] = 743 Wave7[147] = 725 Wave7[148] = 717 Wave7[149] = 716 Wave7[150] = 714 Wave7[151] = 710 Wave7[152] = 725 Wave7[153] = 735 Wave7[154] = 742 Wave7[155] = 733 Wave7[156] = 703 Wave7[157] = 666 Wave7[158] = 634 Wave7[159] = 608 Wave7[160] = 583 Wave7[161] = 565 Wave7[162] = 541 Wave7[163] = 517 Wave7[164] = 513 Wave7[165] = 534 Wave7[166] = 576 Wave7[167] = 637 Wave7[168] = 723 Wave7[169] = 881 Wave7[170] = 987 Wave7[171] = 1089 Wave7[172] = 1187 Wave7[173] = 1321 Wave7[174] = 1400 Wave7[175] = 1477 Wave7[176] = 1552 Wave7[177] = 1613 Wave7[178] = 1651 Wave7[179] = 1642 Wave7[180] = 1615 Wave7[181] = 1567 Wave7[182] = 1448 Wave7[183] = 1348 Wave7[184] = 1237 Wave7[185] = 1130 Wave7[186] = 1030 Wave7[187] = 901 Wave7[188] = 830 Wave7[189] = 766 Wave7[190] = 713 Wave7[191] = 674 Wave7[192] = 654 Wave7[193] = 670 Wave7[194] = 711 Wave7[195] = 773 Wave7[196] = 861 Wave7[197] = 906 Wave7[198] = 943 Wave7[199] = 976 Wave7[200] = 1006 Wave7[201] = 1038 Wave7[202] = 1056 Wave7[203] = 1073 Wave7[204] = 1082 Wave7[205] = 1076 Wave7[206] = 1064 Wave7[207] = 1054 Wave7[208] = 1049 Wave7[209] = 1049 Wave7[210] = 1070 Wave7[211] = 1090 Wave7[212] = 1111 Wave7[213] = 1132 Wave7[214] = 1158 Wave7[215] = 1181 Wave7[216] = 1209 Wave7[217] = 1241 Wave7[218] = 1266 Wave7[219] = 1284 Wave7[220] = 1277 Wave7[221] = 1255 Wave7[222] = 1223 Wave7[223] = 1182 Wave7[224] = 1103 Wave7[225] = 1052 Wave7[226] = 1004 Wave7[227] = 954 Wave7[228] = 888 Wave7[229] = 852 Wave7[230] = 821 Wave7[231] = 798 Wave7[232] = 797 Wave7[233] = 875 Wave7[234] = 944 Wave7[235] = 987 Wave7[236] = 1010 Wave7[237] = 1018 Wave7[238] = 1018 Wave7[239] = 1009 Wave7[240] = 984 Wave7[241] = 943 Wave7[242] = 834 Wave7[243] = 755 Wave7[244] = 689 Wave7[245] = 642 Wave7[246] = 588 Wave7[247] = 554 Wave7[248] = 521 Wave7[249] = 499 Wave7[250] = 503 Wave7[251] = 557 Wave7[252] = 621 Wave7[253] = 703 Wave7[254] = 799 Wave7[255] = 967 Wave7[256] = 1101 Wave7[257] = 1242 Wave7[258] = 1375 Wave7[259] = 1498 Wave7[260] = 1691 Wave7[261] = 1796 Wave7[262] = 1870 Wave7[263] = 1928 Wave7[264] = 1985 Wave7[265] = 1992 Wave7[266] = 1932 Wave7[267] = 1831 Wave7[268] = 1691 Wave7[269] = 1448 Wave7[270] = 1279 Wave7[271] = 1113 Wave7[272] = 968 Wave7[273] = 858 Wave7[274] = 770 Wave7[275] = 753 Wave7[276] = 739 Wave7[277] = 734 Wave7[278] = 734 Wave7[279] = 742 Wave7[280] = 753 Wave7[281] = 749 Wave7[282] = 740 Wave7[283] = 706 Wave7[284] = 675 Wave7[285] = 643 Wave7[286] = 617 Wave7[287] = 586 Wave7[288] = 569 Wave7[289] = 547 Wave7[290] = 522 Wave7[291] = 503 Wave7[292] = 509 Wave7[293] = 541 Wave7[294] = 590 Wave7[295] = 661 Wave7[296] = 754 Wave7[297] = 919 Wave7[298] = 1022 Wave7[299] = 1116 Wave7[300] = 1204 Wave7[301] = 1322 Wave7[302] = 1396 Wave7[303] = 1470 Wave7[304] = 1545 Wave7[305] = 1604 Wave7[306] = 1642 Wave7[307] = 1631 Wave7[308] = 1597 Wave7[309] = 1542 Wave7[310] = 1427 Wave7[311] = 1331 Wave7[312] = 1230 Wave7[313] = 1127 Wave7[314] = 1035 Wave7[315] = 905 Wave7[316] = 828 Wave7[317] = 765 Wave7[318] = 709 Wave7[319] = 669 Wave7[320] = 669 Wave7[321] = 690 Wave7[322] = 733 Wave7[323] = 784 Wave7[324] = 865 Wave7[325] = 912 Wave7[326] = 950 Wave7[327] = 984 Wave7[328] = 1027 Wave7[329] = 1049 Wave7[330] = 1066 Wave7[331] = 1077 Wave7[332] = 1082 Wave7[333] = 1074 Wave7[334] = 1063 Wave7[335] = 1053 Wave7[336] = 1047 Wave7[337] = 1051 Wave7[338] = 1076 Wave7[339] = 1092 Wave7[340] = 1111 Wave7[341] = 1130 Wave7[342] = 1160 Wave7[343] = 1184 Wave7[344] = 1216 Wave7[345] = 1246 Wave7[346] = 1267 Wave7[347] = 1280 Wave7[348] = 1270 Wave7[349] = 1245 Wave7[350] = 1209 Wave7[351] = 1141 Wave7[352] = 1090 Wave7[353] = 1039 Wave7[354] = 990 Wave7[355] = 941 Wave7[356] = 875 Wave7[357] = 842 Wave7[358] = 817 Wave7[359] = 808 Wave7[360] = 869 Wave7[361] = 940 Wave7[362] = 993 Wave7[363] = 1025 Wave7[364] = 1034 Wave7[365] = 1022 Wave7[366] = 1010 Wave7[367] = 990 Wave7[368] = 950 Wave7[369] = 881 Wave7[370] = 751 Wave7[371] = 675 Wave7[372] = 620 Wave7[373] = 579 Wave7[374] = 538 Wave7[375] = 511 Wave7[376] = 490 Wave7[377] = 495 Wave7[378] = 523 Wave7[379] = 606 Wave7[380] = 693 Wave7[381] = 791 Wave7[382] = 896 Wave7[383] = 1083 Wave7[384] = 1218 Wave7[385] = 1352 Wave7[386] = 1474 Wave7[387] = 1600 Wave7[388] = 1778 Wave7[389] = 1849 Wave7[390] = 1879 Wave7[391] = 1895 Wave7[392] = 1917 Wave7[393] = 1889 Wave7[394] = 1819 Wave7[395] = 1713 Wave7[396] = 1565 Wave7[397] = 1329 Wave7[398] = 1181 Wave7[399] = 1043 Wave7[400] = 939 Wave7[401] = 876 Wave7[402] = 861 Wave7[403] = 837 Wave7[404] = 821 Wave7[405] = 811 Wave7[406] = 796 Wave7[407] = 775 Wave7[408] = 754 Wave7[409] = 729 Wave7[410] = 693 Wave7[411] = 623 Wave7[412] = 579 Wave7[413] = 547 Wave7[414] = 534 Wave7[415] = 510 Wave7[416] = 485 Wave7[417] = 465 Wave7[418] = 461 Wave7[419] = 479 Wave7[420] = 538 Wave7[421] = 596 Wave7[422] = 673 Wave7[423] = 760 Wave7[424] = 920 Wave7[425] = 1035 Wave7[426] = 1145 Wave7[427] = 1237 Wave7[428] = 1321 Wave7[429] = 1437 Wave7[430] = 1499 Wave7[431] = 1550 Wave7[432] = 1587 Wave7[433] = 1610 Wave7[434] = 1605 Wave7[435] = 1576 Wave7[436] = 1520 Wave7[437] = 1444 Wave7[438] = 1306 Wave7[439] = 1209 Wave7[440] = 1110 Wave7[441] = 1020 Wave7[442] = 942 Wave7[443] = 846 Wave7[444] = 792 Wave7[445] = 746 Wave7[446] = 713 Wave7[447] = 702 Wave7[448] = 719 Wave7[449] = 757 Wave7[450] = 810 Wave7[451] = 863 Wave7[452] = 927 Wave7[453] = 956 Wave7[454] = 978 Wave7[455] = 999 Wave7[456] = 1028 Wave7[457] = 1044 Wave7[458] = 1051 Wave7[459] = 1051 Wave7[460] = 1048 Wave7[461] = 1035 Wave7[462] = 1027 Wave7[463] = 1027 Wave7[464] = 1037 Wave7[465] = 1066 Wave7[466] = 1089 Wave7[467] = 1113 Wave7[468] = 1135 Wave7[469] = 1159 Wave7[470] = 1193 Wave7[471] = 1222 Wave7[472] = 1255 Wave7[473] = 1279 Wave7[474] = 1286 Wave7[475] = 1274 Wave7[476] = 1247 Wave7[477] = 1209 Wave7[478] = 1168 Wave7[479] = 1097 Wave7[480] = 1041 Wave7[481] = 991 Wave7[482] = 947 Wave7[483] = 902 Wave7[484] = 851 Wave7[485] = 827 Wave7[486] = 813 Wave7[487] = 818 Wave7[488] = 901 Wave7[489] = 979 Wave7[490] = 1035 Wave7[491] = 1067 Wave7[492] = 1073 Wave7[493] = 1057 Wave7[494] = 1034 Wave7[495] = 1002 Wave7[496] = 957 Wave7[497] = 848 Wave7[498] = 751 Wave7[499] = 664 Wave7[500] = 598 Wave7[501] = 556 Wave7[502] = 518 Wave7[503] = 496 Wave7[504] = 479 Wave7[505] = 480 Wave7[506] = 530 Wave7[507] = 591 Wave7[508] = 682 Wave7[509] = 785 Wave7[510] = 898 Wave7[511] = 1023 Return 'Trumpeter_Wave8: ' ' Sinxoverx: ' prog 1 on Bug ' Wave8[0] = PWM_reset ' For i = 1 To 127 ' j = Sin(angle6 * i) ' Wave8[i] = (1.0 + (j / (angle6 * i))) * PWM_reset ' Next i ' For i = 128 To 255 ' Wave8[i] = Wave8[i - 128] ' Next i 'Return Teno_Wave8: ' excitation wave for Eb 51 ' 07.10.2021 - gwr ' C:\b\pb\gmt\robots\flut\CA_exitwave.inc ' EXCITATIONWAVE ' excitation waveform = (2.InWav - Outwav) ' should be 11-bits ' for inclusion in the PIC firmware ' size = 511 , 4 periods ' normalized ' 10-07-2021 16:59:43 ' inWav = Wave5, Outwav = CA_novalve.wav Wave8[0] = 1021 Wave8[1] = 1071 Wave8[2] = 1141 Wave8[3] = 1211 Wave8[4] = 1297 Wave8[5] = 1394 Wave8[6] = 1526 Wave8[7] = 1638 Wave8[8] = 1778 Wave8[9] = 1876 Wave8[10] = 1946 Wave8[11] = 1987 Wave8[12] = 2001 Wave8[13] = 1978 Wave8[14] = 1979 Wave8[15] = 1878 Wave8[16] = 1745 Wave8[17] = 1503 Wave8[18] = 1363 Wave8[19] = 1262 Wave8[20] = 1196 Wave8[21] = 1178 Wave8[22] = 1205 Wave8[23] = 1209 Wave8[24] = 1236 Wave8[25] = 1231 Wave8[26] = 1125 Wave8[27] = 947 Wave8[28] = 758 Wave8[29] = 563 Wave8[30] = 397 Wave8[31] = 287 Wave8[32] = 267 Wave8[33] = 306 Wave8[34] = 433 Wave8[35] = 549 Wave8[36] = 652 Wave8[37] = 730 Wave8[38] = 766 Wave8[39] = 773 Wave8[40] = 746 Wave8[41] = 670 Wave8[42] = 630 Wave8[43] = 597 Wave8[44] = 578 Wave8[45] = 570 Wave8[46] = 548 Wave8[47] = 561 Wave8[48] = 581 Wave8[49] = 605 Wave8[50] = 646 Wave8[51] = 668 Wave8[52] = 697 Wave8[53] = 738 Wave8[54] = 799 Wave8[55] = 912 Wave8[56] = 998 Wave8[57] = 1071 Wave8[58] = 1128 Wave8[59] = 1194 Wave8[60] = 1228 Wave8[61] = 1264 Wave8[62] = 1287 Wave8[63] = 1284 Wave8[64] = 1234 Wave8[65] = 1179 Wave8[66] = 1121 Wave8[67] = 1087 Wave8[68] = 1041 Wave8[69] = 1026 Wave8[70] = 1006 Wave8[71] = 972 Wave8[72] = 922 Wave8[73] = 868 Wave8[74] = 830 Wave8[75] = 792 Wave8[76] = 790 Wave8[77] = 807 Wave8[78] = 851 Wave8[79] = 889 Wave8[80] = 929 Wave8[81] = 972 Wave8[82] = 1006 Wave8[83] = 1043 Wave8[84] = 1082 Wave8[85] = 1096 Wave8[86] = 1105 Wave8[87] = 1090 Wave8[88] = 1091 Wave8[89] = 1093 Wave8[90] = 1093 Wave8[91] = 1103 Wave8[92] = 1125 Wave8[93] = 1147 Wave8[94] = 1166 Wave8[95] = 1185 Wave8[96] = 1226 Wave8[97] = 1236 Wave8[98] = 1238 Wave8[99] = 1237 Wave8[100] = 1245 Wave8[101] = 1222 Wave8[102] = 1208 Wave8[103] = 1181 Wave8[104] = 1125 Wave8[105] = 995 Wave8[106] = 912 Wave8[107] = 847 Wave8[108] = 799 Wave8[109] = 752 Wave8[110] = 719 Wave8[111] = 689 Wave8[112] = 665 Wave8[113] = 667 Wave8[114] = 754 Wave8[115] = 806 Wave8[116] = 849 Wave8[117] = 850 Wave8[118] = 856 Wave8[119] = 895 Wave8[120] = 921 Wave8[121] = 949 Wave8[122] = 975 Wave8[123] = 978 Wave8[124] = 982 Wave8[125] = 985 Wave8[126] = 1040 Wave8[127] = 1049 Wave8[128] = 1019 Wave8[129] = 1072 Wave8[130] = 1147 Wave8[131] = 1225 Wave8[132] = 1281 Wave8[133] = 1412 Wave8[134] = 1619 Wave8[135] = 1722 Wave8[136] = 1795 Wave8[137] = 1894 Wave8[138] = 1964 Wave8[139] = 2008 Wave8[140] = 2019 Wave8[141] = 2047 Wave8[142] = 1880 Wave8[143] = 1776 Wave8[144] = 1661 Wave8[145] = 1537 Wave8[146] = 1414 Wave8[147] = 1291 Wave8[148] = 1214 Wave8[149] = 1182 Wave8[150] = 1205 Wave8[151] = 1257 Wave8[152] = 1247 Wave8[153] = 1189 Wave8[154] = 1059 Wave8[155] = 865 Wave8[156] = 681 Wave8[157] = 495 Wave8[158] = 343 Wave8[159] = 204 Wave8[160] = 213 Wave8[161] = 272 Wave8[162] = 394 Wave8[163] = 538 Wave8[164] = 677 Wave8[165] = 765 Wave8[166] = 810 Wave8[167] = 814 Wave8[168] = 799 Wave8[169] = 729 Wave8[170] = 688 Wave8[171] = 657 Wave8[172] = 635 Wave8[173] = 591 Wave8[174] = 576 Wave8[175] = 568 Wave8[176] = 599 Wave8[177] = 604 Wave8[178] = 619 Wave8[179] = 637 Wave8[180] = 660 Wave8[181] = 700 Wave8[182] = 805 Wave8[183] = 894 Wave8[184] = 992 Wave8[185] = 1070 Wave8[186] = 1138 Wave8[187] = 1212 Wave8[188] = 1252 Wave8[189] = 1287 Wave8[190] = 1303 Wave8[191] = 1298 Wave8[192] = 1250 Wave8[193] = 1198 Wave8[194] = 1144 Wave8[195] = 1103 Wave8[196] = 1043 Wave8[197] = 1028 Wave8[198] = 1005 Wave8[199] = 957 Wave8[200] = 896 Wave8[201] = 812 Wave8[202] = 772 Wave8[203] = 756 Wave8[204] = 758 Wave8[205] = 799 Wave8[206] = 830 Wave8[207] = 869 Wave8[208] = 917 Wave8[209] = 995 Wave8[210] = 1045 Wave8[211] = 1080 Wave8[212] = 1106 Wave8[213] = 1125 Wave8[214] = 1124 Wave8[215] = 1119 Wave8[216] = 1113 Wave8[217] = 1111 Wave8[218] = 1111 Wave8[219] = 1105 Wave8[220] = 1117 Wave8[221] = 1134 Wave8[222] = 1149 Wave8[223] = 1164 Wave8[224] = 1205 Wave8[225] = 1221 Wave8[226] = 1212 Wave8[227] = 1215 Wave8[228] = 1223 Wave8[229] = 1214 Wave8[230] = 1204 Wave8[231] = 1189 Wave8[232] = 1154 Wave8[233] = 1041 Wave8[234] = 941 Wave8[235] = 859 Wave8[236] = 798 Wave8[237] = 738 Wave8[238] = 693 Wave8[239] = 653 Wave8[240] = 620 Wave8[241] = 596 Wave8[242] = 649 Wave8[243] = 679 Wave8[244] = 740 Wave8[245] = 798 Wave8[246] = 882 Wave8[247] = 920 Wave8[248] = 957 Wave8[249] = 986 Wave8[250] = 1017 Wave8[251] = 1056 Wave8[252] = 1078 Wave8[253] = 1099 Wave8[254] = 1116 Wave8[255] = 1071 Wave8[256] = 1089 Wave8[257] = 1137 Wave8[258] = 1208 Wave8[259] = 1285 Wave8[260] = 1413 Wave8[261] = 1509 Wave8[262] = 1597 Wave8[263] = 1657 Wave8[264] = 1725 Wave8[265] = 1833 Wave8[266] = 1901 Wave8[267] = 1938 Wave8[268] = 1861 Wave8[269] = 1899 Wave8[270] = 1845 Wave8[271] = 1762 Wave8[272] = 1670 Wave8[273] = 1569 Wave8[274] = 1462 Wave8[275] = 1359 Wave8[276] = 1296 Wave8[277] = 1297 Wave8[278] = 1307 Wave8[279] = 1317 Wave8[280] = 1285 Wave8[281] = 1199 Wave8[282] = 1030 Wave8[283] = 794 Wave8[284] = 582 Wave8[285] = 293 Wave8[286] = 176 Wave8[287] = 141 Wave8[288] = 155 Wave8[289] = 238 Wave8[290] = 384 Wave8[291] = 544 Wave8[292] = 693 Wave8[293] = 811 Wave8[294] = 848 Wave8[295] = 845 Wave8[296] = 822 Wave8[297] = 752 Wave8[298] = 710 Wave8[299] = 671 Wave8[300] = 644 Wave8[301] = 595 Wave8[302] = 614 Wave8[303] = 606 Wave8[304] = 600 Wave8[305] = 604 Wave8[306] = 615 Wave8[307] = 627 Wave8[308] = 646 Wave8[309] = 685 Wave8[310] = 800 Wave8[311] = 897 Wave8[312] = 984 Wave8[313] = 1059 Wave8[314] = 1124 Wave8[315] = 1199 Wave8[316] = 1246 Wave8[317] = 1285 Wave8[318] = 1308 Wave8[319] = 1297 Wave8[320] = 1267 Wave8[321] = 1219 Wave8[322] = 1163 Wave8[323] = 1120 Wave8[324] = 1064 Wave8[325] = 1042 Wave8[326] = 1009 Wave8[327] = 935 Wave8[328] = 867 Wave8[329] = 809 Wave8[330] = 766 Wave8[331] = 748 Wave8[332] = 753 Wave8[333] = 789 Wave8[334] = 820 Wave8[335] = 882 Wave8[336] = 942 Wave8[337] = 1000 Wave8[338] = 1041 Wave8[339] = 1078 Wave8[340] = 1108 Wave8[341] = 1130 Wave8[342] = 1134 Wave8[343] = 1149 Wave8[344] = 1137 Wave8[345] = 1124 Wave8[346] = 1113 Wave8[347] = 1113 Wave8[348] = 1125 Wave8[349] = 1137 Wave8[350] = 1148 Wave8[351] = 1186 Wave8[352] = 1186 Wave8[353] = 1192 Wave8[354] = 1191 Wave8[355] = 1189 Wave8[356] = 1198 Wave8[357] = 1200 Wave8[358] = 1197 Wave8[359] = 1184 Wave8[360] = 1097 Wave8[361] = 1013 Wave8[362] = 934 Wave8[363] = 868 Wave8[364] = 811 Wave8[365] = 743 Wave8[366] = 692 Wave8[367] = 652 Wave8[368] = 626 Wave8[369] = 612 Wave8[370] = 700 Wave8[371] = 746 Wave8[372] = 780 Wave8[373] = 806 Wave8[374] = 860 Wave8[375] = 892 Wave8[376] = 930 Wave8[377] = 976 Wave8[378] = 1026 Wave8[379] = 1052 Wave8[380] = 1087 Wave8[381] = 1118 Wave8[382] = 1130 Wave8[383] = 1078 Wave8[384] = 1097 Wave8[385] = 1233 Wave8[386] = 1295 Wave8[387] = 1355 Wave8[388] = 1388 Wave8[389] = 1477 Wave8[390] = 1547 Wave8[391] = 1605 Wave8[392] = 1701 Wave8[393] = 1796 Wave8[394] = 1845 Wave8[395] = 1875 Wave8[396] = 1878 Wave8[397] = 1922 Wave8[398] = 1873 Wave8[399] = 1794 Wave8[400] = 1698 Wave8[401] = 1603 Wave8[402] = 1413 Wave8[403] = 1333 Wave8[404] = 1295 Wave8[405] = 1306 Wave8[406] = 1309 Wave8[407] = 1313 Wave8[408] = 1280 Wave8[409] = 1187 Wave8[410] = 932 Wave8[411] = 688 Wave8[412] = 471 Wave8[413] = 292 Wave8[414] = 176 Wave8[415] = 142 Wave8[416] = 173 Wave8[417] = 271 Wave8[418] = 413 Wave8[419] = 608 Wave8[420] = 731 Wave8[421] = 798 Wave8[422] = 828 Wave8[423] = 821 Wave8[424] = 767 Wave8[425] = 731 Wave8[426] = 695 Wave8[427] = 686 Wave8[428] = 672 Wave8[429] = 631 Wave8[430] = 625 Wave8[431] = 611 Wave8[432] = 601 Wave8[433] = 595 Wave8[434] = 614 Wave8[435] = 634 Wave8[436] = 651 Wave8[437] = 699 Wave8[438] = 803 Wave8[439] = 886 Wave8[440] = 964 Wave8[441] = 1036 Wave8[442] = 1108 Wave8[443] = 1196 Wave8[444] = 1257 Wave8[445] = 1294 Wave8[446] = 1308 Wave8[447] = 1286 Wave8[448] = 1245 Wave8[449] = 1193 Wave8[450] = 1150 Wave8[451] = 1119 Wave8[452] = 1077 Wave8[453] = 1044 Wave8[454] = 998 Wave8[455] = 938 Wave8[456] = 873 Wave8[457] = 822 Wave8[458] = 786 Wave8[459] = 773 Wave8[460] = 777 Wave8[461] = 813 Wave8[462] = 851 Wave8[463] = 903 Wave8[464] = 960 Wave8[465] = 1012 Wave8[466] = 1052 Wave8[467] = 1087 Wave8[468] = 1111 Wave8[469] = 1138 Wave8[470] = 1128 Wave8[471] = 1122 Wave8[472] = 1112 Wave8[473] = 1104 Wave8[474] = 1087 Wave8[475] = 1092 Wave8[476] = 1104 Wave8[477] = 1113 Wave8[478] = 1130 Wave8[479] = 1169 Wave8[480] = 1188 Wave8[481] = 1200 Wave8[482] = 1214 Wave8[483] = 1215 Wave8[484] = 1220 Wave8[485] = 1211 Wave8[486] = 1190 Wave8[487] = 1155 Wave8[488] = 1047 Wave8[489] = 970 Wave8[490] = 906 Wave8[491] = 852 Wave8[492] = 804 Wave8[493] = 745 Wave8[494] = 686 Wave8[495] = 658 Wave8[496] = 665 Wave8[497] = 752 Wave8[498] = 797 Wave8[499] = 830 Wave8[500] = 855 Wave8[501] = 872 Wave8[502] = 920 Wave8[503] = 930 Wave8[504] = 946 Wave8[505] = 961 Wave8[506] = 959 Wave8[507] = 962 Wave8[508] = 973 Wave8[509] = 985 Wave8[510] = 987 Wave8[511] = 1023 Return 'Trumpeter_Wave9: ' ' SinPow2: ' prog 2 on Bug ' ' sinuskwadraat ' ' onbruikbaar on ' For i = 0 To 255 ' j = Sin(angle7 * i) ' If j >=0 Then ' Wave9[i] = (1.0 + (j*j)) * PWM_reset ' Else ' Wave9[i] = (1.0 - (j*j)) * PWM_reset ' EndIf ' 'Wave9[i] = ( 1.0 + ((Sin(angle7 * i)) ^2) ) * PWM_reset ' Next i 'Return Teno_Wave10: ' derived from sample C:\b\pb\gmt\robots\flut\CA_novalve.wav ' outputwave recorded with input Wave5 ' nr of periods = 4 ' recorded 07.10.2021 ' sounds too sharp on ' used as input wave for calculation of excitation wave. Wave10[0] = 1133 Wave10[1] = 1275 Wave10[2] = 1421 Wave10[3] = 1579 Wave10[4] = 1710 Wave10[5] = 1813 Wave10[6] = 1845 Wave10[7] = 1879 Wave10[8] = 1898 Wave10[9] = 1824 Wave10[10] = 1719 Wave10[11] = 1566 Wave10[12] = 1382 Wave10[13] = 1197 Wave10[14] = 938 Wave10[15] = 795 Wave10[16] = 690 Wave10[17] = 635 Wave10[18] = 613 Wave10[19] = 602 Wave10[20] = 609 Wave10[21] = 628 Wave10[22] = 664 Wave10[23] = 760 Wave10[24] = 830 Wave10[25] = 898 Wave10[26] = 956 Wave10[27] = 1003 Wave10[28] = 998 Wave10[29] = 983 Wave10[30] = 966 Wave10[31] = 944 Wave10[32] = 875 Wave10[33] = 808 Wave10[34] = 737 Wave10[35] = 693 Wave10[36] = 673 Wave10[37] = 680 Wave10[38] = 705 Wave10[39] = 743 Wave10[40] = 805 Wave10[41] = 929 Wave10[42] = 1018 Wave10[43] = 1105 Wave10[44] = 1186 Wave10[45] = 1266 Wave10[46] = 1369 Wave10[47] = 1430 Wave10[48] = 1476 Wave10[49] = 1506 Wave10[50] = 1503 Wave10[51] = 1466 Wave10[52] = 1401 Wave10[53] = 1313 Wave10[54] = 1213 Wave10[55] = 1063 Wave10[56] = 971 Wave10[57] = 890 Wave10[58] = 821 Wave10[59] = 739 Wave10[60] = 703 Wave10[61] = 675 Wave10[62] = 665 Wave10[63] = 679 Wave10[64] = 750 Wave10[65] = 822 Wave10[66] = 907 Wave10[67] = 984 Wave10[68] = 1075 Wave10[69] = 1118 Wave10[70] = 1143 Wave10[71] = 1165 Wave10[72] = 1182 Wave10[73] = 1191 Wave10[74] = 1180 Wave10[75] = 1149 Wave10[76] = 1110 Wave10[77] = 1070 Wave10[78] = 1010 Wave10[79] = 982 Wave10[80] = 973 Wave10[81] = 977 Wave10[82] = 997 Wave10[83] = 1010 Wave10[84] = 1022 Wave10[85] = 1037 Wave10[86] = 1062 Wave10[87] = 1123 Wave10[88] = 1166 Wave10[89] = 1201 Wave10[90] = 1227 Wave10[91] = 1233 Wave10[92] = 1211 Wave10[93] = 1176 Wave10[94] = 1135 Wave10[95] = 1082 Wave10[96] = 988 Wave10[97] = 926 Wave10[98] = 871 Wave10[99] = 820 Wave10[100] = 764 Wave10[101] = 745 Wave10[102] = 738 Wave10[103] = 756 Wave10[104] = 818 Wave10[105] = 991 Wave10[106] = 1099 Wave10[107] = 1186 Wave10[108] = 1248 Wave10[109] = 1297 Wave10[110] = 1312 Wave10[111] = 1306 Wave10[112] = 1278 Wave10[113] = 1210 Wave10[114] = 1026 Wave10[115] = 893 Wave10[116] = 779 Wave10[117] = 685 Wave10[118] = 607 Wave10[119] = 495 Wave10[120] = 426 Wave10[121] = 388 Wave10[122] = 387 Wave10[123] = 449 Wave10[124] = 527 Wave10[125] = 631 Wave10[126] = 758 Wave10[127] = 910 Wave10[128] = 1155 Wave10[129] = 1305 Wave10[130] = 1448 Wave10[131] = 1597 Wave10[132] = 1772 Wave10[133] = 1829 Wave10[134] = 1858 Wave10[135] = 1890 Wave10[136] = 1909 Wave10[137] = 1828 Wave10[138] = 1713 Wave10[139] = 1554 Wave10[140] = 1368 Wave10[141] = 1098 Wave10[142] = 922 Wave10[143] = 766 Wave10[144] = 643 Wave10[145] = 559 Wave10[146] = 514 Wave10[147] = 533 Wave10[148] = 561 Wave10[149] = 606 Wave10[150] = 660 Wave10[151] = 768 Wave10[152] = 870 Wave10[153] = 968 Wave10[154] = 1046 Wave10[155] = 1112 Wave10[156] = 1102 Wave10[157] = 1073 Wave10[158] = 1039 Wave10[159] = 1003 Wave10[160] = 942 Wave10[161] = 880 Wave10[162] = 799 Wave10[163] = 713 Wave10[164] = 642 Wave10[165] = 626 Wave10[166] = 634 Wave10[167] = 673 Wave10[168] = 730 Wave10[169] = 847 Wave10[170] = 933 Wave10[171] = 1020 Wave10[172] = 1105 Wave10[173] = 1230 Wave10[174] = 1321 Wave10[175] = 1410 Wave10[176] = 1485 Wave10[177] = 1531 Wave10[178] = 1536 Wave10[179] = 1504 Wave10[180] = 1449 Wave10[181] = 1373 Wave10[182] = 1221 Wave10[183] = 1106 Wave10[184] = 1003 Wave10[185] = 912 Wave10[186] = 829 Wave10[187] = 738 Wave10[188] = 693 Wave10[189] = 657 Wave10[190] = 640 Wave10[191] = 645 Wave10[192] = 707 Wave10[193] = 778 Wave10[194] = 869 Wave10[195] = 959 Wave10[196] = 1074 Wave10[197] = 1120 Wave10[198] = 1152 Wave10[199] = 1185 Wave10[200] = 1213 Wave10[201] = 1231 Wave10[202] = 1226 Wave10[203] = 1201 Wave10[204] = 1160 Wave10[205] = 1086 Wave10[206] = 1041 Wave10[207] = 1008 Wave10[208] = 988 Wave10[209] = 976 Wave10[210] = 974 Wave10[211] = 982 Wave10[212] = 988 Wave10[213] = 996 Wave10[214] = 1033 Wave10[215] = 1078 Wave10[216] = 1128 Wave10[217] = 1169 Wave10[218] = 1209 Wave10[219] = 1232 Wave10[220] = 1217 Wave10[221] = 1185 Wave10[222] = 1144 Wave10[223] = 1096 Wave10[224] = 1003 Wave10[225] = 941 Wave10[226] = 885 Wave10[227] = 833 Wave10[228] = 776 Wave10[229] = 755 Wave10[230] = 743 Wave10[231] = 746 Wave10[232] = 778 Wave10[233] = 923 Wave10[234] = 1048 Wave10[235] = 1150 Wave10[236] = 1231 Wave10[237] = 1305 Wave10[238] = 1339 Wave10[239] = 1351 Wave10[240] = 1341 Wave10[241] = 1306 Wave10[242] = 1161 Wave10[243] = 1019 Wave10[244] = 882 Wave10[245] = 755 Wave10[246] = 587 Wave10[247] = 490 Wave10[248] = 403 Wave10[249] = 348 Wave10[250] = 333 Wave10[251] = 380 Wave10[252] = 454 Wave10[253] = 550 Wave10[254] = 665 Wave10[255] = 893 Wave10[256] = 1069 Wave10[257] = 1243 Wave10[258] = 1407 Wave10[259] = 1571 Wave10[260] = 1782 Wave10[261] = 1879 Wave10[262] = 1960 Wave10[263] = 2034 Wave10[264] = 2037 Wave10[265] = 1913 Wave10[266] = 1769 Wave10[267] = 1588 Wave10[268] = 1392 Wave10[269] = 1083 Wave10[270] = 881 Wave10[271] = 704 Wave10[272] = 564 Wave10[273] = 468 Wave10[274] = 425 Wave10[275] = 452 Wave10[276] = 500 Wave10[277] = 554 Wave10[278] = 657 Wave10[279] = 762 Wave10[280] = 887 Wave10[281] = 1002 Wave10[282] = 1097 Wave10[283] = 1179 Wave10[284] = 1173 Wave10[285] = 1146 Wave10[286] = 1102 Wave10[287] = 1028 Wave10[288] = 974 Wave10[289] = 898 Wave10[290] = 802 Wave10[291] = 711 Wave10[292] = 633 Wave10[293] = 608 Wave10[294] = 606 Wave10[295] = 636 Wave10[296] = 691 Wave10[297] = 808 Wave10[298] = 900 Wave10[299] = 998 Wave10[300] = 1096 Wave10[301] = 1236 Wave10[302] = 1333 Wave10[303] = 1430 Wave10[304] = 1513 Wave10[305] = 1559 Wave10[306] = 1561 Wave10[307] = 1530 Wave10[308] = 1476 Wave10[309] = 1394 Wave10[310] = 1228 Wave10[311] = 1108 Wave10[312] = 1000 Wave10[313] = 904 Wave10[314] = 819 Wave10[315] = 726 Wave10[316] = 677 Wave10[317] = 642 Wave10[318] = 631 Wave10[319] = 649 Wave10[320] = 695 Wave10[321] = 772 Wave10[322] = 868 Wave10[323] = 961 Wave10[324] = 1069 Wave10[325] = 1117 Wave10[326] = 1155 Wave10[327] = 1186 Wave10[328] = 1211 Wave10[329] = 1217 Wave10[330] = 1214 Wave10[331] = 1190 Wave10[332] = 1151 Wave10[333] = 1084 Wave10[334] = 1042 Wave10[335] = 1008 Wave10[336] = 986 Wave10[337] = 975 Wave10[338] = 985 Wave10[339] = 995 Wave10[340] = 1002 Wave10[341] = 1013 Wave10[342] = 1049 Wave10[343] = 1086 Wave10[344] = 1132 Wave10[345] = 1181 Wave10[346] = 1220 Wave10[347] = 1237 Wave10[348] = 1225 Wave10[349] = 1197 Wave10[350] = 1155 Wave10[351] = 1069 Wave10[352] = 1006 Wave10[353] = 946 Wave10[354] = 887 Wave10[355] = 834 Wave10[356] = 779 Wave10[357] = 753 Wave10[358] = 739 Wave10[359] = 750 Wave10[360] = 855 Wave10[361] = 969 Wave10[362] = 1070 Wave10[363] = 1153 Wave10[364] = 1214 Wave10[365] = 1282 Wave10[366] = 1312 Wave10[367] = 1315 Wave10[368] = 1288 Wave10[369] = 1216 Wave10[370] = 1036 Wave10[371] = 921 Wave10[372] = 818 Wave10[373] = 721 Wave10[374] = 587 Wave10[375] = 497 Wave10[376] = 421 Wave10[377] = 384 Wave10[378] = 386 Wave10[379] = 458 Wave10[380] = 539 Wave10[381] = 638 Wave10[382] = 758 Wave10[383] = 992 Wave10[384] = 1158 Wave10[385] = 1307 Wave10[386] = 1461 Wave10[387] = 1614 Wave10[388] = 1787 Wave10[389] = 1861 Wave10[390] = 1937 Wave10[391] = 1994 Wave10[392] = 1947 Wave10[393] = 1848 Wave10[394] = 1698 Wave10[395] = 1517 Wave10[396] = 1324 Wave10[397] = 1036 Wave10[398] = 856 Wave10[399] = 703 Wave10[400] = 588 Wave10[401] = 491 Wave10[402] = 484 Wave10[403] = 500 Wave10[404] = 536 Wave10[405] = 584 Wave10[406] = 696 Wave10[407] = 800 Wave10[408] = 903 Wave10[409] = 989 Wave10[410] = 1062 Wave10[411] = 1115 Wave10[412] = 1109 Wave10[413] = 1085 Wave10[414] = 1049 Wave10[415] = 987 Wave10[416] = 935 Wave10[417] = 862 Wave10[418] = 777 Wave10[419] = 700 Wave10[420] = 640 Wave10[421] = 627 Wave10[422] = 636 Wave10[423] = 681 Wave10[424] = 781 Wave10[425] = 861 Wave10[426] = 946 Wave10[427] = 1036 Wave10[428] = 1124 Wave10[429] = 1255 Wave10[430] = 1344 Wave10[431] = 1437 Wave10[432] = 1513 Wave10[433] = 1558 Wave10[434] = 1543 Wave10[435] = 1501 Wave10[436] = 1442 Wave10[437] = 1360 Wave10[438] = 1210 Wave10[439] = 1106 Wave10[440] = 1011 Wave10[441] = 924 Wave10[442] = 839 Wave10[443] = 735 Wave10[444] = 684 Wave10[445] = 651 Wave10[446] = 641 Wave10[447] = 670 Wave10[448] = 725 Wave10[449] = 803 Wave10[450] = 882 Wave10[451] = 960 Wave10[452] = 1060 Wave10[453] = 1109 Wave10[454] = 1145 Wave10[455] = 1174 Wave10[456] = 1198 Wave10[457] = 1203 Wave10[458] = 1192 Wave10[459] = 1164 Wave10[460] = 1129 Wave10[461] = 1066 Wave10[462] = 1027 Wave10[463] = 996 Wave10[464] = 980 Wave10[465] = 983 Wave10[466] = 993 Wave10[467] = 1001 Wave10[468] = 1009 Wave10[469] = 1025 Wave10[470] = 1075 Wave10[471] = 1122 Wave10[472] = 1168 Wave10[473] = 1207 Wave10[474] = 1246 Wave10[475] = 1246 Wave10[476] = 1227 Wave10[477] = 1192 Wave10[478] = 1144 Wave10[479] = 1059 Wave10[480] = 998 Wave10[481] = 936 Wave10[482] = 871 Wave10[483] = 818 Wave10[484] = 764 Wave10[485] = 743 Wave10[486] = 741 Wave10[487] = 781 Wave10[488] = 926 Wave10[489] = 1028 Wave10[490] = 1112 Wave10[491] = 1176 Wave10[492] = 1221 Wave10[493] = 1270 Wave10[494] = 1283 Wave10[495] = 1268 Wave10[496] = 1205 Wave10[497] = 1034 Wave10[498] = 922 Wave10[499] = 822 Wave10[500] = 732 Wave10[501] = 649 Wave10[502] = 524 Wave10[503] = 451 Wave10[504] = 415 Wave10[505] = 411 Wave10[506] = 470 Wave10[507] = 546 Wave10[508] = 642 Wave10[509] = 757 Wave10[510] = 896 Wave10[511] = 1023 Return 'Teno_Wave11: ' 'Beauchamp: ' prog 4 on Bug ' ' acoustical modelling ' ' waveform in 5 phases, after Beauchamp ' ' = Trumpeter wave11 ' For i = 0 To 32 ' j = 1.0 + (i/ 32.0 ) ' 1 to 2 ' Wave11[i] = j * PWM_reset ' Next i ' For i = 33 To 74 ' trajekt = 41 '50 '88 ' ceil to 2 ' j = 2 - ((i - 33) / 41) ' 2 to 1 ' Wave11[i] = j * PWM_reset ' Next i ' For i = 75 To 80 ' Wave11[i] = PWM_reset ' Next i ' For i = 81 To 102 ' trajekt = 21) ' j = 1.0 - ((i - 81) / 21) ' Wave11[i] = j * PWM_reset ' Next i ' For i = 103 To 127 ' j = (( i - 103) / 24) ' Wave11[i] = j + PWM_reset ' Next i ' For i = 128 To 255 ' Wave11[i] = Wave11[i - 128] ' Next i ' ' and now apply a filter to this wave: ' For i = 1 To 255 ' Wave11[i] = (Wave11[i-1] + Wave11[i] ) / 2 ' Next i 'Return Teno_Wave11: ' Trumpeter_Parametric0: ' was prog 5 op ' waveform in 5 phases, after Beauchamp, with parameters ' after acoustic modelling for trumpet ' Wave_0 on 'Wav11p1 = 32 '27 'Wav11p2 = 74 '83 'Wav11p3 = 80 '96 'Wav11p4 = 103 '110 For i = 0 To Wav11p1 j = 1.0 + (i/ Wav11p1 ) ' 1 to 2 Wave11[i] = j * PWM_reset Next i For i = Wav11p1+1 To Wav11p2 ' trajekt = Wav11p2 - (Wav11p1 + 1) ' 41 ' ceil to 2 j = 2.0 - ((i - (Wav11p1 + 1)) / (Wav11p2 - Wav11p1 - 1)) ' 2 to 1 Wave11[i] = j * PWM_reset Next i For i = Wav11p2 + 1 To Wav11p3 '80 Wave11[i] = PWM_reset Next i For i = Wav11p3 + 1 To 102 ' trajekt = Wav11p4 - (Wav11p3 + 1) j = 1.0 - ((i - (Wav11p3 +1)) / (Wav11p4 - Wav11p3 -1)) Wave11[i] = j * PWM_reset Next i For i = Wav11p4 + 1 To 127 ' trajekt = 127 - (Wav11p4 + 1) j = (( i - (Wav11p4 +1)) / (127 - Wav11p4 -1)) Wave11[i] = j + PWM_reset Next i For i = 128 To 255 Wave11[i] = Wave0[i - 128] Next i ' and now apply a filter to this wave: For i = 1 To 255 Wave11[i] = (Wave11[i-1] + Wave11[i] ) / 2 Next i Return 'Trumpeter_Wave12: ' ' Pulse ' prog 9 on Bug ' ' p8 = pulsewidth ' For i = 0 To 64 - (p8/2) ' Wave12[i] = PWM_reset ' Next i ' For i = 64 - (p8/2) + 1 To 63 ' Wave12[i] = PWM_Range ' Next i ' For i = 64 To 64 + (p8/2) ' Wave12[i] = 0 ' Next i ' For i = 64 + (p8/2) + 1 To 127 ' Wave12[i] = PWM_reset ' Next i ' For i = 128 To 255 ' Wave12[i] = Wave12[i - 128] ' Next i 'Return Teno_Wave12: ' C:\b\pb\gmt\robots\flut\CA_exitwave2.inc ' EXCITATIONWAVE ' excitation waveform = (2.InWav - Outwav) ' = (2.wave5 - wave7) ' should be 11-bits ' for inclusion in the PIC firmware ' size = 511 ' normalized ' recorded with wave5 and the semitone valve pressed down ' note 51, Eb - 4 periods ' 10-07-2021 18:20:08 ' 08.10.2021: klinkt een beetje ruw op Cornalto, maar blijft bruikbaar. Wave12[0] = 1047 Wave12[1] = 1112 Wave12[2] = 1214 Wave12[3] = 1341 Wave12[4] = 1463 Wave12[5] = 1536 Wave12[6] = 1674 Wave12[7] = 1818 Wave12[8] = 1993 Wave12[9] = 2022 Wave12[10] = 2047 Wave12[11] = 2034 Wave12[12] = 1985 Wave12[13] = 1922 Wave12[14] = 1900 Wave12[15] = 1783 Wave12[16] = 1647 Wave12[17] = 1387 Wave12[18] = 1276 Wave12[19] = 1150 Wave12[20] = 1076 Wave12[21] = 1075 Wave12[22] = 1139 Wave12[23] = 1245 Wave12[24] = 1348 Wave12[25] = 1408 Wave12[26] = 1333 Wave12[27] = 1181 Wave12[28] = 971 Wave12[29] = 751 Wave12[30] = 555 Wave12[31] = 418 Wave12[32] = 347 Wave12[33] = 351 Wave12[34] = 466 Wave12[35] = 595 Wave12[36] = 716 Wave12[37] = 798 Wave12[38] = 819 Wave12[39] = 799 Wave12[40] = 739 Wave12[41] = 611 Wave12[42] = 541 Wave12[43] = 484 Wave12[44] = 446 Wave12[45] = 432 Wave12[46] = 393 Wave12[47] = 398 Wave12[48] = 400 Wave12[49] = 407 Wave12[50] = 420 Wave12[51] = 424 Wave12[52] = 430 Wave12[53] = 450 Wave12[54] = 501 Wave12[55] = 633 Wave12[56] = 754 Wave12[57] = 868 Wave12[58] = 963 Wave12[59] = 1087 Wave12[60] = 1158 Wave12[61] = 1228 Wave12[62] = 1289 Wave12[63] = 1331 Wave12[64] = 1349 Wave12[65] = 1332 Wave12[66] = 1300 Wave12[67] = 1277 Wave12[68] = 1223 Wave12[69] = 1203 Wave12[70] = 1172 Wave12[71] = 1126 Wave12[72] = 1053 Wave12[73] = 958 Wave12[74] = 884 Wave12[75] = 796 Wave12[76] = 751 Wave12[77] = 740 Wave12[78] = 761 Wave12[79] = 794 Wave12[80] = 842 Wave12[81] = 900 Wave12[82] = 949 Wave12[83] = 992 Wave12[84] = 1036 Wave12[85] = 1050 Wave12[86] = 1068 Wave12[87] = 1073 Wave12[88] = 1079 Wave12[89] = 1081 Wave12[90] = 1081 Wave12[91] = 1080 Wave12[92] = 1091 Wave12[93] = 1110 Wave12[94] = 1129 Wave12[95] = 1141 Wave12[96] = 1172 Wave12[97] = 1178 Wave12[98] = 1177 Wave12[99] = 1172 Wave12[100] = 1191 Wave12[101] = 1174 Wave12[102] = 1175 Wave12[103] = 1177 Wave12[104] = 1172 Wave12[105] = 1123 Wave12[106] = 1045 Wave12[107] = 982 Wave12[108] = 941 Wave12[109] = 904 Wave12[110] = 878 Wave12[111] = 839 Wave12[112] = 800 Wave12[113] = 765 Wave12[114] = 780 Wave12[115] = 802 Wave12[116] = 832 Wave12[117] = 817 Wave12[118] = 806 Wave12[119] = 814 Wave12[120] = 819 Wave12[121] = 846 Wave12[122] = 883 Wave12[123] = 908 Wave12[124] = 931 Wave12[125] = 957 Wave12[126] = 1056 Wave12[127] = 1109 Wave12[128] = 1126 Wave12[129] = 1200 Wave12[130] = 1294 Wave12[131] = 1404 Wave12[132] = 1460 Wave12[133] = 1569 Wave12[134] = 1779 Wave12[135] = 1880 Wave12[136] = 1932 Wave12[137] = 1950 Wave12[138] = 1987 Wave12[139] = 1987 Wave12[140] = 1953 Wave12[141] = 1971 Wave12[142] = 1757 Wave12[143] = 1644 Wave12[144] = 1532 Wave12[145] = 1415 Wave12[146] = 1319 Wave12[147] = 1194 Wave12[148] = 1127 Wave12[149] = 1128 Wave12[150] = 1208 Wave12[151] = 1376 Wave12[152] = 1442 Wave12[153] = 1447 Wave12[154] = 1343 Wave12[155] = 1162 Wave12[156] = 943 Wave12[157] = 711 Wave12[158] = 514 Wave12[159] = 326 Wave12[160] = 306 Wave12[161] = 342 Wave12[162] = 446 Wave12[163] = 577 Wave12[164] = 694 Wave12[165] = 774 Wave12[166] = 801 Wave12[167] = 786 Wave12[168] = 741 Wave12[169] = 614 Wave12[170] = 544 Wave12[171] = 490 Wave12[172] = 450 Wave12[173] = 385 Wave12[174] = 377 Wave12[175] = 378 Wave12[176] = 417 Wave12[177] = 410 Wave12[178] = 400 Wave12[179] = 402 Wave12[180] = 407 Wave12[181] = 432 Wave12[182] = 538 Wave12[183] = 639 Wave12[184] = 772 Wave12[185] = 886 Wave12[186] = 989 Wave12[187] = 1118 Wave12[188] = 1193 Wave12[189] = 1264 Wave12[190] = 1317 Wave12[191] = 1350 Wave12[192] = 1363 Wave12[193] = 1345 Wave12[194] = 1321 Wave12[195] = 1293 Wave12[196] = 1241 Wave12[197] = 1222 Wave12[198] = 1189 Wave12[199] = 1126 Wave12[200] = 1047 Wave12[201] = 926 Wave12[202] = 854 Wave12[203] = 795 Wave12[204] = 753 Wave12[205] = 744 Wave12[206] = 754 Wave12[207] = 783 Wave12[208] = 831 Wave12[209] = 921 Wave12[210] = 964 Wave12[211] = 998 Wave12[212] = 1019 Wave12[213] = 1031 Wave12[214] = 1040 Wave12[215] = 1053 Wave12[216] = 1066 Wave12[217] = 1071 Wave12[218] = 1085 Wave12[219] = 1081 Wave12[220] = 1089 Wave12[221] = 1102 Wave12[222] = 1113 Wave12[223] = 1126 Wave12[224] = 1167 Wave12[225] = 1177 Wave12[226] = 1159 Wave12[227] = 1161 Wave12[228] = 1179 Wave12[229] = 1181 Wave12[230] = 1185 Wave12[231] = 1190 Wave12[232] = 1174 Wave12[233] = 1089 Wave12[234] = 1011 Wave12[235] = 959 Wave12[236] = 933 Wave12[237] = 915 Wave12[238] = 888 Wave12[239] = 856 Wave12[240] = 827 Wave12[241] = 802 Wave12[242] = 837 Wave12[243] = 819 Wave12[244] = 833 Wave12[245] = 836 Wave12[246] = 841 Wave12[247] = 832 Wave12[248] = 831 Wave12[249] = 838 Wave12[250] = 862 Wave12[251] = 905 Wave12[252] = 943 Wave12[253] = 983 Wave12[254] = 1021 Wave12[255] = 1017 Wave12[256] = 1079 Wave12[257] = 1170 Wave12[258] = 1290 Wave12[259] = 1426 Wave12[260] = 1606 Wave12[261] = 1722 Wave12[262] = 1842 Wave12[263] = 1934 Wave12[264] = 1973 Wave12[265] = 1993 Wave12[266] = 2004 Wave12[267] = 1980 Wave12[268] = 1830 Wave12[269] = 1820 Wave12[270] = 1720 Wave12[271] = 1604 Wave12[272] = 1489 Wave12[273] = 1372 Wave12[274] = 1276 Wave12[275] = 1183 Wave12[276] = 1158 Wave12[277] = 1213 Wave12[278] = 1318 Wave12[279] = 1419 Wave12[280] = 1481 Wave12[281] = 1478 Wave12[282] = 1354 Wave12[283] = 1155 Wave12[284] = 905 Wave12[285] = 539 Wave12[286] = 372 Wave12[287] = 288 Wave12[288] = 273 Wave12[289] = 331 Wave12[290] = 455 Wave12[291] = 595 Wave12[292] = 710 Wave12[293] = 811 Wave12[294] = 812 Wave12[295] = 772 Wave12[296] = 707 Wave12[297] = 575 Wave12[298] = 511 Wave12[299] = 464 Wave12[300] = 438 Wave12[301] = 395 Wave12[302] = 440 Wave12[303] = 451 Wave12[304] = 450 Wave12[305] = 444 Wave12[306] = 426 Wave12[307] = 423 Wave12[308] = 428 Wave12[309] = 455 Wave12[310] = 557 Wave12[311] = 660 Wave12[312] = 765 Wave12[313] = 867 Wave12[314] = 958 Wave12[315] = 1088 Wave12[316] = 1173 Wave12[317] = 1248 Wave12[318] = 1319 Wave12[319] = 1357 Wave12[320] = 1360 Wave12[321] = 1349 Wave12[322] = 1324 Wave12[323] = 1307 Wave12[324] = 1259 Wave12[325] = 1233 Wave12[326] = 1190 Wave12[327] = 1092 Wave12[328] = 988 Wave12[329] = 900 Wave12[330] = 827 Wave12[331] = 772 Wave12[332] = 738 Wave12[333] = 731 Wave12[334] = 743 Wave12[335] = 800 Wave12[336] = 864 Wave12[337] = 925 Wave12[338] = 964 Wave12[339] = 1005 Wave12[340] = 1033 Wave12[341] = 1054 Wave12[342] = 1065 Wave12[343] = 1096 Wave12[344] = 1094 Wave12[345] = 1094 Wave12[346] = 1097 Wave12[347] = 1099 Wave12[348] = 1114 Wave12[349] = 1126 Wave12[350] = 1135 Wave12[351] = 1167 Wave12[352] = 1157 Wave12[353] = 1156 Wave12[354] = 1146 Wave12[355] = 1140 Wave12[356] = 1162 Wave12[357] = 1170 Wave12[358] = 1176 Wave12[359] = 1177 Wave12[360] = 1106 Wave12[361] = 1036 Wave12[362] = 977 Wave12[363] = 940 Wave12[364] = 913 Wave12[365] = 897 Wave12[366] = 870 Wave12[367] = 839 Wave12[368] = 818 Wave12[369] = 797 Wave12[370] = 865 Wave12[371] = 889 Wave12[372] = 890 Wave12[373] = 873 Wave12[374] = 857 Wave12[375] = 842 Wave12[376] = 841 Wave12[377] = 862 Wave12[378] = 903 Wave12[379] = 926 Wave12[380] = 967 Wave12[381] = 1006 Wave12[382] = 1036 Wave12[383] = 1012 Wave12[384] = 1063 Wave12[385] = 1253 Wave12[386] = 1361 Wave12[387] = 1462 Wave12[388] = 1500 Wave12[389] = 1617 Wave12[390] = 1749 Wave12[391] = 1861 Wave12[392] = 1922 Wave12[393] = 1980 Wave12[394] = 1971 Wave12[395] = 1942 Wave12[396] = 1904 Wave12[397] = 1915 Wave12[398] = 1823 Wave12[399] = 1707 Wave12[400] = 1573 Wave12[401] = 1421 Wave12[402] = 1183 Wave12[403] = 1117 Wave12[404] = 1115 Wave12[405] = 1182 Wave12[406] = 1300 Wave12[407] = 1418 Wave12[408] = 1488 Wave12[409] = 1469 Wave12[410] = 1239 Wave12[411] = 1037 Wave12[412] = 791 Wave12[413] = 569 Wave12[414] = 399 Wave12[415] = 321 Wave12[416] = 336 Wave12[417] = 414 Wave12[418] = 524 Wave12[419] = 688 Wave12[420] = 740 Wave12[421] = 762 Wave12[422] = 739 Wave12[423] = 691 Wave12[424] = 568 Wave12[425] = 490 Wave12[426] = 421 Wave12[427] = 409 Wave12[428] = 394 Wave12[429] = 354 Wave12[430] = 371 Wave12[431] = 391 Wave12[432] = 414 Wave12[433] = 426 Wave12[434] = 441 Wave12[435] = 455 Wave12[436] = 474 Wave12[437] = 530 Wave12[438] = 653 Wave12[439] = 754 Wave12[440] = 857 Wave12[441] = 953 Wave12[442] = 1040 Wave12[443] = 1145 Wave12[444] = 1226 Wave12[445] = 1285 Wave12[446] = 1324 Wave12[447] = 1332 Wave12[448] = 1313 Wave12[449] = 1283 Wave12[450] = 1251 Wave12[451] = 1234 Wave12[452] = 1212 Wave12[453] = 1188 Wave12[454] = 1141 Wave12[455] = 1071 Wave12[456] = 984 Wave12[457] = 908 Wave12[458] = 846 Wave12[459] = 804 Wave12[460] = 780 Wave12[461] = 781 Wave12[462] = 802 Wave12[463] = 840 Wave12[464] = 891 Wave12[465] = 933 Wave12[466] = 974 Wave12[467] = 1005 Wave12[468] = 1023 Wave12[469] = 1050 Wave12[470] = 1051 Wave12[471] = 1060 Wave12[472] = 1059 Wave12[473] = 1062 Wave12[474] = 1069 Wave12[475] = 1087 Wave12[476] = 1109 Wave12[477] = 1124 Wave12[478] = 1139 Wave12[479] = 1176 Wave12[480] = 1196 Wave12[481] = 1201 Wave12[482] = 1200 Wave12[483] = 1193 Wave12[484] = 1198 Wave12[485] = 1189 Wave12[486] = 1172 Wave12[487] = 1159 Wave12[488] = 1077 Wave12[489] = 999 Wave12[490] = 941 Wave12[491] = 902 Wave12[492] = 875 Wave12[493] = 858 Wave12[494] = 814 Wave12[495] = 794 Wave12[496] = 786 Wave12[497] = 843 Wave12[498] = 887 Wave12[499] = 917 Wave12[500] = 928 Wave12[501] = 913 Wave12[502] = 895 Wave12[503] = 863 Wave12[504] = 865 Wave12[505] = 881 Wave12[506] = 886 Wave12[507] = 903 Wave12[508] = 922 Wave12[509] = 949 Wave12[510] = 975 Wave12[511] = 1023 Return Teno_Wave9: ' = trumpeter wave14 ' DirtyAssin ' Wav9p1 = symmetry ' Wav9p2 = noisyness j = 6.28318530717 / (2 * Wav9p1) ' 180 graden! ' first half sine wave: For i = 0 To Wav9p1 Wave9[i] = (1.0 + Sin(j * i)) * PWM_reset Next i ' second half sine wave j = 6.28318530717 / (2 * (128 - Wav9p1)) For i = 0 To (128 - Wav9p1) ' ' Wav9p1 +1 to 127 Wave9[i+ Wav9p1 + 1] = (1.0 - Sin(j * i)) * PWM_reset ' invert sign, as this half sine has to go negative Next i For i = 128 To 255 Wave9[i] = Wave9[i - 128] Next i ' now add the 'dirt' For i = 1 To 254 j = (Random * Wav9p2)/ 65536 ' 0 - 127 random Select Wave9[i] Case > 65536 - Wav9p2 ' no change Case > 0 Wave9[i] = Wave9[i] + j ' positive halves Case 0 ' no change Case < Wav9p2 ' no change Case Else ' negative halves Wave9[i] = Wave9[i] - j EndSelect Next i Return Vib_Lookup: 'v_angle = 6.28318530717 / 32 - defined constant. '5-bit sine wave lookup for vibrato 'We could implement a few alternative waveshapes here: triangle for instance, with a parameter for the ' symmetry... For i = 0 To 31 ' Vib[i] = Sin(v_angle * i) ' bipolar float -1 to +1 Vib[i] = 32.0 * Sin(v_angle * i) ' now sword -32 to + 31 23.03.2020 ' now sbyte, 18.01.2021 Next i Return ' midi-note to period lookup for PIC24 with 120MHz clock ' time_unit = 8.33333333333333E-9 ' divider set to = 256 (256 samples in the waveform) ' lowest note = midi 0 (C0) , freq = 8.17579891564371Hz ' diapason A= 440 Period_Lookup_Tables: Tun_440: Per440[0]= 57334 ' soll frequency = 8.175799 real frequency = 8.175777 Per440[1]= 54116 ' soll frequency = 8.661957 real frequency = 8.661948 Per440[2]= 51079 ' soll frequency = 9.177024 real frequency = 9.176961 Per440[3]= 48212 ' soll frequency = 9.722718 real frequency = 9.722683 Per440[4]= 45506 ' soll frequency = 10.30086 real frequency = 10.30084 Per440[5]= 42952 ' soll frequency = 10.91338 real frequency = 10.91334 Per440[6]= 40541 ' soll frequency = 11.56232 real frequency = 11.56237 Per440[7]= 38266 ' soll frequency = 12.24986 real frequency = 12.24978 Per440[8]= 36118 ' soll frequency = 12.97827 real frequency = 12.97829 Per440[9]= 34091 ' soll frequency = 13.75 real frequency = 13.74996 Per440[10]= 32178 ' soll frequency = 14.56762 real frequency = 14.56741 Per440[11]= 30372 ' soll frequency = 15.43385 real frequency = 15.43362 Per440[12]= 28667 ' soll frequency = 16.3516 real frequency = 16.35155 Per440[13]= 27058 ' soll frequency = 17.32391 real frequency = 17.3239 Per440[14]= 25539 ' soll frequency = 18.35405 real frequency = 18.35428 Per440[15]= 24106 ' soll frequency = 19.44544 real frequency = 19.44536 Per440[16]= 22753 ' soll frequency = 20.60172 real frequency = 20.60168 Per440[17]= 21476 ' soll frequency = 21.82676 real frequency = 21.82669 Per440[18]= 20271 ' soll frequency = 23.12465 real frequency = 23.12417 Per440[19]= 19133 ' soll frequency = 24.49971 real frequency = 24.49956 Per440[20]= 18059 ' soll frequency = 25.95654 real frequency = 25.95659 Per440[21]= 17045 ' soll frequency = 27.5 real frequency = 27.50073 Per440[22]= 16089 ' soll frequency = 29.13523 real frequency = 29.13481 Per440[23]= 15186 ' soll frequency = 30.86771 real frequency = 30.86725 Per440[24]= 14333 ' soll frequency = 32.7032 real frequency = 32.70425 Per440[25]= 13529 ' soll frequency = 34.64783 real frequency = 34.64779 Per440[26]= 12770 ' soll frequency = 36.7081 real frequency = 36.70713 Per440[27]= 12053 ' soll frequency = 38.89087 real frequency = 38.89073 Per440[28]= 11376 ' soll frequency = 41.20344 real frequency = 41.20517 Per440[29]= 10738 ' soll frequency = 43.65353 real frequency = 43.65338 Per440[30]= 10135 ' soll frequency = 46.2493 real frequency = 46.25062 Per440[31]= 9566 ' soll frequency = 48.99943 real frequency = 49.00167 Per440[32]= 9030 ' soll frequency = 51.91308 real frequency = 51.9103 Per440[33]= 8523 ' soll frequency = 55 real frequency = 54.99824 Per440[34]= 8044 ' soll frequency = 58.27047 real frequency = 58.27325 Per440[35]= 7593 ' soll frequency = 61.73541 real frequency = 61.73449 Per440[36]= 7167 ' soll frequency = 65.40639 real frequency = 65.40394 Per440[37]= 6764 ' soll frequency = 69.29565 real frequency = 69.30071 Per440[38]= 6385 ' soll frequency = 73.41619 real frequency = 73.41425 Per440[39]= 6026 ' soll frequency = 77.78174 real frequency = 77.78792 Per440[40]= 5688 ' soll frequency = 82.40689 real frequency = 82.41034 Per440[41]= 5369 ' soll frequency = 87.30706 real frequency = 87.30676 Per440[42]= 5068 ' soll frequency = 92.4986 real frequency = 92.4921 Per440[43]= 4783 ' soll frequency = 97.99886 real frequency = 98.00334 Per440[44]= 4515 ' soll frequency = 103.8262 real frequency = 103.8206 Per440[45]= 4261 ' soll frequency = 110 real frequency = 110.0094 Per440[46]= 4022 ' soll frequency = 116.5409 real frequency = 116.5465 Per440[47]= 3796 ' soll frequency = 123.4708 real frequency = 123.4852 Per440[48]= 3583 ' soll frequency = 130.8128 real frequency = 130.8261 Per440[49]= 3382 ' soll frequency = 138.5913 real frequency = 138.6014 Per440[50]= 3192 ' soll frequency = 146.8324 real frequency = 146.8515 Per440[51]= 3013 ' soll frequency = 155.5635 real frequency = 155.5758 Per440[52]= 2844 ' soll frequency = 164.8138 real frequency = 164.8207 Per440[53]= 2684 ' soll frequency = 174.6141 real frequency = 174.646 Per440[54]= 2534 ' soll frequency = 184.9972 real frequency = 184.9842 Per440[55]= 2392 ' soll frequency = 195.9977 real frequency = 195.9657 Per440[56]= 2257 ' soll frequency = 207.6523 real frequency = 207.6872 Per440[57]= 2131 ' soll frequency = 220 real frequency = 219.9671 Per440[58]= 2011 ' soll frequency = 233.0819 real frequency = 233.093 Per440[59]= 1898 ' soll frequency = 246.9416 real frequency = 246.9705 Per440[60]= 1792 ' soll frequency = 261.6256 real frequency = 261.5792 Per440[61]= 1691 ' soll frequency = 277.1826 real frequency = 277.2028 Per440[62]= 1596 ' soll frequency = 293.6648 real frequency = 293.703 Per440[63]= 1507 ' soll frequency = 311.127 real frequency = 311.0484 Per440[64]= 1422 ' soll frequency = 329.6276 real frequency = 329.6414 Per440[65]= 1342 ' soll frequency = 349.2282 real frequency = 349.2921 Per440[66]= 1267 ' soll frequency = 369.9944 real frequency = 369.9684 Per440[67]= 1196 ' soll frequency = 391.9954 real frequency = 391.9314 Per440[68]= 1129 ' soll frequency = 415.3047 real frequency = 415.1904 Per440[69]= 1065 ' soll frequency = 440 real frequency = 440.1408 Per440[70]= 1006 ' soll frequency = 466.1638 real frequency = 465.9543 Per440[71]= 949 ' soll frequency = 493.8833 real frequency = 493.941 Per440[72]= 896 ' soll frequency = 523.2512 real frequency = 523.1585 Per440[73]= 846 ' soll frequency = 554.3652 real frequency = 554.078 Per440[74]= 798 ' soll frequency = 587.3295 real frequency = 587.406 Per440[75]= 753 ' soll frequency = 622.254 real frequency = 622.5099 Per440[76]= 711 ' soll frequency = 659.2551 real frequency = 659.2827 Per440[77]= 671 ' soll frequency = 698.4565 real frequency = 698.5842 Per440[78]= 633 ' soll frequency = 739.9888 real frequency = 740.5213 Per440[79]= 598 ' soll frequency = 783.9908 real frequency = 783.8628 Per440[80]= 564 ' soll frequency = 830.6094 real frequency = 831.117 Per440[81]= 533 ' soll frequency = 880 real frequency = 879.4559 Per440[82]= 503 ' soll frequency = 932.3275 real frequency = 931.9086 ' 503 is < 512, so we will get aliases... Per440[83]= 475 ' soll frequency = 987.7666 real frequency = 986.8421 Per440[84]= 448 ' soll frequency = 1046.502 real frequency = 1046.317 Per440[85]= 423 ' soll frequency = 1108.73 real frequency = 1108.156 Per440[86]= 399 ' soll frequency = 1174.659 real frequency = 1174.812 Per440[87]= 377 ' soll frequency = 1244.508 real frequency = 1243.369 Per440[88]= 356 ' soll frequency = 1318.51 real frequency = 1316.714 Per440[89]= 336 ' soll frequency = 1396.913 real frequency = 1395.089 Per440[90]= 317 ' soll frequency = 1479.978 real frequency = 1478.707 Per440[91]= 299 ' soll frequency = 1567.982 real frequency = 1567.726 Per440[92]= 282 ' soll frequency = 1661.219 real frequency = 1662.234 Per440[93]= 266 ' soll frequency = 1760 real frequency = 1762.218 Per440[94]= 251 ' soll frequency = 1864.655 real frequency = 1867.53 ' 251 being < 256, here we will get aliases... Per440[95]= 237 ' soll frequency = 1975.533 real frequency = 1977.848 Per440[96]= 224 ' soll frequency = 2093.005 real frequency = 2092.634 Per440[97]= 211 ' soll frequency = 2217.461 real frequency = 2221.564 Per440[98]= 200 ' soll frequency = 2349.318 real frequency = 2343.75 Per440[99]= 188 ' soll frequency = 2489.016 real frequency = 2493.351 Per440[100]= 178 ' soll frequency = 2637.02 real frequency = 2633.427 Per440[101]= 168 ' soll frequency = 2793.826 real frequency = 2790.178 Per440[102]= 158 ' soll frequency = 2959.955 real frequency = 2966.772 Per440[103]= 149 ' soll frequency = 3135.963 real frequency = 3145.973 Per440[104]= 141 ' soll frequency = 3322.438 real frequency = 3324.468 Per440[105]= 133 ' soll frequency = 3520 real frequency = 3524.436 ' the limit for , with 128 samples Per440[106]= 126 ' soll frequency = 3729.31 real frequency = 3720.238 Per440[107]= 119 ' soll frequency = 3951.066 real frequency = 3939.076 Per440[108]= 112 ' soll frequency = 4186.009 real frequency = 4185.268 Per440[109]= 106 ' soll frequency = 4434.922 real frequency = 4422.17 Per440[110]= 100 ' soll frequency = 4698.636 real frequency = 4687.5 Per440[111]= 94 ' soll frequency = 4978.032 real frequency = 4986.702 Per440[112]= 89 ' soll frequency = 5274.041 real frequency = 5266.854 Per440[113]= 84 ' soll frequency = 5587.652 real frequency = 5580.357 Per440[114]= 79 ' soll frequency = 5919.911 real frequency = 5933.544 Per440[115]= 75 ' soll frequency = 6271.927 real frequency = 6250 Per440[116]= 71 ' soll frequency = 6644.875 real frequency = 6602.113 Per440[117]= 67 ' soll frequency = 7040 real frequency = 6996.268 Per440[118]= 63 ' soll frequency = 7458.62 real frequency = 7440.476 Per440[119]= 59 ' soll frequency = 7902.133 real frequency = 7944.915 Per440[120]= 56 ' soll frequency = 8372.018 real frequency = 8370.536 Per440[121]= 53 ' soll frequency = 8869.844 real frequency = 8844.34 Per440[122]= 50 ' soll frequency = 9397.272 real frequency = 9375 Per440[123]= 47 ' soll frequency = 9956.063 real frequency = 9973.404 Per440[124]= 44 ' soll frequency = 10548.08 real frequency = 10653.41 Per440[125]= 42 ' soll frequency = 11175.3 real frequency = 11160.71 Per440[126]= 40 ' soll frequency = 11839.82 real frequency = 11718.75 Per440[127]= 37 ' soll frequency = 12543.85 real frequency = 12668.92 ' midi-note to period lookup for PIC24 with 120MHz clock ' time_unit = 8.33333333333333E-9 ' divider set to = 256 ' lowest note = midi 0 (C0) , freq = 8.13863619329987Hz ' diapason A= 438 Tun_438: Per438[0]= 57596 ' soll frequency = 8.138636 real frequency = 8.138586 Per438[1]= 54363 ' soll frequency = 8.622584 real frequency = 8.622593 Per438[2]= 51312 ' soll frequency = 9.13531 real frequency = 9.13529 Per438[3]= 48432 ' soll frequency = 9.678524 real frequency = 9.678518 Per438[4]= 45714 ' soll frequency = 10.25404 real frequency = 10.25397 Per438[5]= 43148 ' soll frequency = 10.86378 real frequency = 10.86377 Per438[6]= 40726 ' soll frequency = 11.50977 real frequency = 11.50985 Per438[7]= 38440 ' soll frequency = 12.19418 real frequency = 12.19433 Per438[8]= 36283 ' soll frequency = 12.91928 real frequency = 12.91927 Per438[9]= 34247 ' soll frequency = 13.6875 real frequency = 13.68733 Per438[10]= 32324 ' soll frequency = 14.5014 real frequency = 14.50161 Per438[11]= 30510 ' soll frequency = 15.3637 real frequency = 15.36382 Per438[12]= 28798 ' soll frequency = 16.27727 real frequency = 16.27717 Per438[13]= 27182 ' soll frequency = 17.24517 real frequency = 17.24487 Per438[14]= 25656 ' soll frequency = 18.27062 real frequency = 18.27058 Per438[15]= 24216 ' soll frequency = 19.35705 real frequency = 19.35704 Per438[16]= 22857 ' soll frequency = 20.50808 real frequency = 20.50794 Per438[17]= 21574 ' soll frequency = 21.72755 real frequency = 21.72754 Per438[18]= 20363 ' soll frequency = 23.01954 real frequency = 23.01969 Per438[19]= 19220 ' soll frequency = 24.38835 real frequency = 24.38866 Per438[20]= 18141 ' soll frequency = 25.83856 real frequency = 25.83926 Per438[21]= 17123 ' soll frequency = 27.375 real frequency = 27.37546 Per438[22]= 16162 ' soll frequency = 29.0028 real frequency = 29.00322 Per438[23]= 15255 ' soll frequency = 30.7274 real frequency = 30.72763 Per438[24]= 14399 ' soll frequency = 32.55455 real frequency = 32.55434 Per438[25]= 13591 ' soll frequency = 34.49034 real frequency = 34.48973 Per438[26]= 12828 ' soll frequency = 36.54124 real frequency = 36.54116 Per438[27]= 12108 ' soll frequency = 38.7141 real frequency = 38.71407 Per438[28]= 11428 ' soll frequency = 41.01616 real frequency = 41.01768 Per438[29]= 10787 ' soll frequency = 43.4551 real frequency = 43.45508 Per438[30]= 10182 ' soll frequency = 46.03908 real frequency = 46.03712 Per438[31]= 9610 ' soll frequency = 48.77671 real frequency = 48.77732 Per438[32]= 9071 ' soll frequency = 51.67712 real frequency = 51.67567 Per438[33]= 8562 ' soll frequency = 54.75 real frequency = 54.74772 Per438[34]= 8081 ' soll frequency = 58.0056 real frequency = 58.00644 Per438[35]= 7628 ' soll frequency = 61.4548 real frequency = 61.45123 Per438[36]= 7199 ' soll frequency = 65.10909 real frequency = 65.11321 Per438[37]= 6795 ' soll frequency = 68.98067 real frequency = 68.98455 Per438[38]= 6414 ' soll frequency = 73.08248 real frequency = 73.08232 Per438[39]= 6054 ' soll frequency = 77.42819 real frequency = 77.42815 Per438[40]= 5714 ' soll frequency = 82.03231 real frequency = 82.03535 Per438[41]= 5393 ' soll frequency = 86.91021 real frequency = 86.91823 Per438[42]= 5091 ' soll frequency = 92.07816 real frequency = 92.07425 Per438[43]= 4805 ' soll frequency = 97.55341 real frequency = 97.55463 Per438[44]= 4535 ' soll frequency = 103.3542 real frequency = 103.3627 Per438[45]= 4281 ' soll frequency = 109.5 real frequency = 109.4954 Per438[46]= 4041 ' soll frequency = 116.0112 real frequency = 115.9985 Per438[47]= 3814 ' soll frequency = 122.9096 real frequency = 122.9025 Per438[48]= 3600 ' soll frequency = 130.2182 real frequency = 130.2083 Per438[49]= 3398 ' soll frequency = 137.9613 real frequency = 137.9488 Per438[50]= 3207 ' soll frequency = 146.165 real frequency = 146.1646 Per438[51]= 3027 ' soll frequency = 154.8564 real frequency = 154.8563 Per438[52]= 2857 ' soll frequency = 164.0646 real frequency = 164.0707 Per438[53]= 2697 ' soll frequency = 173.8204 real frequency = 173.8042 Per438[54]= 2545 ' soll frequency = 184.1563 real frequency = 184.1847 Per438[55]= 2403 ' soll frequency = 195.1068 real frequency = 195.0687 Per438[56]= 2268 ' soll frequency = 206.7085 real frequency = 206.6799 Per438[57]= 2140 ' soll frequency = 219 real frequency = 219.042 Per438[58]= 2020 ' soll frequency = 232.0224 real frequency = 232.0544 Per438[59]= 1907 ' soll frequency = 245.8192 real frequency = 245.8049 Per438[60]= 1800 ' soll frequency = 260.4364 real frequency = 260.4166 Per438[61]= 1699 ' soll frequency = 275.9227 real frequency = 275.8976 Per438[62]= 1603 ' soll frequency = 292.3299 real frequency = 292.4205 Per438[63]= 1513 ' soll frequency = 309.7128 real frequency = 309.8149 Per438[64]= 1429 ' soll frequency = 328.1292 real frequency = 328.0266 Per438[65]= 1348 ' soll frequency = 347.6408 real frequency = 347.7374 Per438[66]= 1273 ' soll frequency = 368.3126 real frequency = 368.2247 Per438[67]= 1201 ' soll frequency = 390.2136 real frequency = 390.2997 Per438[68]= 1134 ' soll frequency = 413.417 real frequency = 413.3598 Per438[69]= 1070 ' soll frequency = 438 real frequency = 438.0841 Per438[70]= 1010 ' soll frequency = 464.0448 real frequency = 464.1089 Per438[71]= 953 ' soll frequency = 491.6384 real frequency = 491.8678 Per438[72]= 900 ' soll frequency = 520.8727 real frequency = 520.8333 Per438[73]= 849 ' soll frequency = 551.8454 real frequency = 552.1201 Per438[74]= 802 ' soll frequency = 584.6598 real frequency = 584.4763 Per438[75]= 757 ' soll frequency = 619.4255 real frequency = 619.2206 Per438[76]= 714 ' soll frequency = 656.2585 real frequency = 656.5126 Per438[77]= 674 ' soll frequency = 695.2817 real frequency = 695.4748 Per438[78]= 636 ' soll frequency = 736.6252 real frequency = 737.0283 Per438[79]= 601 ' soll frequency = 780.4273 real frequency = 779.9501 Per438[80]= 567 ' soll frequency = 826.8339 real frequency = 826.7196 Per438[81]= 535 ' soll frequency = 876 real frequency = 876.1682 Per438[82]= 505 ' soll frequency = 928.0897 real frequency = 928.2178 Per438[83]= 477 ' soll frequency = 983.2767 real frequency = 982.7044 Per438[84]= 450 ' soll frequency = 1041.745 real frequency = 1041.667 Per438[85]= 425 ' soll frequency = 1103.691 real frequency = 1102.941 Per438[86]= 401 ' soll frequency = 1169.32 real frequency = 1168.953 Per438[87]= 378 ' soll frequency = 1238.851 real frequency = 1240.079 Per438[88]= 357 ' soll frequency = 1312.517 real frequency = 1313.025 Per438[89]= 337 ' soll frequency = 1390.563 real frequency = 1390.95 Per438[90]= 318 ' soll frequency = 1473.25 real frequency = 1474.057 Per438[91]= 300 ' soll frequency = 1560.855 real frequency = 1562.5 Per438[92]= 283 ' soll frequency = 1653.668 real frequency = 1656.36 Per438[93]= 268 ' soll frequency = 1752 real frequency = 1749.067 Per438[94]= 253 ' soll frequency = 1856.179 real frequency = 1852.767 Per438[95]= 238 ' soll frequency = 1966.553 real frequency = 1969.538 Per438[96]= 225 ' soll frequency = 2083.491 real frequency = 2083.333 Per438[97]= 212 ' soll frequency = 2207.382 real frequency = 2211.085 Per438[98]= 200 ' soll frequency = 2338.639 real frequency = 2343.75 Per438[99]= 189 ' soll frequency = 2477.702 real frequency = 2480.159 Per438[100]= 179 ' soll frequency = 2625.034 real frequency = 2618.715 Per438[101]= 169 ' soll frequency = 2781.127 real frequency = 2773.669 Per438[102]= 159 ' soll frequency = 2946.501 real frequency = 2948.113 Per438[103]= 150 ' soll frequency = 3121.709 real frequency = 3125 Per438[104]= 142 ' soll frequency = 3307.336 real frequency = 3301.056 Per438[105]= 134 ' soll frequency = 3504 real frequency = 3498.134 Per438[106]= 126 ' soll frequency = 3712.359 real frequency = 3720.238 Per438[107]= 119 ' soll frequency = 3933.107 real frequency = 3939.076 Per438[108]= 112 ' soll frequency = 4166.982 real frequency = 4185.268 Per438[109]= 106 ' soll frequency = 4414.763 real frequency = 4422.17 Per438[110]= 100 ' soll frequency = 4677.279 real frequency = 4687.5 Per438[111]= 95 ' soll frequency = 4955.404 real frequency = 4934.21 Per438[112]= 89 ' soll frequency = 5250.068 real frequency = 5266.854 Per438[113]= 84 ' soll frequency = 5562.253 real frequency = 5580.357 Per438[114]= 80 ' soll frequency = 5893.002 real frequency = 5859.375 Per438[115]= 75 ' soll frequency = 6243.418 real frequency = 6250 Per438[116]= 71 ' soll frequency = 6614.671 real frequency = 6602.113 Per438[117]= 67 ' soll frequency = 7008 real frequency = 6996.268 Per438[118]= 63 ' soll frequency = 7424.717 real frequency = 7440.476 Per438[119]= 60 ' soll frequency = 7866.214 real frequency = 7812.5 Per438[120]= 56 ' soll frequency = 8333.964 real frequency = 8370.536 Per438[121]= 53 ' soll frequency = 8829.526 real frequency = 8844.34 Per438[122]= 50 ' soll frequency = 9354.558 real frequency = 9375 Per438[123]= 47 ' soll frequency = 9910.808 real frequency = 9973.404 Per438[124]= 45 ' soll frequency = 10500.14 real frequency = 10416.67 Per438[125]= 42 ' soll frequency = 11124.51 real frequency = 11160.71 Per438[126]= 40 ' soll frequency = 11786 real frequency = 11718.75 Per438[127]= 38 ' soll frequency = 12486.84 real frequency = 12335.53 ' midi-note to period lookup for PIC24 with 120MHz clock ' time_unit = 8.33333333333333E-9 ' divider set to = 256 ' lowest note = midi 0 (C0) , freq = 8.08289210978412Hz ' diapason A= 435 Tun_435: Per435[0]= 57993 ' soll frequency = 8.082892 real frequency = 8.082872 Per435[1]= 54738 ' soll frequency = 8.563526 real frequency = 8.56352 Per435[2]= 51666 ' soll frequency = 9.07274 real frequency = 9.072698 Per435[3]= 48766 ' soll frequency = 9.612233 real frequency = 9.61223 Per435[4]= 46029 ' soll frequency = 10.1838 real frequency = 10.1838 Per435[5]= 43446 ' soll frequency = 10.78937 real frequency = 10.78926 Per435[6]= 41007 ' soll frequency = 11.43094 real frequency = 11.43097 Per435[7]= 38706 ' soll frequency = 12.11065 real frequency = 12.11052 Per435[8]= 36533 ' soll frequency = 12.83079 real frequency = 12.83086 Per435[9]= 34483 ' soll frequency = 13.59375 real frequency = 13.59365 Per435[10]= 32547 ' soll frequency = 14.40208 real frequency = 14.40225 Per435[11]= 30721 ' soll frequency = 15.25847 real frequency = 15.25829 Per435[12]= 28996 ' soll frequency = 16.16578 real frequency = 16.16602 Per435[13]= 27369 ' soll frequency = 17.12705 real frequency = 17.12704 Per435[14]= 25833 ' soll frequency = 18.14548 real frequency = 18.1454 Per435[15]= 24383 ' soll frequency = 19.22447 real frequency = 19.22446 Per435[16]= 23014 ' soll frequency = 20.36761 real frequency = 20.36804 Per435[17]= 21723 ' soll frequency = 21.57873 real frequency = 21.57851 Per435[18]= 20504 ' soll frequency = 22.86187 real frequency = 22.86139 Per435[19]= 19353 ' soll frequency = 24.22131 real frequency = 24.22105 Per435[20]= 18267 ' soll frequency = 25.66158 real frequency = 25.66103 Per435[21]= 17241 ' soll frequency = 27.1875 real frequency = 27.1881 Per435[22]= 16274 ' soll frequency = 28.80415 real frequency = 28.80361 Per435[23]= 15360 ' soll frequency = 30.51694 real frequency = 30.51758 Per435[24]= 14498 ' soll frequency = 32.33157 real frequency = 32.33205 Per435[25]= 13684 ' soll frequency = 34.2541 real frequency = 34.25533 Per435[26]= 12916 ' soll frequency = 36.29096 real frequency = 36.29219 Per435[27]= 12191 ' soll frequency = 38.44893 real frequency = 38.4505 Per435[28]= 11507 ' soll frequency = 40.73522 real frequency = 40.73607 Per435[29]= 10861 ' soll frequency = 43.15747 real frequency = 43.15901 Per435[30]= 10252 ' soll frequency = 45.72374 real frequency = 45.72278 Per435[31]= 9676 ' soll frequency = 48.44262 real frequency = 48.44461 Per435[32]= 9133 ' soll frequency = 51.32316 real frequency = 51.32487 Per435[33]= 8621 ' soll frequency = 54.375 real frequency = 54.37304 Per435[34]= 8137 ' soll frequency = 57.60831 real frequency = 57.60723 Per435[35]= 7680 ' soll frequency = 61.03387 real frequency = 61.03516 Per435[36]= 7249 ' soll frequency = 64.66314 real frequency = 64.66409 Per435[37]= 6842 ' soll frequency = 68.50821 real frequency = 68.51066 Per435[38]= 6458 ' soll frequency = 72.58192 real frequency = 72.58439 Per435[39]= 6096 ' soll frequency = 76.89786 real frequency = 76.89468 Per435[40]= 5754 ' soll frequency = 81.47044 real frequency = 81.46506 Per435[41]= 5431 ' soll frequency = 86.31493 real frequency = 86.31007 Per435[42]= 5126 ' soll frequency = 91.44749 real frequency = 91.44557 Per435[43]= 4838 ' soll frequency = 96.88524 real frequency = 96.88921 Per435[44]= 4567 ' soll frequency = 102.6463 real frequency = 102.6385 Per435[45]= 4310 ' soll frequency = 108.75 real frequency = 108.7587 Per435[46]= 4068 ' soll frequency = 115.2166 real frequency = 115.2286 Per435[47]= 3840 ' soll frequency = 122.0677 real frequency = 122.0703 Per435[48]= 3625 ' soll frequency = 129.3263 real frequency = 129.3103 Per435[49]= 3421 ' soll frequency = 137.0164 real frequency = 137.0213 Per435[50]= 3229 ' soll frequency = 145.1638 real frequency = 145.1688 Per435[51]= 3048 ' soll frequency = 153.7957 real frequency = 153.7894 Per435[52]= 2877 ' soll frequency = 162.9409 real frequency = 162.9301 Per435[53]= 2715 ' soll frequency = 172.6299 real frequency = 172.6519 Per435[54]= 2563 ' soll frequency = 182.895 real frequency = 182.8911 Per435[55]= 2419 ' soll frequency = 193.7705 real frequency = 193.7784 Per435[56]= 2283 ' soll frequency = 205.2927 real frequency = 205.3219 Per435[57]= 2155 ' soll frequency = 217.5 real frequency = 217.5174 Per435[58]= 2034 ' soll frequency = 230.4332 real frequency = 230.4572 Per435[59]= 1920 ' soll frequency = 244.1355 real frequency = 244.1406 Per435[60]= 1812 ' soll frequency = 258.6526 real frequency = 258.692 Per435[61]= 1711 ' soll frequency = 274.0328 real frequency = 273.9626 Per435[62]= 1615 ' soll frequency = 290.3277 real frequency = 290.2477 Per435[63]= 1524 ' soll frequency = 307.5915 real frequency = 307.5787 Per435[64]= 1438 ' soll frequency = 325.8818 real frequency = 325.9736 Per435[65]= 1358 ' soll frequency = 345.2597 real frequency = 345.1767 Per435[66]= 1281 ' soll frequency = 365.7899 real frequency = 365.925 Per435[67]= 1210 ' soll frequency = 387.541 real frequency = 387.3967 Per435[68]= 1142 ' soll frequency = 410.5853 real frequency = 410.4641 Per435[69]= 1078 ' soll frequency = 435 real frequency = 434.833 Per435[70]= 1017 ' soll frequency = 460.8664 real frequency = 460.9144 Per435[71]= 960 ' soll frequency = 488.271 real frequency = 488.2812 Per435[72]= 906 ' soll frequency = 517.3051 real frequency = 517.3841 Per435[73]= 855 ' soll frequency = 548.0657 real frequency = 548.2456 Per435[74]= 807 ' soll frequency = 580.6553 real frequency = 580.855 Per435[75]= 762 ' soll frequency = 615.1829 real frequency = 615.1575 Per435[76]= 719 ' soll frequency = 651.7635 real frequency = 651.9471 Per435[77]= 679 ' soll frequency = 690.5195 real frequency = 690.3534 Per435[78]= 641 ' soll frequency = 731.5799 real frequency = 731.2792 Per435[79]= 605 ' soll frequency = 775.0819 real frequency = 774.7934 Per435[80]= 571 ' soll frequency = 821.1706 real frequency = 820.9282 Per435[81]= 539 ' soll frequency = 870 real frequency = 869.6661 Per435[82]= 509 ' soll frequency = 921.7329 real frequency = 920.9234 Per435[83]= 480 ' soll frequency = 976.542 real frequency = 976.5625 Per435[84]= 453 ' soll frequency = 1034.61 real frequency = 1034.768 Per435[85]= 428 ' soll frequency = 1096.131 real frequency = 1095.21 Per435[86]= 404 ' soll frequency = 1161.311 real frequency = 1160.272 Per435[87]= 381 ' soll frequency = 1230.366 real frequency = 1230.315 Per435[88]= 360 ' soll frequency = 1303.527 real frequency = 1302.083 Per435[89]= 339 ' soll frequency = 1381.039 real frequency = 1382.743 Per435[90]= 320 ' soll frequency = 1463.16 real frequency = 1464.844 Per435[91]= 302 ' soll frequency = 1550.164 real frequency = 1552.152 Per435[92]= 285 ' soll frequency = 1642.341 real frequency = 1644.737 Per435[93]= 269 ' soll frequency = 1740 real frequency = 1742.565 Per435[94]= 254 ' soll frequency = 1843.466 real frequency = 1845.472 Per435[95]= 240 ' soll frequency = 1953.084 real frequency = 1953.125 Per435[96]= 227 ' soll frequency = 2069.22 real frequency = 2064.978 Per435[97]= 214 ' soll frequency = 2192.263 real frequency = 2190.421 Per435[98]= 202 ' soll frequency = 2322.621 real frequency = 2320.544 Per435[99]= 190 ' soll frequency = 2460.732 real frequency = 2467.105 Per435[100]= 180 ' soll frequency = 2607.054 real frequency = 2604.167 Per435[101]= 170 ' soll frequency = 2762.078 real frequency = 2757.353 Per435[102]= 160 ' soll frequency = 2926.32 real frequency = 2929.688 Per435[103]= 151 ' soll frequency = 3100.328 real frequency = 3104.305 Per435[104]= 143 ' soll frequency = 3284.683 real frequency = 3277.972 Per435[105]= 135 ' soll frequency = 3480 real frequency = 3472.222 Per435[106]= 127 ' soll frequency = 3686.932 real frequency = 3690.945 Per435[107]= 120 ' soll frequency = 3906.168 real frequency = 3906.25 Per435[108]= 113 ' soll frequency = 4138.441 real frequency = 4148.23 Per435[109]= 107 ' soll frequency = 4384.525 real frequency = 4380.841 Per435[110]= 101 ' soll frequency = 4645.243 real frequency = 4641.089 Per435[111]= 95 ' soll frequency = 4921.463 real frequency = 4934.21 Per435[112]= 90 ' soll frequency = 5214.108 real frequency = 5208.333 Per435[113]= 85 ' soll frequency = 5524.156 real frequency = 5514.706 Per435[114]= 80 ' soll frequency = 5852.639 real frequency = 5859.375 Per435[115]= 76 ' soll frequency = 6200.655 real frequency = 6167.763 Per435[116]= 71 ' soll frequency = 6569.365 real frequency = 6602.113 Per435[117]= 67 ' soll frequency = 6960 real frequency = 6996.268 Per435[118]= 64 ' soll frequency = 7373.863 real frequency = 7324.219 Per435[119]= 60 ' soll frequency = 7812.336 real frequency = 7812.5 Per435[120]= 57 ' soll frequency = 8276.882 real frequency = 8223.684 Per435[121]= 53 ' soll frequency = 8769.051 real frequency = 8844.34 Per435[122]= 50 ' soll frequency = 9290.485 real frequency = 9375 Per435[123]= 48 ' soll frequency = 9842.927 real frequency = 9765.625 Per435[124]= 45 ' soll frequency = 10428.22 real frequency = 10416.67 Per435[125]= 42 ' soll frequency = 11048.31 real frequency = 11160.71 Per435[126]= 40 ' soll frequency = 11705.28 real frequency = 11718.75 Per435[127]= 38 ' soll frequency = 12401.31 real frequency = 12335.53 ' midi-note to period lookup for PIC24 with 120MHz clock ' time_unit = 8.33333333333333E-9 ' divider set to = 256 ' lowest note = midi 0 (C0) , freq = 8.21296163798754Hz ' diapason A= 442 Tun_442: Per442[0]= 57074 ' soll frequency = 8.212961 real frequency = 8.213021 Per442[1]= 53871 ' soll frequency = 8.70133 real frequency = 8.701342 Per442[2]= 50848 ' soll frequency = 9.218738 real frequency = 9.218652 Per442[3]= 47994 ' soll frequency = 9.766912 real frequency = 9.766846 Per442[4]= 45300 ' soll frequency = 10.34768 real frequency = 10.34768 Per442[5]= 42758 ' soll frequency = 10.96299 real frequency = 10.96286 Per442[6]= 40358 ' soll frequency = 11.61488 real frequency = 11.6148 Per442[7]= 38093 ' soll frequency = 12.30554 real frequency = 12.30541 Per442[8]= 35955 ' soll frequency = 13.03726 real frequency = 13.03713 Per442[9]= 33937 ' soll frequency = 13.8125 real frequency = 13.81236 Per442[10]= 32032 ' soll frequency = 14.63383 real frequency = 14.6338 Per442[11]= 30234 ' soll frequency = 15.50401 real frequency = 15.50407 Per442[12]= 28537 ' soll frequency = 16.42592 real frequency = 16.42604 Per442[13]= 26936 ' soll frequency = 17.40266 real frequency = 17.40236 Per442[14]= 25424 ' soll frequency = 18.43748 real frequency = 18.4373 Per442[15]= 23997 ' soll frequency = 19.53382 real frequency = 19.53369 Per442[16]= 22650 ' soll frequency = 20.69536 real frequency = 20.69536 Per442[17]= 21379 ' soll frequency = 21.92598 real frequency = 21.92572 Per442[18]= 20179 ' soll frequency = 23.22976 real frequency = 23.2296 Per442[19]= 19046 ' soll frequency = 24.61108 real frequency = 24.61147 Per442[20]= 17977 ' soll frequency = 26.07453 real frequency = 26.07498 Per442[21]= 16968 ' soll frequency = 27.625 real frequency = 27.62553 Per442[22]= 16016 ' soll frequency = 29.26767 real frequency = 29.26761 Per442[23]= 15117 ' soll frequency = 31.00801 real frequency = 31.00814 Per442[24]= 14269 ' soll frequency = 32.85184 real frequency = 32.85094 Per442[25]= 13468 ' soll frequency = 34.80532 real frequency = 34.80472 Per442[26]= 12712 ' soll frequency = 36.87495 real frequency = 36.87461 Per442[27]= 11998 ' soll frequency = 39.06765 real frequency = 39.06901 Per442[28]= 11325 ' soll frequency = 41.39073 real frequency = 41.39073 Per442[29]= 10689 ' soll frequency = 43.85196 real frequency = 43.85349 Per442[30]= 10089 ' soll frequency = 46.45953 real frequency = 46.46149 Per442[31]= 9523 ' soll frequency = 49.22215 real frequency = 49.22293 Per442[32]= 8989 ' soll frequency = 52.14906 real frequency = 52.14707 Per442[33]= 8484 ' soll frequency = 55.25 real frequency = 55.25106 Per442[34]= 8008 ' soll frequency = 58.53534 real frequency = 58.53521 Per442[35]= 7559 ' soll frequency = 62.01603 real frequency = 62.01217 Per442[36]= 7134 ' soll frequency = 65.70369 real frequency = 65.70647 Per442[37]= 6734 ' soll frequency = 69.61064 real frequency = 69.60944 Per442[38]= 6356 ' soll frequency = 73.7499 real frequency = 73.74921 Per442[39]= 5999 ' soll frequency = 78.1353 real frequency = 78.13802 Per442[40]= 5662 ' soll frequency = 82.78146 real frequency = 82.78876 Per442[41]= 5345 ' soll frequency = 87.70391 real frequency = 87.69878 Per442[42]= 5045 ' soll frequency = 92.91905 real frequency = 92.91377 Per442[43]= 4762 ' soll frequency = 98.4443 real frequency = 98.43553 Per442[44]= 4494 ' soll frequency = 104.2981 real frequency = 104.3057 Per442[45]= 4242 ' soll frequency = 110.5 real frequency = 110.5021 Per442[46]= 4004 ' soll frequency = 117.0707 real frequency = 117.0704 Per442[47]= 3779 ' soll frequency = 124.032 real frequency = 124.0407 Per442[48]= 3567 ' soll frequency = 131.4074 real frequency = 131.4129 Per442[49]= 3367 ' soll frequency = 139.2213 real frequency = 139.2189 Per442[50]= 3178 ' soll frequency = 147.4998 real frequency = 147.4984 Per442[51]= 3000 ' soll frequency = 156.2706 real frequency = 156.25 Per442[52]= 2831 ' soll frequency = 165.5629 real frequency = 165.5775 Per442[53]= 2672 ' soll frequency = 175.4078 real frequency = 175.4304 Per442[54]= 2522 ' soll frequency = 185.8381 real frequency = 185.8644 Per442[55]= 2381 ' soll frequency = 196.8886 real frequency = 196.8711 Per442[56]= 2247 ' soll frequency = 208.5962 real frequency = 208.6115 Per442[57]= 2121 ' soll frequency = 221 real frequency = 221.0042 Per442[58]= 2002 ' soll frequency = 234.1413 real frequency = 234.1408 Per442[59]= 1890 ' soll frequency = 248.0641 real frequency = 248.0159 Per442[60]= 1784 ' soll frequency = 262.8148 real frequency = 262.7522 Per442[61]= 1683 ' soll frequency = 278.4426 real frequency = 278.5205 Per442[62]= 1589 ' soll frequency = 294.9996 real frequency = 294.9968 Per442[63]= 1500 ' soll frequency = 312.5412 real frequency = 312.5 Per442[64]= 1416 ' soll frequency = 331.1258 real frequency = 331.0381 Per442[65]= 1336 ' soll frequency = 350.8156 real frequency = 350.8608 Per442[66]= 1261 ' soll frequency = 371.6762 real frequency = 371.7288 Per442[67]= 1190 ' soll frequency = 393.7772 real frequency = 393.9076 Per442[68]= 1124 ' soll frequency = 417.1924 real frequency = 417.0374 Per442[69]= 1061 ' soll frequency = 442 real frequency = 441.8002 Per442[70]= 1001 ' soll frequency = 468.2827 real frequency = 468.2817 Per442[71]= 945 ' soll frequency = 496.1282 real frequency = 496.0317 Per442[72]= 892 ' soll frequency = 525.6295 real frequency = 525.5044 Per442[73]= 842 ' soll frequency = 556.8851 real frequency = 556.7102 Per442[74]= 794 ' soll frequency = 589.9992 real frequency = 590.3652 Per442[75]= 750 ' soll frequency = 625.0824 real frequency = 625 Per442[76]= 708 ' soll frequency = 662.2517 real frequency = 662.0763 Per442[77]= 668 ' soll frequency = 701.6313 real frequency = 701.7216 Per442[78]= 631 ' soll frequency = 743.3524 real frequency = 742.8685 Per442[79]= 595 ' soll frequency = 787.5544 real frequency = 787.8151 Per442[80]= 562 ' soll frequency = 834.3849 real frequency = 834.0747 Per442[81]= 530 ' soll frequency = 884 real frequency = 884.434 Per442[82]= 500 ' soll frequency = 936.5654 real frequency = 937.5 Per442[83]= 472 ' soll frequency = 992.2565 real frequency = 993.1144 Per442[84]= 446 ' soll frequency = 1051.259 real frequency = 1051.009 Per442[85]= 421 ' soll frequency = 1113.77 real frequency = 1113.42 Per442[86]= 397 ' soll frequency = 1179.998 real frequency = 1180.73 Per442[87]= 375 ' soll frequency = 1250.165 real frequency = 1250 Per442[88]= 354 ' soll frequency = 1324.503 real frequency = 1324.152 Per442[89]= 334 ' soll frequency = 1403.262 real frequency = 1403.443 Per442[90]= 315 ' soll frequency = 1486.705 real frequency = 1488.095 Per442[91]= 298 ' soll frequency = 1575.109 real frequency = 1572.986 Per442[92]= 281 ' soll frequency = 1668.77 real frequency = 1668.149 Per442[93]= 265 ' soll frequency = 1768 real frequency = 1768.868 Per442[94]= 250 ' soll frequency = 1873.131 real frequency = 1875 Per442[95]= 236 ' soll frequency = 1984.513 real frequency = 1986.229 Per442[96]= 223 ' soll frequency = 2102.518 real frequency = 2102.018 Per442[97]= 210 ' soll frequency = 2227.54 real frequency = 2232.143 Per442[98]= 199 ' soll frequency = 2359.997 real frequency = 2355.528 Per442[99]= 187 ' soll frequency = 2500.33 real frequency = 2506.684 Per442[100]= 177 ' soll frequency = 2649.007 real frequency = 2648.305 Per442[101]= 167 ' soll frequency = 2806.525 real frequency = 2806.886 Per442[102]= 158 ' soll frequency = 2973.41 real frequency = 2966.772 Per442[103]= 149 ' soll frequency = 3150.218 real frequency = 3145.973 Per442[104]= 140 ' soll frequency = 3337.54 real frequency = 3348.214 Per442[105]= 133 ' soll frequency = 3536 real frequency = 3524.436 Per442[106]= 125 ' soll frequency = 3746.261 real frequency = 3750 Per442[107]= 118 ' soll frequency = 3969.026 real frequency = 3972.458 Per442[108]= 111 ' soll frequency = 4205.036 real frequency = 4222.973 Per442[109]= 105 ' soll frequency = 4455.081 real frequency = 4464.286 Per442[110]= 99 ' soll frequency = 4719.994 real frequency = 4734.849 Per442[111]= 94 ' soll frequency = 5000.659 real frequency = 4986.702 Per442[112]= 88 ' soll frequency = 5298.014 real frequency = 5326.704 Per442[113]= 84 ' soll frequency = 5613.05 real frequency = 5580.357 Per442[114]= 79 ' soll frequency = 5946.819 real frequency = 5933.544 Per442[115]= 74 ' soll frequency = 6300.436 real frequency = 6334.459 Per442[116]= 70 ' soll frequency = 6675.079 real frequency = 6696.429 Per442[117]= 66 ' soll frequency = 7072 real frequency = 7102.273 Per442[118]= 63 ' soll frequency = 7492.523 real frequency = 7440.476 Per442[119]= 59 ' soll frequency = 7938.052 real frequency = 7944.915 Per442[120]= 56 ' soll frequency = 8410.072 real frequency = 8370.536 Per442[121]= 53 ' soll frequency = 8910.162 real frequency = 8844.34 Per442[122]= 50 ' soll frequency = 9439.987 real frequency = 9375 Per442[123]= 47 ' soll frequency = 10001.32 real frequency = 9973.404 Per442[124]= 44 ' soll frequency = 10596.03 real frequency = 10653.41 Per442[125]= 42 ' soll frequency = 11226.1 real frequency = 11160.71 Per442[126]= 39 ' soll frequency = 11893.64 real frequency = 12019.23 Per442[127]= 37 ' soll frequency = 12600.87 real frequency = 12668.92 ' midi-note to period lookup for PIC24 with 120MHz clock ' time_unit = 8.33333333333333E-9 ' divider set to = 256 ' lowest note = midi 0 (C0) , freq = 8.2687057215033Hz ' diapason A= 445 Tun_445: Per445[0]= 56690 ' soll frequency = 8.268705 real frequency = 8.268654 Per445[1]= 53508 ' soll frequency = 8.760388 real frequency = 8.760372 Per445[2]= 50505 ' soll frequency = 9.281308 real frequency = 9.28126 Per445[3]= 47670 ' soll frequency = 9.833203 real frequency = 9.833228 Per445[4]= 44995 ' soll frequency = 10.41792 real frequency = 10.41782 Per445[5]= 42469 ' soll frequency = 11.0374 real frequency = 11.03746 Per445[6]= 40086 ' soll frequency = 11.69372 real frequency = 11.69361 Per445[7]= 37836 ' soll frequency = 12.38906 real frequency = 12.38899 Per445[8]= 35712 ' soll frequency = 13.12575 real frequency = 13.12584 Per445[9]= 33708 ' soll frequency = 13.90625 real frequency = 13.90619 Per445[10]= 31816 ' soll frequency = 14.73316 real frequency = 14.73315 Per445[11]= 30030 ' soll frequency = 15.60924 real frequency = 15.60939 Per445[12]= 28345 ' soll frequency = 16.53741 real frequency = 16.53731 Per445[13]= 26754 ' soll frequency = 17.52078 real frequency = 17.52074 Per445[14]= 25252 ' soll frequency = 18.56262 real frequency = 18.56288 Per445[15]= 23835 ' soll frequency = 19.66641 real frequency = 19.66646 Per445[16]= 22497 ' soll frequency = 20.83583 real frequency = 20.83611 Per445[17]= 21235 ' soll frequency = 22.0748 real frequency = 22.0744 Per445[18]= 20043 ' soll frequency = 23.38743 real frequency = 23.38722 Per445[19]= 18918 ' soll frequency = 24.77812 real frequency = 24.77799 Per445[20]= 17856 ' soll frequency = 26.2515 real frequency = 26.25168 Per445[21]= 16854 ' soll frequency = 27.8125 real frequency = 27.81239 Per445[22]= 15908 ' soll frequency = 29.46632 real frequency = 29.46631 Per445[23]= 15015 ' soll frequency = 31.21848 real frequency = 31.21878 Per445[24]= 14172 ' soll frequency = 33.07482 real frequency = 33.07578 Per445[25]= 13377 ' soll frequency = 35.04155 real frequency = 35.04149 Per445[26]= 12626 ' soll frequency = 37.12523 real frequency = 37.12577 Per445[27]= 11918 ' soll frequency = 39.33281 real frequency = 39.33126 Per445[28]= 11249 ' soll frequency = 41.67166 real frequency = 41.67037 Per445[29]= 10617 ' soll frequency = 44.14959 real frequency = 44.15089 Per445[30]= 10021 ' soll frequency = 46.77486 real frequency = 46.77677 Per445[31]= 9459 ' soll frequency = 49.55624 real frequency = 49.55598 Per445[32]= 8928 ' soll frequency = 52.50301 real frequency = 52.50336 Per445[33]= 8427 ' soll frequency = 55.625 real frequency = 55.62478 Per445[34]= 7954 ' soll frequency = 58.93264 real frequency = 58.93261 Per445[35]= 7508 ' soll frequency = 62.43695 real frequency = 62.4334 Per445[36]= 7086 ' soll frequency = 66.14964 real frequency = 66.15156 Per445[37]= 6688 ' soll frequency = 70.08311 real frequency = 70.08822 Per445[38]= 6313 ' soll frequency = 74.25046 real frequency = 74.25154 Per445[39]= 5959 ' soll frequency = 78.66563 real frequency = 78.66253 Per445[40]= 5624 ' soll frequency = 83.34333 real frequency = 83.34815 Per445[41]= 5309 ' soll frequency = 88.29919 real frequency = 88.29346 Per445[42]= 5011 ' soll frequency = 93.54973 real frequency = 93.5442 Per445[43]= 4729 ' soll frequency = 99.11248 real frequency = 99.12244 Per445[44]= 4464 ' soll frequency = 105.006 real frequency = 105.0067 Per445[45]= 4213 ' soll frequency = 111.25 real frequency = 111.2628 Per445[46]= 3977 ' soll frequency = 117.8653 real frequency = 117.8652 Per445[47]= 3754 ' soll frequency = 124.8739 real frequency = 124.8668 Per445[48]= 3543 ' soll frequency = 132.2993 real frequency = 132.3031 Per445[49]= 3344 ' soll frequency = 140.1662 real frequency = 140.1764 Per445[50]= 3157 ' soll frequency = 148.5009 real frequency = 148.4796 Per445[51]= 2979 ' soll frequency = 157.3312 real frequency = 157.3514 Per445[52]= 2812 ' soll frequency = 166.6867 real frequency = 166.6963 Per445[53]= 2654 ' soll frequency = 176.5984 real frequency = 176.6202 Per445[54]= 2505 ' soll frequency = 187.0994 real frequency = 187.1257 Per445[55]= 2365 ' soll frequency = 198.225 real frequency = 198.203 Per445[56]= 2232 ' soll frequency = 210.012 real frequency = 210.0134 Per445[57]= 2107 ' soll frequency = 222.5 real frequency = 222.4727 Per445[58]= 1988 ' soll frequency = 235.7305 real frequency = 235.7897 Per445[59]= 1877 ' soll frequency = 249.7478 real frequency = 249.7336 Per445[60]= 1772 ' soll frequency = 264.5986 real frequency = 264.5316 Per445[61]= 1672 ' soll frequency = 280.3324 real frequency = 280.3529 Per445[62]= 1578 ' soll frequency = 297.0019 real frequency = 297.0532 Per445[63]= 1490 ' soll frequency = 314.6625 real frequency = 314.5973 Per445[64]= 1406 ' soll frequency = 333.3733 real frequency = 333.3926 Per445[65]= 1327 ' soll frequency = 353.1967 real frequency = 353.2404 Per445[66]= 1253 ' soll frequency = 374.1989 real frequency = 374.1021 Per445[67]= 1182 ' soll frequency = 396.4499 real frequency = 396.5736 Per445[68]= 1116 ' soll frequency = 420.0241 real frequency = 420.0269 Per445[69]= 1053 ' soll frequency = 445 real frequency = 445.1567 Per445[70]= 994 ' soll frequency = 471.4611 real frequency = 471.5795 Per445[71]= 938 ' soll frequency = 499.4956 real frequency = 499.7335 Per445[72]= 886 ' soll frequency = 529.1971 real frequency = 529.0632 Per445[73]= 836 ' soll frequency = 560.6648 real frequency = 560.7057 Per445[74]= 789 ' soll frequency = 594.0037 real frequency = 594.1064 Per445[75]= 745 ' soll frequency = 629.325 real frequency = 629.1946 Per445[76]= 703 ' soll frequency = 666.7466 real frequency = 666.7852 Per445[77]= 664 ' soll frequency = 706.3935 real frequency = 705.9488 Per445[78]= 626 ' soll frequency = 748.3978 real frequency = 748.8019 Per445[79]= 591 ' soll frequency = 792.8998 real frequency = 793.1472 Per445[80]= 558 ' soll frequency = 840.0482 real frequency = 840.0538 Per445[81]= 527 ' soll frequency = 890 real frequency = 889.4687 Per445[82]= 497 ' soll frequency = 942.9222 real frequency = 943.1589 Per445[83]= 469 ' soll frequency = 998.9912 real frequency = 999.467 Per445[84]= 443 ' soll frequency = 1058.394 real frequency = 1058.126 Per445[85]= 418 ' soll frequency = 1121.33 real frequency = 1121.411 Per445[86]= 395 ' soll frequency = 1188.007 real frequency = 1186.709 Per445[87]= 372 ' soll frequency = 1258.65 real frequency = 1260.081 Per445[88]= 352 ' soll frequency = 1333.493 real frequency = 1331.676 Per445[89]= 332 ' soll frequency = 1412.787 real frequency = 1411.898 Per445[90]= 313 ' soll frequency = 1496.796 real frequency = 1497.604 Per445[91]= 296 ' soll frequency = 1585.8 real frequency = 1583.615 Per445[92]= 279 ' soll frequency = 1680.096 real frequency = 1680.108 Per445[93]= 263 ' soll frequency = 1780 real frequency = 1782.319 Per445[94]= 249 ' soll frequency = 1885.844 real frequency = 1882.53 Per445[95]= 235 ' soll frequency = 1997.982 real frequency = 1994.681 Per445[96]= 221 ' soll frequency = 2116.788 real frequency = 2121.041 Per445[97]= 209 ' soll frequency = 2242.659 real frequency = 2242.823 Per445[98]= 197 ' soll frequency = 2376.015 real frequency = 2379.442 Per445[99]= 186 ' soll frequency = 2517.3 real frequency = 2520.161 Per445[100]= 176 ' soll frequency = 2666.986 real frequency = 2663.352 Per445[101]= 166 ' soll frequency = 2825.574 real frequency = 2823.795 Per445[102]= 157 ' soll frequency = 2993.591 real frequency = 2985.669 Per445[103]= 148 ' soll frequency = 3171.599 real frequency = 3167.23 Per445[104]= 140 ' soll frequency = 3360.193 real frequency = 3348.214 Per445[105]= 132 ' soll frequency = 3560 real frequency = 3551.136 Per445[106]= 124 ' soll frequency = 3771.689 real frequency = 3780.242 Per445[107]= 117 ' soll frequency = 3995.965 real frequency = 4006.41 Per445[108]= 111 ' soll frequency = 4233.577 real frequency = 4222.973 Per445[109]= 105 ' soll frequency = 4485.319 real frequency = 4464.286 Per445[110]= 99 ' soll frequency = 4752.03 real frequency = 4734.849 Per445[111]= 93 ' soll frequency = 5034.6 real frequency = 5040.323 Per445[112]= 88 ' soll frequency = 5333.973 real frequency = 5326.704 Per445[113]= 83 ' soll frequency = 5651.148 real frequency = 5647.59 Per445[114]= 78 ' soll frequency = 5987.183 real frequency = 6009.615 Per445[115]= 74 ' soll frequency = 6343.199 real frequency = 6334.459 Per445[116]= 70 ' soll frequency = 6720.385 real frequency = 6696.429 Per445[117]= 66 ' soll frequency = 7120 real frequency = 7102.273 Per445[118]= 62 ' soll frequency = 7543.377 real frequency = 7560.484 Per445[119]= 59 ' soll frequency = 7991.93 real frequency = 7944.915 Per445[120]= 55 ' soll frequency = 8467.154 real frequency = 8522.728 Per445[121]= 52 ' soll frequency = 8970.638 real frequency = 9014.423 Per445[122]= 49 ' soll frequency = 9504.06 real frequency = 9566.326 Per445[123]= 47 ' soll frequency = 10069.2 real frequency = 9973.404 Per445[124]= 44 ' soll frequency = 10667.95 real frequency = 10653.41 Per445[125]= 41 ' soll frequency = 11302.3 real frequency = 11432.93 Per445[126]= 39 ' soll frequency = 11974.36 real frequency = 12019.23 Per445[127]= 37 ' soll frequency = 12686.4 real frequency = 12668.92 ' midi-note to period lookup for PIC24 with 120MHz clock ' time_unit = 8.33333333333333E-9 ' divider set to = 256 ' lowest note = midi 0 (C0) , freq = 8.4153681102195Hz ' diapason A= 452.892984123136 Tun_Qup: PerQu[0]= 55702 ' soll frequency = 8.415368 real frequency = 8.415318 PerQu[1]= 52575 ' soll frequency = 8.915771 real frequency = 8.915834 PerQu[2]= 49625 ' soll frequency = 9.445931 real frequency = 9.445844 PerQu[3]= 46839 ' soll frequency = 10.00762 real frequency = 10.00768 PerQu[4]= 44210 ' soll frequency = 10.6027 real frequency = 10.6028 PerQu[5]= 41729 ' soll frequency = 11.23317 real frequency = 11.2332 PerQu[6]= 39387 ' soll frequency = 11.90113 real frequency = 11.90113 PerQu[7]= 37176 ' soll frequency = 12.6088 real frequency = 12.60894 PerQu[8]= 35090 ' soll frequency = 13.35856 real frequency = 13.35851 PerQu[9]= 33120 ' soll frequency = 14.1529 real frequency = 14.15308 PerQu[10]= 31262 ' soll frequency = 14.99448 real frequency = 14.99424 PerQu[11]= 29507 ' soll frequency = 15.8861 real frequency = 15.88606 PerQu[12]= 27851 ' soll frequency = 16.83074 real frequency = 16.83064 PerQu[13]= 26288 ' soll frequency = 17.83154 real frequency = 17.83133 PerQu[14]= 24812 ' soll frequency = 18.89186 real frequency = 18.89207 PerQu[15]= 23420 ' soll frequency = 20.01523 real frequency = 20.01494 PerQu[16]= 22105 ' soll frequency = 21.2054 real frequency = 21.20561 PerQu[17]= 20865 ' soll frequency = 22.46634 real frequency = 22.46585 PerQu[18]= 19694 ' soll frequency = 23.80226 real frequency = 23.80167 PerQu[19]= 18588 ' soll frequency = 25.21761 real frequency = 25.21788 PerQu[20]= 17545 ' soll frequency = 26.71713 real frequency = 26.71701 PerQu[21]= 16560 ' soll frequency = 28.30581 real frequency = 28.30616 PerQu[22]= 15631 ' soll frequency = 29.98896 real frequency = 29.98848 PerQu[23]= 14753 ' soll frequency = 31.7722 real frequency = 31.7732 PerQu[24]= 13925 ' soll frequency = 33.66147 real frequency = 33.66248 PerQu[25]= 13144 ' soll frequency = 35.66308 real frequency = 35.66266 PerQu[26]= 12406 ' soll frequency = 37.78372 real frequency = 37.78414 PerQu[27]= 11710 ' soll frequency = 40.03046 real frequency = 40.02989 PerQu[28]= 11053 ' soll frequency = 42.4108 real frequency = 42.4093 PerQu[29]= 10432 ' soll frequency = 44.93267 real frequency = 44.93386 PerQu[30]= 9847 ' soll frequency = 47.60451 real frequency = 47.60333 PerQu[31]= 9294 ' soll frequency = 50.43522 real frequency = 50.43576 PerQu[32]= 8772 ' soll frequency = 53.43426 real frequency = 53.43707 PerQu[33]= 8280 ' soll frequency = 56.61162 real frequency = 56.61232 PerQu[34]= 7815 ' soll frequency = 59.97792 real frequency = 59.9808 PerQu[35]= 7377 ' soll frequency = 63.5444 real frequency = 63.54209 PerQu[36]= 6963 ' soll frequency = 67.32294 real frequency = 67.32012 PerQu[37]= 6572 ' soll frequency = 71.32617 real frequency = 71.32532 PerQu[38]= 6203 ' soll frequency = 75.56745 real frequency = 75.56828 PerQu[39]= 5855 ' soll frequency = 80.06093 real frequency = 80.05978 PerQu[40]= 5526 ' soll frequency = 84.82159 real frequency = 84.82628 PerQu[41]= 5216 ' soll frequency = 89.86535 real frequency = 89.86771 PerQu[42]= 4923 ' soll frequency = 95.20902 real frequency = 95.21633 PerQu[43]= 4647 ' soll frequency = 100.8704 real frequency = 100.8715 PerQu[44]= 4386 ' soll frequency = 106.8685 real frequency = 106.8741 PerQu[45]= 4140 ' soll frequency = 113.2232 real frequency = 113.2246 PerQu[46]= 3908 ' soll frequency = 119.9558 real frequency = 119.9463 PerQu[47]= 3688 ' soll frequency = 127.0888 real frequency = 127.1014 PerQu[48]= 3481 ' soll frequency = 134.6459 real frequency = 134.6596 PerQu[49]= 3286 ' soll frequency = 142.6523 real frequency = 142.6506 PerQu[50]= 3102 ' soll frequency = 151.1349 real frequency = 151.1122 PerQu[51]= 2927 ' soll frequency = 160.1218 real frequency = 160.1469 PerQu[52]= 2763 ' soll frequency = 169.6432 real frequency = 169.6526 PerQu[53]= 2608 ' soll frequency = 179.7307 real frequency = 179.7354 PerQu[54]= 2462 ' soll frequency = 190.418 real frequency = 190.394 PerQu[55]= 2324 ' soll frequency = 201.7409 real frequency = 201.6997 PerQu[56]= 2193 ' soll frequency = 213.737 real frequency = 213.7483 PerQu[57]= 2070 ' soll frequency = 226.4465 real frequency = 226.4493 PerQu[58]= 1954 ' soll frequency = 239.9117 real frequency = 239.8925 PerQu[59]= 1844 ' soll frequency = 254.1776 real frequency = 254.2028 PerQu[60]= 1741 ' soll frequency = 269.2918 real frequency = 269.2418 PerQu[61]= 1643 ' soll frequency = 285.3047 real frequency = 285.3013 PerQu[62]= 1551 ' soll frequency = 302.2698 real frequency = 302.2244 PerQu[63]= 1464 ' soll frequency = 320.2437 real frequency = 320.1844 PerQu[64]= 1382 ' soll frequency = 339.2864 real frequency = 339.1823 PerQu[65]= 1304 ' soll frequency = 359.4614 real frequency = 359.4708 PerQu[66]= 1231 ' soll frequency = 380.8361 real frequency = 380.788 PerQu[67]= 1162 ' soll frequency = 403.4818 real frequency = 403.3993 PerQu[68]= 1097 ' soll frequency = 427.4741 real frequency = 427.3017 PerQu[69]= 1035 ' soll frequency = 452.893 real frequency = 452.8986 PerQu[70]= 977 ' soll frequency = 479.8234 real frequency = 479.7851 PerQu[71]= 922 ' soll frequency = 508.3552 real frequency = 508.4056 PerQu[72]= 870 ' soll frequency = 538.5836 real frequency = 538.7931 PerQu[73]= 821 ' soll frequency = 570.6094 real frequency = 570.9501 PerQu[74]= 775 ' soll frequency = 604.5396 real frequency = 604.8387 PerQu[75]= 732 ' soll frequency = 640.4874 real frequency = 640.3688 PerQu[76]= 691 ' soll frequency = 678.5728 real frequency = 678.3647 PerQu[77]= 652 ' soll frequency = 718.9228 real frequency = 718.9417 PerQu[78]= 615 ' soll frequency = 761.6722 real frequency = 762.1951 PerQu[79]= 581 ' soll frequency = 806.9636 real frequency = 806.7986 PerQu[80]= 548 ' soll frequency = 854.9481 real frequency = 855.3832 PerQu[81]= 518 ' soll frequency = 905.7859 real frequency = 904.9228 PerQu[82]= 488 ' soll frequency = 959.6468 real frequency = 960.5533 PerQu[83]= 461 ' soll frequency = 1016.71 real frequency = 1016.811 PerQu[84]= 435 ' soll frequency = 1077.167 real frequency = 1077.586 PerQu[85]= 411 ' soll frequency = 1141.219 real frequency = 1140.511 PerQu[86]= 388 ' soll frequency = 1209.079 real frequency = 1208.118 PerQu[87]= 366 ' soll frequency = 1280.975 real frequency = 1280.738 PerQu[88]= 345 ' soll frequency = 1357.146 real frequency = 1358.696 PerQu[89]= 326 ' soll frequency = 1437.846 real frequency = 1437.883 PerQu[90]= 308 ' soll frequency = 1523.344 real frequency = 1521.916 PerQu[91]= 290 ' soll frequency = 1613.927 real frequency = 1616.379 PerQu[92]= 274 ' soll frequency = 1709.896 real frequency = 1710.766 PerQu[93]= 259 ' soll frequency = 1811.572 real frequency = 1809.846 PerQu[94]= 244 ' soll frequency = 1919.294 real frequency = 1921.106 PerQu[95]= 231 ' soll frequency = 2033.421 real frequency = 2029.221 PerQu[96]= 218 ' soll frequency = 2154.334 real frequency = 2150.229 PerQu[97]= 205 ' soll frequency = 2282.438 real frequency = 2286.585 PerQu[98]= 194 ' soll frequency = 2418.158 real frequency = 2416.237 PerQu[99]= 183 ' soll frequency = 2561.95 real frequency = 2561.475 PerQu[100]= 173 ' soll frequency = 2714.291 real frequency = 2709.538 PerQu[101]= 163 ' soll frequency = 2875.691 real frequency = 2875.767 PerQu[102]= 154 ' soll frequency = 3046.689 real frequency = 3043.831 PerQu[103]= 145 ' soll frequency = 3227.854 real frequency = 3232.758 PerQu[104]= 137 ' soll frequency = 3419.792 real frequency = 3421.533 PerQu[105]= 129 ' soll frequency = 3623.144 real frequency = 3633.721 PerQu[106]= 122 ' soll frequency = 3838.587 real frequency = 3842.213 PerQu[107]= 115 ' soll frequency = 4066.842 real frequency = 4076.087 PerQu[108]= 109 ' soll frequency = 4308.668 real frequency = 4300.458 PerQu[109]= 103 ' soll frequency = 4564.875 real frequency = 4550.971 PerQu[110]= 97 ' soll frequency = 4836.317 real frequency = 4832.474 PerQu[111]= 91 ' soll frequency = 5123.899 real frequency = 5151.099 PerQu[112]= 86 ' soll frequency = 5428.582 real frequency = 5450.582 PerQu[113]= 82 ' soll frequency = 5751.382 real frequency = 5716.463 PerQu[114]= 77 ' soll frequency = 6093.377 real frequency = 6087.662 PerQu[115]= 73 ' soll frequency = 6455.708 real frequency = 6421.233 PerQu[116]= 69 ' soll frequency = 6839.585 real frequency = 6793.478 PerQu[117]= 65 ' soll frequency = 7246.288 real frequency = 7211.538 PerQu[118]= 61 ' soll frequency = 7677.174 real frequency = 7684.426 PerQu[119]= 58 ' soll frequency = 8133.683 real frequency = 8081.896 PerQu[120]= 54 ' soll frequency = 8617.337 real frequency = 8680.556 PerQu[121]= 51 ' soll frequency = 9129.75 real frequency = 9191.177 PerQu[122]= 48 ' soll frequency = 9672.634 real frequency = 9765.625 PerQu[123]= 46 ' soll frequency = 10247.8 real frequency = 10190.22 PerQu[124]= 43 ' soll frequency = 10857.16 real frequency = 10901.16 PerQu[125]= 41 ' soll frequency = 11502.76 real frequency = 11432.93 PerQu[126]= 38 ' soll frequency = 12186.75 real frequency = 12335.53 PerQu[127]= 36 ' soll frequency = 12911.42 real frequency = 13020.83 ' midi-note to period lookup for PIC24 with 120MHz clock ' time_unit = 8.33333333333333E-9 ' divider set to = 256 ' lowest note = midi 0 (C0) , freq = 7.94304979099688Hz ' diapason A= 427.474054107586 Tun_Qd: PerQd[0]= 59014 ' soll frequency = 7.94305 real frequency = 7.94303 PerQd[1]= 55702 ' soll frequency = 8.415368 real frequency = 8.415318 PerQd[2]= 52575 ' soll frequency = 8.915771 real frequency = 8.915834 PerQd[3]= 49625 ' soll frequency = 9.445931 real frequency = 9.445844 PerQd[4]= 46839 ' soll frequency = 10.00762 real frequency = 10.00768 PerQd[5]= 44210 ' soll frequency = 10.6027 real frequency = 10.6028 PerQd[6]= 41729 ' soll frequency = 11.23317 real frequency = 11.2332 PerQd[7]= 39387 ' soll frequency = 11.90113 real frequency = 11.90113 PerQd[8]= 37176 ' soll frequency = 12.6088 real frequency = 12.60894 PerQd[9]= 35090 ' soll frequency = 13.35856 real frequency = 13.35851 PerQd[10]= 33120 ' soll frequency = 14.1529 real frequency = 14.15308 PerQd[11]= 31262 ' soll frequency = 14.99448 real frequency = 14.99424 PerQd[12]= 29507 ' soll frequency = 15.8861 real frequency = 15.88606 PerQd[13]= 27851 ' soll frequency = 16.83074 real frequency = 16.83064 PerQd[14]= 26288 ' soll frequency = 17.83154 real frequency = 17.83133 PerQd[15]= 24812 ' soll frequency = 18.89186 real frequency = 18.89207 PerQd[16]= 23420 ' soll frequency = 20.01523 real frequency = 20.01494 PerQd[17]= 22105 ' soll frequency = 21.2054 real frequency = 21.20561 PerQd[18]= 20865 ' soll frequency = 22.46634 real frequency = 22.46585 PerQd[19]= 19694 ' soll frequency = 23.80226 real frequency = 23.80167 PerQd[20]= 18588 ' soll frequency = 25.21761 real frequency = 25.21788 PerQd[21]= 17545 ' soll frequency = 26.71713 real frequency = 26.71701 PerQd[22]= 16560 ' soll frequency = 28.30581 real frequency = 28.30616 PerQd[23]= 15631 ' soll frequency = 29.98896 real frequency = 29.98848 PerQd[24]= 14753 ' soll frequency = 31.7722 real frequency = 31.7732 PerQd[25]= 13925 ' soll frequency = 33.66147 real frequency = 33.66248 PerQd[26]= 13144 ' soll frequency = 35.66308 real frequency = 35.66266 PerQd[27]= 12406 ' soll frequency = 37.78372 real frequency = 37.78414 PerQd[28]= 11710 ' soll frequency = 40.03046 real frequency = 40.02989 PerQd[29]= 11053 ' soll frequency = 42.4108 real frequency = 42.4093 PerQd[30]= 10432 ' soll frequency = 44.93267 real frequency = 44.93386 PerQd[31]= 9847 ' soll frequency = 47.60451 real frequency = 47.60333 PerQd[32]= 9294 ' soll frequency = 50.43522 real frequency = 50.43576 PerQd[33]= 8772 ' soll frequency = 53.43426 real frequency = 53.43707 PerQd[34]= 8280 ' soll frequency = 56.61162 real frequency = 56.61232 PerQd[35]= 7815 ' soll frequency = 59.97792 real frequency = 59.9808 PerQd[36]= 7377 ' soll frequency = 63.5444 real frequency = 63.54209 PerQd[37]= 6963 ' soll frequency = 67.32294 real frequency = 67.32012 PerQd[38]= 6572 ' soll frequency = 71.32617 real frequency = 71.32532 PerQd[39]= 6203 ' soll frequency = 75.56745 real frequency = 75.56828 PerQd[40]= 5855 ' soll frequency = 80.06093 real frequency = 80.05978 PerQd[41]= 5526 ' soll frequency = 84.82159 real frequency = 84.82628 PerQd[42]= 5216 ' soll frequency = 89.86535 real frequency = 89.86771 PerQd[43]= 4923 ' soll frequency = 95.20902 real frequency = 95.21633 PerQd[44]= 4647 ' soll frequency = 100.8704 real frequency = 100.8715 PerQd[45]= 4386 ' soll frequency = 106.8685 real frequency = 106.8741 PerQd[46]= 4140 ' soll frequency = 113.2232 real frequency = 113.2246 PerQd[47]= 3908 ' soll frequency = 119.9558 real frequency = 119.9463 PerQd[48]= 3688 ' soll frequency = 127.0888 real frequency = 127.1014 PerQd[49]= 3481 ' soll frequency = 134.6459 real frequency = 134.6596 PerQd[50]= 3286 ' soll frequency = 142.6523 real frequency = 142.6506 PerQd[51]= 3102 ' soll frequency = 151.1349 real frequency = 151.1122 PerQd[52]= 2927 ' soll frequency = 160.1218 real frequency = 160.1469 PerQd[53]= 2763 ' soll frequency = 169.6432 real frequency = 169.6526 PerQd[54]= 2608 ' soll frequency = 179.7307 real frequency = 179.7354 PerQd[55]= 2462 ' soll frequency = 190.418 real frequency = 190.394 PerQd[56]= 2324 ' soll frequency = 201.7409 real frequency = 201.6997 PerQd[57]= 2193 ' soll frequency = 213.737 real frequency = 213.7483 PerQd[58]= 2070 ' soll frequency = 226.4465 real frequency = 226.4493 PerQd[59]= 1954 ' soll frequency = 239.9117 real frequency = 239.8925 PerQd[60]= 1844 ' soll frequency = 254.1776 real frequency = 254.2028 PerQd[61]= 1741 ' soll frequency = 269.2918 real frequency = 269.2418 PerQd[62]= 1643 ' soll frequency = 285.3047 real frequency = 285.3013 PerQd[63]= 1551 ' soll frequency = 302.2698 real frequency = 302.2244 PerQd[64]= 1464 ' soll frequency = 320.2437 real frequency = 320.1844 PerQd[65]= 1382 ' soll frequency = 339.2864 real frequency = 339.1823 PerQd[66]= 1304 ' soll frequency = 359.4614 real frequency = 359.4708 PerQd[67]= 1231 ' soll frequency = 380.8361 real frequency = 380.788 PerQd[68]= 1162 ' soll frequency = 403.4818 real frequency = 403.3993 PerQd[69]= 1097 ' soll frequency = 427.4741 real frequency = 427.3017 PerQd[70]= 1035 ' soll frequency = 452.893 real frequency = 452.8986 PerQd[71]= 977 ' soll frequency = 479.8234 real frequency = 479.7851 PerQd[72]= 922 ' soll frequency = 508.3552 real frequency = 508.4056 PerQd[73]= 870 ' soll frequency = 538.5836 real frequency = 538.7931 PerQd[74]= 821 ' soll frequency = 570.6094 real frequency = 570.9501 PerQd[75]= 775 ' soll frequency = 604.5396 real frequency = 604.8387 PerQd[76]= 732 ' soll frequency = 640.4874 real frequency = 640.3688 PerQd[77]= 691 ' soll frequency = 678.5728 real frequency = 678.3647 PerQd[78]= 652 ' soll frequency = 718.9228 real frequency = 718.9417 PerQd[79]= 615 ' soll frequency = 761.6722 real frequency = 762.1951 PerQd[80]= 581 ' soll frequency = 806.9636 real frequency = 806.7986 PerQd[81]= 548 ' soll frequency = 854.9481 real frequency = 855.3832 PerQd[82]= 518 ' soll frequency = 905.7859 real frequency = 904.9228 PerQd[83]= 488 ' soll frequency = 959.6468 real frequency = 960.5533 PerQd[84]= 461 ' soll frequency = 1016.71 real frequency = 1016.811 PerQd[85]= 435 ' soll frequency = 1077.167 real frequency = 1077.586 PerQd[86]= 411 ' soll frequency = 1141.219 real frequency = 1140.511 PerQd[87]= 388 ' soll frequency = 1209.079 real frequency = 1208.118 PerQd[88]= 366 ' soll frequency = 1280.975 real frequency = 1280.738 PerQd[89]= 345 ' soll frequency = 1357.146 real frequency = 1358.696 PerQd[90]= 326 ' soll frequency = 1437.846 real frequency = 1437.883 PerQd[91]= 308 ' soll frequency = 1523.344 real frequency = 1521.916 PerQd[92]= 290 ' soll frequency = 1613.927 real frequency = 1616.379 PerQd[93]= 274 ' soll frequency = 1709.896 real frequency = 1710.766 PerQd[94]= 259 ' soll frequency = 1811.572 real frequency = 1809.846 PerQd[95]= 244 ' soll frequency = 1919.294 real frequency = 1921.106 PerQd[96]= 231 ' soll frequency = 2033.421 real frequency = 2029.221 PerQd[97]= 218 ' soll frequency = 2154.334 real frequency = 2150.229 PerQd[98]= 205 ' soll frequency = 2282.438 real frequency = 2286.585 PerQd[99]= 194 ' soll frequency = 2418.158 real frequency = 2416.237 PerQd[100]= 183 ' soll frequency = 2561.95 real frequency = 2561.475 PerQd[101]= 173 ' soll frequency = 2714.291 real frequency = 2709.538 PerQd[102]= 163 ' soll frequency = 2875.691 real frequency = 2875.767 PerQd[103]= 154 ' soll frequency = 3046.689 real frequency = 3043.831 PerQd[104]= 145 ' soll frequency = 3227.854 real frequency = 3232.758 PerQd[105]= 137 ' soll frequency = 3419.792 real frequency = 3421.533 PerQd[106]= 129 ' soll frequency = 3623.144 real frequency = 3633.721 PerQd[107]= 122 ' soll frequency = 3838.587 real frequency = 3842.213 PerQd[108]= 115 ' soll frequency = 4066.842 real frequency = 4076.087 PerQd[109]= 109 ' soll frequency = 4308.668 real frequency = 4300.458 PerQd[110]= 103 ' soll frequency = 4564.875 real frequency = 4550.971 PerQd[111]= 97 ' soll frequency = 4836.317 real frequency = 4832.474 PerQd[112]= 91 ' soll frequency = 5123.899 real frequency = 5151.099 PerQd[113]= 86 ' soll frequency = 5428.582 real frequency = 5450.582 PerQd[114]= 82 ' soll frequency = 5751.382 real frequency = 5716.463 PerQd[115]= 77 ' soll frequency = 6093.377 real frequency = 6087.662 PerQd[116]= 73 ' soll frequency = 6455.708 real frequency = 6421.233 PerQd[117]= 69 ' soll frequency = 6839.585 real frequency = 6793.478 PerQd[118]= 65 ' soll frequency = 7246.288 real frequency = 7211.538 PerQd[119]= 61 ' soll frequency = 7677.174 real frequency = 7684.426 PerQd[120]= 58 ' soll frequency = 8133.683 real frequency = 8081.896 PerQd[121]= 54 ' soll frequency = 8617.337 real frequency = 8680.556 PerQd[122]= 51 ' soll frequency = 9129.75 real frequency = 9191.177 PerQd[123]= 48 ' soll frequency = 9672.634 real frequency = 9765.625 PerQd[124]= 46 ' soll frequency = 10247.8 real frequency = 10190.22 PerQd[125]= 43 ' soll frequency = 10857.16 real frequency = 10901.16 PerQd[126]= 41 ' soll frequency = 11502.76 real frequency = 11432.93 PerQd[127]= 38 ' soll frequency = 12186.75 real frequency = 12335.53 Return 'Overtone_Scale: ' this is not JustInton: '' based on F (midi 41) 'PerJustF[0] = 57344 ' fractional midi note: -3.065744E-3 'PerJustF[1] = 52736 ' fractional midi note: 1.447186 'PerJustF[2] = 50944 ' fractional midi note: 2.045697 'PerJustF[3] = 49152 ' fractional midi note: 2.665642 'PerJustF[4] = 45824 ' fractional midi note: 3.879403 'PerJustF[5] = 43008 ' fractional midi note: 4.977383 'PerJustF[6] = 40448 ' fractional midi note: 6.039824 'PerJustF[7] = 38144 ' fractional midi note: 7.05517 'PerJustF[8] = 36224 ' fractional midi note: 7.949294 'PerJustF[9] = 34304 ' fractional midi note: 8.892122 'PerJustF[10] = 32768 ' fractional midi note: 9.685192 'PerJustF[11] = 31232 ' fractional midi note: 10.51634 'PerJustF[12] = 28672 ' fractional midi note: 11.99693 'PerJustF[13] = 26368 ' fractional midi note: 13.44718 'PerJustF[14] = 25472 ' fractional midi note: 14.0457 'PerJustF[15] = 24576 ' fractional midi note: 14.66564 'PerJustF[16] = 22912 ' fractional midi note: 15.8794 'PerJustF[17] = 21504 ' fractional midi note: 16.97738 'PerJustF[18] = 20224 ' fractional midi note: 18.03982 'PerJustF[19] = 19072 ' fractional midi note: 19.05517 'PerJustF[20] = 18112 ' fractional midi note: 19.94929 'PerJustF[21] = 17152 ' fractional midi note: 20.89212 'PerJustF[22] = 16384 ' fractional midi note: 21.68519 'PerJustF[23] = 15616 ' fractional midi note: 22.51634 'PerJustF[24] = 14336 ' fractional midi note: 23.99693 'PerJustF[25] = 13184 ' fractional midi note: 25.44718 'PerJustF[26] = 12736 ' fractional midi note: 26.0457 'PerJustF[27] = 12288 ' fractional midi note: 26.66564 'PerJustF[28] = 11456 ' fractional midi note: 27.8794 'PerJustF[29] = 10752 ' fractional midi note: 28.97738 'PerJustF[30] = 10112 ' fractional midi note: 30.03982 'PerJustF[31] = 9536 ' fractional midi note: 31.05517 'PerJustF[32] = 9056 ' fractional midi note: 31.94929 'PerJustF[33] = 8576 ' fractional midi note: 32.89212 'PerJustF[34] = 8192 ' fractional midi note: 33.68519 'PerJustF[35] = 7808 ' fractional midi note: 34.51634 'PerJustF[36] = 7168 ' fractional midi note: 35.99693 'PerJustF[37] = 6592 ' fractional midi note: 37.44718 'PerJustF[38] = 6368 ' fractional midi note: 38.0457 'PerJustF[39] = 6144 ' fractional midi note: 38.66564 'PerJustF[40] = 5728 ' fractional midi note: 39.8794 'PerJustF[41] = 5376 ' fractional midi note: 40.97738 - fundamental 'PerJustF[42] = 5056 ' fractional midi note: 42.03982 'PerJustF[43] = 4768 ' fractional midi note: 43.05517 'PerJustF[44] = 4528 ' fractional midi note: 43.9493 'PerJustF[45] = 4288 ' fractional midi note: 44.89212 'PerJustF[46] = 4096 ' fractional midi note: 45.68519 'PerJustF[47] = 3904 ' fractional midi note: 46.51634 'PerJustF[48] = 3584 ' fractional midi note: 47.99693 'PerJustF[49] = 3296 ' fractional midi note: 49.44718 'PerJustF[50] = 3184 ' fractional midi note: 50.0457 'PerJustF[51] = 3072 ' fractional midi note: 50.66564 'PerJustF[52] = 2864 ' fractional midi note: 51.8794 'PerJustF[53] = 2688 ' fractional midi note: 52.97738 - first octave 'PerJustF[54] = 2528 ' fractional midi note: 54.03982 'PerJustF[55] = 2384 ' fractional midi note: 55.05517 'PerJustF[56] = 2264 ' fractional midi note: 55.9493 'PerJustF[57] = 2144 ' fractional midi note: 56.89212 'PerJustF[58] = 2048 ' fractional midi note: 57.68519 'PerJustF[59] = 1952 ' fractional midi note: 58.51634 'PerJustF[60] = 1792 ' fractional midi note: 59.99693 - fifth 'PerJustF[61] = 1648 ' fractional midi note: 61.44718 'PerJustF[62] = 1592 ' fractional midi note: 62.0457 'PerJustF[63] = 1536 ' fractional midi note: 62.66564 'PerJustF[64] = 1432 ' fractional midi note: 63.8794 'PerJustF[65] = 1344 ' fractional midi note: 64.97739 - octave fifth 'PerJustF[66] = 1264 ' fractional midi note: 66.03982 'PerJustF[67] = 1192 ' fractional midi note: 67.05517 'PerJustF[68] = 1132 ' fractional midi note: 67.9493 'PerJustF[69] = 1072 ' fractional midi note: 68.89212 'PerJustF[70] = 1024 ' fractional midi note: 69.6852 'PerJustF[71] = 976 ' fractional midi note: 70.51634 'PerJustF[72] = 896 ' fractional midi note: 71.99693 'PerJustF[73] = 824 ' fractional midi note: 73.44718 'PerJustF[74] = 796 ' fractional midi note: 74.0457 'PerJustF[75] = 768 ' fractional midi note: 74.66564 'PerJustF[76] = 716 ' fractional midi note: 75.8794 'PerJustF[77] = 672 ' fractional midi note: 76.97739 - 2 octaves fifth 'PerJustF[78] = 632 ' fractional midi note: 78.03982 'PerJustF[79] = 596 ' fractional midi note: 79.05517 'PerJustF[80] = 566 ' fractional midi note: 79.9493 'PerJustF[81] = 536 ' fractional midi note: 80.89212 'PerJustF[82] = 512 ' fractional midi note: 81.6852 'PerJustF[83] = 488 ' fractional midi note: 82.51634 'PerJustF[84] = 448 ' fractional midi note: 83.99693 'PerJustF[85] = 412 ' fractional midi note: 85.44718 'PerJustF[86] = 398 ' fractional midi note: 86.0457 'PerJustF[87] = 384 ' fractional midi note: 86.66564 'PerJustF[88] = 358 ' fractional midi note: 87.8794 'PerJustF[89] = 336 ' fractional midi note: 88.97739 - 3 octaves fifth 'PerJustF[90] = 316 ' fractional midi note: 90.03982 'PerJustF[91] = 298 ' fractional midi note: 91.05517 'PerJustF[92] = 283 ' fractional midi note: 91.9493 'PerJustF[93] = 268 ' fractional midi note: 92.89212 'PerJustF[94] = 256 ' fractional midi note: 93.6852 'PerJustF[95] = 244 ' fractional midi note: 94.51634 'PerJustF[96] = 224 ' fractional midi note: 95.99693 'PerJustF[97] = 206 ' fractional midi note: 97.44718 'PerJustF[98] = 199 ' fractional midi note: 98.0457 'PerJustF[99] = 192 ' fractional midi note: 98.66564 'PerJustF[100] = 179 ' fractional midi note: 99.8794 'PerJustF[101] = 168 ' fractional midi note: 100.9774 'PerJustF[102] = 158 ' fractional midi note: 102.0398 'PerJustF[103] = 149 ' fractional midi note: 103.0552 'PerJustF[104] = 142 ' fractional midi note: 103.8882 'PerJustF[105] = 134 ' fractional midi note: 104.8921 'PerJustF[106] = 128 ' fractional midi note: 105.6852 'PerJustF[107] = 122 ' fractional midi note: 106.5163 'PerJustF[108] = 112 ' fractional midi note: 107.9969 'PerJustF[109] = 103 ' fractional midi note: 109.4472 'PerJustF[110] = 100 ' fractional midi note: 109.9589 'PerJustF[111] = 96 ' fractional midi note: 110.6656 'PerJustF[112] = 90 ' fractional midi note: 111.783 'PerJustF[113] = 84 ' fractional midi note: 112.9774 'PerJustF[114] = 79 ' fractional midi note: 114.0398 'PerJustF[115] = 74 ' fractional midi note: 115.1718 'PerJustF[116] = 71 ' fractional midi note: 115.8882 'PerJustF[117] = 67 ' fractional midi note: 116.8921 'PerJustF[118] = 64 ' fractional midi note: 117.6852 'PerJustF[119] = 61 ' fractional midi note: 118.5163 'PerJustF[120] = 56 ' fractional midi note: 119.9969 'PerJustF[121] = 52 ' fractional midi note: 121.2799 'PerJustF[122] = 50 ' fractional midi note: 121.9589 'PerJustF[123] = 48 ' fractional midi note: 122.6656 'PerJustF[124] = 45 ' fractional midi note: 123.783 'PerJustF[125] = 42 ' fractional midi note: 124.9774 'PerJustF[126] = 40 ' fractional midi note: 125.822 'PerJustF[127] = 37 ' fractional midi note: 127.1718 'Return JI_Scales: ' just intonation scale based on 36 ' Just intonation scale used here: ' 0=1 1=1.066667 2=1.125 3=1.2 4=1.25 5=1.333333 6=1.428571 7=1.5 8=1.6 9=1.666667 10=1.777778 11=1.875 12=2 PerJust48[0] = 57336 ' fractional midi note: -.0007 freq= 8.1755 PerJust48[1] = 53752 ' fractional midi note: 1.1168 freq= 8.7206 PerJust48[2] = 50960 ' fractional midi note: 2.0403 freq= 9.1984 PerJust48[3] = 47776 ' fractional midi note: 3.1572 freq= 9.8114 PerJust48[4] = 45864 ' fractional midi note: 3.8643 freq= 10.2204 PerJust48[5] = 43000 ' fractional midi note: 4.9806 freq= 10.9012 PerJust48[6] = 40136 ' fractional midi note: 6.1739 freq= 11.6791 PerJust48[7] = 38224 ' fractional midi note: 7.0189 freq= 12.2632 PerJust48[8] = 35832 ' fractional midi note: 8.1377 freq= 13.0819 PerJust48[9] = 34400 ' fractional midi note: 8.8437 freq= 13.6264 PerJust48[10] = 32248 ' fractional midi note: 9.9621 freq= 14.5358 PerJust48[11] = 30576 ' fractional midi note: 10.8838 freq= 15.3306 PerJust48[12] = 28668 ' fractional midi note: 11.9993 freq= 16.3509 PerJust48[13] = 26876 ' fractional midi note: 13.1168 freq= 17.4412 PerJust48[14] = 25480 ' fractional midi note: 14.0403 freq= 18.3968 PerJust48[15] = 23888 ' fractional midi note: 15.1572 freq= 19.6228 PerJust48[16] = 22932 ' fractional midi note: 15.8643 freq= 20.4409 PerJust48[17] = 21500 ' fractional midi note: 16.9806 freq= 21.8023 PerJust48[18] = 20068 ' fractional midi note: 18.1739 freq= 23.3581 PerJust48[19] = 19112 ' fractional midi note: 19.0189 freq= 24.5265 PerJust48[20] = 17916 ' fractional midi note: 20.1377 freq= 26.1638 PerJust48[21] = 17200 ' fractional midi note: 20.8437 freq= 27.2528 PerJust48[22] = 16124 ' fractional midi note: 21.9621 freq= 29.0715 PerJust48[23] = 15288 ' fractional midi note: 22.8838 freq= 30.6612 PerJust48[24] = 14334 ' fractional midi note: 23.9993 freq= 32.7019 PerJust48[25] = 13438 ' fractional midi note: 25.1168 freq= 34.8824 PerJust48[26] = 12740 ' fractional midi note: 26.0403 freq= 36.7936 PerJust48[27] = 11944 ' fractional midi note: 27.1572 freq= 39.2456 PerJust48[28] = 11466 ' fractional midi note: 27.8643 freq= 40.8817 PerJust48[29] = 10750 ' fractional midi note: 28.9806 freq= 43.6046 PerJust48[30] = 10034 ' fractional midi note: 30.1739 freq= 46.7162 PerJust48[31] = 9556 ' fractional midi note: 31.0189 freq= 49.053 PerJust48[32] = 8958 ' fractional midi note: 32.1377 freq= 52.3276 PerJust48[33] = 8600 ' fractional midi note: 32.8437 freq= 54.5057 PerJust48[34] = 8062 ' fractional midi note: 33.9621 freq= 58.1431 PerJust48[35] = 7644 ' fractional midi note: 34.8838 freq= 61.3224 PerJust48[36] = 7167 ' fractional midi note: 35.9994 freq= 65.4041 PerJust48[37] = 6719 ' fractional midi note: 37.1168 freq= 69.7647 PerJust48[38] = 6370 ' fractional midi note: 38.0403 freq= 73.5873 PerJust48[39] = 5972 ' fractional midi note: 39.1572 freq= 78.4912 PerJust48[40] = 5733 ' fractional midi note: 39.8643 freq= 81.7635 PerJust48[41] = 5375 ' fractional midi note: 40.9806 freq= 87.2093 PerJust48[42] = 5017 ' fractional midi note: 42.1739 freq= 93.4324 PerJust48[43] = 4778 ' fractional midi note: 43.0189 freq= 98.1059 PerJust48[44] = 4479 ' fractional midi note: 44.1377 freq= 104.6553 PerJust48[45] = 4300 ' fractional midi note: 44.8437 freq= 109.0114 PerJust48[46] = 4031 ' fractional midi note: 45.9621 freq= 116.2861 PerJust48[47] = 3822 ' fractional midi note: 46.8838 freq= 122.6449 PerJust48[48] = 3584 ' fractional midi note: 47.9969 freq= 130.7894 PerJust48[49] = 3360 ' fractional midi note: 49.1142 freq= 139.5086 PerJust48[50] = 3185 ' fractional midi note: 50.0403 freq= 147.1746 PerJust48[51] = 2986 ' fractional midi note: 51.1572 freq= 156.9825 PerJust48[52] = 2866 ' fractional midi note: 51.8673 freq= 163.5553 PerJust48[53] = 2688 ' fractional midi note: 52.9774 freq= 174.3864 PerJust48[54] = 2508 ' fractional midi note: 54.1773 freq= 186.9016 PerJust48[55] = 2389 ' fractional midi note: 55.0189 freq= 196.2118 PerJust48[56] = 2240 ' fractional midi note: 56.1338 freq= 209.2634 PerJust48[57] = 2150 ' fractional midi note: 56.8437 freq= 218.0227 PerJust48[58] = 2016 ' fractional midi note: 57.9578 freq= 232.5145 PerJust48[59] = 1911 ' fractional midi note: 58.8838 freq= 245.2897 PerJust48[60] = 1792 ' fractional midi note: 59.9969 freq= 261.5787 PerJust48[61] = 1680 ' fractional midi note: 61.1142 freq= 279.0171 PerJust48[62] = 1592 ' fractional midi note: 62.0457 freq= 294.441 PerJust48[63] = 1493 ' fractional midi note: 63.1572 freq= 313.965 PerJust48[64] = 1433 ' fractional midi note: 63.8673 freq= 327.1106 PerJust48[65] = 1344 ' fractional midi note: 64.9774 freq= 348.7727 PerJust48[66] = 1254 ' fractional midi note: 66.1773 freq= 373.8031 PerJust48[67] = 1194 ' fractional midi note: 67.0261 freq= 392.5869 PerJust48[68] = 1120 ' fractional midi note: 68.1338 freq= 418.5268 PerJust48[69] = 1075 ' fractional midi note: 68.8437 freq= 436.0454 PerJust48[70] = 1008 ' fractional midi note: 69.9578 freq= 465.0289 PerJust48[71] = 956 ' fractional midi note: 70.8748 freq= 490.3246 PerJust48[72] = 896 ' fractional midi note: 71.9969 freq= 523.1575 PerJust48[73] = 840 ' fractional midi note: 73.1142 freq= 558.0341 PerJust48[74] = 796 ' fractional midi note: 74.0457 freq= 588.882 PerJust48[75] = 746 ' fractional midi note: 75.1688 freq= 628.3508 PerJust48[76] = 716 ' fractional midi note: 75.8794 freq= 654.6787 PerJust48[77] = 672 ' fractional midi note: 76.9774 freq= 697.5454 PerJust48[78] = 627 ' fractional midi note: 78.1773 freq= 747.6062 PerJust48[79] = 597 ' fractional midi note: 79.0261 freq= 785.1738 PerJust48[80] = 560 ' fractional midi note: 80.1338 freq= 837.0536 PerJust48[81] = 538 ' fractional midi note: 80.8276 freq= 871.2802 PerJust48[82] = 504 ' fractional midi note: 81.9578 freq= 930.0578 PerJust48[83] = 478 ' fractional midi note: 82.8748 freq= 980.6492 PerJust48[84] = 448 ' fractional midi note: 83.9969 freq= 1046.3151 PerJust48[85] = 420 ' fractional midi note: 85.1142 freq= 1116.0682 PerJust48[86] = 398 ' fractional midi note: 86.0457 freq= 1177.764 PerJust48[87] = 373 ' fractional midi note: 87.1688 freq= 1256.7017 PerJust48[88] = 358 ' fractional midi note: 87.8794 freq= 1309.3574 PerJust48[89] = 336 ' fractional midi note: 88.9774 freq= 1395.0908 PerJust48[90] = 314 ' fractional midi note: 90.1497 freq= 1492.8303 PerJust48[91] = 298 ' fractional midi note: 91.0552 freq= 1572.9891 PerJust48[92] = 280 ' fractional midi note: 92.1338 freq= 1674.1072 PerJust48[93] = 269 ' fractional midi note: 92.8276 freq= 1742.5604 PerJust48[94] = 252 ' fractional midi note: 93.9578 freq= 1860.1156 PerJust48[95] = 239 ' fractional midi note: 94.8748 freq= 1961.2983 PerJust48[96] = 224 ' fractional midi note: 95.9969 freq= 2092.6301 PerJust48[97] = 210 ' fractional midi note: 97.1142 freq= 2232.1365 PerJust48[98] = 199 ' fractional midi note: 98.0457 freq= 2355.5281 PerJust48[99] = 186 ' fractional midi note: 99.2153 freq= 2520.1633 PerJust48[100] = 179 ' fractional midi note: 99.8794 freq= 2618.7148 PerJust48[101] = 168 ' fractional midi note: 100.9774 freq= 2790.1816 PerJust48[102] = 157 ' fractional midi note: 102.1497 freq= 2985.6606 PerJust48[103] = 149 ' fractional midi note: 103.0552 freq= 3145.9783 PerJust48[104] = 140 ' fractional midi note: 104.1338 freq= 3348.2144 PerJust48[105] = 134 ' fractional midi note: 104.8921 freq= 3498.1294 PerJust48[106] = 126 ' fractional midi note: 105.9578 freq= 3720.2312 PerJust48[107] = 120 ' fractional midi note: 106.8025 freq= 3906.2483 PerJust48[108] = 112 ' fractional midi note: 107.9969 freq= 4185.2603 PerJust48[109] = 105 ' fractional midi note: 109.1142 freq= 4464.2729 PerJust48[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust48[111] = 93 ' fractional midi note: 111.2153 freq= 5040.3267 PerJust48[112] = 90 ' fractional midi note: 111.783 freq= 5208.3457 PerJust48[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust48[114] = 78 ' fractional midi note: 114.2604 freq= 6009.627 PerJust48[115] = 74 ' fractional midi note: 115.1718 freq= 6334.4766 PerJust48[116] = 70 ' fractional midi note: 116.1338 freq= 6696.4287 PerJust48[117] = 67 ' fractional midi note: 116.8921 freq= 6996.2588 PerJust48[118] = 63 ' fractional midi note: 117.9578 freq= 7440.4624 PerJust48[119] = 60 ' fractional midi note: 118.8025 freq= 7812.4966 PerJust48[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust48[121] = 52 ' fractional midi note: 121.2799 freq= 9014.415 PerJust48[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust48[123] = 46 ' fractional midi note: 123.4025 freq= 10190.2451 PerJust48[124] = 45 ' fractional midi note: 123.783 freq= 10416.6914 PerJust48[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust48[126] = 39 ' fractional midi note: 126.2604 freq= 12019.2539 PerJust48[127] = 37 ' fractional midi note: 127.1718 freq= 12668.9531 ' just intonation scale based on note 37 PerJust49[0] = 57728 ' fractional midi note: -.1186 freq= 8.12 PerJust49[1] = 54112 ' fractional midi note: 1.0013 freq= 8.6626 PerJust49[2] = 50736 ' fractional midi note: 2.1165 freq= 9.239 PerJust49[3] = 48104 ' fractional midi note: 3.0388 freq= 9.7445 PerJust49[4] = 45096 ' fractional midi note: 4.1567 freq= 10.3945 PerJust49[5] = 43296 ' fractional midi note: 4.8618 freq= 10.8266 PerJust49[6] = 40584 ' fractional midi note: 5.9817 freq= 11.5501 PerJust49[7] = 37880 ' fractional midi note: 7.1754 freq= 12.3746 PerJust49[8] = 36080 ' fractional midi note: 8.0183 freq= 12.992 PerJust49[9] = 33824 ' fractional midi note: 9.1361 freq= 13.8585 PerJust49[10] = 32472 ' fractional midi note: 9.8423 freq= 14.4355 PerJust49[11] = 30440 ' fractional midi note: 10.961 freq= 15.3991 PerJust49[12] = 28864 ' fractional midi note: 11.8814 freq= 16.24 PerJust49[13] = 27056 ' fractional midi note: 13.0013 freq= 17.3252 PerJust49[14] = 25368 ' fractional midi note: 14.1165 freq= 18.478 PerJust49[15] = 24052 ' fractional midi note: 15.0388 freq= 19.4891 PerJust49[16] = 22548 ' fractional midi note: 16.1567 freq= 20.789 PerJust49[17] = 21648 ' fractional midi note: 16.8618 freq= 21.6532 PerJust49[18] = 20292 ' fractional midi note: 17.9817 freq= 23.1002 PerJust49[19] = 18940 ' fractional midi note: 19.1754 freq= 24.7492 PerJust49[20] = 18040 ' fractional midi note: 20.0183 freq= 25.984 PerJust49[21] = 16912 ' fractional midi note: 21.1361 freq= 27.717 PerJust49[22] = 16236 ' fractional midi note: 21.8423 freq= 28.871 PerJust49[23] = 15220 ' fractional midi note: 22.961 freq= 30.7983 PerJust49[24] = 14432 ' fractional midi note: 23.8814 freq= 32.4799 PerJust49[25] = 13528 ' fractional midi note: 25.0013 freq= 34.6504 PerJust49[26] = 12684 ' fractional midi note: 26.1165 freq= 36.956 PerJust49[27] = 12026 ' fractional midi note: 27.0388 freq= 38.9781 PerJust49[28] = 11274 ' fractional midi note: 28.1567 freq= 41.5781 PerJust49[29] = 10824 ' fractional midi note: 28.8618 freq= 43.3064 PerJust49[30] = 10146 ' fractional midi note: 29.9817 freq= 46.2004 PerJust49[31] = 9470 ' fractional midi note: 31.1754 freq= 49.4984 PerJust49[32] = 9020 ' fractional midi note: 32.0183 freq= 51.968 PerJust49[33] = 8456 ' fractional midi note: 33.1361 freq= 55.4341 PerJust49[34] = 8118 ' fractional midi note: 33.8423 freq= 57.7421 PerJust49[35] = 7610 ' fractional midi note: 34.961 freq= 61.5965 PerJust49[36] = 7216 ' fractional midi note: 35.8814 freq= 64.9599 PerJust49[37] = 6764 ' fractional midi note: 37.0013 freq= 69.3009 PerJust49[38] = 6342 ' fractional midi note: 38.1165 freq= 73.9119 PerJust49[39] = 6013 ' fractional midi note: 39.0388 freq= 77.9563 PerJust49[40] = 5637 ' fractional midi note: 40.1567 freq= 83.1562 PerJust49[41] = 5412 ' fractional midi note: 40.8618 freq= 86.6129 PerJust49[42] = 5073 ' fractional midi note: 41.9817 freq= 92.4009 PerJust49[43] = 4735 ' fractional midi note: 43.1754 freq= 98.9968 PerJust49[44] = 4510 ' fractional midi note: 44.0183 freq= 103.936 PerJust49[45] = 4228 ' fractional midi note: 45.1361 freq= 110.8682 PerJust49[46] = 4059 ' fractional midi note: 45.8423 freq= 115.4842 PerJust49[47] = 3805 ' fractional midi note: 46.961 freq= 123.193 PerJust49[48] = 3608 ' fractional midi note: 47.8814 freq= 129.9197 PerJust49[49] = 3382 ' fractional midi note: 49.0013 freq= 138.6017 PerJust49[50] = 3171 ' fractional midi note: 50.1165 freq= 147.8238 PerJust49[51] = 3006 ' fractional midi note: 51.0416 freq= 155.9377 PerJust49[52] = 2818 ' fractional midi note: 52.1597 freq= 166.3412 PerJust49[53] = 2706 ' fractional midi note: 52.8618 freq= 173.2258 PerJust49[54] = 2536 ' fractional midi note: 53.9851 freq= 184.8381 PerJust49[55] = 2368 ' fractional midi note: 55.1718 freq= 197.9524 PerJust49[56] = 2255 ' fractional midi note: 56.0183 freq= 207.872 PerJust49[57] = 2114 ' fractional midi note: 57.1361 freq= 221.7364 PerJust49[58] = 2030 ' fractional midi note: 57.838 freq= 230.911 PerJust49[59] = 1902 ' fractional midi note: 58.9656 freq= 246.4515 PerJust49[60] = 1804 ' fractional midi note: 59.8814 freq= 259.8394 PerJust49[61] = 1691 ' fractional midi note: 61.0013 freq= 277.2035 PerJust49[62] = 1586 ' fractional midi note: 62.1111 freq= 295.5554 PerJust49[63] = 1503 ' fractional midi note: 63.0416 freq= 311.8755 PerJust49[64] = 1409 ' fractional midi note: 64.1597 freq= 332.6823 PerJust49[65] = 1353 ' fractional midi note: 64.8618 freq= 346.4516 PerJust49[66] = 1268 ' fractional midi note: 65.9851 freq= 369.6761 PerJust49[67] = 1184 ' fractional midi note: 67.1718 freq= 395.9048 PerJust49[68] = 1128 ' fractional midi note: 68.0106 freq= 415.559 PerJust49[69] = 1057 ' fractional midi note: 69.1361 freq= 443.4727 PerJust49[70] = 1015 ' fractional midi note: 69.838 freq= 461.8219 PerJust49[71] = 951 ' fractional midi note: 70.9656 freq= 492.9029 PerJust49[72] = 902 ' fractional midi note: 71.8814 freq= 519.6788 PerJust49[73] = 846 ' fractional midi note: 72.991 freq= 554.0771 PerJust49[74] = 793 ' fractional midi note: 74.1111 freq= 591.1108 PerJust49[75] = 752 ' fractional midi note: 75.0301 freq= 623.3367 PerJust49[76] = 704 ' fractional midi note: 76.172 freq= 665.8375 PerJust49[77] = 676 ' fractional midi note: 76.8746 freq= 693.4157 PerJust49[78] = 634 ' fractional midi note: 77.9851 freq= 739.3523 PerJust49[79] = 592 ' fractional midi note: 79.1718 freq= 791.8096 PerJust49[80] = 564 ' fractional midi note: 80.0106 freq= 831.118 PerJust49[81] = 528 ' fractional midi note: 81.1525 freq= 887.7858 PerJust49[82] = 508 ' fractional midi note: 81.821 freq= 922.7374 PerJust49[83] = 476 ' fractional midi note: 82.9474 freq= 984.7703 PerJust49[84] = 451 ' fractional midi note: 83.8814 freq= 1039.3577 PerJust49[85] = 423 ' fractional midi note: 84.991 freq= 1108.1542 PerJust49[86] = 396 ' fractional midi note: 86.1329 freq= 1183.7109 PerJust49[87] = 376 ' fractional midi note: 87.0301 freq= 1246.6735 PerJust49[88] = 352 ' fractional midi note: 88.172 freq= 1331.6749 PerJust49[89] = 338 ' fractional midi note: 88.8746 freq= 1386.8314 PerJust49[90] = 317 ' fractional midi note: 89.9851 freq= 1478.7046 PerJust49[91] = 296 ' fractional midi note: 91.1718 freq= 1583.6191 PerJust49[92] = 282 ' fractional midi note: 92.0106 freq= 1662.2361 PerJust49[93] = 264 ' fractional midi note: 93.1525 freq= 1775.5717 PerJust49[94] = 254 ' fractional midi note: 93.821 freq= 1845.4749 PerJust49[95] = 238 ' fractional midi note: 94.9474 freq= 1969.5405 PerJust49[96] = 226 ' fractional midi note: 95.843 freq= 2074.1099 PerJust49[97] = 212 ' fractional midi note: 96.9501 freq= 2211.0793 PerJust49[98] = 198 ' fractional midi note: 98.1329 freq= 2367.4219 PerJust49[99] = 188 ' fractional midi note: 99.0301 freq= 2493.3469 PerJust49[100] = 176 ' fractional midi note: 100.172 freq= 2663.3499 PerJust49[101] = 169 ' fractional midi note: 100.8746 freq= 2773.6628 PerJust49[102] = 158 ' fractional midi note: 102.0398 freq= 2966.7686 PerJust49[103] = 148 ' fractional midi note: 103.1718 freq= 3167.2383 PerJust49[104] = 141 ' fractional midi note: 104.0106 freq= 3324.4722 PerJust49[105] = 132 ' fractional midi note: 105.1525 freq= 3551.1433 PerJust49[106] = 127 ' fractional midi note: 105.821 freq= 3690.9497 PerJust49[107] = 119 ' fractional midi note: 106.9474 freq= 3939.0811 PerJust49[108] = 113 ' fractional midi note: 107.843 freq= 4148.2197 PerJust49[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust49[110] = 99 ' fractional midi note: 110.1329 freq= 4734.8438 PerJust49[111] = 94 ' fractional midi note: 111.0301 freq= 4986.6938 PerJust49[112] = 88 ' fractional midi note: 112.172 freq= 5326.6997 PerJust49[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust49[114] = 79 ' fractional midi note: 114.0398 freq= 5933.5371 PerJust49[115] = 74 ' fractional midi note: 115.1718 freq= 6334.4766 PerJust49[116] = 70 ' fractional midi note: 116.1338 freq= 6696.4287 PerJust49[117] = 66 ' fractional midi note: 117.1525 freq= 7102.2866 PerJust49[118] = 64 ' fractional midi note: 117.6852 freq= 7324.2236 PerJust49[119] = 60 ' fractional midi note: 118.8025 freq= 7812.4966 PerJust49[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust49[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust49[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust49[123] = 47 ' fractional midi note: 123.0301 freq= 9973.3877 PerJust49[124] = 44 ' fractional midi note: 124.172 freq= 10653.3994 PerJust49[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust49[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust49[127] = 37 ' fractional midi note: 127.1718 freq= 12668.9531 ' just intonation scale based on note 38 PerJust50[0] = 57456 ' fractional midi note: -.0368 freq= 8.1584 PerJust50[1] = 54480 ' fractional midi note: .8839 freq= 8.6041 PerJust50[2] = 51080 ' fractional midi note: 1.9995 freq= 9.1768 PerJust50[3] = 47888 ' fractional midi note: 3.1167 freq= 9.7885 PerJust50[4] = 45400 ' fractional midi note: 4.0403 freq= 10.3249 PerJust50[5] = 42568 ' fractional midi note: 5.1554 freq= 11.0118 PerJust50[6] = 40864 ' fractional midi note: 5.8627 freq= 11.471 PerJust50[7] = 38312 ' fractional midi note: 6.9791 freq= 12.2351 PerJust50[8] = 35752 ' fractional midi note: 8.1764 freq= 13.1112 PerJust50[9] = 34056 ' fractional midi note: 9.0177 freq= 13.7641 PerJust50[10] = 31928 ' fractional midi note: 10.1348 freq= 14.6815 PerJust50[11] = 30648 ' fractional midi note: 10.8431 freq= 15.2946 PerJust50[12] = 28728 ' fractional midi note: 11.9632 freq= 16.3169 PerJust50[13] = 27240 ' fractional midi note: 12.8839 freq= 17.2081 PerJust50[14] = 25540 ' fractional midi note: 13.9995 freq= 18.3535 PerJust50[15] = 23944 ' fractional midi note: 15.1167 freq= 19.577 PerJust50[16] = 22700 ' fractional midi note: 16.0403 freq= 20.6497 PerJust50[17] = 21284 ' fractional midi note: 17.1554 freq= 22.0236 PerJust50[18] = 20432 ' fractional midi note: 17.8627 freq= 22.942 PerJust50[19] = 19156 ' fractional midi note: 18.9791 freq= 24.4702 PerJust50[20] = 17876 ' fractional midi note: 20.1764 freq= 26.2224 PerJust50[21] = 17028 ' fractional midi note: 21.0177 freq= 27.5281 PerJust50[22] = 15964 ' fractional midi note: 22.1348 freq= 29.363 PerJust50[23] = 15324 ' fractional midi note: 22.8431 freq= 30.5892 PerJust50[24] = 14364 ' fractional midi note: 23.9632 freq= 32.6338 PerJust50[25] = 13620 ' fractional midi note: 24.8839 freq= 34.4163 PerJust50[26] = 12770 ' fractional midi note: 25.9995 freq= 36.707 PerJust50[27] = 11972 ' fractional midi note: 27.1167 freq= 39.1539 PerJust50[28] = 11350 ' fractional midi note: 28.0403 freq= 41.2995 PerJust50[29] = 10642 ' fractional midi note: 29.1554 freq= 44.0471 PerJust50[30] = 10216 ' fractional midi note: 29.8627 freq= 45.884 PerJust50[31] = 9578 ' fractional midi note: 30.9791 freq= 48.9403 PerJust50[32] = 8938 ' fractional midi note: 32.1764 freq= 52.4447 PerJust50[33] = 8514 ' fractional midi note: 33.0177 freq= 55.0563 PerJust50[34] = 7982 ' fractional midi note: 34.1348 freq= 58.726 PerJust50[35] = 7662 ' fractional midi note: 34.8431 freq= 61.1784 PerJust50[36] = 7182 ' fractional midi note: 35.9632 freq= 65.2675 PerJust50[37] = 6810 ' fractional midi note: 36.8839 freq= 68.8325 PerJust50[38] = 6385 ' fractional midi note: 37.9995 freq= 73.4141 PerJust50[39] = 5986 ' fractional midi note: 39.1167 freq= 78.3078 PerJust50[40] = 5675 ' fractional midi note: 40.0403 freq= 82.5989 PerJust50[41] = 5321 ' fractional midi note: 41.1554 freq= 88.0943 PerJust50[42] = 5108 ' fractional midi note: 41.8627 freq= 91.7679 PerJust50[43] = 4789 ' fractional midi note: 42.9791 freq= 97.8806 PerJust50[44] = 4469 ' fractional midi note: 44.1764 freq= 104.8895 PerJust50[45] = 4257 ' fractional midi note: 45.0177 freq= 110.1125 PerJust50[46] = 3991 ' fractional midi note: 46.1348 freq= 117.4519 PerJust50[47] = 3831 ' fractional midi note: 46.8431 freq= 122.3569 PerJust50[48] = 3591 ' fractional midi note: 47.9632 freq= 130.535 PerJust50[49] = 3405 ' fractional midi note: 48.8839 freq= 137.665 PerJust50[50] = 3192 ' fractional midi note: 50.0023 freq= 146.8519 PerJust50[51] = 2993 ' fractional midi note: 51.1167 freq= 156.6157 PerJust50[52] = 2838 ' fractional midi note: 52.0373 freq= 165.1693 PerJust50[53] = 2660 ' fractional midi note: 53.1587 freq= 176.2221 PerJust50[54] = 2554 ' fractional midi note: 53.8627 freq= 183.5359 PerJust50[55] = 2394 ' fractional midi note: 54.9827 freq= 195.802 PerJust50[56] = 2234 ' fractional midi note: 56.1802 freq= 209.825 PerJust50[57] = 2128 ' fractional midi note: 57.0218 freq= 220.2772 PerJust50[58] = 1996 ' fractional midi note: 58.1304 freq= 234.8442 PerJust50[59] = 1916 ' fractional midi note: 58.8386 freq= 244.6502 PerJust50[60] = 1796 ' fractional midi note: 59.9583 freq= 260.9962 PerJust50[61] = 1702 ' fractional midi note: 60.889 freq= 275.4111 PerJust50[62] = 1596 ' fractional midi note: 62.0023 freq= 293.7038 PerJust50[63] = 1496 ' fractional midi note: 63.1225 freq= 313.3363 PerJust50[64] = 1419 ' fractional midi note: 64.0373 freq= 330.3385 PerJust50[65] = 1330 ' fractional midi note: 65.1587 freq= 352.4443 PerJust50[66] = 1277 ' fractional midi note: 65.8627 freq= 367.0717 PerJust50[67] = 1197 ' fractional midi note: 66.9827 freq= 391.6039 PerJust50[68] = 1117 ' fractional midi note: 68.1802 freq= 419.6501 PerJust50[69] = 1064 ' fractional midi note: 69.0218 freq= 440.5544 PerJust50[70] = 998 ' fractional midi note: 70.1304 freq= 469.6883 PerJust50[71] = 958 ' fractional midi note: 70.8386 freq= 489.3004 PerJust50[72] = 898 ' fractional midi note: 71.9583 freq= 521.9922 PerJust50[73] = 851 ' fractional midi note: 72.889 freq= 550.8223 PerJust50[74] = 798 ' fractional midi note: 74.0023 freq= 587.4075 PerJust50[75] = 748 ' fractional midi note: 75.1225 freq= 626.6725 PerJust50[76] = 710 ' fractional midi note: 76.0251 freq= 660.2117 PerJust50[77] = 665 ' fractional midi note: 77.1587 freq= 704.8885 PerJust50[78] = 638 ' fractional midi note: 77.8762 freq= 734.716 PerJust50[79] = 598 ' fractional midi note: 78.9972 freq= 783.8641 PerJust50[80] = 558 ' fractional midi note: 80.1957 freq= 840.0521 PerJust50[81] = 532 ' fractional midi note: 81.0218 freq= 881.1087 PerJust50[82] = 499 ' fractional midi note: 82.1304 freq= 939.3766 PerJust50[83] = 479 ' fractional midi note: 82.8386 freq= 978.6007 PerJust50[84] = 449 ' fractional midi note: 83.9583 freq= 1043.9845 PerJust50[85] = 426 ' fractional midi note: 84.8687 freq= 1100.3534 PerJust50[86] = 399 ' fractional midi note: 86.0023 freq= 1174.8149 PerJust50[87] = 374 ' fractional midi note: 87.1225 freq= 1253.3451 PerJust50[88] = 355 ' fractional midi note: 88.0251 freq= 1320.4233 PerJust50[89] = 332 ' fractional midi note: 89.1847 freq= 1411.896 PerJust50[90] = 319 ' fractional midi note: 89.8762 freq= 1469.432 PerJust50[91] = 299 ' fractional midi note: 90.9972 freq= 1567.7283 PerJust50[92] = 279 ' fractional midi note: 92.1957 freq= 1680.1041 PerJust50[93] = 266 ' fractional midi note: 93.0218 freq= 1762.2174 PerJust50[94] = 250 ' fractional midi note: 94.0958 freq= 1875.0023 PerJust50[95] = 240 ' fractional midi note: 94.8025 freq= 1953.1241 PerJust50[96] = 224 ' fractional midi note: 95.9969 freq= 2092.6301 PerJust50[97] = 213 ' fractional midi note: 96.8687 freq= 2200.7068 PerJust50[98] = 200 ' fractional midi note: 97.9589 freq= 2343.7476 PerJust50[99] = 187 ' fractional midi note: 99.1225 freq= 2506.6902 PerJust50[100] = 178 ' fractional midi note: 99.9764 freq= 2633.4287 PerJust50[101] = 166 ' fractional midi note: 101.1847 freq= 2823.792 PerJust50[102] = 160 ' fractional midi note: 101.8221 freq= 2929.6946 PerJust50[103] = 150 ' fractional midi note: 102.9394 freq= 3125.0056 PerJust50[104] = 140 ' fractional midi note: 104.1338 freq= 3348.2144 PerJust50[105] = 133 ' fractional midi note: 105.0218 freq= 3524.4348 PerJust50[106] = 125 ' fractional midi note: 106.0958 freq= 3750.0046 PerJust50[107] = 120 ' fractional midi note: 106.8025 freq= 3906.2483 PerJust50[108] = 112 ' fractional midi note: 107.9969 freq= 4185.2603 PerJust50[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust50[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust50[111] = 94 ' fractional midi note: 111.0301 freq= 4986.6938 PerJust50[112] = 89 ' fractional midi note: 111.9764 freq= 5266.8574 PerJust50[113] = 83 ' fractional midi note: 113.1847 freq= 5647.584 PerJust50[114] = 80 ' fractional midi note: 113.8221 freq= 5859.3892 PerJust50[115] = 75 ' fractional midi note: 114.9394 freq= 6250.0112 PerJust50[116] = 70 ' fractional midi note: 116.1338 freq= 6696.4287 PerJust50[117] = 66 ' fractional midi note: 117.1525 freq= 7102.2866 PerJust50[118] = 62 ' fractional midi note: 118.2348 freq= 7560.4688 PerJust50[119] = 60 ' fractional midi note: 118.8025 freq= 7812.4966 PerJust50[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust50[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust50[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust50[123] = 47 ' fractional midi note: 123.0301 freq= 9973.3877 PerJust50[124] = 44 ' fractional midi note: 124.172 freq= 10653.3994 PerJust50[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust50[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust50[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 ' just intonation scale based on note 39 PerJust51[0] = 57856 ' fractional midi note: -.157 freq= 8.102 PerJust51[1] = 54240 ' fractional midi note: .9604 freq= 8.6422 PerJust51[2] = 51424 ' fractional midi note: 1.8833 freq= 9.1154 PerJust51[3] = 48208 ' fractional midi note: 3.0014 freq= 9.7235 PerJust51[4] = 45200 ' fractional midi note: 4.1168 freq= 10.3706 PerJust51[5] = 42856 ' fractional midi note: 5.0387 freq= 10.9378 PerJust51[6] = 40176 ' fractional midi note: 6.1566 freq= 11.6674 PerJust51[7] = 38568 ' fractional midi note: 6.8638 freq= 12.1539 PerJust51[8] = 36160 ' fractional midi note: 7.9799 freq= 12.9632 PerJust51[9] = 33752 ' fractional midi note: 9.173 freq= 13.8881 PerJust51[10] = 32144 ' fractional midi note: 10.0181 freq= 14.5829 PerJust51[11] = 30136 ' fractional midi note: 11.1348 freq= 15.5545 PerJust51[12] = 28928 ' fractional midi note: 11.843 freq= 16.204 PerJust51[13] = 27120 ' fractional midi note: 12.9604 freq= 17.2843 PerJust51[14] = 25712 ' fractional midi note: 13.8833 freq= 18.2307 PerJust51[15] = 24104 ' fractional midi note: 15.0014 freq= 19.447 PerJust51[16] = 22600 ' fractional midi note: 16.1168 freq= 20.7412 PerJust51[17] = 21428 ' fractional midi note: 17.0387 freq= 21.8756 PerJust51[18] = 20088 ' fractional midi note: 18.1566 freq= 23.3348 PerJust51[19] = 19284 ' fractional midi note: 18.8638 freq= 24.3077 PerJust51[20] = 18080 ' fractional midi note: 19.9799 freq= 25.9264 PerJust51[21] = 16876 ' fractional midi note: 21.173 freq= 27.7762 PerJust51[22] = 16072 ' fractional midi note: 22.0181 freq= 29.1657 PerJust51[23] = 15068 ' fractional midi note: 23.1348 freq= 31.109 PerJust51[24] = 14464 ' fractional midi note: 23.843 freq= 32.408 PerJust51[25] = 13560 ' fractional midi note: 24.9604 freq= 34.5687 PerJust51[26] = 12856 ' fractional midi note: 25.8833 freq= 36.4615 PerJust51[27] = 12052 ' fractional midi note: 27.0014 freq= 38.894 PerJust51[28] = 11300 ' fractional midi note: 28.1168 freq= 41.4824 PerJust51[29] = 10714 ' fractional midi note: 29.0387 freq= 43.7512 PerJust51[30] = 10044 ' fractional midi note: 30.1566 freq= 46.6696 PerJust51[31] = 9642 ' fractional midi note: 30.8638 freq= 48.6155 PerJust51[32] = 9040 ' fractional midi note: 31.9799 freq= 51.8529 PerJust51[33] = 8438 ' fractional midi note: 33.173 freq= 55.5524 PerJust51[34] = 8036 ' fractional midi note: 34.0181 freq= 58.3314 PerJust51[35] = 7534 ' fractional midi note: 35.1348 freq= 62.218 PerJust51[36] = 7232 ' fractional midi note: 35.843 freq= 64.8159 PerJust51[37] = 6780 ' fractional midi note: 36.9604 freq= 69.1373 PerJust51[38] = 6428 ' fractional midi note: 37.8833 freq= 72.923 PerJust51[39] = 6026 ' fractional midi note: 39.0014 freq= 77.788 PerJust51[40] = 5650 ' fractional midi note: 40.1168 freq= 82.9647 PerJust51[41] = 5357 ' fractional midi note: 41.0387 freq= 87.5024 PerJust51[42] = 5022 ' fractional midi note: 42.1566 freq= 93.3391 PerJust51[43] = 4821 ' fractional midi note: 42.8638 freq= 97.2309 PerJust51[44] = 4520 ' fractional midi note: 43.9799 freq= 103.7057 PerJust51[45] = 4219 ' fractional midi note: 45.173 freq= 111.1047 PerJust51[46] = 4018 ' fractional midi note: 46.0181 freq= 116.6629 PerJust51[47] = 3767 ' fractional midi note: 47.1348 freq= 124.436 PerJust51[48] = 3616 ' fractional midi note: 47.843 freq= 129.6318 PerJust51[49] = 3390 ' fractional midi note: 48.9604 freq= 138.2747 PerJust51[50] = 3214 ' fractional midi note: 49.8833 freq= 145.8459 PerJust51[51] = 3013 ' fractional midi note: 51.0014 freq= 155.5761 PerJust51[52] = 2825 ' fractional midi note: 52.1168 freq= 165.9295 PerJust51[53] = 2678 ' fractional midi note: 53.0419 freq= 175.0372 PerJust51[54] = 2511 ' fractional midi note: 54.1566 freq= 186.6782 PerJust51[55] = 2410 ' fractional midi note: 54.8674 freq= 194.5023 PerJust51[56] = 2260 ' fractional midi note: 55.9799 freq= 207.4114 PerJust51[57] = 2110 ' fractional midi note: 57.1689 freq= 222.1568 PerJust51[58] = 2009 ' fractional midi note: 58.0181 freq= 233.3257 PerJust51[59] = 1884 ' fractional midi note: 59.1302 freq= 248.8058 PerJust51[60] = 1808 ' fractional midi note: 59.843 freq= 259.2637 PerJust51[61] = 1695 ' fractional midi note: 60.9604 freq= 276.5493 PerJust51[62] = 1607 ' fractional midi note: 61.8833 freq= 291.6919 PerJust51[63] = 1506 ' fractional midi note: 63.0071 freq= 311.2546 PerJust51[64] = 1412 ' fractional midi note: 64.1229 freq= 331.976 PerJust51[65] = 1339 ' fractional midi note: 65.0419 freq= 350.0745 PerJust51[66] = 1256 ' fractional midi note: 66.1497 freq= 373.2076 PerJust51[67] = 1205 ' fractional midi note: 66.8674 freq= 389.0045 PerJust51[68] = 1130 ' fractional midi note: 67.9799 freq= 414.8228 PerJust51[69] = 1055 ' fractional midi note: 69.1689 freq= 444.3137 PerJust51[70] = 1004 ' fractional midi note: 70.0267 freq= 466.8834 PerJust51[71] = 942 ' fractional midi note: 71.1302 freq= 497.6118 PerJust51[72] = 904 ' fractional midi note: 71.843 freq= 518.5275 PerJust51[73] = 848 ' fractional midi note: 72.9501 freq= 552.7698 PerJust51[74] = 804 ' fractional midi note: 73.8726 freq= 583.0232 PerJust51[75] = 753 ' fractional midi note: 75.0071 freq= 622.5093 PerJust51[76] = 706 ' fractional midi note: 76.1229 freq= 663.9519 PerJust51[77] = 670 ' fractional midi note: 77.029 freq= 699.6274 PerJust51[78] = 628 ' fractional midi note: 78.1497 freq= 746.4152 PerJust51[79] = 602 ' fractional midi note: 78.8818 freq= 778.6564 PerJust51[80] = 565 ' fractional midi note: 79.9799 freq= 829.6455 PerJust51[81] = 528 ' fractional midi note: 81.1525 freq= 887.7858 PerJust51[82] = 502 ' fractional midi note: 82.0267 freq= 933.7667 PerJust51[83] = 471 ' fractional midi note: 83.1302 freq= 995.2235 PerJust51[84] = 452 ' fractional midi note: 83.843 freq= 1037.0549 PerJust51[85] = 424 ' fractional midi note: 84.9501 freq= 1105.5397 PerJust51[86] = 402 ' fractional midi note: 85.8726 freq= 1166.0464 PerJust51[87] = 376 ' fractional midi note: 87.0301 freq= 1246.6735 PerJust51[88] = 353 ' fractional midi note: 88.1229 freq= 1327.9038 PerJust51[89] = 335 ' fractional midi note: 89.029 freq= 1399.2549 PerJust51[90] = 314 ' fractional midi note: 90.1497 freq= 1492.8303 PerJust51[91] = 301 ' fractional midi note: 90.8818 freq= 1557.3127 PerJust51[92] = 282 ' fractional midi note: 92.0106 freq= 1662.2361 PerJust51[93] = 264 ' fractional midi note: 93.1525 freq= 1775.5717 PerJust51[94] = 251 ' fractional midi note: 94.0267 freq= 1867.5334 PerJust51[95] = 236 ' fractional midi note: 95.0935 freq= 1986.2313 PerJust51[96] = 226 ' fractional midi note: 95.843 freq= 2074.1099 PerJust51[97] = 212 ' fractional midi note: 96.9501 freq= 2211.0793 PerJust51[98] = 201 ' fractional midi note: 97.8726 freq= 2332.0928 PerJust51[99] = 188 ' fractional midi note: 99.0301 freq= 2493.3469 PerJust51[100] = 176 ' fractional midi note: 100.172 freq= 2663.3499 PerJust51[101] = 168 ' fractional midi note: 100.9774 freq= 2790.1816 PerJust51[102] = 157 ' fractional midi note: 102.1497 freq= 2985.6606 PerJust51[103] = 150 ' fractional midi note: 102.9394 freq= 3125.0056 PerJust51[104] = 141 ' fractional midi note: 104.0106 freq= 3324.4722 PerJust51[105] = 132 ' fractional midi note: 105.1525 freq= 3551.1433 PerJust51[106] = 126 ' fractional midi note: 105.9578 freq= 3720.2312 PerJust51[107] = 118 ' fractional midi note: 107.0935 freq= 3972.4626 PerJust51[108] = 113 ' fractional midi note: 107.843 freq= 4148.2197 PerJust51[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust51[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust51[111] = 94 ' fractional midi note: 111.0301 freq= 4986.6938 PerJust51[112] = 88 ' fractional midi note: 112.172 freq= 5326.6997 PerJust51[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust51[114] = 78 ' fractional midi note: 114.2604 freq= 6009.627 PerJust51[115] = 75 ' fractional midi note: 114.9394 freq= 6250.0112 PerJust51[116] = 70 ' fractional midi note: 116.1338 freq= 6696.4287 PerJust51[117] = 66 ' fractional midi note: 117.1525 freq= 7102.2866 PerJust51[118] = 63 ' fractional midi note: 117.9578 freq= 7440.4624 PerJust51[119] = 59 ' fractional midi note: 119.0935 freq= 7944.9253 PerJust51[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust51[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust51[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust51[123] = 47 ' fractional midi note: 123.0301 freq= 9973.3877 PerJust51[124] = 44 ' fractional midi note: 124.172 freq= 10653.3994 PerJust51[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust51[126] = 39 ' fractional midi note: 126.2604 freq= 12019.2539 PerJust51[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 ' just intonation scale based on note 40 PerJust52[0] = 56880 ' fractional midi note: .1376 freq= 8.241 PerJust52[1] = 54608 ' fractional midi note: .8433 freq= 8.5839 PerJust52[2] = 51200 ' fractional midi note: 1.9589 freq= 9.1553 PerJust52[3] = 48544 ' fractional midi note: 2.8811 freq= 9.6562 PerJust52[4] = 45504 ' fractional midi note: 4.0007 freq= 10.3013 PerJust52[5] = 42664 ' fractional midi note: 5.1164 freq= 10.987 PerJust52[6] = 40448 ' fractional midi note: 6.0398 freq= 11.5889 PerJust52[7] = 37920 ' fractional midi note: 7.1571 freq= 12.3615 PerJust52[8] = 36408 ' fractional midi note: 7.8616 freq= 12.8749 PerJust52[9] = 34128 ' fractional midi note: 8.9812 freq= 13.7351 PerJust52[10] = 31856 ' fractional midi note: 10.1739 freq= 14.7147 PerJust52[11] = 30336 ' fractional midi note: 11.0203 freq= 15.452 PerJust52[12] = 28440 ' fractional midi note: 12.1376 freq= 16.4821 PerJust52[13] = 27304 ' fractional midi note: 12.8433 freq= 17.1678 PerJust52[14] = 25600 ' fractional midi note: 13.9589 freq= 18.3105 PerJust52[15] = 24272 ' fractional midi note: 14.8811 freq= 19.3123 PerJust52[16] = 22752 ' fractional midi note: 16.0007 freq= 20.6026 PerJust52[17] = 21332 ' fractional midi note: 17.1164 freq= 21.974 PerJust52[18] = 20224 ' fractional midi note: 18.0398 freq= 23.1779 PerJust52[19] = 18960 ' fractional midi note: 19.1571 freq= 24.7231 PerJust52[20] = 18204 ' fractional midi note: 19.8616 freq= 25.7499 PerJust52[21] = 17064 ' fractional midi note: 20.9812 freq= 27.4702 PerJust52[22] = 15928 ' fractional midi note: 22.1739 freq= 29.4294 PerJust52[23] = 15168 ' fractional midi note: 23.0203 freq= 30.9039 PerJust52[24] = 14220 ' fractional midi note: 24.1376 freq= 32.9642 PerJust52[25] = 13652 ' fractional midi note: 24.8433 freq= 34.3356 PerJust52[26] = 12800 ' fractional midi note: 25.9589 freq= 36.6211 PerJust52[27] = 12136 ' fractional midi note: 26.8811 freq= 38.6247 PerJust52[28] = 11376 ' fractional midi note: 28.0007 freq= 41.2051 PerJust52[29] = 10666 ' fractional midi note: 29.1164 freq= 43.948 PerJust52[30] = 10112 ' fractional midi note: 30.0398 freq= 46.3558 PerJust52[31] = 9480 ' fractional midi note: 31.1571 freq= 49.4461 PerJust52[32] = 9102 ' fractional midi note: 31.8616 freq= 51.4997 PerJust52[33] = 8532 ' fractional midi note: 32.9812 freq= 54.9403 PerJust52[34] = 7964 ' fractional midi note: 34.1739 freq= 58.8587 PerJust52[35] = 7584 ' fractional midi note: 35.0203 freq= 61.8079 PerJust52[36] = 7110 ' fractional midi note: 36.1376 freq= 65.9283 PerJust52[37] = 6826 ' fractional midi note: 36.8433 freq= 68.6713 PerJust52[38] = 6400 ' fractional midi note: 37.9589 freq= 73.2421 PerJust52[39] = 6068 ' fractional midi note: 38.8811 freq= 77.2494 PerJust52[40] = 5688 ' fractional midi note: 40.0007 freq= 82.4102 PerJust52[41] = 5333 ' fractional midi note: 41.1164 freq= 87.8961 PerJust52[42] = 5056 ' fractional midi note: 42.0398 freq= 92.7115 PerJust52[43] = 4740 ' fractional midi note: 43.1571 freq= 98.8922 PerJust52[44] = 4551 ' fractional midi note: 43.8616 freq= 102.9995 PerJust52[45] = 4266 ' fractional midi note: 44.9812 freq= 109.8806 PerJust52[46] = 3982 ' fractional midi note: 46.1739 freq= 117.7175 PerJust52[47] = 3792 ' fractional midi note: 47.0203 freq= 123.6157 PerJust52[48] = 3555 ' fractional midi note: 48.1376 freq= 131.8566 PerJust52[49] = 3413 ' fractional midi note: 48.8433 freq= 137.3425 PerJust52[50] = 3200 ' fractional midi note: 49.9589 freq= 146.4842 PerJust52[51] = 3034 ' fractional midi note: 50.8811 freq= 154.4988 PerJust52[52] = 2844 ' fractional midi note: 52.0007 freq= 164.8205 PerJust52[53] = 2666 ' fractional midi note: 53.1197 freq= 175.8256 PerJust52[54] = 2528 ' fractional midi note: 54.0398 freq= 185.423 PerJust52[55] = 2370 ' fractional midi note: 55.1571 freq= 197.7844 PerJust52[56] = 2276 ' fractional midi note: 55.8578 freq= 205.9537 PerJust52[57] = 2133 ' fractional midi note: 56.9812 freq= 219.7612 PerJust52[58] = 1991 ' fractional midi note: 58.1739 freq= 235.435 PerJust52[59] = 1896 ' fractional midi note: 59.0203 freq= 247.2314 PerJust52[60] = 1778 ' fractional midi note: 60.1327 freq= 263.6387 PerJust52[61] = 1706 ' fractional midi note: 60.8484 freq= 274.766 PerJust52[62] = 1600 ' fractional midi note: 61.9589 freq= 292.9684 PerJust52[63] = 1517 ' fractional midi note: 62.8811 freq= 308.9975 PerJust52[64] = 1422 ' fractional midi note: 64.0007 freq= 329.6409 PerJust52[65] = 1333 ' fractional midi note: 65.1197 freq= 351.6512 PerJust52[66] = 1264 ' fractional midi note: 66.0398 freq= 370.8461 PerJust52[67] = 1185 ' fractional midi note: 67.1571 freq= 395.5687 PerJust52[68] = 1138 ' fractional midi note: 67.8578 freq= 411.9075 PerJust52[69] = 1066 ' fractional midi note: 68.9893 freq= 439.7282 PerJust52[70] = 996 ' fractional midi note: 70.1652 freq= 470.6333 PerJust52[71] = 948 ' fractional midi note: 71.0203 freq= 494.4628 PerJust52[72] = 889 ' fractional midi note: 72.1327 freq= 527.2773 PerJust52[73] = 853 ' fractional midi note: 72.8484 freq= 549.5319 PerJust52[74] = 800 ' fractional midi note: 73.9589 freq= 585.9369 PerJust52[75] = 758 ' fractional midi note: 74.8925 freq= 618.4022 PerJust52[76] = 711 ' fractional midi note: 76.0007 freq= 659.2819 PerJust52[77] = 666 ' fractional midi note: 77.1327 freq= 703.8307 PerJust52[78] = 632 ' fractional midi note: 78.0398 freq= 741.6921 PerJust52[79] = 592 ' fractional midi note: 79.1718 freq= 791.8096 PerJust52[80] = 569 ' fractional midi note: 79.8578 freq= 823.8151 PerJust52[81] = 533 ' fractional midi note: 80.9893 freq= 879.4565 PerJust52[82] = 498 ' fractional midi note: 82.1652 freq= 941.2667 PerJust52[83] = 474 ' fractional midi note: 83.0203 freq= 988.9257 PerJust52[84] = 444 ' fractional midi note: 84.1522 freq= 1055.743 PerJust52[85] = 426 ' fractional midi note: 84.8687 freq= 1100.3534 PerJust52[86] = 400 ' fractional midi note: 85.9589 freq= 1171.8738 PerJust52[87] = 379 ' fractional midi note: 86.8925 freq= 1236.8043 PerJust52[88] = 356 ' fractional midi note: 87.9764 freq= 1316.7144 PerJust52[89] = 333 ' fractional midi note: 89.1327 freq= 1407.6614 PerJust52[90] = 316 ' fractional midi note: 90.0398 freq= 1483.3843 PerJust52[91] = 296 ' fractional midi note: 91.1718 freq= 1583.6191 PerJust52[92] = 284 ' fractional midi note: 91.8882 freq= 1650.5255 PerJust52[93] = 266 ' fractional midi note: 93.0218 freq= 1762.2174 PerJust52[94] = 249 ' fractional midi note: 94.1652 freq= 1882.5333 PerJust52[95] = 237 ' fractional midi note: 95.0203 freq= 1977.8513 PerJust52[96] = 222 ' fractional midi note: 96.1522 freq= 2111.4861 PerJust52[97] = 213 ' fractional midi note: 96.8687 freq= 2200.7068 PerJust52[98] = 200 ' fractional midi note: 97.9589 freq= 2343.7476 PerJust52[99] = 190 ' fractional midi note: 98.8469 freq= 2467.1018 PerJust52[100] = 178 ' fractional midi note: 99.9764 freq= 2633.4287 PerJust52[101] = 166 ' fractional midi note: 101.1847 freq= 2823.792 PerJust52[102] = 158 ' fractional midi note: 102.0398 freq= 2966.7686 PerJust52[103] = 148 ' fractional midi note: 103.1718 freq= 3167.2383 PerJust52[104] = 142 ' fractional midi note: 103.8882 freq= 3301.051 PerJust52[105] = 133 ' fractional midi note: 105.0218 freq= 3524.4348 PerJust52[106] = 124 ' fractional midi note: 106.2348 freq= 3780.2344 PerJust52[107] = 118 ' fractional midi note: 107.0935 freq= 3972.4626 PerJust52[108] = 111 ' fractional midi note: 108.1522 freq= 4222.9722 PerJust52[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust52[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust52[111] = 95 ' fractional midi note: 110.8469 freq= 4934.2036 PerJust52[112] = 89 ' fractional midi note: 111.9764 freq= 5266.8574 PerJust52[113] = 83 ' fractional midi note: 113.1847 freq= 5647.584 PerJust52[114] = 79 ' fractional midi note: 114.0398 freq= 5933.5371 PerJust52[115] = 74 ' fractional midi note: 115.1718 freq= 6334.4766 PerJust52[116] = 71 ' fractional midi note: 115.8882 freq= 6602.1021 PerJust52[117] = 66 ' fractional midi note: 117.1525 freq= 7102.2866 PerJust52[118] = 62 ' fractional midi note: 118.2348 freq= 7560.4688 PerJust52[119] = 59 ' fractional midi note: 119.0935 freq= 7944.9253 PerJust52[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust52[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust52[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust52[123] = 48 ' fractional midi note: 122.6656 freq= 9765.6035 PerJust52[124] = 44 ' fractional midi note: 124.172 freq= 10653.3994 PerJust52[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust52[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust52[127] = 37 ' fractional midi note: 127.1718 freq= 12668.9531 ' just intonation scale based on note 41 PerJust53[0] = 57264 ' fractional midi note: .0211 freq= 8.1858 PerJust53[1] = 53696 ' fractional midi note: 1.1349 freq= 8.7297 PerJust53[2] = 51536 ' fractional midi note: 1.8457 freq= 9.0956 PerJust53[3] = 48320 ' fractional midi note: 2.9612 freq= 9.701 PerJust53[4] = 45808 ' fractional midi note: 3.8854 freq= 10.2329 PerJust53[5] = 42952 ' fractional midi note: 4.9999 freq= 10.9133 PerJust53[6] = 40264 ' fractional midi note: 6.1188 freq= 11.6419 PerJust53[7] = 38176 ' fractional midi note: 7.0407 freq= 12.2787 PerJust53[8] = 35792 ' fractional midi note: 8.157 freq= 13.0965 PerJust53[9] = 34360 ' fractional midi note: 8.8639 freq= 13.6423 PerJust53[10] = 32216 ' fractional midi note: 9.9793 freq= 14.5502 PerJust53[11] = 30064 ' fractional midi note: 11.1762 freq= 15.5917 PerJust53[12] = 28632 ' fractional midi note: 12.0211 freq= 16.3715 PerJust53[13] = 26848 ' fractional midi note: 13.1349 freq= 17.4594 PerJust53[14] = 25768 ' fractional midi note: 13.8457 freq= 18.1912 PerJust53[15] = 24160 ' fractional midi note: 14.9612 freq= 19.4019 PerJust53[16] = 22904 ' fractional midi note: 15.8854 freq= 20.4658 PerJust53[17] = 21476 ' fractional midi note: 16.9999 freq= 21.8266 PerJust53[18] = 20132 ' fractional midi note: 18.1188 freq= 23.2839 PerJust53[19] = 19088 ' fractional midi note: 19.0407 freq= 24.5574 PerJust53[20] = 17896 ' fractional midi note: 20.157 freq= 26.193 PerJust53[21] = 17180 ' fractional midi note: 20.8639 freq= 27.2847 PerJust53[22] = 16108 ' fractional midi note: 21.9793 freq= 29.1004 PerJust53[23] = 15032 ' fractional midi note: 23.1762 freq= 31.1835 PerJust53[24] = 14316 ' fractional midi note: 24.0211 freq= 32.7431 PerJust53[25] = 13424 ' fractional midi note: 25.1349 freq= 34.9189 PerJust53[26] = 12884 ' fractional midi note: 25.8457 freq= 36.3824 PerJust53[27] = 12080 ' fractional midi note: 26.9612 freq= 38.8038 PerJust53[28] = 11452 ' fractional midi note: 27.8854 freq= 40.9316 PerJust53[29] = 10738 ' fractional midi note: 28.9999 freq= 43.6533 PerJust53[30] = 10066 ' fractional midi note: 30.1188 freq= 46.5678 PerJust53[31] = 9544 ' fractional midi note: 31.0407 freq= 49.1148 PerJust53[32] = 8948 ' fractional midi note: 32.157 freq= 52.386 PerJust53[33] = 8590 ' fractional midi note: 32.8639 freq= 54.5693 PerJust53[34] = 8054 ' fractional midi note: 33.9793 freq= 58.2008 PerJust53[35] = 7516 ' fractional midi note: 35.1762 freq= 62.367 PerJust53[36] = 7158 ' fractional midi note: 36.0211 freq= 65.4862 PerJust53[37] = 6712 ' fractional midi note: 37.1349 freq= 69.8377 PerJust53[38] = 6442 ' fractional midi note: 37.8457 freq= 72.7648 PerJust53[39] = 6040 ' fractional midi note: 38.9612 freq= 77.6076 PerJust53[40] = 5726 ' fractional midi note: 39.8854 freq= 81.8632 PerJust53[41] = 5369 ' fractional midi note: 40.9999 freq= 87.3066 PerJust53[42] = 5033 ' fractional midi note: 42.1188 freq= 93.1355 PerJust53[43] = 4772 ' fractional midi note: 43.0407 freq= 98.2295 PerJust53[44] = 4474 ' fractional midi note: 44.157 freq= 104.772 PerJust53[45] = 4295 ' fractional midi note: 44.8639 freq= 109.1386 PerJust53[46] = 4027 ' fractional midi note: 45.9793 freq= 116.4017 PerJust53[47] = 3758 ' fractional midi note: 47.1762 freq= 124.7339 PerJust53[48] = 3579 ' fractional midi note: 48.0211 freq= 130.9723 PerJust53[49] = 3356 ' fractional midi note: 49.1349 freq= 139.6755 PerJust53[50] = 3221 ' fractional midi note: 49.8457 freq= 145.5295 PerJust53[51] = 3020 ' fractional midi note: 50.9612 freq= 155.2153 PerJust53[52] = 2863 ' fractional midi note: 51.8854 freq= 163.7264 PerJust53[53] = 2684 ' fractional midi note: 53.0032 freq= 174.6464 PerJust53[54] = 2516 ' fractional midi note: 54.1222 freq= 186.3076 PerJust53[55] = 2386 ' fractional midi note: 55.0407 freq= 196.459 PerJust53[56] = 2237 ' fractional midi note: 56.157 freq= 209.5441 PerJust53[57] = 2148 ' fractional midi note: 56.8599 freq= 218.2269 PerJust53[58] = 2014 ' fractional midi note: 57.975 freq= 232.7455 PerJust53[59] = 1879 ' fractional midi note: 59.1762 freq= 249.4678 PerJust53[60] = 1790 ' fractional midi note: 60.0163 freq= 261.872 PerJust53[61] = 1678 ' fractional midi note: 61.1349 freq= 279.3509 PerJust53[62] = 1610 ' fractional midi note: 61.8511 freq= 291.1499 PerJust53[63] = 1510 ' fractional midi note: 62.9612 freq= 310.4305 PerJust53[64] = 1432 ' fractional midi note: 63.8794 freq= 327.3393 PerJust53[65] = 1342 ' fractional midi note: 65.0032 freq= 349.2928 PerJust53[66] = 1258 ' fractional midi note: 66.1222 freq= 372.6153 PerJust53[67] = 1193 ' fractional midi note: 67.0406 freq= 392.9159 PerJust53[68] = 1118 ' fractional midi note: 68.1647 freq= 419.2746 PerJust53[69] = 1074 ' fractional midi note: 68.8599 freq= 436.4537 PerJust53[70] = 1007 ' fractional midi note: 69.975 freq= 465.4911 PerJust53[71] = 940 ' fractional midi note: 71.167 freq= 498.6705 PerJust53[72] = 895 ' fractional midi note: 72.0163 freq= 523.744 PerJust53[73] = 839 ' fractional midi note: 73.1349 freq= 558.702 PerJust53[74] = 805 ' fractional midi note: 73.8511 freq= 582.2996 PerJust53[75] = 755 ' fractional midi note: 74.9612 freq= 620.8609 PerJust53[76] = 716 ' fractional midi note: 75.8794 freq= 654.6787 PerJust53[77] = 671 ' fractional midi note: 77.0032 freq= 698.5855 PerJust53[78] = 629 ' fractional midi note: 78.1222 freq= 745.2306 PerJust53[79] = 596 ' fractional midi note: 79.0552 freq= 786.4946 PerJust53[80] = 559 ' fractional midi note: 80.1647 freq= 838.5493 PerJust53[81] = 537 ' fractional midi note: 80.8599 freq= 872.9075 PerJust53[82] = 504 ' fractional midi note: 81.9578 freq= 930.0578 PerJust53[83] = 470 ' fractional midi note: 83.167 freq= 997.3411 PerJust53[84] = 448 ' fractional midi note: 83.9969 freq= 1046.3151 PerJust53[85] = 420 ' fractional midi note: 85.1142 freq= 1116.0682 PerJust53[86] = 402 ' fractional midi note: 85.8726 freq= 1166.0464 PerJust53[87] = 378 ' fractional midi note: 86.9383 freq= 1240.0807 PerJust53[88] = 358 ' fractional midi note: 87.8794 freq= 1309.3574 PerJust53[89] = 336 ' fractional midi note: 88.9774 freq= 1395.0908 PerJust53[90] = 314 ' fractional midi note: 90.1497 freq= 1492.8303 PerJust53[91] = 298 ' fractional midi note: 91.0552 freq= 1572.9891 PerJust53[92] = 280 ' fractional midi note: 92.1338 freq= 1674.1072 PerJust53[93] = 268 ' fractional midi note: 92.8921 freq= 1749.0647 PerJust53[94] = 252 ' fractional midi note: 93.9578 freq= 1860.1156 PerJust53[95] = 235 ' fractional midi note: 95.167 freq= 1994.6821 PerJust53[96] = 224 ' fractional midi note: 95.9969 freq= 2092.6301 PerJust53[97] = 210 ' fractional midi note: 97.1142 freq= 2232.1365 PerJust53[98] = 201 ' fractional midi note: 97.8726 freq= 2332.0928 PerJust53[99] = 189 ' fractional midi note: 98.9383 freq= 2480.1614 PerJust53[100] = 179 ' fractional midi note: 99.8794 freq= 2618.7148 PerJust53[101] = 168 ' fractional midi note: 100.9774 freq= 2790.1816 PerJust53[102] = 157 ' fractional midi note: 102.1497 freq= 2985.6606 PerJust53[103] = 149 ' fractional midi note: 103.0552 freq= 3145.9783 PerJust53[104] = 140 ' fractional midi note: 104.1338 freq= 3348.2144 PerJust53[105] = 134 ' fractional midi note: 104.8921 freq= 3498.1294 PerJust53[106] = 126 ' fractional midi note: 105.9578 freq= 3720.2312 PerJust53[107] = 118 ' fractional midi note: 107.0935 freq= 3972.4626 PerJust53[108] = 112 ' fractional midi note: 107.9969 freq= 4185.2603 PerJust53[109] = 105 ' fractional midi note: 109.1142 freq= 4464.2729 PerJust53[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust53[111] = 94 ' fractional midi note: 111.0301 freq= 4986.6938 PerJust53[112] = 90 ' fractional midi note: 111.783 freq= 5208.3457 PerJust53[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust53[114] = 78 ' fractional midi note: 114.2604 freq= 6009.627 PerJust53[115] = 74 ' fractional midi note: 115.1718 freq= 6334.4766 PerJust53[116] = 70 ' fractional midi note: 116.1338 freq= 6696.4287 PerJust53[117] = 67 ' fractional midi note: 116.8921 freq= 6996.2588 PerJust53[118] = 63 ' fractional midi note: 117.9578 freq= 7440.4624 PerJust53[119] = 59 ' fractional midi note: 119.0935 freq= 7944.9253 PerJust53[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust53[121] = 52 ' fractional midi note: 121.2799 freq= 9014.415 PerJust53[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust53[123] = 47 ' fractional midi note: 123.0301 freq= 9973.3877 PerJust53[124] = 45 ' fractional midi note: 123.783 freq= 10416.6914 PerJust53[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust53[126] = 39 ' fractional midi note: 126.2604 freq= 12019.2539 PerJust53[127] = 37 ' fractional midi note: 127.1718 freq= 12668.9531 ' just intonation scale based on note 42 PerJust54[0] = 56752 ' fractional midi note: .1766 freq= 8.2596 PerJust54[1] = 54048 ' fractional midi note: 1.0217 freq= 8.6728 PerJust54[2] = 50672 ' fractional midi note: 2.1384 freq= 9.2507 PerJust54[3] = 48656 ' fractional midi note: 2.8412 freq= 9.6339 PerJust54[4] = 45616 ' fractional midi note: 3.9582 freq= 10.276 PerJust54[5] = 43248 ' fractional midi note: 4.881 freq= 10.8386 PerJust54[6] = 40544 ' fractional midi note: 5.9988 freq= 11.5615 PerJust54[7] = 38008 ' fractional midi note: 7.117 freq= 12.3329 PerJust54[8] = 36040 ' fractional midi note: 8.0375 freq= 13.0064 PerJust54[9] = 33784 ' fractional midi note: 9.1566 freq= 13.8749 PerJust54[10] = 32432 ' fractional midi note: 9.8636 freq= 14.4533 PerJust54[11] = 30408 ' fractional midi note: 10.9792 freq= 15.4153 PerJust54[12] = 28376 ' fractional midi note: 12.1766 freq= 16.5193 PerJust54[13] = 27024 ' fractional midi note: 13.0217 freq= 17.3456 PerJust54[14] = 25336 ' fractional midi note: 14.1384 freq= 18.5014 PerJust54[15] = 24328 ' fractional midi note: 14.8412 freq= 19.2679 PerJust54[16] = 22808 ' fractional midi note: 15.9582 freq= 20.552 PerJust54[17] = 21624 ' fractional midi note: 16.881 freq= 21.6772 PerJust54[18] = 20272 ' fractional midi note: 17.9988 freq= 23.1231 PerJust54[19] = 19004 ' fractional midi note: 19.117 freq= 24.6659 PerJust54[20] = 18020 ' fractional midi note: 20.0375 freq= 26.0128 PerJust54[21] = 16892 ' fractional midi note: 21.1566 freq= 27.7499 PerJust54[22] = 16216 ' fractional midi note: 21.8636 freq= 28.9066 PerJust54[23] = 15204 ' fractional midi note: 22.9792 freq= 30.8306 PerJust54[24] = 14188 ' fractional midi note: 24.1766 freq= 33.0385 PerJust54[25] = 13512 ' fractional midi note: 25.0217 freq= 34.6913 PerJust54[26] = 12668 ' fractional midi note: 26.1384 freq= 37.0027 PerJust54[27] = 12164 ' fractional midi note: 26.8412 freq= 38.5358 PerJust54[28] = 11404 ' fractional midi note: 27.9582 freq= 41.1041 PerJust54[29] = 10812 ' fractional midi note: 28.881 freq= 43.3545 PerJust54[30] = 10136 ' fractional midi note: 29.9988 freq= 46.2461 PerJust54[31] = 9502 ' fractional midi note: 31.117 freq= 49.3317 PerJust54[32] = 9010 ' fractional midi note: 32.0375 freq= 52.0257 PerJust54[33] = 8446 ' fractional midi note: 33.1566 freq= 55.4998 PerJust54[34] = 8108 ' fractional midi note: 33.8636 freq= 57.8132 PerJust54[35] = 7602 ' fractional midi note: 34.9792 freq= 61.6613 PerJust54[36] = 7094 ' fractional midi note: 36.1766 freq= 66.077 PerJust54[37] = 6756 ' fractional midi note: 37.0218 freq= 69.383 PerJust54[38] = 6334 ' fractional midi note: 38.1384 freq= 74.0055 PerJust54[39] = 6082 ' fractional midi note: 38.8412 freq= 77.0716 PerJust54[40] = 5702 ' fractional midi note: 39.9582 freq= 82.2082 PerJust54[41] = 5406 ' fractional midi note: 40.881 freq= 86.709 PerJust54[42] = 5068 ' fractional midi note: 41.9988 freq= 92.4922 PerJust54[43] = 4751 ' fractional midi note: 43.117 freq= 98.6634 PerJust54[44] = 4505 ' fractional midi note: 44.0375 freq= 104.0513 PerJust54[45] = 4223 ' fractional midi note: 45.1566 freq= 110.9995 PerJust54[46] = 4054 ' fractional midi note: 45.8636 freq= 115.6264 PerJust54[47] = 3801 ' fractional midi note: 46.9792 freq= 123.3226 PerJust54[48] = 3547 ' fractional midi note: 48.1766 freq= 132.154 PerJust54[49] = 3378 ' fractional midi note: 49.0218 freq= 138.766 PerJust54[50] = 3167 ' fractional midi note: 50.1384 freq= 148.0109 PerJust54[51] = 3041 ' fractional midi note: 50.8412 freq= 154.1431 PerJust54[52] = 2851 ' fractional midi note: 51.9582 freq= 164.4163 PerJust54[53] = 2703 ' fractional midi note: 52.881 freq= 173.418 PerJust54[54] = 2534 ' fractional midi note: 53.9988 freq= 184.9844 PerJust54[55] = 2376 ' fractional midi note: 55.1134 freq= 197.2858 PerJust54[56] = 2252 ' fractional midi note: 56.0413 freq= 208.1483 PerJust54[57] = 2112 ' fractional midi note: 57.1525 freq= 221.9465 PerJust54[58] = 2027 ' fractional midi note: 57.8636 freq= 231.2527 PerJust54[59] = 1900 ' fractional midi note: 58.9838 freq= 246.7107 PerJust54[60] = 1774 ' fractional midi note: 60.1717 freq= 264.2332 PerJust54[61] = 1689 ' fractional midi note: 61.0218 freq= 277.5319 PerJust54[62] = 1584 ' fractional midi note: 62.1329 freq= 295.9278 PerJust54[63] = 1520 ' fractional midi note: 62.8469 freq= 308.3877 PerJust54[64] = 1426 ' fractional midi note: 63.9521 freq= 328.7168 PerJust54[65] = 1352 ' fractional midi note: 64.8746 freq= 346.7079 PerJust54[66] = 1267 ' fractional midi note: 65.9988 freq= 369.9688 PerJust54[67] = 1188 ' fractional midi note: 67.1134 freq= 394.5716 PerJust54[68] = 1126 ' fractional midi note: 68.0413 freq= 416.2966 PerJust54[69] = 1056 ' fractional midi note: 69.1525 freq= 443.8929 PerJust54[70] = 1014 ' fractional midi note: 69.8551 freq= 462.2785 PerJust54[71] = 950 ' fractional midi note: 70.9838 freq= 493.4215 PerJust54[72] = 887 ' fractional midi note: 72.1717 freq= 528.4664 PerJust54[73] = 844 ' fractional midi note: 73.032 freq= 555.3909 PerJust54[74] = 792 ' fractional midi note: 74.1329 freq= 591.8555 PerJust54[75] = 760 ' fractional midi note: 74.8469 freq= 616.7755 PerJust54[76] = 713 ' fractional midi note: 75.9521 freq= 657.4337 PerJust54[77] = 676 ' fractional midi note: 76.8746 freq= 693.4157 PerJust54[78] = 634 ' fractional midi note: 77.9851 freq= 739.3523 PerJust54[79] = 594 ' fractional midi note: 79.1134 freq= 789.1432 PerJust54[80] = 563 ' fractional midi note: 80.0413 freq= 832.5932 PerJust54[81] = 528 ' fractional midi note: 81.1525 freq= 887.7858 PerJust54[82] = 507 ' fractional midi note: 81.8551 freq= 924.5569 PerJust54[83] = 475 ' fractional midi note: 82.9838 freq= 986.843 PerJust54[84] = 444 ' fractional midi note: 84.1522 freq= 1055.743 PerJust54[85] = 422 ' fractional midi note: 85.032 freq= 1110.7817 PerJust54[86] = 396 ' fractional midi note: 86.1329 freq= 1183.7109 PerJust54[87] = 380 ' fractional midi note: 86.8469 freq= 1233.5509 PerJust54[88] = 356 ' fractional midi note: 87.9764 freq= 1316.7144 PerJust54[89] = 338 ' fractional midi note: 88.8746 freq= 1386.8314 PerJust54[90] = 317 ' fractional midi note: 89.9851 freq= 1478.7046 PerJust54[91] = 297 ' fractional midi note: 91.1134 freq= 1578.2865 PerJust54[92] = 282 ' fractional midi note: 92.0106 freq= 1662.2361 PerJust54[93] = 264 ' fractional midi note: 93.1525 freq= 1775.5717 PerJust54[94] = 254 ' fractional midi note: 93.821 freq= 1845.4749 PerJust54[95] = 238 ' fractional midi note: 94.9474 freq= 1969.5405 PerJust54[96] = 222 ' fractional midi note: 96.1522 freq= 2111.4861 PerJust54[97] = 211 ' fractional midi note: 97.032 freq= 2221.5635 PerJust54[98] = 198 ' fractional midi note: 98.1329 freq= 2367.4219 PerJust54[99] = 190 ' fractional midi note: 98.8469 freq= 2467.1018 PerJust54[100] = 178 ' fractional midi note: 99.9764 freq= 2633.4287 PerJust54[101] = 169 ' fractional midi note: 100.8746 freq= 2773.6628 PerJust54[102] = 158 ' fractional midi note: 102.0398 freq= 2966.7686 PerJust54[103] = 148 ' fractional midi note: 103.1718 freq= 3167.2383 PerJust54[104] = 141 ' fractional midi note: 104.0106 freq= 3324.4722 PerJust54[105] = 132 ' fractional midi note: 105.1525 freq= 3551.1433 PerJust54[106] = 127 ' fractional midi note: 105.821 freq= 3690.9497 PerJust54[107] = 119 ' fractional midi note: 106.9474 freq= 3939.0811 PerJust54[108] = 111 ' fractional midi note: 108.1522 freq= 4222.9722 PerJust54[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust54[110] = 99 ' fractional midi note: 110.1329 freq= 4734.8438 PerJust54[111] = 95 ' fractional midi note: 110.8469 freq= 4934.2036 PerJust54[112] = 89 ' fractional midi note: 111.9764 freq= 5266.8574 PerJust54[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust54[114] = 79 ' fractional midi note: 114.0398 freq= 5933.5371 PerJust54[115] = 74 ' fractional midi note: 115.1718 freq= 6334.4766 PerJust54[116] = 70 ' fractional midi note: 116.1338 freq= 6696.4287 PerJust54[117] = 66 ' fractional midi note: 117.1525 freq= 7102.2866 PerJust54[118] = 64 ' fractional midi note: 117.6852 freq= 7324.2236 PerJust54[119] = 60 ' fractional midi note: 118.8025 freq= 7812.4966 PerJust54[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust54[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust54[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust54[123] = 48 ' fractional midi note: 122.6656 freq= 9765.6035 PerJust54[124] = 44 ' fractional midi note: 124.172 freq= 10653.3994 PerJust54[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust54[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust54[127] = 37 ' fractional midi note: 127.1718 freq= 12668.9531 ' just intonation scale based on note 43 PerJust55[0] = 57392 ' fractional midi note: -.0176 freq= 8.1675 PerJust55[1] = 53568 ' fractional midi note: 1.1762 freq= 8.7506 PerJust55[2] = 51024 ' fractional midi note: 2.0185 freq= 9.1868 PerJust55[3] = 47840 ' fractional midi note: 3.134 freq= 9.7983 PerJust55[4] = 45920 ' fractional midi note: 3.8432 freq= 10.208 PerJust55[5] = 43056 ' fractional midi note: 4.9581 freq= 10.887 PerJust55[6] = 40816 ' fractional midi note: 5.883 freq= 11.4844 PerJust55[7] = 38264 ' fractional midi note: 7.0008 freq= 12.2504 PerJust55[8] = 35872 ' fractional midi note: 8.1183 freq= 13.0673 PerJust55[9] = 34016 ' fractional midi note: 9.0381 freq= 13.7803 PerJust55[10] = 31888 ' fractional midi note: 10.1565 freq= 14.6999 PerJust55[11] = 30616 ' fractional midi note: 10.8612 freq= 15.3106 PerJust55[12] = 28696 ' fractional midi note: 11.9824 freq= 16.335 PerJust55[13] = 26784 ' fractional midi note: 13.1762 freq= 17.5011 PerJust55[14] = 25512 ' fractional midi note: 14.0185 freq= 18.3737 PerJust55[15] = 23920 ' fractional midi note: 15.134 freq= 19.5965 PerJust55[16] = 22960 ' fractional midi note: 15.8432 freq= 20.416 PerJust55[17] = 21528 ' fractional midi note: 16.9581 freq= 21.774 PerJust55[18] = 20408 ' fractional midi note: 17.883 freq= 22.9689 PerJust55[19] = 19132 ' fractional midi note: 19.0008 freq= 24.5008 PerJust55[20] = 17936 ' fractional midi note: 20.1183 freq= 26.1345 PerJust55[21] = 17008 ' fractional midi note: 21.0381 freq= 27.5606 PerJust55[22] = 15944 ' fractional midi note: 22.1565 freq= 29.3998 PerJust55[23] = 15308 ' fractional midi note: 22.8612 freq= 30.6212 PerJust55[24] = 14348 ' fractional midi note: 23.9824 freq= 32.67 PerJust55[25] = 13392 ' fractional midi note: 25.1762 freq= 35.0023 PerJust55[26] = 12756 ' fractional midi note: 26.0185 freq= 36.7473 PerJust55[27] = 11960 ' fractional midi note: 27.134 freq= 39.1931 PerJust55[28] = 11480 ' fractional midi note: 27.8432 freq= 40.8319 PerJust55[29] = 10764 ' fractional midi note: 28.9581 freq= 43.548 PerJust55[30] = 10204 ' fractional midi note: 29.883 freq= 45.9378 PerJust55[31] = 9566 ' fractional midi note: 31.0008 freq= 49.0017 PerJust55[32] = 8968 ' fractional midi note: 32.1183 freq= 52.269 PerJust55[33] = 8504 ' fractional midi note: 33.0381 freq= 55.1212 PerJust55[34] = 7972 ' fractional midi note: 34.1565 freq= 58.7996 PerJust55[35] = 7654 ' fractional midi note: 34.8612 freq= 61.2424 PerJust55[36] = 7174 ' fractional midi note: 35.9824 freq= 65.3399 PerJust55[37] = 6696 ' fractional midi note: 37.1762 freq= 70.0045 PerJust55[38] = 6378 ' fractional midi note: 38.0185 freq= 73.4947 PerJust55[39] = 5980 ' fractional midi note: 39.134 freq= 78.3861 PerJust55[40] = 5740 ' fractional midi note: 39.8432 freq= 81.6639 PerJust55[41] = 5382 ' fractional midi note: 40.9581 freq= 87.096 PerJust55[42] = 5102 ' fractional midi note: 41.883 freq= 91.8756 PerJust55[43] = 4783 ' fractional midi note: 43.0008 freq= 98.0034 PerJust55[44] = 4484 ' fractional midi note: 44.1183 freq= 104.5381 PerJust55[45] = 4252 ' fractional midi note: 45.0381 freq= 110.2424 PerJust55[46] = 3986 ' fractional midi note: 46.1565 freq= 117.5992 PerJust55[47] = 3827 ' fractional midi note: 46.8612 freq= 122.4849 PerJust55[48] = 3587 ' fractional midi note: 47.9824 freq= 130.6799 PerJust55[49] = 3348 ' fractional midi note: 49.1762 freq= 140.0091 PerJust55[50] = 3189 ' fractional midi note: 50.0185 freq= 146.9894 PerJust55[51] = 2990 ' fractional midi note: 51.134 freq= 156.7722 PerJust55[52] = 2870 ' fractional midi note: 51.8432 freq= 163.3278 PerJust55[53] = 2691 ' fractional midi note: 52.9581 freq= 174.192 PerJust55[54] = 2551 ' fractional midi note: 53.883 freq= 183.7512 PerJust55[55] = 2392 ' fractional midi note: 54.9972 freq= 195.966 PerJust55[56] = 2242 ' fractional midi note: 56.1183 freq= 209.0762 PerJust55[57] = 2126 ' fractional midi note: 57.0381 freq= 220.4847 PerJust55[58] = 1993 ' fractional midi note: 58.1565 freq= 235.1985 PerJust55[59] = 1914 ' fractional midi note: 58.8567 freq= 244.9061 PerJust55[60] = 1794 ' fractional midi note: 59.9776 freq= 261.2873 PerJust55[61] = 1674 ' fractional midi note: 61.1762 freq= 280.0182 PerJust55[62] = 1594 ' fractional midi note: 62.024 freq= 294.0721 PerJust55[63] = 1495 ' fractional midi note: 63.134 freq= 313.5445 PerJust55[64] = 1435 ' fractional midi note: 63.8432 freq= 326.6556 PerJust55[65] = 1346 ' fractional midi note: 64.9516 freq= 348.2533 PerJust55[66] = 1276 ' fractional midi note: 65.8762 freq= 367.358 PerJust55[67] = 1196 ' fractional midi note: 66.9972 freq= 391.9321 PerJust55[68] = 1121 ' fractional midi note: 68.1183 freq= 418.1524 PerJust55[69] = 1063 ' fractional midi note: 69.0381 freq= 440.9695 PerJust55[70] = 996 ' fractional midi note: 70.1652 freq= 470.6333 PerJust55[71] = 957 ' fractional midi note: 70.8567 freq= 489.8121 PerJust55[72] = 897 ' fractional midi note: 71.9776 freq= 522.5746 PerJust55[73] = 837 ' fractional midi note: 73.1762 freq= 560.0363 PerJust55[74] = 797 ' fractional midi note: 74.024 freq= 588.1444 PerJust55[75] = 748 ' fractional midi note: 75.1225 freq= 626.6725 PerJust55[76] = 718 ' fractional midi note: 75.8311 freq= 652.8547 PerJust55[77] = 673 ' fractional midi note: 76.9516 freq= 696.5065 PerJust55[78] = 638 ' fractional midi note: 77.8762 freq= 734.716 PerJust55[79] = 598 ' fractional midi note: 78.9972 freq= 783.8641 PerJust55[80] = 560 ' fractional midi note: 80.1338 freq= 837.0536 PerJust55[81] = 532 ' fractional midi note: 81.0218 freq= 881.1087 PerJust55[82] = 498 ' fractional midi note: 82.1652 freq= 941.2667 PerJust55[83] = 478 ' fractional midi note: 82.8748 freq= 980.6492 PerJust55[84] = 448 ' fractional midi note: 83.9969 freq= 1046.3151 PerJust55[85] = 418 ' fractional midi note: 85.1969 freq= 1121.4126 PerJust55[86] = 398 ' fractional midi note: 86.0457 freq= 1177.764 PerJust55[87] = 374 ' fractional midi note: 87.1225 freq= 1253.3451 PerJust55[88] = 359 ' fractional midi note: 87.8311 freq= 1305.7095 PerJust55[89] = 336 ' fractional midi note: 88.9774 freq= 1395.0908 PerJust55[90] = 319 ' fractional midi note: 89.8762 freq= 1469.432 PerJust55[91] = 299 ' fractional midi note: 90.9972 freq= 1567.7283 PerJust55[92] = 280 ' fractional midi note: 92.1338 freq= 1674.1072 PerJust55[93] = 266 ' fractional midi note: 93.0218 freq= 1762.2174 PerJust55[94] = 249 ' fractional midi note: 94.1652 freq= 1882.5333 PerJust55[95] = 239 ' fractional midi note: 94.8748 freq= 1961.2983 PerJust55[96] = 224 ' fractional midi note: 95.9969 freq= 2092.6301 PerJust55[97] = 209 ' fractional midi note: 97.1969 freq= 2242.8252 PerJust55[98] = 199 ' fractional midi note: 98.0457 freq= 2355.5281 PerJust55[99] = 187 ' fractional midi note: 99.1225 freq= 2506.6902 PerJust55[100] = 180 ' fractional midi note: 99.783 freq= 2604.1729 PerJust55[101] = 168 ' fractional midi note: 100.9774 freq= 2790.1816 PerJust55[102] = 160 ' fractional midi note: 101.8221 freq= 2929.6946 PerJust55[103] = 150 ' fractional midi note: 102.9394 freq= 3125.0056 PerJust55[104] = 140 ' fractional midi note: 104.1338 freq= 3348.2144 PerJust55[105] = 133 ' fractional midi note: 105.0218 freq= 3524.4348 PerJust55[106] = 124 ' fractional midi note: 106.2348 freq= 3780.2344 PerJust55[107] = 120 ' fractional midi note: 106.8025 freq= 3906.2483 PerJust55[108] = 112 ' fractional midi note: 107.9969 freq= 4185.2603 PerJust55[109] = 104 ' fractional midi note: 109.2799 freq= 4507.2075 PerJust55[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust55[111] = 94 ' fractional midi note: 111.0301 freq= 4986.6938 PerJust55[112] = 90 ' fractional midi note: 111.783 freq= 5208.3457 PerJust55[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust55[114] = 80 ' fractional midi note: 113.8221 freq= 5859.3892 PerJust55[115] = 75 ' fractional midi note: 114.9394 freq= 6250.0112 PerJust55[116] = 70 ' fractional midi note: 116.1338 freq= 6696.4287 PerJust55[117] = 66 ' fractional midi note: 117.1525 freq= 7102.2866 PerJust55[118] = 62 ' fractional midi note: 118.2348 freq= 7560.4688 PerJust55[119] = 60 ' fractional midi note: 118.8025 freq= 7812.4966 PerJust55[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust55[121] = 52 ' fractional midi note: 121.2799 freq= 9014.415 PerJust55[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust55[123] = 47 ' fractional midi note: 123.0301 freq= 9973.3877 PerJust55[124] = 45 ' fractional midi note: 123.783 freq= 10416.6914 PerJust55[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust55[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust55[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 ' just intonation scale based on note 44 PerJust56[0] = 57792 ' fractional midi note: -.1378 freq= 8.111 PerJust56[1] = 54176 ' fractional midi note: .9808 freq= 8.6524 PerJust56[2] = 50560 ' fractional midi note: 2.1767 freq= 9.2712 PerJust56[3] = 48160 ' fractional midi note: 3.0186 freq= 9.7332 PerJust56[4] = 45152 ' fractional midi note: 4.1352 freq= 10.3816 PerJust56[5] = 43344 ' fractional midi note: 4.8427 freq= 10.8147 PerJust56[6] = 40640 ' fractional midi note: 5.9578 freq= 11.5342 PerJust56[7] = 38528 ' fractional midi note: 6.8818 freq= 12.1665 PerJust56[8] = 36120 ' fractional midi note: 7.9991 freq= 12.9776 PerJust56[9] = 33864 ' fractional midi note: 9.1156 freq= 13.8421 PerJust56[10] = 32104 ' fractional midi note: 10.0396 freq= 14.601 PerJust56[11] = 30096 ' fractional midi note: 11.1578 freq= 15.5752 PerJust56[12] = 28896 ' fractional midi note: 11.8622 freq= 16.222 PerJust56[13] = 27088 ' fractional midi note: 12.9808 freq= 17.3047 PerJust56[14] = 25280 ' fractional midi note: 14.1767 freq= 18.5423 PerJust56[15] = 24080 ' fractional midi note: 15.0186 freq= 19.4663 PerJust56[16] = 22576 ' fractional midi note: 16.1352 freq= 20.7632 PerJust56[17] = 21672 ' fractional midi note: 16.8427 freq= 21.6293 PerJust56[18] = 20320 ' fractional midi note: 17.9578 freq= 23.0684 PerJust56[19] = 19264 ' fractional midi note: 18.8818 freq= 24.333 PerJust56[20] = 18060 ' fractional midi note: 19.9991 freq= 25.9552 PerJust56[21] = 16932 ' fractional midi note: 21.1156 freq= 27.6842 PerJust56[22] = 16052 ' fractional midi note: 22.0396 freq= 29.202 PerJust56[23] = 15048 ' fractional midi note: 23.1578 freq= 31.1504 PerJust56[24] = 14448 ' fractional midi note: 23.8622 freq= 32.4439 PerJust56[25] = 13544 ' fractional midi note: 24.9808 freq= 34.6094 PerJust56[26] = 12640 ' fractional midi note: 26.1767 freq= 37.0847 PerJust56[27] = 12040 ' fractional midi note: 27.0186 freq= 38.9327 PerJust56[28] = 11288 ' fractional midi note: 28.1352 freq= 41.5265 PerJust56[29] = 10836 ' fractional midi note: 28.8427 freq= 43.2587 PerJust56[30] = 10160 ' fractional midi note: 29.9578 freq= 46.1367 PerJust56[31] = 9632 ' fractional midi note: 30.8818 freq= 48.666 PerJust56[32] = 9030 ' fractional midi note: 31.9991 freq= 51.9104 PerJust56[33] = 8466 ' fractional midi note: 33.1156 freq= 55.3685 PerJust56[34] = 8026 ' fractional midi note: 34.0396 freq= 58.4039 PerJust56[35] = 7524 ' fractional midi note: 35.1578 freq= 62.3007 PerJust56[36] = 7224 ' fractional midi note: 35.8622 freq= 64.8879 PerJust56[37] = 6772 ' fractional midi note: 36.9808 freq= 69.2189 PerJust56[38] = 6320 ' fractional midi note: 38.1767 freq= 74.1694 PerJust56[39] = 6020 ' fractional midi note: 39.0186 freq= 77.8654 PerJust56[40] = 5644 ' fractional midi note: 40.1352 freq= 83.053 PerJust56[41] = 5418 ' fractional midi note: 40.8427 freq= 86.5174 PerJust56[42] = 5080 ' fractional midi note: 41.9578 freq= 92.2734 PerJust56[43] = 4816 ' fractional midi note: 42.8818 freq= 97.3321 PerJust56[44] = 4515 ' fractional midi note: 43.9991 freq= 103.8208 PerJust56[45] = 4233 ' fractional midi note: 45.1156 freq= 110.737 PerJust56[46] = 4013 ' fractional midi note: 46.0396 freq= 116.8078 PerJust56[47] = 3762 ' fractional midi note: 47.1578 freq= 124.6014 PerJust56[48] = 3612 ' fractional midi note: 47.8622 freq= 129.7757 PerJust56[49] = 3386 ' fractional midi note: 48.9808 freq= 138.4377 PerJust56[50] = 3160 ' fractional midi note: 50.1767 freq= 148.3387 PerJust56[51] = 3010 ' fractional midi note: 51.0186 freq= 155.7307 PerJust56[52] = 2822 ' fractional midi note: 52.1352 freq= 166.1059 PerJust56[53] = 2709 ' fractional midi note: 52.8427 freq= 173.0348 PerJust56[54] = 2540 ' fractional midi note: 53.9578 freq= 184.5468 PerJust56[55] = 2408 ' fractional midi note: 54.8818 freq= 194.6641 PerJust56[56] = 2258 ' fractional midi note: 55.9952 freq= 207.5948 PerJust56[57] = 2116 ' fractional midi note: 57.1197 freq= 221.5264 PerJust56[58] = 2006 ' fractional midi note: 58.0439 freq= 233.6737 PerJust56[59] = 1881 ' fractional midi note: 59.1578 freq= 249.2028 PerJust56[60] = 1806 ' fractional midi note: 59.8622 freq= 259.5514 PerJust56[61] = 1693 ' fractional midi note: 60.9808 freq= 276.8754 PerJust56[62] = 1580 ' fractional midi note: 62.1767 freq= 296.6775 PerJust56[63] = 1505 ' fractional midi note: 63.0186 freq= 311.4615 PerJust56[64] = 1411 ' fractional midi note: 64.1352 freq= 332.2119 PerJust56[65] = 1354 ' fractional midi note: 64.849 freq= 346.1955 PerJust56[66] = 1270 ' fractional midi note: 65.9578 freq= 369.0937 PerJust56[67] = 1204 ' fractional midi note: 66.8818 freq= 389.3282 PerJust56[68] = 1129 ' fractional midi note: 67.9952 freq= 415.1896 PerJust56[69] = 1058 ' fractional midi note: 69.1197 freq= 443.0527 PerJust56[70] = 1003 ' fractional midi note: 70.0439 freq= 467.3474 PerJust56[71] = 940 ' fractional midi note: 71.167 freq= 498.6705 PerJust56[72] = 903 ' fractional midi note: 71.8622 freq= 519.1027 PerJust56[73] = 846 ' fractional midi note: 72.991 freq= 554.0771 PerJust56[74] = 790 ' fractional midi note: 74.1767 freq= 593.3548 PerJust56[75] = 752 ' fractional midi note: 75.0301 freq= 623.3367 PerJust56[76] = 706 ' fractional midi note: 76.1229 freq= 663.9519 PerJust56[77] = 677 ' fractional midi note: 76.849 freq= 692.3909 PerJust56[78] = 635 ' fractional midi note: 77.9578 freq= 738.1874 PerJust56[79] = 602 ' fractional midi note: 78.8818 freq= 778.6564 PerJust56[80] = 564 ' fractional midi note: 80.0106 freq= 831.118 PerJust56[81] = 529 ' fractional midi note: 81.1197 freq= 886.1055 PerJust56[82] = 502 ' fractional midi note: 82.0267 freq= 933.7667 PerJust56[83] = 470 ' fractional midi note: 83.167 freq= 997.3411 PerJust56[84] = 452 ' fractional midi note: 83.843 freq= 1037.0549 PerJust56[85] = 423 ' fractional midi note: 84.991 freq= 1108.1542 PerJust56[86] = 395 ' fractional midi note: 86.1767 freq= 1186.7096 PerJust56[87] = 376 ' fractional midi note: 87.0301 freq= 1246.6735 PerJust56[88] = 353 ' fractional midi note: 88.1229 freq= 1327.9038 PerJust56[89] = 338 ' fractional midi note: 88.8746 freq= 1386.8314 PerJust56[90] = 318 ' fractional midi note: 89.9306 freq= 1474.0571 PerJust56[91] = 301 ' fractional midi note: 90.8818 freq= 1557.3127 PerJust56[92] = 282 ' fractional midi note: 92.0106 freq= 1662.2361 PerJust56[93] = 264 ' fractional midi note: 93.1525 freq= 1775.5717 PerJust56[94] = 251 ' fractional midi note: 94.0267 freq= 1867.5334 PerJust56[95] = 235 ' fractional midi note: 95.167 freq= 1994.6821 PerJust56[96] = 226 ' fractional midi note: 95.843 freq= 2074.1099 PerJust56[97] = 212 ' fractional midi note: 96.9501 freq= 2211.0793 PerJust56[98] = 198 ' fractional midi note: 98.1329 freq= 2367.4219 PerJust56[99] = 188 ' fractional midi note: 99.0301 freq= 2493.3469 PerJust56[100] = 176 ' fractional midi note: 100.172 freq= 2663.3499 PerJust56[101] = 169 ' fractional midi note: 100.8746 freq= 2773.6628 PerJust56[102] = 159 ' fractional midi note: 101.9306 freq= 2948.1143 PerJust56[103] = 150 ' fractional midi note: 102.9394 freq= 3125.0056 PerJust56[104] = 141 ' fractional midi note: 104.0106 freq= 3324.4722 PerJust56[105] = 132 ' fractional midi note: 105.1525 freq= 3551.1433 PerJust56[106] = 126 ' fractional midi note: 105.9578 freq= 3720.2312 PerJust56[107] = 118 ' fractional midi note: 107.0935 freq= 3972.4626 PerJust56[108] = 113 ' fractional midi note: 107.843 freq= 4148.2197 PerJust56[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust56[110] = 99 ' fractional midi note: 110.1329 freq= 4734.8438 PerJust56[111] = 94 ' fractional midi note: 111.0301 freq= 4986.6938 PerJust56[112] = 88 ' fractional midi note: 112.172 freq= 5326.6997 PerJust56[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust56[114] = 80 ' fractional midi note: 113.8221 freq= 5859.3892 PerJust56[115] = 75 ' fractional midi note: 114.9394 freq= 6250.0112 PerJust56[116] = 70 ' fractional midi note: 116.1338 freq= 6696.4287 PerJust56[117] = 66 ' fractional midi note: 117.1525 freq= 7102.2866 PerJust56[118] = 63 ' fractional midi note: 117.9578 freq= 7440.4624 PerJust56[119] = 59 ' fractional midi note: 119.0935 freq= 7944.9253 PerJust56[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust56[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust56[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust56[123] = 47 ' fractional midi note: 123.0301 freq= 9973.3877 PerJust56[124] = 44 ' fractional midi note: 124.172 freq= 10653.3994 PerJust56[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust56[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust56[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 ' just intonation scale based on note 45 PerJust57[0] = 56816 ' fractional midi note: .1571 freq= 8.2503 PerJust57[1] = 54544 ' fractional midi note: .8636 freq= 8.594 PerJust57[2] = 51136 ' fractional midi note: 1.9806 freq= 9.1667 PerJust57[3] = 47728 ' fractional midi note: 3.1746 freq= 9.8213 PerJust57[4] = 45456 ' fractional midi note: 4.019 freq= 10.3122 PerJust57[5] = 42608 ' fractional midi note: 5.1392 freq= 11.0015 PerJust57[6] = 40912 ' fractional midi note: 5.8424 freq= 11.4575 PerJust57[7] = 38352 ' fractional midi note: 6.961 freq= 12.2223 PerJust57[8] = 36368 ' fractional midi note: 7.8806 freq= 12.8891 PerJust57[9] = 34088 ' fractional midi note: 9.0015 freq= 13.7512 PerJust57[10] = 31960 ' fractional midi note: 10.1174 freq= 14.6667 PerJust57[11] = 30304 ' fractional midi note: 11.0385 freq= 15.4682 PerJust57[12] = 28408 ' fractional midi note: 12.1571 freq= 16.5007 PerJust57[13] = 27272 ' fractional midi note: 12.8636 freq= 17.188 PerJust57[14] = 25568 ' fractional midi note: 13.9806 freq= 18.3335 PerJust57[15] = 23864 ' fractional midi note: 15.1746 freq= 19.6425 PerJust57[16] = 22728 ' fractional midi note: 16.019 freq= 20.6243 PerJust57[17] = 21304 ' fractional midi note: 17.1392 freq= 22.003 PerJust57[18] = 20456 ' fractional midi note: 17.8424 freq= 22.9151 PerJust57[19] = 19176 ' fractional midi note: 18.961 freq= 24.4446 PerJust57[20] = 18184 ' fractional midi note: 19.8806 freq= 25.7781 PerJust57[21] = 17044 ' fractional midi note: 21.0015 freq= 27.5024 PerJust57[22] = 15980 ' fractional midi note: 22.1174 freq= 29.3335 PerJust57[23] = 15152 ' fractional midi note: 23.0385 freq= 30.9364 PerJust57[24] = 14204 ' fractional midi note: 24.1571 freq= 33.0013 PerJust57[25] = 13636 ' fractional midi note: 24.8636 freq= 34.3759 PerJust57[26] = 12784 ' fractional midi note: 25.9806 freq= 36.667 PerJust57[27] = 11932 ' fractional midi note: 27.1746 freq= 39.2851 PerJust57[28] = 11364 ' fractional midi note: 28.019 freq= 41.2487 PerJust57[29] = 10652 ' fractional midi note: 29.1392 freq= 44.0059 PerJust57[30] = 10228 ' fractional midi note: 29.8424 freq= 45.8302 PerJust57[31] = 9588 ' fractional midi note: 30.961 freq= 48.8892 PerJust57[32] = 9092 ' fractional midi note: 31.8806 freq= 51.5563 PerJust57[33] = 8522 ' fractional midi note: 33.0015 freq= 55.0048 PerJust57[34] = 7990 ' fractional midi note: 34.1174 freq= 58.667 PerJust57[35] = 7576 ' fractional midi note: 35.0385 freq= 61.8729 PerJust57[36] = 7102 ' fractional midi note: 36.1571 freq= 66.0026 PerJust57[37] = 6818 ' fractional midi note: 36.8636 freq= 68.7518 PerJust57[38] = 6392 ' fractional midi note: 37.9806 freq= 73.334 PerJust57[39] = 5966 ' fractional midi note: 39.1746 freq= 78.5702 PerJust57[40] = 5682 ' fractional midi note: 40.019 freq= 82.4974 PerJust57[41] = 5326 ' fractional midi note: 41.1392 freq= 88.0119 PerJust57[42] = 5114 ' fractional midi note: 41.8424 freq= 91.6604 PerJust57[43] = 4794 ' fractional midi note: 42.961 freq= 97.7783 PerJust57[44] = 4546 ' fractional midi note: 43.8806 freq= 103.1126 PerJust57[45] = 4261 ' fractional midi note: 45.0015 freq= 110.0095 PerJust57[46] = 3995 ' fractional midi note: 46.1174 freq= 117.3339 PerJust57[47] = 3788 ' fractional midi note: 47.0385 freq= 123.7457 PerJust57[48] = 3551 ' fractional midi note: 48.1571 freq= 132.0052 PerJust57[49] = 3409 ' fractional midi note: 48.8636 freq= 137.5037 PerJust57[50] = 3196 ' fractional midi note: 49.9806 freq= 146.6679 PerJust57[51] = 2983 ' fractional midi note: 51.1746 freq= 157.1403 PerJust57[52] = 2841 ' fractional midi note: 52.019 freq= 164.9948 PerJust57[53] = 2663 ' fractional midi note: 53.1392 freq= 176.0238 PerJust57[54] = 2557 ' fractional midi note: 53.8424 freq= 183.3208 PerJust57[55] = 2397 ' fractional midi note: 54.961 freq= 195.5567 PerJust57[56] = 2273 ' fractional midi note: 55.8806 freq= 206.2251 PerJust57[57] = 2130 ' fractional midi note: 57.0055 freq= 220.0699 PerJust57[58] = 1998 ' fractional midi note: 58.1131 freq= 234.6096 PerJust57[59] = 1894 ' fractional midi note: 59.0385 freq= 247.4915 PerJust57[60] = 1776 ' fractional midi note: 60.1522 freq= 263.9358 PerJust57[61] = 1704 ' fractional midi note: 60.8687 freq= 275.0883 PerJust57[62] = 1598 ' fractional midi note: 61.9806 freq= 293.3359 PerJust57[63] = 1492 ' fractional midi note: 63.1688 freq= 314.1754 PerJust57[64] = 1420 ' fractional midi note: 64.0251 freq= 330.1058 PerJust57[65] = 1332 ' fractional midi note: 65.1327 freq= 351.9153 PerJust57[66] = 1278 ' fractional midi note: 65.8491 freq= 366.7834 PerJust57[67] = 1198 ' fractional midi note: 66.9682 freq= 391.2761 PerJust57[68] = 1136 ' fractional midi note: 67.8882 freq= 412.6314 PerJust57[69] = 1065 ' fractional midi note: 69.0055 freq= 440.1399 PerJust57[70] = 999 ' fractional midi note: 70.1131 freq= 469.2191 PerJust57[71] = 947 ' fractional midi note: 71.0385 freq= 494.9828 PerJust57[72] = 888 ' fractional midi note: 72.1522 freq= 527.8715 PerJust57[73] = 852 ' fractional midi note: 72.8687 freq= 550.1767 PerJust57[74] = 799 ' fractional midi note: 73.9806 freq= 586.6718 PerJust57[75] = 746 ' fractional midi note: 75.1688 freq= 628.3508 PerJust57[76] = 710 ' fractional midi note: 76.0251 freq= 660.2117 PerJust57[77] = 666 ' fractional midi note: 77.1327 freq= 703.8307 PerJust57[78] = 639 ' fractional midi note: 77.8491 freq= 733.5668 PerJust57[79] = 599 ' fractional midi note: 78.9682 freq= 782.5522 PerJust57[80] = 568 ' fractional midi note: 79.8882 freq= 825.2628 PerJust57[81] = 532 ' fractional midi note: 81.0218 freq= 881.1087 PerJust57[82] = 500 ' fractional midi note: 82.0958 freq= 937.5012 PerJust57[83] = 474 ' fractional midi note: 83.0203 freq= 988.9257 PerJust57[84] = 444 ' fractional midi note: 84.1522 freq= 1055.743 PerJust57[85] = 426 ' fractional midi note: 84.8687 freq= 1100.3534 PerJust57[86] = 400 ' fractional midi note: 85.9589 freq= 1171.8738 PerJust57[87] = 373 ' fractional midi note: 87.1688 freq= 1256.7017 PerJust57[88] = 355 ' fractional midi note: 88.0251 freq= 1320.4233 PerJust57[89] = 333 ' fractional midi note: 89.1327 freq= 1407.6614 PerJust57[90] = 320 ' fractional midi note: 89.8221 freq= 1464.8473 PerJust57[91] = 300 ' fractional midi note: 90.9394 freq= 1562.5028 PerJust57[92] = 284 ' fractional midi note: 91.8882 freq= 1650.5255 PerJust57[93] = 266 ' fractional midi note: 93.0218 freq= 1762.2174 PerJust57[94] = 250 ' fractional midi note: 94.0958 freq= 1875.0023 PerJust57[95] = 237 ' fractional midi note: 95.0203 freq= 1977.8513 PerJust57[96] = 222 ' fractional midi note: 96.1522 freq= 2111.4861 PerJust57[97] = 213 ' fractional midi note: 96.8687 freq= 2200.7068 PerJust57[98] = 200 ' fractional midi note: 97.9589 freq= 2343.7476 PerJust57[99] = 186 ' fractional midi note: 99.2153 freq= 2520.1633 PerJust57[100] = 178 ' fractional midi note: 99.9764 freq= 2633.4287 PerJust57[101] = 166 ' fractional midi note: 101.1847 freq= 2823.792 PerJust57[102] = 160 ' fractional midi note: 101.8221 freq= 2929.6946 PerJust57[103] = 150 ' fractional midi note: 102.9394 freq= 3125.0056 PerJust57[104] = 142 ' fractional midi note: 103.8882 freq= 3301.051 PerJust57[105] = 133 ' fractional midi note: 105.0218 freq= 3524.4348 PerJust57[106] = 125 ' fractional midi note: 106.0958 freq= 3750.0046 PerJust57[107] = 118 ' fractional midi note: 107.0935 freq= 3972.4626 PerJust57[108] = 111 ' fractional midi note: 108.1522 freq= 4222.9722 PerJust57[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust57[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust57[111] = 93 ' fractional midi note: 111.2153 freq= 5040.3267 PerJust57[112] = 89 ' fractional midi note: 111.9764 freq= 5266.8574 PerJust57[113] = 83 ' fractional midi note: 113.1847 freq= 5647.584 PerJust57[114] = 80 ' fractional midi note: 113.8221 freq= 5859.3892 PerJust57[115] = 75 ' fractional midi note: 114.9394 freq= 6250.0112 PerJust57[116] = 71 ' fractional midi note: 115.8882 freq= 6602.1021 PerJust57[117] = 66 ' fractional midi note: 117.1525 freq= 7102.2866 PerJust57[118] = 62 ' fractional midi note: 118.2348 freq= 7560.4688 PerJust57[119] = 59 ' fractional midi note: 119.0935 freq= 7944.9253 PerJust57[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust57[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust57[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust57[123] = 46 ' fractional midi note: 123.4025 freq= 10190.2451 PerJust57[124] = 44 ' fractional midi note: 124.172 freq= 10653.3994 PerJust57[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust57[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust57[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 ' just intonation scale based on note 46 PerJust58[0] = 57200 ' fractional midi note: .0405 freq= 8.1949 PerJust58[1] = 53632 ' fractional midi note: 1.1555 freq= 8.7401 PerJust58[2] = 51488 ' fractional midi note: 1.8618 freq= 9.1041 PerJust58[3] = 48272 ' fractional midi note: 2.9784 freq= 9.7106 PerJust58[4] = 45056 ' fractional midi note: 4.172 freq= 10.4037 PerJust58[5] = 42896 ' fractional midi note: 5.0225 freq= 10.9276 PerJust58[6] = 40224 ' fractional midi note: 6.136 freq= 11.6535 PerJust58[7] = 38608 ' fractional midi note: 6.8458 freq= 12.1412 PerJust58[8] = 36192 ' fractional midi note: 7.9646 freq= 12.9518 PerJust58[9] = 34320 ' fractional midi note: 8.884 freq= 13.6582 PerJust58[10] = 32176 ' fractional midi note: 10.0008 freq= 14.5683 PerJust58[11] = 30168 ' fractional midi note: 11.1164 freq= 15.538 PerJust58[12] = 28600 ' fractional midi note: 12.0405 freq= 16.3899 PerJust58[13] = 26816 ' fractional midi note: 13.1555 freq= 17.4802 PerJust58[14] = 25744 ' fractional midi note: 13.8618 freq= 18.2081 PerJust58[15] = 24136 ' fractional midi note: 14.9784 freq= 19.4212 PerJust58[16] = 22528 ' fractional midi note: 16.172 freq= 20.8074 PerJust58[17] = 21448 ' fractional midi note: 17.0225 freq= 21.8552 PerJust58[18] = 20112 ' fractional midi note: 18.136 freq= 23.307 PerJust58[19] = 19304 ' fractional midi note: 18.8458 freq= 24.2825 PerJust58[20] = 18096 ' fractional midi note: 19.9646 freq= 25.9035 PerJust58[21] = 17160 ' fractional midi note: 20.884 freq= 27.3164 PerJust58[22] = 16088 ' fractional midi note: 22.0008 freq= 29.1366 PerJust58[23] = 15084 ' fractional midi note: 23.1164 freq= 31.0759 PerJust58[24] = 14300 ' fractional midi note: 24.0405 freq= 32.7798 PerJust58[25] = 13408 ' fractional midi note: 25.1555 freq= 34.9604 PerJust58[26] = 12872 ' fractional midi note: 25.8618 freq= 36.4162 PerJust58[27] = 12068 ' fractional midi note: 26.9784 freq= 38.8424 PerJust58[28] = 11264 ' fractional midi note: 28.172 freq= 41.6148 PerJust58[29] = 10724 ' fractional midi note: 29.0225 freq= 43.7103 PerJust58[30] = 10056 ' fractional midi note: 30.136 freq= 46.6141 PerJust58[31] = 9652 ' fractional midi note: 30.8458 freq= 48.5649 PerJust58[32] = 9048 ' fractional midi note: 31.9646 freq= 51.807 PerJust58[33] = 8580 ' fractional midi note: 32.884 freq= 54.6327 PerJust58[34] = 8044 ' fractional midi note: 34.0008 freq= 58.2732 PerJust58[35] = 7542 ' fractional midi note: 35.1164 freq= 62.1519 PerJust58[36] = 7150 ' fractional midi note: 36.0405 freq= 65.5596 PerJust58[37] = 6704 ' fractional midi note: 37.1555 freq= 69.9209 PerJust58[38] = 6436 ' fractional midi note: 37.8618 freq= 72.8325 PerJust58[39] = 6034 ' fractional midi note: 38.9784 freq= 77.6848 PerJust58[40] = 5632 ' fractional midi note: 40.172 freq= 83.2297 PerJust58[41] = 5362 ' fractional midi note: 41.0225 freq= 87.4206 PerJust58[42] = 5028 ' fractional midi note: 42.136 freq= 93.2281 PerJust58[43] = 4826 ' fractional midi note: 42.8458 freq= 97.1299 PerJust58[44] = 4524 ' fractional midi note: 43.9646 freq= 103.6141 PerJust58[45] = 4290 ' fractional midi note: 44.884 freq= 109.2654 PerJust58[46] = 4022 ' fractional midi note: 46.0008 freq= 116.5463 PerJust58[47] = 3771 ' fractional midi note: 47.1164 freq= 124.3038 PerJust58[48] = 3575 ' fractional midi note: 48.0405 freq= 131.1192 PerJust58[49] = 3352 ' fractional midi note: 49.1555 freq= 139.8418 PerJust58[50] = 3218 ' fractional midi note: 49.8618 freq= 145.6649 PerJust58[51] = 3017 ' fractional midi note: 50.9784 freq= 155.3695 PerJust58[52] = 2816 ' fractional midi note: 52.172 freq= 166.4594 PerJust58[53] = 2681 ' fractional midi note: 53.0225 freq= 174.8412 PerJust58[54] = 2514 ' fractional midi note: 54.136 freq= 186.4562 PerJust58[55] = 2413 ' fractional midi note: 54.8458 freq= 194.2597 PerJust58[56] = 2262 ' fractional midi note: 55.9646 freq= 207.2282 PerJust58[57] = 2145 ' fractional midi note: 56.884 freq= 218.5308 PerJust58[58] = 2011 ' fractional midi note: 58.0008 freq= 233.0927 PerJust58[59] = 1886 ' fractional midi note: 59.1118 freq= 248.5415 PerJust58[60] = 1788 ' fractional midi note: 60.0356 freq= 262.1641 PerJust58[61] = 1676 ' fractional midi note: 61.1555 freq= 279.6835 PerJust58[62] = 1609 ' fractional midi note: 61.8618 freq= 291.3299 PerJust58[63] = 1508 ' fractional midi note: 62.9841 freq= 310.8414 PerJust58[64] = 1408 ' fractional midi note: 64.172 freq= 332.9187 PerJust58[65] = 1340 ' fractional midi note: 65.029 freq= 349.8137 PerJust58[66] = 1257 ' fractional midi note: 66.136 freq= 372.9125 PerJust58[67] = 1206 ' fractional midi note: 66.853 freq= 388.681 PerJust58[68] = 1131 ' fractional midi note: 67.9646 freq= 414.4564 PerJust58[69] = 1072 ' fractional midi note: 68.8921 freq= 437.2662 PerJust58[70] = 1006 ' fractional midi note: 69.9922 freq= 465.9539 PerJust58[71] = 943 ' fractional midi note: 71.1118 freq= 497.0831 PerJust58[72] = 894 ' fractional midi note: 72.0356 freq= 524.3282 PerJust58[73] = 838 ' fractional midi note: 73.1555 freq= 559.3671 PerJust58[74] = 804 ' fractional midi note: 73.8726 freq= 583.0232 PerJust58[75] = 754 ' fractional midi note: 74.9841 freq= 621.6828 PerJust58[76] = 704 ' fractional midi note: 76.172 freq= 665.8375 PerJust58[77] = 670 ' fractional midi note: 77.029 freq= 699.6274 PerJust58[78] = 628 ' fractional midi note: 78.1497 freq= 746.4152 PerJust58[79] = 603 ' fractional midi note: 78.853 freq= 777.3621 PerJust58[80] = 566 ' fractional midi note: 79.9493 freq= 828.1807 PerJust58[81] = 536 ' fractional midi note: 80.8921 freq= 874.5323 PerJust58[82] = 503 ' fractional midi note: 81.9922 freq= 931.9078 PerJust58[83] = 472 ' fractional midi note: 83.0935 freq= 993.1157 PerJust58[84] = 447 ' fractional midi note: 84.0356 freq= 1048.6564 PerJust58[85] = 419 ' fractional midi note: 85.1555 freq= 1118.7343 PerJust58[86] = 402 ' fractional midi note: 85.8726 freq= 1166.0464 PerJust58[87] = 377 ' fractional midi note: 86.9841 freq= 1243.3656 PerJust58[88] = 352 ' fractional midi note: 88.172 freq= 1331.6749 PerJust58[89] = 335 ' fractional midi note: 89.029 freq= 1399.2549 PerJust58[90] = 314 ' fractional midi note: 90.1497 freq= 1492.8303 PerJust58[91] = 302 ' fractional midi note: 90.8243 freq= 1552.1494 PerJust58[92] = 283 ' fractional midi note: 91.9493 freq= 1656.3613 PerJust58[93] = 268 ' fractional midi note: 92.8921 freq= 1749.0647 PerJust58[94] = 252 ' fractional midi note: 93.9578 freq= 1860.1156 PerJust58[95] = 236 ' fractional midi note: 95.0935 freq= 1986.2313 PerJust58[96] = 224 ' fractional midi note: 95.9969 freq= 2092.6301 PerJust58[97] = 210 ' fractional midi note: 97.1142 freq= 2232.1365 PerJust58[98] = 201 ' fractional midi note: 97.8726 freq= 2332.0928 PerJust58[99] = 188 ' fractional midi note: 99.0301 freq= 2493.3469 PerJust58[100] = 176 ' fractional midi note: 100.172 freq= 2663.3499 PerJust58[101] = 168 ' fractional midi note: 100.9774 freq= 2790.1816 PerJust58[102] = 157 ' fractional midi note: 102.1497 freq= 2985.6606 PerJust58[103] = 151 ' fractional midi note: 102.8243 freq= 3104.2988 PerJust58[104] = 142 ' fractional midi note: 103.8882 freq= 3301.051 PerJust58[105] = 134 ' fractional midi note: 104.8921 freq= 3498.1294 PerJust58[106] = 126 ' fractional midi note: 105.9578 freq= 3720.2312 PerJust58[107] = 118 ' fractional midi note: 107.0935 freq= 3972.4626 PerJust58[108] = 112 ' fractional midi note: 107.9969 freq= 4185.2603 PerJust58[109] = 105 ' fractional midi note: 109.1142 freq= 4464.2729 PerJust58[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust58[111] = 94 ' fractional midi note: 111.0301 freq= 4986.6938 PerJust58[112] = 88 ' fractional midi note: 112.172 freq= 5326.6997 PerJust58[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust58[114] = 78 ' fractional midi note: 114.2604 freq= 6009.627 PerJust58[115] = 76 ' fractional midi note: 114.7101 freq= 6167.7759 PerJust58[116] = 71 ' fractional midi note: 115.8882 freq= 6602.1021 PerJust58[117] = 67 ' fractional midi note: 116.8921 freq= 6996.2588 PerJust58[118] = 63 ' fractional midi note: 117.9578 freq= 7440.4624 PerJust58[119] = 59 ' fractional midi note: 119.0935 freq= 7944.9253 PerJust58[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust58[121] = 52 ' fractional midi note: 121.2799 freq= 9014.415 PerJust58[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust58[123] = 47 ' fractional midi note: 123.0301 freq= 9973.3877 PerJust58[124] = 44 ' fractional midi note: 124.172 freq= 10653.3994 PerJust58[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust58[126] = 39 ' fractional midi note: 126.2604 freq= 12019.2539 PerJust58[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 ' just intonation scale based on note 47 PerJust59[0] = 56944 ' fractional midi note: .1181 freq= 8.2318 PerJust59[1] = 54000 ' fractional midi note: 1.0371 freq= 8.6805 PerJust59[2] = 50624 ' fractional midi note: 2.1548 freq= 9.2594 PerJust59[3] = 48592 ' fractional midi note: 2.864 freq= 9.6466 PerJust59[4] = 45552 ' fractional midi note: 3.9825 freq= 10.2905 PerJust59[5] = 42528 ' fractional midi note: 5.1717 freq= 11.0222 PerJust59[6] = 40496 ' fractional midi note: 6.0193 freq= 11.5752 PerJust59[7] = 37968 ' fractional midi note: 7.1352 freq= 12.3459 PerJust59[8] = 36448 ' fractional midi note: 7.8426 freq= 12.8608 PerJust59[9] = 34160 ' fractional midi note: 8.9649 freq= 13.7222 PerJust59[10] = 32400 ' fractional midi note: 9.8807 freq= 14.4676 PerJust59[11] = 30368 ' fractional midi note: 11.002 freq= 15.4356 PerJust59[12] = 28472 ' fractional midi note: 12.1181 freq= 16.4635 PerJust59[13] = 27000 ' fractional midi note: 13.0371 freq= 17.3611 PerJust59[14] = 25312 ' fractional midi note: 14.1548 freq= 18.5189 PerJust59[15] = 24296 ' fractional midi note: 14.864 freq= 19.2933 PerJust59[16] = 22776 ' fractional midi note: 15.9825 freq= 20.5809 PerJust59[17] = 21264 ' fractional midi note: 17.1717 freq= 22.0443 PerJust59[18] = 20248 ' fractional midi note: 18.0193 freq= 23.1504 PerJust59[19] = 18984 ' fractional midi note: 19.1352 freq= 24.6918 PerJust59[20] = 18224 ' fractional midi note: 19.8426 freq= 25.7216 PerJust59[21] = 17080 ' fractional midi note: 20.9649 freq= 27.4443 PerJust59[22] = 16200 ' fractional midi note: 21.8807 freq= 28.9352 PerJust59[23] = 15184 ' fractional midi note: 23.002 freq= 30.8713 PerJust59[24] = 14236 ' fractional midi note: 24.1181 freq= 32.9271 PerJust59[25] = 13500 ' fractional midi note: 25.0371 freq= 34.7222 PerJust59[26] = 12656 ' fractional midi note: 26.1548 freq= 37.0378 PerJust59[27] = 12148 ' fractional midi note: 26.864 freq= 38.5866 PerJust59[28] = 11388 ' fractional midi note: 27.9825 freq= 41.1618 PerJust59[29] = 10632 ' fractional midi note: 29.1717 freq= 44.0886 PerJust59[30] = 10124 ' fractional midi note: 30.0193 freq= 46.3009 PerJust59[31] = 9492 ' fractional midi note: 31.1352 freq= 49.3836 PerJust59[32] = 9112 ' fractional midi note: 31.8426 freq= 51.4432 PerJust59[33] = 8540 ' fractional midi note: 32.9649 freq= 54.8886 PerJust59[34] = 8100 ' fractional midi note: 33.8807 freq= 57.8703 PerJust59[35] = 7592 ' fractional midi note: 35.002 freq= 61.7425 PerJust59[36] = 7118 ' fractional midi note: 36.1181 freq= 65.8541 PerJust59[37] = 6750 ' fractional midi note: 37.0371 freq= 69.4443 PerJust59[38] = 6328 ' fractional midi note: 38.1548 freq= 74.0756 PerJust59[39] = 6074 ' fractional midi note: 38.864 freq= 77.1731 PerJust59[40] = 5694 ' fractional midi note: 39.9825 freq= 82.3236 PerJust59[41] = 5316 ' fractional midi note: 41.1717 freq= 88.1773 PerJust59[42] = 5062 ' fractional midi note: 42.0193 freq= 92.6018 PerJust59[43] = 4746 ' fractional midi note: 43.1352 freq= 98.7672 PerJust59[44] = 4556 ' fractional midi note: 43.8426 freq= 102.8865 PerJust59[45] = 4270 ' fractional midi note: 44.9649 freq= 109.7772 PerJust59[46] = 4050 ' fractional midi note: 45.8807 freq= 115.7406 PerJust59[47] = 3796 ' fractional midi note: 47.002 freq= 123.4851 PerJust59[48] = 3559 ' fractional midi note: 48.1181 freq= 131.7082 PerJust59[49] = 3375 ' fractional midi note: 49.0371 freq= 138.8887 PerJust59[50] = 3164 ' fractional midi note: 50.1548 freq= 148.1512 PerJust59[51] = 3037 ' fractional midi note: 50.864 freq= 154.3462 PerJust59[52] = 2847 ' fractional midi note: 51.9825 freq= 164.6472 PerJust59[53] = 2658 ' fractional midi note: 53.1717 freq= 176.3545 PerJust59[54] = 2531 ' fractional midi note: 54.0193 freq= 185.2036 PerJust59[55] = 2373 ' fractional midi note: 55.1352 freq= 197.5344 PerJust59[56] = 2278 ' fractional midi note: 55.8426 freq= 205.773 PerJust59[57] = 2135 ' fractional midi note: 56.9649 freq= 219.5544 PerJust59[58] = 2025 ' fractional midi note: 57.8807 freq= 231.4812 PerJust59[59] = 1898 ' fractional midi note: 59.002 freq= 246.9702 PerJust59[60] = 1780 ' fractional midi note: 60.1133 freq= 263.3434 PerJust59[61] = 1688 ' fractional midi note: 61.032 freq= 277.6955 PerJust59[62] = 1582 ' fractional midi note: 62.1548 freq= 296.3024 PerJust59[63] = 1518 ' fractional midi note: 62.8697 freq= 308.7941 PerJust59[64] = 1424 ' fractional midi note: 63.9764 freq= 329.1785 PerJust59[65] = 1329 ' fractional midi note: 65.1717 freq= 352.709 PerJust59[66] = 1266 ' fractional midi note: 66.0125 freq= 370.2616 PerJust59[67] = 1186 ' fractional midi note: 67.1425 freq= 395.2354 PerJust59[68] = 1139 ' fractional midi note: 67.8426 freq= 411.5459 PerJust59[69] = 1068 ' fractional midi note: 68.9568 freq= 438.9035 PerJust59[70] = 1012 ' fractional midi note: 69.8893 freq= 463.1924 PerJust59[71] = 949 ' fractional midi note: 71.002 freq= 493.9404 PerJust59[72] = 890 ' fractional midi note: 72.1133 freq= 526.6867 PerJust59[73] = 844 ' fractional midi note: 73.032 freq= 555.3909 PerJust59[74] = 791 ' fractional midi note: 74.1548 freq= 592.6048 PerJust59[75] = 759 ' fractional midi note: 74.8697 freq= 617.5881 PerJust59[76] = 712 ' fractional midi note: 75.9764 freq= 658.3572 PerJust59[77] = 664 ' fractional midi note: 77.1847 freq= 705.948 PerJust59[78] = 633 ' fractional midi note: 78.0125 freq= 740.5233 PerJust59[79] = 593 ' fractional midi note: 79.1425 freq= 790.4708 PerJust59[80] = 570 ' fractional midi note: 79.8274 freq= 822.3696 PerJust59[81] = 534 ' fractional midi note: 80.9568 freq= 877.807 PerJust59[82] = 506 ' fractional midi note: 81.8893 freq= 926.3849 PerJust59[83] = 474 ' fractional midi note: 83.0203 freq= 988.9257 PerJust59[84] = 445 ' fractional midi note: 84.1133 freq= 1053.3734 PerJust59[85] = 422 ' fractional midi note: 85.032 freq= 1110.7817 PerJust59[86] = 396 ' fractional midi note: 86.1329 freq= 1183.7109 PerJust59[87] = 380 ' fractional midi note: 86.8469 freq= 1233.5509 PerJust59[88] = 356 ' fractional midi note: 87.9764 freq= 1316.7144 PerJust59[89] = 332 ' fractional midi note: 89.1847 freq= 1411.896 PerJust59[90] = 316 ' fractional midi note: 90.0398 freq= 1483.3843 PerJust59[91] = 296 ' fractional midi note: 91.1718 freq= 1583.6191 PerJust59[92] = 285 ' fractional midi note: 91.8274 freq= 1644.7393 PerJust59[93] = 267 ' fractional midi note: 92.9568 freq= 1755.614 PerJust59[94] = 253 ' fractional midi note: 93.8893 freq= 1852.7698 PerJust59[95] = 237 ' fractional midi note: 95.0203 freq= 1977.8513 PerJust59[96] = 222 ' fractional midi note: 96.1522 freq= 2111.4861 PerJust59[97] = 211 ' fractional midi note: 97.032 freq= 2221.5635 PerJust59[98] = 198 ' fractional midi note: 98.1329 freq= 2367.4219 PerJust59[99] = 190 ' fractional midi note: 98.8469 freq= 2467.1018 PerJust59[100] = 178 ' fractional midi note: 99.9764 freq= 2633.4287 PerJust59[101] = 166 ' fractional midi note: 101.1847 freq= 2823.792 PerJust59[102] = 158 ' fractional midi note: 102.0398 freq= 2966.7686 PerJust59[103] = 148 ' fractional midi note: 103.1718 freq= 3167.2383 PerJust59[104] = 142 ' fractional midi note: 103.8882 freq= 3301.051 PerJust59[105] = 134 ' fractional midi note: 104.8921 freq= 3498.1294 PerJust59[106] = 126 ' fractional midi note: 105.9578 freq= 3720.2312 PerJust59[107] = 118 ' fractional midi note: 107.0935 freq= 3972.4626 PerJust59[108] = 111 ' fractional midi note: 108.1522 freq= 4222.9722 PerJust59[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust59[110] = 99 ' fractional midi note: 110.1329 freq= 4734.8438 PerJust59[111] = 95 ' fractional midi note: 110.8469 freq= 4934.2036 PerJust59[112] = 89 ' fractional midi note: 111.9764 freq= 5266.8574 PerJust59[113] = 83 ' fractional midi note: 113.1847 freq= 5647.584 PerJust59[114] = 79 ' fractional midi note: 114.0398 freq= 5933.5371 PerJust59[115] = 74 ' fractional midi note: 115.1718 freq= 6334.4766 PerJust59[116] = 71 ' fractional midi note: 115.8882 freq= 6602.1021 PerJust59[117] = 67 ' fractional midi note: 116.8921 freq= 6996.2588 PerJust59[118] = 63 ' fractional midi note: 117.9578 freq= 7440.4624 PerJust59[119] = 59 ' fractional midi note: 119.0935 freq= 7944.9253 PerJust59[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust59[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust59[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust59[123] = 48 ' fractional midi note: 122.6656 freq= 9765.6035 PerJust59[124] = 44 ' fractional midi note: 124.172 freq= 10653.3994 PerJust59[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust59[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust59[127] = 37 ' fractional midi note: 127.1718 freq= 12668.9531 ' Just intonation scale used here: ' 0=1 1=1.05 2=1.125 3=1.166667 4=1.25 5=1.333333 6=1.4 7=1.5 8=1.555556 9=1.666667 10=1.75 11=1.875 12=2 ' just intonation scale based on note 36 PerJust72[0] = 57336 ' fractional midi note: -.0007 freq= 8.1755 PerJust72[1] = 54600 ' fractional midi note: .8458 freq= 8.5851 PerJust72[2] = 50960 ' fractional midi note: 2.0403 freq= 9.1984 PerJust72[3] = 49144 ' fractional midi note: 2.6685 freq= 9.5383 PerJust72[4] = 45864 ' fractional midi note: 3.8643 freq= 10.2204 PerJust72[5] = 43000 ' fractional midi note: 4.9806 freq= 10.9012 PerJust72[6] = 40952 ' fractional midi note: 5.8254 freq= 11.4463 PerJust72[7] = 38224 ' fractional midi note: 7.0189 freq= 12.2632 PerJust72[8] = 36856 ' fractional midi note: 7.6498 freq= 12.7184 PerJust72[9] = 34400 ' fractional midi note: 8.8437 freq= 13.6264 PerJust72[10] = 32760 ' fractional midi note: 9.6894 freq= 14.3086 PerJust72[11] = 30576 ' fractional midi note: 10.8838 freq= 15.3306 PerJust72[12] = 28668 ' fractional midi note: 11.9993 freq= 16.3509 PerJust72[13] = 27300 ' fractional midi note: 12.8458 freq= 17.1703 PerJust72[14] = 25480 ' fractional midi note: 14.0403 freq= 18.3968 PerJust72[15] = 24572 ' fractional midi note: 14.6685 freq= 19.0766 PerJust72[16] = 22932 ' fractional midi note: 15.8643 freq= 20.4409 PerJust72[17] = 21500 ' fractional midi note: 16.9806 freq= 21.8023 PerJust72[18] = 20476 ' fractional midi note: 17.8254 freq= 22.8926 PerJust72[19] = 19112 ' fractional midi note: 19.0189 freq= 24.5265 PerJust72[20] = 18428 ' fractional midi note: 19.6498 freq= 25.4368 PerJust72[21] = 17200 ' fractional midi note: 20.8437 freq= 27.2528 PerJust72[22] = 16380 ' fractional midi note: 21.6894 freq= 28.6172 PerJust72[23] = 15288 ' fractional midi note: 22.8838 freq= 30.6612 PerJust72[24] = 14334 ' fractional midi note: 23.9993 freq= 32.7019 PerJust72[25] = 13650 ' fractional midi note: 24.8458 freq= 34.3406 PerJust72[26] = 12740 ' fractional midi note: 26.0403 freq= 36.7936 PerJust72[27] = 12286 ' fractional midi note: 26.6685 freq= 38.1533 PerJust72[28] = 11466 ' fractional midi note: 27.8643 freq= 40.8817 PerJust72[29] = 10750 ' fractional midi note: 28.9806 freq= 43.6046 PerJust72[30] = 10238 ' fractional midi note: 29.8254 freq= 45.7852 PerJust72[31] = 9556 ' fractional midi note: 31.0189 freq= 49.053 PerJust72[32] = 9214 ' fractional midi note: 31.6498 freq= 50.8735 PerJust72[33] = 8600 ' fractional midi note: 32.8437 freq= 54.5057 PerJust72[34] = 8190 ' fractional midi note: 33.6894 freq= 57.2344 PerJust72[35] = 7644 ' fractional midi note: 34.8838 freq= 61.3224 PerJust72[36] = 7167 ' fractional midi note: 35.9994 freq= 65.4041 PerJust72[37] = 6825 ' fractional midi note: 36.8458 freq= 68.6812 PerJust72[38] = 6370 ' fractional midi note: 38.0403 freq= 73.5873 PerJust72[39] = 6143 ' fractional midi note: 38.6685 freq= 76.3065 PerJust72[40] = 5733 ' fractional midi note: 39.8643 freq= 81.7635 PerJust72[41] = 5375 ' fractional midi note: 40.9806 freq= 87.2093 PerJust72[42] = 5119 ' fractional midi note: 41.8254 freq= 91.5704 PerJust72[43] = 4778 ' fractional midi note: 43.0189 freq= 98.1059 PerJust72[44] = 4607 ' fractional midi note: 43.6498 freq= 101.747 PerJust72[45] = 4300 ' fractional midi note: 44.8437 freq= 109.0114 PerJust72[46] = 4095 ' fractional midi note: 45.6894 freq= 114.4687 PerJust72[47] = 3822 ' fractional midi note: 46.8838 freq= 122.6449 PerJust72[48] = 3584 ' fractional midi note: 47.9969 freq= 130.7894 PerJust72[49] = 3412 ' fractional midi note: 48.8484 freq= 137.383 PerJust72[50] = 3185 ' fractional midi note: 50.0403 freq= 147.1746 PerJust72[51] = 3072 ' fractional midi note: 50.6656 freq= 152.5875 PerJust72[52] = 2866 ' fractional midi note: 51.8673 freq= 163.5553 PerJust72[53] = 2688 ' fractional midi note: 52.9774 freq= 174.3864 PerJust72[54] = 2560 ' fractional midi note: 53.8221 freq= 183.106 PerJust72[55] = 2389 ' fractional midi note: 55.0189 freq= 196.2118 PerJust72[56] = 2304 ' fractional midi note: 55.6461 freq= 203.4506 PerJust72[57] = 2150 ' fractional midi note: 56.8437 freq= 218.0227 PerJust72[58] = 2048 ' fractional midi note: 57.6852 freq= 228.8819 PerJust72[59] = 1911 ' fractional midi note: 58.8838 freq= 245.2897 PerJust72[60] = 1792 ' fractional midi note: 59.9969 freq= 261.5787 PerJust72[61] = 1706 ' fractional midi note: 60.8484 freq= 274.766 PerJust72[62] = 1592 ' fractional midi note: 62.0457 freq= 294.441 PerJust72[63] = 1536 ' fractional midi note: 62.6656 freq= 305.175 PerJust72[64] = 1433 ' fractional midi note: 63.8673 freq= 327.1106 PerJust72[65] = 1344 ' fractional midi note: 64.9774 freq= 348.7727 PerJust72[66] = 1280 ' fractional midi note: 65.8221 freq= 366.2118 PerJust72[67] = 1194 ' fractional midi note: 67.0261 freq= 392.5869 PerJust72[68] = 1152 ' fractional midi note: 67.6461 freq= 406.9013 PerJust72[69] = 1075 ' fractional midi note: 68.8437 freq= 436.0454 PerJust72[70] = 1024 ' fractional midi note: 69.6852 freq= 457.764 PerJust72[71] = 956 ' fractional midi note: 70.8748 freq= 490.3246 PerJust72[72] = 896 ' fractional midi note: 71.9969 freq= 523.1575 PerJust72[73] = 853 ' fractional midi note: 72.8484 freq= 549.5319 PerJust72[74] = 796 ' fractional midi note: 74.0457 freq= 588.882 PerJust72[75] = 768 ' fractional midi note: 74.6656 freq= 610.3502 PerJust72[76] = 716 ' fractional midi note: 75.8794 freq= 654.6787 PerJust72[77] = 672 ' fractional midi note: 76.9774 freq= 697.5454 PerJust72[78] = 640 ' fractional midi note: 77.8221 freq= 732.4236 PerJust72[79] = 597 ' fractional midi note: 79.0261 freq= 785.1738 PerJust72[80] = 576 ' fractional midi note: 79.6461 freq= 813.8026 PerJust72[81] = 538 ' fractional midi note: 80.8276 freq= 871.2802 PerJust72[82] = 512 ' fractional midi note: 81.6852 freq= 915.528 PerJust72[83] = 478 ' fractional midi note: 82.8748 freq= 980.6492 PerJust72[84] = 448 ' fractional midi note: 83.9969 freq= 1046.3151 PerJust72[85] = 426 ' fractional midi note: 84.8687 freq= 1100.3534 PerJust72[86] = 398 ' fractional midi note: 86.0457 freq= 1177.764 PerJust72[87] = 384 ' fractional midi note: 86.6656 freq= 1220.7004 PerJust72[88] = 358 ' fractional midi note: 87.8794 freq= 1309.3574 PerJust72[89] = 336 ' fractional midi note: 88.9774 freq= 1395.0908 PerJust72[90] = 320 ' fractional midi note: 89.8221 freq= 1464.8473 PerJust72[91] = 298 ' fractional midi note: 91.0552 freq= 1572.9891 PerJust72[92] = 288 ' fractional midi note: 91.6461 freq= 1627.6051 PerJust72[93] = 269 ' fractional midi note: 92.8276 freq= 1742.5604 PerJust72[94] = 256 ' fractional midi note: 93.6852 freq= 1831.0559 PerJust72[95] = 239 ' fractional midi note: 94.8748 freq= 1961.2983 PerJust72[96] = 224 ' fractional midi note: 95.9969 freq= 2092.6301 PerJust72[97] = 213 ' fractional midi note: 96.8687 freq= 2200.7068 PerJust72[98] = 199 ' fractional midi note: 98.0457 freq= 2355.5281 PerJust72[99] = 192 ' fractional midi note: 98.6656 freq= 2441.4009 PerJust72[100] = 179 ' fractional midi note: 99.8794 freq= 2618.7148 PerJust72[101] = 168 ' fractional midi note: 100.9774 freq= 2790.1816 PerJust72[102] = 160 ' fractional midi note: 101.8221 freq= 2929.6946 PerJust72[103] = 149 ' fractional midi note: 103.0552 freq= 3145.9783 PerJust72[104] = 144 ' fractional midi note: 103.6461 freq= 3255.2102 PerJust72[105] = 134 ' fractional midi note: 104.8921 freq= 3498.1294 PerJust72[106] = 128 ' fractional midi note: 105.6852 freq= 3662.1118 PerJust72[107] = 120 ' fractional midi note: 106.8025 freq= 3906.2483 PerJust72[108] = 112 ' fractional midi note: 107.9969 freq= 4185.2603 PerJust72[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust72[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust72[111] = 96 ' fractional midi note: 110.6656 freq= 4882.8018 PerJust72[112] = 90 ' fractional midi note: 111.783 freq= 5208.3457 PerJust72[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust72[114] = 80 ' fractional midi note: 113.8221 freq= 5859.3892 PerJust72[115] = 74 ' fractional midi note: 115.1718 freq= 6334.4766 PerJust72[116] = 72 ' fractional midi note: 115.6461 freq= 6510.4204 PerJust72[117] = 67 ' fractional midi note: 116.8921 freq= 6996.2588 PerJust72[118] = 64 ' fractional midi note: 117.6852 freq= 7324.2236 PerJust72[119] = 60 ' fractional midi note: 118.8025 freq= 7812.4966 PerJust72[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust72[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust72[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust72[123] = 48 ' fractional midi note: 122.6656 freq= 9765.6035 PerJust72[124] = 45 ' fractional midi note: 123.783 freq= 10416.6914 PerJust72[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust72[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust72[127] = 37 ' fractional midi note: 127.1718 freq= 12668.9531 ' just intonation scale based on note 37 PerJust73[0] = 57728 ' fractional midi note: -.1186 freq= 8.12 PerJust73[1] = 54112 ' fractional midi note: 1.0013 freq= 8.6626 PerJust73[2] = 51536 ' fractional midi note: 1.8457 freq= 9.0956 PerJust73[3] = 48104 ' fractional midi note: 3.0388 freq= 9.7445 PerJust73[4] = 46384 ' fractional midi note: 3.6691 freq= 10.1058 PerJust73[5] = 43296 ' fractional midi note: 4.8618 freq= 10.8266 PerJust73[6] = 40584 ' fractional midi note: 5.9817 freq= 11.5501 PerJust73[7] = 38656 ' fractional midi note: 6.8243 freq= 12.1262 PerJust73[8] = 36080 ' fractional midi note: 8.0183 freq= 12.992 PerJust73[9] = 34792 ' fractional midi note: 8.6476 freq= 13.4729 PerJust73[10] = 32472 ' fractional midi note: 9.8423 freq= 14.4355 PerJust73[11] = 30920 ' fractional midi note: 10.6902 freq= 15.1601 PerJust73[12] = 28864 ' fractional midi note: 11.8814 freq= 16.24 PerJust73[13] = 27056 ' fractional midi note: 13.0013 freq= 17.3252 PerJust73[14] = 25768 ' fractional midi note: 13.8457 freq= 18.1912 PerJust73[15] = 24052 ' fractional midi note: 15.0388 freq= 19.4891 PerJust73[16] = 23192 ' fractional midi note: 15.6691 freq= 20.2117 PerJust73[17] = 21648 ' fractional midi note: 16.8618 freq= 21.6532 PerJust73[18] = 20292 ' fractional midi note: 17.9817 freq= 23.1002 PerJust73[19] = 19328 ' fractional midi note: 18.8243 freq= 24.2523 PerJust73[20] = 18040 ' fractional midi note: 20.0183 freq= 25.984 PerJust73[21] = 17396 ' fractional midi note: 20.6476 freq= 26.9459 PerJust73[22] = 16236 ' fractional midi note: 21.8423 freq= 28.871 PerJust73[23] = 15460 ' fractional midi note: 22.6902 freq= 30.3203 PerJust73[24] = 14432 ' fractional midi note: 23.8814 freq= 32.4799 PerJust73[25] = 13528 ' fractional midi note: 25.0013 freq= 34.6504 PerJust73[26] = 12884 ' fractional midi note: 25.8457 freq= 36.3824 PerJust73[27] = 12026 ' fractional midi note: 27.0388 freq= 38.9781 PerJust73[28] = 11596 ' fractional midi note: 27.6691 freq= 40.4234 PerJust73[29] = 10824 ' fractional midi note: 28.8618 freq= 43.3064 PerJust73[30] = 10146 ' fractional midi note: 29.9817 freq= 46.2004 PerJust73[31] = 9664 ' fractional midi note: 30.8243 freq= 48.5047 PerJust73[32] = 9020 ' fractional midi note: 32.0183 freq= 51.968 PerJust73[33] = 8698 ' fractional midi note: 32.6476 freq= 53.8918 PerJust73[34] = 8118 ' fractional midi note: 33.8423 freq= 57.7421 PerJust73[35] = 7730 ' fractional midi note: 34.6902 freq= 60.6405 PerJust73[36] = 7216 ' fractional midi note: 35.8814 freq= 64.9599 PerJust73[37] = 6764 ' fractional midi note: 37.0013 freq= 69.3009 PerJust73[38] = 6442 ' fractional midi note: 37.8457 freq= 72.7648 PerJust73[39] = 6013 ' fractional midi note: 39.0388 freq= 77.9563 PerJust73[40] = 5798 ' fractional midi note: 39.6691 freq= 80.8468 PerJust73[41] = 5412 ' fractional midi note: 40.8618 freq= 86.6129 PerJust73[42] = 5073 ' fractional midi note: 41.9817 freq= 92.4009 PerJust73[43] = 4832 ' fractional midi note: 42.8243 freq= 97.0093 PerJust73[44] = 4510 ' fractional midi note: 44.0183 freq= 103.936 PerJust73[45] = 4349 ' fractional midi note: 44.6476 freq= 107.7835 PerJust73[46] = 4059 ' fractional midi note: 45.8423 freq= 115.4842 PerJust73[47] = 3865 ' fractional midi note: 46.6902 freq= 121.281 PerJust73[48] = 3608 ' fractional midi note: 47.8814 freq= 129.9197 PerJust73[49] = 3382 ' fractional midi note: 49.0013 freq= 138.6017 PerJust73[50] = 3221 ' fractional midi note: 49.8457 freq= 145.5295 PerJust73[51] = 3006 ' fractional midi note: 51.0416 freq= 155.9377 PerJust73[52] = 2899 ' fractional midi note: 51.6691 freq= 161.6935 PerJust73[53] = 2706 ' fractional midi note: 52.8618 freq= 173.2258 PerJust73[54] = 2536 ' fractional midi note: 53.9851 freq= 184.8381 PerJust73[55] = 2416 ' fractional midi note: 54.8243 freq= 194.0186 PerJust73[56] = 2255 ' fractional midi note: 56.0183 freq= 207.872 PerJust73[57] = 2174 ' fractional midi note: 56.6516 freq= 215.6169 PerJust73[58] = 2030 ' fractional midi note: 57.838 freq= 230.911 PerJust73[59] = 1932 ' fractional midi note: 58.6946 freq= 242.6237 PerJust73[60] = 1804 ' fractional midi note: 59.8814 freq= 259.8394 PerJust73[61] = 1691 ' fractional midi note: 61.0013 freq= 277.2035 PerJust73[62] = 1610 ' fractional midi note: 61.8511 freq= 291.1499 PerJust73[63] = 1503 ' fractional midi note: 63.0416 freq= 311.8755 PerJust73[64] = 1450 ' fractional midi note: 63.6631 freq= 323.275 PerJust73[65] = 1353 ' fractional midi note: 64.8618 freq= 346.4516 PerJust73[66] = 1268 ' fractional midi note: 65.9851 freq= 369.6761 PerJust73[67] = 1208 ' fractional midi note: 66.8243 freq= 388.0374 PerJust73[68] = 1128 ' fractional midi note: 68.0106 freq= 415.559 PerJust73[69] = 1087 ' fractional midi note: 68.6516 freq= 431.2339 PerJust73[70] = 1015 ' fractional midi note: 69.838 freq= 461.8219 PerJust73[71] = 966 ' fractional midi note: 70.6946 freq= 485.2474 PerJust73[72] = 902 ' fractional midi note: 71.8814 freq= 519.6788 PerJust73[73] = 846 ' fractional midi note: 72.991 freq= 554.0771 PerJust73[74] = 805 ' fractional midi note: 73.8511 freq= 582.2996 PerJust73[75] = 752 ' fractional midi note: 75.0301 freq= 623.3367 PerJust73[76] = 725 ' fractional midi note: 75.6631 freq= 646.55 PerJust73[77] = 676 ' fractional midi note: 76.8746 freq= 693.4157 PerJust73[78] = 634 ' fractional midi note: 77.9851 freq= 739.3523 PerJust73[79] = 604 ' fractional midi note: 78.8243 freq= 776.0747 PerJust73[80] = 564 ' fractional midi note: 80.0106 freq= 831.118 PerJust73[81] = 544 ' fractional midi note: 80.6356 freq= 861.6708 PerJust73[82] = 508 ' fractional midi note: 81.821 freq= 922.7374 PerJust73[83] = 483 ' fractional midi note: 82.6946 freq= 970.4948 PerJust73[84] = 451 ' fractional midi note: 83.8814 freq= 1039.3577 PerJust73[85] = 423 ' fractional midi note: 84.991 freq= 1108.1542 PerJust73[86] = 402 ' fractional midi note: 85.8726 freq= 1166.0464 PerJust73[87] = 376 ' fractional midi note: 87.0301 freq= 1246.6735 PerJust73[88] = 362 ' fractional midi note: 87.687 freq= 1294.8861 PerJust73[89] = 338 ' fractional midi note: 88.8746 freq= 1386.8314 PerJust73[90] = 317 ' fractional midi note: 89.9851 freq= 1478.7046 PerJust73[91] = 302 ' fractional midi note: 90.8243 freq= 1552.1494 PerJust73[92] = 282 ' fractional midi note: 92.0106 freq= 1662.2361 PerJust73[93] = 272 ' fractional midi note: 92.6356 freq= 1723.3416 PerJust73[94] = 254 ' fractional midi note: 93.821 freq= 1845.4749 PerJust73[95] = 242 ' fractional midi note: 94.6588 freq= 1936.9795 PerJust73[96] = 226 ' fractional midi note: 95.843 freq= 2074.1099 PerJust73[97] = 212 ' fractional midi note: 96.9501 freq= 2211.0793 PerJust73[98] = 201 ' fractional midi note: 97.8726 freq= 2332.0928 PerJust73[99] = 188 ' fractional midi note: 99.0301 freq= 2493.3469 PerJust73[100] = 181 ' fractional midi note: 99.687 freq= 2589.7722 PerJust73[101] = 169 ' fractional midi note: 100.8746 freq= 2773.6628 PerJust73[102] = 158 ' fractional midi note: 102.0398 freq= 2966.7686 PerJust73[103] = 151 ' fractional midi note: 102.8243 freq= 3104.2988 PerJust73[104] = 141 ' fractional midi note: 104.0106 freq= 3324.4722 PerJust73[105] = 136 ' fractional midi note: 104.6356 freq= 3446.6831 PerJust73[106] = 127 ' fractional midi note: 105.821 freq= 3690.9497 PerJust73[107] = 121 ' fractional midi note: 106.6588 freq= 3873.959 PerJust73[108] = 113 ' fractional midi note: 107.843 freq= 4148.2197 PerJust73[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust73[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust73[111] = 94 ' fractional midi note: 111.0301 freq= 4986.6938 PerJust73[112] = 90 ' fractional midi note: 111.783 freq= 5208.3457 PerJust73[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust73[114] = 79 ' fractional midi note: 114.0398 freq= 5933.5371 PerJust73[115] = 76 ' fractional midi note: 114.7101 freq= 6167.7759 PerJust73[116] = 70 ' fractional midi note: 116.1338 freq= 6696.4287 PerJust73[117] = 68 ' fractional midi note: 116.6356 freq= 6893.3662 PerJust73[118] = 64 ' fractional midi note: 117.6852 freq= 7324.2236 PerJust73[119] = 60 ' fractional midi note: 118.8025 freq= 7812.4966 PerJust73[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust73[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust73[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust73[123] = 47 ' fractional midi note: 123.0301 freq= 9973.3877 PerJust73[124] = 45 ' fractional midi note: 123.783 freq= 10416.6914 PerJust73[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust73[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust73[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 ' just intonation scale based on note 38 PerJust74[0] = 58368 ' fractional midi note: -.3095 freq= 8.0309 PerJust74[1] = 54480 ' fractional midi note: .8839 freq= 8.6041 PerJust74[2] = 51080 ' fractional midi note: 1.9995 freq= 9.1768 PerJust74[3] = 48648 ' fractional midi note: 2.8441 freq= 9.6356 PerJust74[4] = 45400 ' fractional midi note: 4.0403 freq= 10.3249 PerJust74[5] = 43784 ' fractional midi note: 4.6678 freq= 10.706 PerJust74[6] = 40864 ' fractional midi note: 5.8627 freq= 11.471 PerJust74[7] = 38312 ' fractional midi note: 6.9791 freq= 12.2351 PerJust74[8] = 36488 ' fractional midi note: 7.8236 freq= 12.8467 PerJust74[9] = 34056 ' fractional midi note: 9.0177 freq= 13.7641 PerJust74[10] = 32840 ' fractional midi note: 9.6472 freq= 14.2738 PerJust74[11] = 30648 ' fractional midi note: 10.8431 freq= 15.2946 PerJust74[12] = 29184 ' fractional midi note: 11.6905 freq= 16.0619 PerJust74[13] = 27240 ' fractional midi note: 12.8839 freq= 17.2081 PerJust74[14] = 25540 ' fractional midi note: 13.9995 freq= 18.3535 PerJust74[15] = 24324 ' fractional midi note: 14.8441 freq= 19.2711 PerJust74[16] = 22700 ' fractional midi note: 16.0403 freq= 20.6497 PerJust74[17] = 21892 ' fractional midi note: 16.6678 freq= 21.4119 PerJust74[18] = 20432 ' fractional midi note: 17.8627 freq= 22.942 PerJust74[19] = 19156 ' fractional midi note: 18.9791 freq= 24.4702 PerJust74[20] = 18244 ' fractional midi note: 19.8236 freq= 25.6934 PerJust74[21] = 17028 ' fractional midi note: 21.0177 freq= 27.5281 PerJust74[22] = 16420 ' fractional midi note: 21.6472 freq= 28.5475 PerJust74[23] = 15324 ' fractional midi note: 22.8431 freq= 30.5892 PerJust74[24] = 14592 ' fractional midi note: 23.6905 freq= 32.1237 PerJust74[25] = 13620 ' fractional midi note: 24.8839 freq= 34.4163 PerJust74[26] = 12770 ' fractional midi note: 25.9995 freq= 36.707 PerJust74[27] = 12162 ' fractional midi note: 26.8441 freq= 38.5422 PerJust74[28] = 11350 ' fractional midi note: 28.0403 freq= 41.2995 PerJust74[29] = 10946 ' fractional midi note: 28.6678 freq= 42.8239 PerJust74[30] = 10216 ' fractional midi note: 29.8627 freq= 45.884 PerJust74[31] = 9578 ' fractional midi note: 30.9791 freq= 48.9403 PerJust74[32] = 9122 ' fractional midi note: 31.8236 freq= 51.3868 PerJust74[33] = 8514 ' fractional midi note: 33.0177 freq= 55.0563 PerJust74[34] = 8210 ' fractional midi note: 33.6472 freq= 57.095 PerJust74[35] = 7662 ' fractional midi note: 34.8431 freq= 61.1784 PerJust74[36] = 7296 ' fractional midi note: 35.6905 freq= 64.2475 PerJust74[37] = 6810 ' fractional midi note: 36.8839 freq= 68.8325 PerJust74[38] = 6385 ' fractional midi note: 37.9995 freq= 73.4141 PerJust74[39] = 6081 ' fractional midi note: 38.8441 freq= 77.0845 PerJust74[40] = 5675 ' fractional midi note: 40.0403 freq= 82.5989 PerJust74[41] = 5473 ' fractional midi note: 40.6678 freq= 85.6477 PerJust74[42] = 5108 ' fractional midi note: 41.8627 freq= 91.7679 PerJust74[43] = 4789 ' fractional midi note: 42.9791 freq= 97.8806 PerJust74[44] = 4561 ' fractional midi note: 43.8236 freq= 102.7736 PerJust74[45] = 4257 ' fractional midi note: 45.0177 freq= 110.1125 PerJust74[46] = 4105 ' fractional midi note: 45.6472 freq= 114.1901 PerJust74[47] = 3831 ' fractional midi note: 46.8431 freq= 122.3569 PerJust74[48] = 3648 ' fractional midi note: 47.6905 freq= 128.495 PerJust74[49] = 3405 ' fractional midi note: 48.8839 freq= 137.665 PerJust74[50] = 3192 ' fractional midi note: 50.0023 freq= 146.8519 PerJust74[51] = 3040 ' fractional midi note: 50.8469 freq= 154.1939 PerJust74[52] = 2838 ' fractional midi note: 52.0373 freq= 165.1693 PerJust74[53] = 2736 ' fractional midi note: 52.671 freq= 171.3271 PerJust74[54] = 2554 ' fractional midi note: 53.8627 freq= 183.5359 PerJust74[55] = 2394 ' fractional midi note: 54.9827 freq= 195.802 PerJust74[56] = 2280 ' fractional midi note: 55.8274 freq= 205.5924 PerJust74[57] = 2128 ' fractional midi note: 57.0218 freq= 220.2772 PerJust74[58] = 2052 ' fractional midi note: 57.6514 freq= 228.4355 PerJust74[59] = 1916 ' fractional midi note: 58.8386 freq= 244.6502 PerJust74[60] = 1824 ' fractional midi note: 59.6905 freq= 256.9899 PerJust74[61] = 1702 ' fractional midi note: 60.889 freq= 275.4111 PerJust74[62] = 1596 ' fractional midi note: 62.0023 freq= 293.7038 PerJust74[63] = 1520 ' fractional midi note: 62.8469 freq= 308.3877 PerJust74[64] = 1419 ' fractional midi note: 64.0373 freq= 330.3385 PerJust74[65] = 1368 ' fractional midi note: 64.671 freq= 342.6542 PerJust74[66] = 1277 ' fractional midi note: 65.8627 freq= 367.0717 PerJust74[67] = 1197 ' fractional midi note: 66.9827 freq= 391.6039 PerJust74[68] = 1140 ' fractional midi note: 67.8274 freq= 411.1848 PerJust74[69] = 1064 ' fractional midi note: 69.0218 freq= 440.5544 PerJust74[70] = 1026 ' fractional midi note: 69.6514 freq= 456.871 PerJust74[71] = 958 ' fractional midi note: 70.8386 freq= 489.3004 PerJust74[72] = 912 ' fractional midi note: 71.6905 freq= 513.9799 PerJust74[73] = 851 ' fractional midi note: 72.889 freq= 550.8223 PerJust74[74] = 798 ' fractional midi note: 74.0023 freq= 587.4075 PerJust74[75] = 760 ' fractional midi note: 74.8469 freq= 616.7755 PerJust74[76] = 710 ' fractional midi note: 76.0251 freq= 660.2117 PerJust74[77] = 684 ' fractional midi note: 76.671 freq= 685.3084 PerJust74[78] = 638 ' fractional midi note: 77.8762 freq= 734.716 PerJust74[79] = 598 ' fractional midi note: 78.9972 freq= 783.8641 PerJust74[80] = 570 ' fractional midi note: 79.8274 freq= 822.3696 PerJust74[81] = 532 ' fractional midi note: 81.0218 freq= 881.1087 PerJust74[82] = 513 ' fractional midi note: 81.6514 freq= 913.7419 PerJust74[83] = 479 ' fractional midi note: 82.8386 freq= 978.6007 PerJust74[84] = 456 ' fractional midi note: 83.6905 freq= 1027.9597 PerJust74[85] = 426 ' fractional midi note: 84.8687 freq= 1100.3534 PerJust74[86] = 399 ' fractional midi note: 86.0023 freq= 1174.8149 PerJust74[87] = 380 ' fractional midi note: 86.8469 freq= 1233.5509 PerJust74[88] = 355 ' fractional midi note: 88.0251 freq= 1320.4233 PerJust74[89] = 342 ' fractional midi note: 88.671 freq= 1370.6168 PerJust74[90] = 319 ' fractional midi note: 89.8762 freq= 1469.432 PerJust74[91] = 299 ' fractional midi note: 90.9972 freq= 1567.7283 PerJust74[92] = 285 ' fractional midi note: 91.8274 freq= 1644.7393 PerJust74[93] = 266 ' fractional midi note: 93.0218 freq= 1762.2174 PerJust74[94] = 256 ' fractional midi note: 93.6852 freq= 1831.0559 PerJust74[95] = 240 ' fractional midi note: 94.8025 freq= 1953.1241 PerJust74[96] = 228 ' fractional midi note: 95.6905 freq= 2055.9194 PerJust74[97] = 213 ' fractional midi note: 96.8687 freq= 2200.7068 PerJust74[98] = 200 ' fractional midi note: 97.9589 freq= 2343.7476 PerJust74[99] = 190 ' fractional midi note: 98.8469 freq= 2467.1018 PerJust74[100] = 178 ' fractional midi note: 99.9764 freq= 2633.4287 PerJust74[101] = 171 ' fractional midi note: 100.671 freq= 2741.2336 PerJust74[102] = 160 ' fractional midi note: 101.8221 freq= 2929.6946 PerJust74[103] = 150 ' fractional midi note: 102.9394 freq= 3125.0056 PerJust74[104] = 142 ' fractional midi note: 103.8882 freq= 3301.051 PerJust74[105] = 133 ' fractional midi note: 105.0218 freq= 3524.4348 PerJust74[106] = 128 ' fractional midi note: 105.6852 freq= 3662.1118 PerJust74[107] = 120 ' fractional midi note: 106.8025 freq= 3906.2483 PerJust74[108] = 114 ' fractional midi note: 107.6905 freq= 4111.8389 PerJust74[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust74[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust74[111] = 95 ' fractional midi note: 110.8469 freq= 4934.2036 PerJust74[112] = 89 ' fractional midi note: 111.9764 freq= 5266.8574 PerJust74[113] = 86 ' fractional midi note: 112.57 freq= 5450.5767 PerJust74[114] = 80 ' fractional midi note: 113.8221 freq= 5859.3892 PerJust74[115] = 75 ' fractional midi note: 114.9394 freq= 6250.0112 PerJust74[116] = 71 ' fractional midi note: 115.8882 freq= 6602.1021 PerJust74[117] = 66 ' fractional midi note: 117.1525 freq= 7102.2866 PerJust74[118] = 64 ' fractional midi note: 117.6852 freq= 7324.2236 PerJust74[119] = 60 ' fractional midi note: 118.8025 freq= 7812.4966 PerJust74[120] = 57 ' fractional midi note: 119.6905 freq= 8223.6777 PerJust74[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust74[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust74[123] = 48 ' fractional midi note: 122.6656 freq= 9765.6035 PerJust74[124] = 44 ' fractional midi note: 124.172 freq= 10653.3994 PerJust74[125] = 43 ' fractional midi note: 124.57 freq= 10901.1533 PerJust74[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust74[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 ' just intonation scale based on note 39 PerJust75[0] = 57856 ' fractional midi note: -.157 freq= 8.102 PerJust75[1] = 55104 ' fractional midi note: .6868 freq= 8.5067 PerJust75[2] = 51424 ' fractional midi note: 1.8833 freq= 9.1154 PerJust75[3] = 48208 ' fractional midi note: 3.0014 freq= 9.7235 PerJust75[4] = 45920 ' fractional midi note: 3.8432 freq= 10.208 PerJust75[5] = 42856 ' fractional midi note: 5.0387 freq= 10.9378 PerJust75[6] = 41328 ' fractional midi note: 5.6672 freq= 11.3422 PerJust75[7] = 38568 ' fractional midi note: 6.8638 freq= 12.1539 PerJust75[8] = 36160 ' fractional midi note: 7.9799 freq= 12.9632 PerJust75[9] = 34440 ' fractional midi note: 8.8236 freq= 13.6106 PerJust75[10] = 32144 ' fractional midi note: 10.0181 freq= 14.5829 PerJust75[11] = 30992 ' fractional midi note: 10.6499 freq= 15.1249 PerJust75[12] = 28928 ' fractional midi note: 11.843 freq= 16.204 PerJust75[13] = 27552 ' fractional midi note: 12.6868 freq= 17.0133 PerJust75[14] = 25712 ' fractional midi note: 13.8833 freq= 18.2307 PerJust75[15] = 24104 ' fractional midi note: 15.0014 freq= 19.447 PerJust75[16] = 22960 ' fractional midi note: 15.8432 freq= 20.416 PerJust75[17] = 21428 ' fractional midi note: 17.0387 freq= 21.8756 PerJust75[18] = 20664 ' fractional midi note: 17.6672 freq= 22.6844 PerJust75[19] = 19284 ' fractional midi note: 18.8638 freq= 24.3077 PerJust75[20] = 18080 ' fractional midi note: 19.9799 freq= 25.9264 PerJust75[21] = 17220 ' fractional midi note: 20.8236 freq= 27.2212 PerJust75[22] = 16072 ' fractional midi note: 22.0181 freq= 29.1657 PerJust75[23] = 15496 ' fractional midi note: 22.6499 freq= 30.2498 PerJust75[24] = 14464 ' fractional midi note: 23.843 freq= 32.408 PerJust75[25] = 13776 ' fractional midi note: 24.6868 freq= 34.0266 PerJust75[26] = 12856 ' fractional midi note: 25.8833 freq= 36.4615 PerJust75[27] = 12052 ' fractional midi note: 27.0014 freq= 38.894 PerJust75[28] = 11480 ' fractional midi note: 27.8432 freq= 40.8319 PerJust75[29] = 10714 ' fractional midi note: 29.0387 freq= 43.7512 PerJust75[30] = 10332 ' fractional midi note: 29.6672 freq= 45.3687 PerJust75[31] = 9642 ' fractional midi note: 30.8638 freq= 48.6155 PerJust75[32] = 9040 ' fractional midi note: 31.9799 freq= 51.8529 PerJust75[33] = 8610 ' fractional midi note: 32.8236 freq= 54.4424 PerJust75[34] = 8036 ' fractional midi note: 34.0181 freq= 58.3314 PerJust75[35] = 7748 ' fractional midi note: 34.6499 freq= 60.4995 PerJust75[36] = 7232 ' fractional midi note: 35.843 freq= 64.8159 PerJust75[37] = 6888 ' fractional midi note: 36.6868 freq= 68.0533 PerJust75[38] = 6428 ' fractional midi note: 37.8833 freq= 72.923 PerJust75[39] = 6026 ' fractional midi note: 39.0014 freq= 77.788 PerJust75[40] = 5740 ' fractional midi note: 39.8432 freq= 81.6639 PerJust75[41] = 5357 ' fractional midi note: 41.0387 freq= 87.5024 PerJust75[42] = 5166 ' fractional midi note: 41.6672 freq= 90.7375 PerJust75[43] = 4821 ' fractional midi note: 42.8638 freq= 97.2309 PerJust75[44] = 4520 ' fractional midi note: 43.9799 freq= 103.7057 PerJust75[45] = 4305 ' fractional midi note: 44.8236 freq= 108.8849 PerJust75[46] = 4018 ' fractional midi note: 46.0181 freq= 116.6629 PerJust75[47] = 3874 ' fractional midi note: 46.6499 freq= 120.999 PerJust75[48] = 3616 ' fractional midi note: 47.843 freq= 129.6318 PerJust75[49] = 3444 ' fractional midi note: 48.6868 freq= 136.1066 PerJust75[50] = 3214 ' fractional midi note: 49.8833 freq= 145.8459 PerJust75[51] = 3013 ' fractional midi note: 51.0014 freq= 155.5761 PerJust75[52] = 2870 ' fractional midi note: 51.8432 freq= 163.3278 PerJust75[53] = 2678 ' fractional midi note: 53.0419 freq= 175.0372 PerJust75[54] = 2583 ' fractional midi note: 53.6672 freq= 181.4749 PerJust75[55] = 2410 ' fractional midi note: 54.8674 freq= 194.5023 PerJust75[56] = 2260 ' fractional midi note: 55.9799 freq= 207.4114 PerJust75[57] = 2152 ' fractional midi note: 56.8276 freq= 217.8201 PerJust75[58] = 2009 ' fractional midi note: 58.0181 freq= 233.3257 PerJust75[59] = 1937 ' fractional midi note: 58.6499 freq= 241.998 PerJust75[60] = 1808 ' fractional midi note: 59.843 freq= 259.2637 PerJust75[61] = 1722 ' fractional midi note: 60.6868 freq= 272.2132 PerJust75[62] = 1607 ' fractional midi note: 61.8833 freq= 291.6919 PerJust75[63] = 1506 ' fractional midi note: 63.0071 freq= 311.2546 PerJust75[64] = 1435 ' fractional midi note: 63.8432 freq= 326.6556 PerJust75[65] = 1339 ' fractional midi note: 65.0419 freq= 350.0745 PerJust75[66] = 1292 ' fractional midi note: 65.6605 freq= 362.8094 PerJust75[67] = 1205 ' fractional midi note: 66.8674 freq= 389.0045 PerJust75[68] = 1130 ' fractional midi note: 67.9799 freq= 414.8228 PerJust75[69] = 1076 ' fractional midi note: 68.8276 freq= 435.6401 PerJust75[70] = 1004 ' fractional midi note: 70.0267 freq= 466.8834 PerJust75[71] = 968 ' fractional midi note: 70.6588 freq= 484.2449 PerJust75[72] = 904 ' fractional midi note: 71.843 freq= 518.5275 PerJust75[73] = 861 ' fractional midi note: 72.6868 freq= 544.4263 PerJust75[74] = 804 ' fractional midi note: 73.8726 freq= 583.0232 PerJust75[75] = 753 ' fractional midi note: 75.0071 freq= 622.5093 PerJust75[76] = 718 ' fractional midi note: 75.8311 freq= 652.8547 PerJust75[77] = 670 ' fractional midi note: 77.029 freq= 699.6274 PerJust75[78] = 646 ' fractional midi note: 77.6605 freq= 725.6188 PerJust75[79] = 602 ' fractional midi note: 78.8818 freq= 778.6564 PerJust75[80] = 565 ' fractional midi note: 79.9799 freq= 829.6455 PerJust75[81] = 538 ' fractional midi note: 80.8276 freq= 871.2802 PerJust75[82] = 502 ' fractional midi note: 82.0267 freq= 933.7667 PerJust75[83] = 484 ' fractional midi note: 82.6588 freq= 968.4897 PerJust75[84] = 452 ' fractional midi note: 83.843 freq= 1037.0549 PerJust75[85] = 430 ' fractional midi note: 84.7069 freq= 1090.1178 PerJust75[86] = 402 ' fractional midi note: 85.8726 freq= 1166.0464 PerJust75[87] = 376 ' fractional midi note: 87.0301 freq= 1246.6735 PerJust75[88] = 359 ' fractional midi note: 87.8311 freq= 1305.7095 PerJust75[89] = 335 ' fractional midi note: 89.029 freq= 1399.2549 PerJust75[90] = 323 ' fractional midi note: 89.6605 freq= 1451.2377 PerJust75[91] = 301 ' fractional midi note: 90.8818 freq= 1557.3127 PerJust75[92] = 282 ' fractional midi note: 92.0106 freq= 1662.2361 PerJust75[93] = 269 ' fractional midi note: 92.8276 freq= 1742.5604 PerJust75[94] = 251 ' fractional midi note: 94.0267 freq= 1867.5334 PerJust75[95] = 242 ' fractional midi note: 94.6588 freq= 1936.9795 PerJust75[96] = 226 ' fractional midi note: 95.843 freq= 2074.1099 PerJust75[97] = 215 ' fractional midi note: 96.7069 freq= 2180.2356 PerJust75[98] = 201 ' fractional midi note: 97.8726 freq= 2332.0928 PerJust75[99] = 188 ' fractional midi note: 99.0301 freq= 2493.3469 PerJust75[100] = 180 ' fractional midi note: 99.783 freq= 2604.1729 PerJust75[101] = 168 ' fractional midi note: 100.9774 freq= 2790.1816 PerJust75[102] = 162 ' fractional midi note: 101.607 freq= 2893.5203 PerJust75[103] = 150 ' fractional midi note: 102.9394 freq= 3125.0056 PerJust75[104] = 141 ' fractional midi note: 104.0106 freq= 3324.4722 PerJust75[105] = 134 ' fractional midi note: 104.8921 freq= 3498.1294 PerJust75[106] = 126 ' fractional midi note: 105.9578 freq= 3720.2312 PerJust75[107] = 121 ' fractional midi note: 106.6588 freq= 3873.959 PerJust75[108] = 113 ' fractional midi note: 107.843 freq= 4148.2197 PerJust75[109] = 108 ' fractional midi note: 108.6265 freq= 4340.2681 PerJust75[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust75[111] = 94 ' fractional midi note: 111.0301 freq= 4986.6938 PerJust75[112] = 90 ' fractional midi note: 111.783 freq= 5208.3457 PerJust75[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust75[114] = 81 ' fractional midi note: 113.607 freq= 5787.0405 PerJust75[115] = 75 ' fractional midi note: 114.9394 freq= 6250.0112 PerJust75[116] = 70 ' fractional midi note: 116.1338 freq= 6696.4287 PerJust75[117] = 67 ' fractional midi note: 116.8921 freq= 6996.2588 PerJust75[118] = 63 ' fractional midi note: 117.9578 freq= 7440.4624 PerJust75[119] = 60 ' fractional midi note: 118.8025 freq= 7812.4966 PerJust75[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust75[121] = 54 ' fractional midi note: 120.6265 freq= 8680.5361 PerJust75[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust75[123] = 47 ' fractional midi note: 123.0301 freq= 9973.3877 PerJust75[124] = 45 ' fractional midi note: 123.783 freq= 10416.6914 PerJust75[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust75[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust75[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 ' just intonation scale based on note 40 PerJust76[0] = 58512 ' fractional midi note: -.3521 freq= 8.0112 PerJust76[1] = 54608 ' fractional midi note: .8433 freq= 8.5839 PerJust76[2] = 52000 ' fractional midi note: 1.6905 freq= 9.0144 PerJust76[3] = 48544 ' fractional midi note: 2.8811 freq= 9.6562 PerJust76[4] = 45504 ' fractional midi note: 4.0007 freq= 10.3013 PerJust76[5] = 43336 ' fractional midi note: 4.8459 freq= 10.8167 PerJust76[6] = 40448 ' fractional midi note: 6.0398 freq= 11.5889 PerJust76[7] = 39008 ' fractional midi note: 6.6674 freq= 12.0168 PerJust76[8] = 36408 ' fractional midi note: 7.8616 freq= 12.8749 PerJust76[9] = 34128 ' fractional midi note: 8.9812 freq= 13.7351 PerJust76[10] = 32504 ' fractional midi note: 9.8252 freq= 14.4213 PerJust76[11] = 30336 ' fractional midi note: 11.0203 freq= 15.452 PerJust76[12] = 29256 ' fractional midi note: 11.6479 freq= 16.0224 PerJust76[13] = 27304 ' fractional midi note: 12.8433 freq= 17.1678 PerJust76[14] = 26000 ' fractional midi note: 13.6905 freq= 18.0288 PerJust76[15] = 24272 ' fractional midi note: 14.8811 freq= 19.3123 PerJust76[16] = 22752 ' fractional midi note: 16.0007 freq= 20.6026 PerJust76[17] = 21668 ' fractional midi note: 16.8459 freq= 21.6333 PerJust76[18] = 20224 ' fractional midi note: 18.0398 freq= 23.1779 PerJust76[19] = 19504 ' fractional midi note: 18.6674 freq= 24.0335 PerJust76[20] = 18204 ' fractional midi note: 19.8616 freq= 25.7499 PerJust76[21] = 17064 ' fractional midi note: 20.9812 freq= 27.4702 PerJust76[22] = 16252 ' fractional midi note: 21.8252 freq= 28.8425 PerJust76[23] = 15168 ' fractional midi note: 23.0203 freq= 30.9039 PerJust76[24] = 14628 ' fractional midi note: 23.6479 freq= 32.0448 PerJust76[25] = 13652 ' fractional midi note: 24.8433 freq= 34.3356 PerJust76[26] = 13000 ' fractional midi note: 25.6905 freq= 36.0577 PerJust76[27] = 12136 ' fractional midi note: 26.8811 freq= 38.6247 PerJust76[28] = 11376 ' fractional midi note: 28.0007 freq= 41.2051 PerJust76[29] = 10834 ' fractional midi note: 28.8459 freq= 43.2667 PerJust76[30] = 10112 ' fractional midi note: 30.0398 freq= 46.3558 PerJust76[31] = 9752 ' fractional midi note: 30.6674 freq= 48.0671 PerJust76[32] = 9102 ' fractional midi note: 31.8616 freq= 51.4997 PerJust76[33] = 8532 ' fractional midi note: 32.9812 freq= 54.9403 PerJust76[34] = 8126 ' fractional midi note: 33.8252 freq= 57.6851 PerJust76[35] = 7584 ' fractional midi note: 35.0203 freq= 61.8079 PerJust76[36] = 7314 ' fractional midi note: 35.6479 freq= 64.0896 PerJust76[37] = 6826 ' fractional midi note: 36.8433 freq= 68.6713 PerJust76[38] = 6500 ' fractional midi note: 37.6905 freq= 72.1154 PerJust76[39] = 6068 ' fractional midi note: 38.8811 freq= 77.2494 PerJust76[40] = 5688 ' fractional midi note: 40.0007 freq= 82.4102 PerJust76[41] = 5417 ' fractional midi note: 40.8459 freq= 86.5334 PerJust76[42] = 5056 ' fractional midi note: 42.0398 freq= 92.7115 PerJust76[43] = 4876 ' fractional midi note: 42.6674 freq= 96.1341 PerJust76[44] = 4551 ' fractional midi note: 43.8616 freq= 102.9995 PerJust76[45] = 4266 ' fractional midi note: 44.9812 freq= 109.8806 PerJust76[46] = 4063 ' fractional midi note: 45.8252 freq= 115.3702 PerJust76[47] = 3792 ' fractional midi note: 47.0203 freq= 123.6157 PerJust76[48] = 3657 ' fractional midi note: 47.6479 freq= 128.1792 PerJust76[49] = 3413 ' fractional midi note: 48.8433 freq= 137.3425 PerJust76[50] = 3250 ' fractional midi note: 49.6905 freq= 144.2307 PerJust76[51] = 3034 ' fractional midi note: 50.8811 freq= 154.4988 PerJust76[52] = 2844 ' fractional midi note: 52.0007 freq= 164.8205 PerJust76[53] = 2708 ' fractional midi note: 52.849 freq= 173.0977 PerJust76[54] = 2528 ' fractional midi note: 54.0398 freq= 185.423 PerJust76[55] = 2438 ' fractional midi note: 54.6674 freq= 192.2682 PerJust76[56] = 2276 ' fractional midi note: 55.8578 freq= 205.9537 PerJust76[57] = 2133 ' fractional midi note: 56.9812 freq= 219.7612 PerJust76[58] = 2032 ' fractional midi note: 57.821 freq= 230.6844 PerJust76[59] = 1896 ' fractional midi note: 59.0203 freq= 247.2314 PerJust76[60] = 1828 ' fractional midi note: 59.6526 freq= 256.4279 PerJust76[61] = 1706 ' fractional midi note: 60.8484 freq= 274.766 PerJust76[62] = 1625 ' fractional midi note: 61.6905 freq= 288.4614 PerJust76[63] = 1517 ' fractional midi note: 62.8811 freq= 308.9975 PerJust76[64] = 1422 ' fractional midi note: 64.0007 freq= 329.6409 PerJust76[65] = 1354 ' fractional midi note: 64.849 freq= 346.1955 PerJust76[66] = 1264 ' fractional midi note: 66.0398 freq= 370.8461 PerJust76[67] = 1219 ' fractional midi note: 66.6674 freq= 384.5363 PerJust76[68] = 1138 ' fractional midi note: 67.8578 freq= 411.9075 PerJust76[69] = 1066 ' fractional midi note: 68.9893 freq= 439.7282 PerJust76[70] = 1016 ' fractional midi note: 69.821 freq= 461.3687 PerJust76[71] = 948 ' fractional midi note: 71.0203 freq= 494.4628 PerJust76[72] = 914 ' fractional midi note: 71.6526 freq= 512.856 PerJust76[73] = 853 ' fractional midi note: 72.8484 freq= 549.5319 PerJust76[74] = 812 ' fractional midi note: 73.7012 freq= 577.2797 PerJust76[75] = 758 ' fractional midi note: 74.8925 freq= 618.4022 PerJust76[76] = 711 ' fractional midi note: 76.0007 freq= 659.2819 PerJust76[77] = 677 ' fractional midi note: 76.849 freq= 692.3909 PerJust76[78] = 632 ' fractional midi note: 78.0398 freq= 741.6921 PerJust76[79] = 610 ' fractional midi note: 78.6532 freq= 768.4422 PerJust76[80] = 569 ' fractional midi note: 79.8578 freq= 823.8151 PerJust76[81] = 533 ' fractional midi note: 80.9893 freq= 879.4565 PerJust76[82] = 508 ' fractional midi note: 81.821 freq= 922.7374 PerJust76[83] = 474 ' fractional midi note: 83.0203 freq= 988.9257 PerJust76[84] = 457 ' fractional midi note: 83.6526 freq= 1025.712 PerJust76[85] = 426 ' fractional midi note: 84.8687 freq= 1100.3534 PerJust76[86] = 406 ' fractional midi note: 85.7012 freq= 1154.5593 PerJust76[87] = 379 ' fractional midi note: 86.8925 freq= 1236.8043 PerJust76[88] = 356 ' fractional midi note: 87.9764 freq= 1316.7144 PerJust76[89] = 338 ' fractional midi note: 88.8746 freq= 1386.8314 PerJust76[90] = 316 ' fractional midi note: 90.0398 freq= 1483.3843 PerJust76[91] = 305 ' fractional midi note: 90.6532 freq= 1536.8844 PerJust76[92] = 284 ' fractional midi note: 91.8882 freq= 1650.5255 PerJust76[93] = 266 ' fractional midi note: 93.0218 freq= 1762.2174 PerJust76[94] = 254 ' fractional midi note: 93.821 freq= 1845.4749 PerJust76[95] = 237 ' fractional midi note: 95.0203 freq= 1977.8513 PerJust76[96] = 228 ' fractional midi note: 95.6905 freq= 2055.9194 PerJust76[97] = 213 ' fractional midi note: 96.8687 freq= 2200.7068 PerJust76[98] = 203 ' fractional midi note: 97.7012 freq= 2309.1187 PerJust76[99] = 190 ' fractional midi note: 98.8469 freq= 2467.1018 PerJust76[100] = 178 ' fractional midi note: 99.9764 freq= 2633.4287 PerJust76[101] = 169 ' fractional midi note: 100.8746 freq= 2773.6628 PerJust76[102] = 158 ' fractional midi note: 102.0398 freq= 2966.7686 PerJust76[103] = 152 ' fractional midi note: 102.7101 freq= 3083.8879 PerJust76[104] = 142 ' fractional midi note: 103.8882 freq= 3301.051 PerJust76[105] = 133 ' fractional midi note: 105.0218 freq= 3524.4348 PerJust76[106] = 127 ' fractional midi note: 105.821 freq= 3690.9497 PerJust76[107] = 118 ' fractional midi note: 107.0935 freq= 3972.4626 PerJust76[108] = 114 ' fractional midi note: 107.6905 freq= 4111.8389 PerJust76[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust76[110] = 102 ' fractional midi note: 109.6161 freq= 4595.5903 PerJust76[111] = 95 ' fractional midi note: 110.8469 freq= 4934.2036 PerJust76[112] = 89 ' fractional midi note: 111.9764 freq= 5266.8574 PerJust76[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust76[114] = 79 ' fractional midi note: 114.0398 freq= 5933.5371 PerJust76[115] = 76 ' fractional midi note: 114.7101 freq= 6167.7759 PerJust76[116] = 71 ' fractional midi note: 115.8882 freq= 6602.1021 PerJust76[117] = 66 ' fractional midi note: 117.1525 freq= 7102.2866 PerJust76[118] = 64 ' fractional midi note: 117.6852 freq= 7324.2236 PerJust76[119] = 59 ' fractional midi note: 119.0935 freq= 7944.9253 PerJust76[120] = 57 ' fractional midi note: 119.6905 freq= 8223.6777 PerJust76[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust76[122] = 51 ' fractional midi note: 121.6161 freq= 9191.1807 PerJust76[123] = 48 ' fractional midi note: 122.6656 freq= 9765.6035 PerJust76[124] = 44 ' fractional midi note: 124.172 freq= 10653.3994 PerJust76[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust76[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust76[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 ' just intonation scale based on note 41 PerJust77[0] = 57264 ' fractional midi note: .0211 freq= 8.1858 PerJust77[1] = 55216 ' fractional midi note: .6516 freq= 8.4894 PerJust77[2] = 51536 ' fractional midi note: 1.8457 freq= 9.0956 PerJust77[3] = 49088 ' fractional midi note: 2.6882 freq= 9.5492 PerJust77[4] = 45808 ' fractional midi note: 3.8854 freq= 10.2329 PerJust77[5] = 42952 ' fractional midi note: 4.9999 freq= 10.9133 PerJust77[6] = 40904 ' fractional midi note: 5.8457 freq= 11.4597 PerJust77[7] = 38176 ' fractional midi note: 7.0407 freq= 12.2787 PerJust77[8] = 36816 ' fractional midi note: 7.6686 freq= 12.7322 PerJust77[9] = 34360 ' fractional midi note: 8.8639 freq= 13.6423 PerJust77[10] = 32216 ' fractional midi note: 9.9793 freq= 14.5502 PerJust77[11] = 30680 ' fractional midi note: 10.8251 freq= 15.2787 PerJust77[12] = 28632 ' fractional midi note: 12.0211 freq= 16.3715 PerJust77[13] = 27608 ' fractional midi note: 12.6516 freq= 16.9788 PerJust77[14] = 25768 ' fractional midi note: 13.8457 freq= 18.1912 PerJust77[15] = 24544 ' fractional midi note: 14.6882 freq= 19.0984 PerJust77[16] = 22904 ' fractional midi note: 15.8854 freq= 20.4658 PerJust77[17] = 21476 ' fractional midi note: 16.9999 freq= 21.8266 PerJust77[18] = 20452 ' fractional midi note: 17.8457 freq= 22.9195 PerJust77[19] = 19088 ' fractional midi note: 19.0407 freq= 24.5574 PerJust77[20] = 18408 ' fractional midi note: 19.6686 freq= 25.4644 PerJust77[21] = 17180 ' fractional midi note: 20.8639 freq= 27.2847 PerJust77[22] = 16108 ' fractional midi note: 21.9793 freq= 29.1004 PerJust77[23] = 15340 ' fractional midi note: 22.8251 freq= 30.5574 PerJust77[24] = 14316 ' fractional midi note: 24.0211 freq= 32.7431 PerJust77[25] = 13804 ' fractional midi note: 24.6516 freq= 33.9575 PerJust77[26] = 12884 ' fractional midi note: 25.8457 freq= 36.3824 PerJust77[27] = 12272 ' fractional midi note: 26.6882 freq= 38.1967 PerJust77[28] = 11452 ' fractional midi note: 27.8854 freq= 40.9316 PerJust77[29] = 10738 ' fractional midi note: 28.9999 freq= 43.6533 PerJust77[30] = 10226 ' fractional midi note: 29.8457 freq= 45.8389 PerJust77[31] = 9544 ' fractional midi note: 31.0407 freq= 49.1148 PerJust77[32] = 9204 ' fractional midi note: 31.6686 freq= 50.9288 PerJust77[33] = 8590 ' fractional midi note: 32.8639 freq= 54.5693 PerJust77[34] = 8054 ' fractional midi note: 33.9793 freq= 58.2008 PerJust77[35] = 7670 ' fractional midi note: 34.8251 freq= 61.1149 PerJust77[36] = 7158 ' fractional midi note: 36.0211 freq= 65.4862 PerJust77[37] = 6902 ' fractional midi note: 36.6516 freq= 67.9151 PerJust77[38] = 6442 ' fractional midi note: 37.8457 freq= 72.7648 PerJust77[39] = 6136 ' fractional midi note: 38.6882 freq= 76.3934 PerJust77[40] = 5726 ' fractional midi note: 39.8854 freq= 81.8632 PerJust77[41] = 5369 ' fractional midi note: 40.9999 freq= 87.3066 PerJust77[42] = 5113 ' fractional midi note: 41.8457 freq= 91.6779 PerJust77[43] = 4772 ' fractional midi note: 43.0407 freq= 98.2295 PerJust77[44] = 4602 ' fractional midi note: 43.6686 freq= 101.8576 PerJust77[45] = 4295 ' fractional midi note: 44.8639 freq= 109.1386 PerJust77[46] = 4027 ' fractional midi note: 45.9793 freq= 116.4017 PerJust77[47] = 3835 ' fractional midi note: 46.8251 freq= 122.2297 PerJust77[48] = 3579 ' fractional midi note: 48.0211 freq= 130.9723 PerJust77[49] = 3451 ' fractional midi note: 48.6516 freq= 135.8301 PerJust77[50] = 3221 ' fractional midi note: 49.8457 freq= 145.5295 PerJust77[51] = 3068 ' fractional midi note: 50.6882 freq= 152.7868 PerJust77[52] = 2863 ' fractional midi note: 51.8854 freq= 163.7264 PerJust77[53] = 2684 ' fractional midi note: 53.0032 freq= 174.6464 PerJust77[54] = 2556 ' fractional midi note: 53.8491 freq= 183.3917 PerJust77[55] = 2386 ' fractional midi note: 55.0407 freq= 196.459 PerJust77[56] = 2301 ' fractional midi note: 55.6686 freq= 203.7152 PerJust77[57] = 2148 ' fractional midi note: 56.8599 freq= 218.2269 PerJust77[58] = 2014 ' fractional midi note: 57.975 freq= 232.7455 PerJust77[59] = 1918 ' fractional midi note: 58.8205 freq= 244.3945 PerJust77[60] = 1790 ' fractional midi note: 60.0163 freq= 261.872 PerJust77[61] = 1726 ' fractional midi note: 60.6466 freq= 271.5818 PerJust77[62] = 1610 ' fractional midi note: 61.8511 freq= 291.1499 PerJust77[63] = 1534 ' fractional midi note: 62.6882 freq= 305.5737 PerJust77[64] = 1432 ' fractional midi note: 63.8794 freq= 327.3393 PerJust77[65] = 1342 ' fractional midi note: 65.0032 freq= 349.2928 PerJust77[66] = 1278 ' fractional midi note: 65.8491 freq= 366.7834 PerJust77[67] = 1193 ' fractional midi note: 67.0406 freq= 392.9159 PerJust77[68] = 1150 ' fractional midi note: 67.6762 freq= 407.6093 PerJust77[69] = 1074 ' fractional midi note: 68.8599 freq= 436.4537 PerJust77[70] = 1007 ' fractional midi note: 69.975 freq= 465.4911 PerJust77[71] = 959 ' fractional midi note: 70.8205 freq= 488.7891 PerJust77[72] = 895 ' fractional midi note: 72.0163 freq= 523.744 PerJust77[73] = 863 ' fractional midi note: 72.6466 freq= 543.1636 PerJust77[74] = 805 ' fractional midi note: 73.8511 freq= 582.2996 PerJust77[75] = 767 ' fractional midi note: 74.6882 freq= 611.1474 PerJust77[76] = 716 ' fractional midi note: 75.8794 freq= 654.6787 PerJust77[77] = 671 ' fractional midi note: 77.0032 freq= 698.5855 PerJust77[78] = 639 ' fractional midi note: 77.8491 freq= 733.5668 PerJust77[79] = 596 ' fractional midi note: 79.0552 freq= 786.4946 PerJust77[80] = 575 ' fractional midi note: 79.6762 freq= 815.2186 PerJust77[81] = 537 ' fractional midi note: 80.8599 freq= 872.9075 PerJust77[82] = 504 ' fractional midi note: 81.9578 freq= 930.0578 PerJust77[83] = 480 ' fractional midi note: 82.8025 freq= 976.5621 PerJust77[84] = 448 ' fractional midi note: 83.9969 freq= 1046.3151 PerJust77[85] = 432 ' fractional midi note: 84.6265 freq= 1085.067 PerJust77[86] = 402 ' fractional midi note: 85.8726 freq= 1166.0464 PerJust77[87] = 384 ' fractional midi note: 86.6656 freq= 1220.7004 PerJust77[88] = 358 ' fractional midi note: 87.8794 freq= 1309.3574 PerJust77[89] = 336 ' fractional midi note: 88.9774 freq= 1395.0908 PerJust77[90] = 320 ' fractional midi note: 89.8221 freq= 1464.8473 PerJust77[91] = 298 ' fractional midi note: 91.0552 freq= 1572.9891 PerJust77[92] = 288 ' fractional midi note: 91.6461 freq= 1627.6051 PerJust77[93] = 268 ' fractional midi note: 92.8921 freq= 1749.0647 PerJust77[94] = 252 ' fractional midi note: 93.9578 freq= 1860.1156 PerJust77[95] = 240 ' fractional midi note: 94.8025 freq= 1953.1241 PerJust77[96] = 224 ' fractional midi note: 95.9969 freq= 2092.6301 PerJust77[97] = 216 ' fractional midi note: 96.6265 freq= 2170.134 PerJust77[98] = 201 ' fractional midi note: 97.8726 freq= 2332.0928 PerJust77[99] = 192 ' fractional midi note: 98.6656 freq= 2441.4009 PerJust77[100] = 179 ' fractional midi note: 99.8794 freq= 2618.7148 PerJust77[101] = 168 ' fractional midi note: 100.9774 freq= 2790.1816 PerJust77[102] = 160 ' fractional midi note: 101.8221 freq= 2929.6946 PerJust77[103] = 149 ' fractional midi note: 103.0552 freq= 3145.9783 PerJust77[104] = 144 ' fractional midi note: 103.6461 freq= 3255.2102 PerJust77[105] = 134 ' fractional midi note: 104.8921 freq= 3498.1294 PerJust77[106] = 126 ' fractional midi note: 105.9578 freq= 3720.2312 PerJust77[107] = 120 ' fractional midi note: 106.8025 freq= 3906.2483 PerJust77[108] = 112 ' fractional midi note: 107.9969 freq= 4185.2603 PerJust77[109] = 108 ' fractional midi note: 108.6265 freq= 4340.2681 PerJust77[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust77[111] = 96 ' fractional midi note: 110.6656 freq= 4882.8018 PerJust77[112] = 90 ' fractional midi note: 111.783 freq= 5208.3457 PerJust77[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust77[114] = 80 ' fractional midi note: 113.8221 freq= 5859.3892 PerJust77[115] = 74 ' fractional midi note: 115.1718 freq= 6334.4766 PerJust77[116] = 72 ' fractional midi note: 115.6461 freq= 6510.4204 PerJust77[117] = 67 ' fractional midi note: 116.8921 freq= 6996.2588 PerJust77[118] = 63 ' fractional midi note: 117.9578 freq= 7440.4624 PerJust77[119] = 60 ' fractional midi note: 118.8025 freq= 7812.4966 PerJust77[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust77[121] = 54 ' fractional midi note: 120.6265 freq= 8680.5361 PerJust77[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust77[123] = 48 ' fractional midi note: 122.6656 freq= 9765.6035 PerJust77[124] = 45 ' fractional midi note: 123.783 freq= 10416.6914 PerJust77[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust77[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust77[127] = 37 ' fractional midi note: 127.1718 freq= 12668.9531 ' just intonation scale based on note 42 PerJust78[0] = 57920 ' fractional midi note: -.1761 freq= 8.0931 PerJust78[1] = 54048 ' fractional midi note: 1.0217 freq= 8.6728 PerJust78[2] = 52128 ' fractional midi note: 1.6479 freq= 8.9923 PerJust78[3] = 48656 ' fractional midi note: 2.8412 freq= 9.6339 PerJust78[4] = 46336 ' fractional midi note: 3.687 freq= 10.1163 PerJust78[5] = 43248 ' fractional midi note: 4.881 freq= 10.8386 PerJust78[6] = 40544 ' fractional midi note: 5.9988 freq= 11.5615 PerJust78[7] = 38608 ' fractional midi note: 6.8458 freq= 12.1412 PerJust78[8] = 36040 ' fractional midi note: 8.0375 freq= 13.0064 PerJust78[9] = 34752 ' fractional midi note: 8.6675 freq= 13.4884 PerJust78[10] = 32432 ' fractional midi note: 9.8636 freq= 14.4533 PerJust78[11] = 30408 ' fractional midi note: 10.9792 freq= 15.4153 PerJust78[12] = 28960 ' fractional midi note: 11.8239 freq= 16.1861 PerJust78[13] = 27024 ' fractional midi note: 13.0217 freq= 17.3456 PerJust78[14] = 26064 ' fractional midi note: 13.6479 freq= 17.9845 PerJust78[15] = 24328 ' fractional midi note: 14.8412 freq= 19.2679 PerJust78[16] = 23168 ' fractional midi note: 15.687 freq= 20.2326 PerJust78[17] = 21624 ' fractional midi note: 16.881 freq= 21.6772 PerJust78[18] = 20272 ' fractional midi note: 17.9988 freq= 23.1231 PerJust78[19] = 19304 ' fractional midi note: 18.8458 freq= 24.2825 PerJust78[20] = 18020 ' fractional midi note: 20.0375 freq= 26.0128 PerJust78[21] = 17376 ' fractional midi note: 20.6675 freq= 26.9769 PerJust78[22] = 16216 ' fractional midi note: 21.8636 freq= 28.9066 PerJust78[23] = 15204 ' fractional midi note: 22.9792 freq= 30.8306 PerJust78[24] = 14480 ' fractional midi note: 23.8239 freq= 32.3722 PerJust78[25] = 13512 ' fractional midi note: 25.0217 freq= 34.6913 PerJust78[26] = 13032 ' fractional midi note: 25.6479 freq= 35.9691 PerJust78[27] = 12164 ' fractional midi note: 26.8412 freq= 38.5358 PerJust78[28] = 11584 ' fractional midi note: 27.687 freq= 40.4652 PerJust78[29] = 10812 ' fractional midi note: 28.881 freq= 43.3545 PerJust78[30] = 10136 ' fractional midi note: 29.9988 freq= 46.2461 PerJust78[31] = 9652 ' fractional midi note: 30.8458 freq= 48.5649 PerJust78[32] = 9010 ' fractional midi note: 32.0375 freq= 52.0257 PerJust78[33] = 8688 ' fractional midi note: 32.6675 freq= 53.9538 PerJust78[34] = 8108 ' fractional midi note: 33.8636 freq= 57.8132 PerJust78[35] = 7602 ' fractional midi note: 34.9792 freq= 61.6613 PerJust78[36] = 7240 ' fractional midi note: 35.8239 freq= 64.7445 PerJust78[37] = 6756 ' fractional midi note: 37.0218 freq= 69.383 PerJust78[38] = 6516 ' fractional midi note: 37.6479 freq= 71.9381 PerJust78[39] = 6082 ' fractional midi note: 38.8412 freq= 77.0716 PerJust78[40] = 5792 ' fractional midi note: 39.687 freq= 80.9304 PerJust78[41] = 5406 ' fractional midi note: 40.881 freq= 86.709 PerJust78[42] = 5068 ' fractional midi note: 41.9988 freq= 92.4922 PerJust78[43] = 4826 ' fractional midi note: 42.8458 freq= 97.1299 PerJust78[44] = 4505 ' fractional midi note: 44.0375 freq= 104.0513 PerJust78[45] = 4344 ' fractional midi note: 44.6675 freq= 107.9075 PerJust78[46] = 4054 ' fractional midi note: 45.8636 freq= 115.6264 PerJust78[47] = 3801 ' fractional midi note: 46.9792 freq= 123.3226 PerJust78[48] = 3620 ' fractional midi note: 47.8239 freq= 129.4889 PerJust78[49] = 3378 ' fractional midi note: 49.0218 freq= 138.766 PerJust78[50] = 3258 ' fractional midi note: 49.6479 freq= 143.8763 PerJust78[51] = 3041 ' fractional midi note: 50.8412 freq= 154.1431 PerJust78[52] = 2896 ' fractional midi note: 51.687 freq= 161.8608 PerJust78[53] = 2703 ' fractional midi note: 52.881 freq= 173.418 PerJust78[54] = 2534 ' fractional midi note: 53.9988 freq= 184.9844 PerJust78[55] = 2413 ' fractional midi note: 54.8458 freq= 194.2597 PerJust78[56] = 2252 ' fractional midi note: 56.0413 freq= 208.1483 PerJust78[57] = 2172 ' fractional midi note: 56.6675 freq= 215.815 PerJust78[58] = 2027 ' fractional midi note: 57.8636 freq= 231.2527 PerJust78[59] = 1900 ' fractional midi note: 58.9838 freq= 246.7107 PerJust78[60] = 1810 ' fractional midi note: 59.8239 freq= 258.9778 PerJust78[61] = 1689 ' fractional midi note: 61.0218 freq= 277.5319 PerJust78[62] = 1629 ' fractional midi note: 61.6479 freq= 287.7525 PerJust78[63] = 1520 ' fractional midi note: 62.8469 freq= 308.3877 PerJust78[64] = 1448 ' fractional midi note: 63.687 freq= 323.7216 PerJust78[65] = 1352 ' fractional midi note: 64.8746 freq= 346.7079 PerJust78[66] = 1267 ' fractional midi note: 65.9988 freq= 369.9688 PerJust78[67] = 1206 ' fractional midi note: 66.853 freq= 388.681 PerJust78[68] = 1126 ' fractional midi note: 68.0413 freq= 416.2966 PerJust78[69] = 1086 ' fractional midi note: 68.6675 freq= 431.6301 PerJust78[70] = 1014 ' fractional midi note: 69.8551 freq= 462.2785 PerJust78[71] = 950 ' fractional midi note: 70.9838 freq= 493.4215 PerJust78[72] = 905 ' fractional midi note: 71.8239 freq= 517.9556 PerJust78[73] = 844 ' fractional midi note: 73.032 freq= 555.3909 PerJust78[74] = 814 ' fractional midi note: 73.6586 freq= 575.8608 PerJust78[75] = 760 ' fractional midi note: 74.8469 freq= 616.7755 PerJust78[76] = 724 ' fractional midi note: 75.687 freq= 647.4431 PerJust78[77] = 676 ' fractional midi note: 76.8746 freq= 693.4157 PerJust78[78] = 634 ' fractional midi note: 77.9851 freq= 739.3523 PerJust78[79] = 603 ' fractional midi note: 78.853 freq= 777.3621 PerJust78[80] = 563 ' fractional midi note: 80.0413 freq= 832.5932 PerJust78[81] = 543 ' fractional midi note: 80.6675 freq= 863.2603 PerJust78[82] = 507 ' fractional midi note: 81.8551 freq= 924.5569 PerJust78[83] = 475 ' fractional midi note: 82.9838 freq= 986.843 PerJust78[84] = 452 ' fractional midi note: 83.843 freq= 1037.0549 PerJust78[85] = 422 ' fractional midi note: 85.032 freq= 1110.7817 PerJust78[86] = 407 ' fractional midi note: 85.6586 freq= 1151.7217 PerJust78[87] = 380 ' fractional midi note: 86.8469 freq= 1233.5509 PerJust78[88] = 362 ' fractional midi note: 87.687 freq= 1294.8861 PerJust78[89] = 338 ' fractional midi note: 88.8746 freq= 1386.8314 PerJust78[90] = 317 ' fractional midi note: 89.9851 freq= 1478.7046 PerJust78[91] = 302 ' fractional midi note: 90.8243 freq= 1552.1494 PerJust78[92] = 282 ' fractional midi note: 92.0106 freq= 1662.2361 PerJust78[93] = 272 ' fractional midi note: 92.6356 freq= 1723.3416 PerJust78[94] = 254 ' fractional midi note: 93.821 freq= 1845.4749 PerJust78[95] = 238 ' fractional midi note: 94.9474 freq= 1969.5405 PerJust78[96] = 226 ' fractional midi note: 95.843 freq= 2074.1099 PerJust78[97] = 211 ' fractional midi note: 97.032 freq= 2221.5635 PerJust78[98] = 204 ' fractional midi note: 97.6161 freq= 2297.7952 PerJust78[99] = 190 ' fractional midi note: 98.8469 freq= 2467.1018 PerJust78[100] = 181 ' fractional midi note: 99.687 freq= 2589.7722 PerJust78[101] = 169 ' fractional midi note: 100.8746 freq= 2773.6628 PerJust78[102] = 158 ' fractional midi note: 102.0398 freq= 2966.7686 PerJust78[103] = 151 ' fractional midi note: 102.8243 freq= 3104.2988 PerJust78[104] = 141 ' fractional midi note: 104.0106 freq= 3324.4722 PerJust78[105] = 136 ' fractional midi note: 104.6356 freq= 3446.6831 PerJust78[106] = 127 ' fractional midi note: 105.821 freq= 3690.9497 PerJust78[107] = 119 ' fractional midi note: 106.9474 freq= 3939.0811 PerJust78[108] = 113 ' fractional midi note: 107.843 freq= 4148.2197 PerJust78[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust78[110] = 102 ' fractional midi note: 109.6161 freq= 4595.5903 PerJust78[111] = 95 ' fractional midi note: 110.8469 freq= 4934.2036 PerJust78[112] = 90 ' fractional midi note: 111.783 freq= 5208.3457 PerJust78[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust78[114] = 79 ' fractional midi note: 114.0398 freq= 5933.5371 PerJust78[115] = 76 ' fractional midi note: 114.7101 freq= 6167.7759 PerJust78[116] = 70 ' fractional midi note: 116.1338 freq= 6696.4287 PerJust78[117] = 68 ' fractional midi note: 116.6356 freq= 6893.3662 PerJust78[118] = 64 ' fractional midi note: 117.6852 freq= 7324.2236 PerJust78[119] = 60 ' fractional midi note: 118.8025 freq= 7812.4966 PerJust78[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust78[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust78[122] = 51 ' fractional midi note: 121.6161 freq= 9191.1807 PerJust78[123] = 48 ' fractional midi note: 122.6656 freq= 9765.6035 PerJust78[124] = 45 ' fractional midi note: 123.783 freq= 10416.6914 PerJust78[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust78[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust78[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 ' just intonation scale based on note 43 PerJust79[0] = 57392 ' fractional midi note: -.0176 freq= 8.1675 PerJust79[1] = 54672 ' fractional midi note: .823 freq= 8.5738 PerJust79[2] = 51024 ' fractional midi note: 2.0185 freq= 9.1868 PerJust79[3] = 49200 ' fractional midi note: 2.6487 freq= 9.5274 PerJust79[4] = 45920 ' fractional midi note: 3.8432 freq= 10.208 PerJust79[5] = 43728 ' fractional midi note: 4.69 freq= 10.7197 PerJust79[6] = 40816 ' fractional midi note: 5.883 freq= 11.4844 PerJust79[7] = 38264 ' fractional midi note: 7.0008 freq= 12.2504 PerJust79[8] = 36440 ' fractional midi note: 7.8464 freq= 12.8636 PerJust79[9] = 34016 ' fractional midi note: 9.0381 freq= 13.7803 PerJust79[10] = 32800 ' fractional midi note: 9.6683 freq= 14.2912 PerJust79[11] = 30616 ' fractional midi note: 10.8612 freq= 15.3106 PerJust79[12] = 28696 ' fractional midi note: 11.9824 freq= 16.335 PerJust79[13] = 27336 ' fractional midi note: 12.823 freq= 17.1477 PerJust79[14] = 25512 ' fractional midi note: 14.0185 freq= 18.3737 PerJust79[15] = 24600 ' fractional midi note: 14.6487 freq= 19.0548 PerJust79[16] = 22960 ' fractional midi note: 15.8432 freq= 20.416 PerJust79[17] = 21864 ' fractional midi note: 16.69 freq= 21.4394 PerJust79[18] = 20408 ' fractional midi note: 17.883 freq= 22.9689 PerJust79[19] = 19132 ' fractional midi note: 19.0008 freq= 24.5008 PerJust79[20] = 18220 ' fractional midi note: 19.8464 freq= 25.7273 PerJust79[21] = 17008 ' fractional midi note: 21.0381 freq= 27.5606 PerJust79[22] = 16400 ' fractional midi note: 21.6683 freq= 28.5823 PerJust79[23] = 15308 ' fractional midi note: 22.8612 freq= 30.6212 PerJust79[24] = 14348 ' fractional midi note: 23.9824 freq= 32.67 PerJust79[25] = 13668 ' fractional midi note: 24.823 freq= 34.2954 PerJust79[26] = 12756 ' fractional midi note: 26.0185 freq= 36.7473 PerJust79[27] = 12300 ' fractional midi note: 26.6487 freq= 38.1097 PerJust79[28] = 11480 ' fractional midi note: 27.8432 freq= 40.8319 PerJust79[29] = 10932 ' fractional midi note: 28.69 freq= 42.8788 PerJust79[30] = 10204 ' fractional midi note: 29.883 freq= 45.9378 PerJust79[31] = 9566 ' fractional midi note: 31.0008 freq= 49.0017 PerJust79[32] = 9110 ' fractional midi note: 31.8464 freq= 51.4545 PerJust79[33] = 8504 ' fractional midi note: 33.0381 freq= 55.1212 PerJust79[34] = 8200 ' fractional midi note: 33.6683 freq= 57.1647 PerJust79[35] = 7654 ' fractional midi note: 34.8612 freq= 61.2424 PerJust79[36] = 7174 ' fractional midi note: 35.9824 freq= 65.3399 PerJust79[37] = 6834 ' fractional midi note: 36.823 freq= 68.5908 PerJust79[38] = 6378 ' fractional midi note: 38.0185 freq= 73.4947 PerJust79[39] = 6150 ' fractional midi note: 38.6487 freq= 76.2193 PerJust79[40] = 5740 ' fractional midi note: 39.8432 freq= 81.6639 PerJust79[41] = 5466 ' fractional midi note: 40.69 freq= 85.7576 PerJust79[42] = 5102 ' fractional midi note: 41.883 freq= 91.8756 PerJust79[43] = 4783 ' fractional midi note: 43.0008 freq= 98.0034 PerJust79[44] = 4555 ' fractional midi note: 43.8464 freq= 102.9091 PerJust79[45] = 4252 ' fractional midi note: 45.0381 freq= 110.2424 PerJust79[46] = 4100 ' fractional midi note: 45.6683 freq= 114.3293 PerJust79[47] = 3827 ' fractional midi note: 46.8612 freq= 122.4849 PerJust79[48] = 3587 ' fractional midi note: 47.9824 freq= 130.6799 PerJust79[49] = 3417 ' fractional midi note: 48.823 freq= 137.1816 PerJust79[50] = 3189 ' fractional midi note: 50.0185 freq= 146.9894 PerJust79[51] = 3075 ' fractional midi note: 50.6487 freq= 152.4386 PerJust79[52] = 2870 ' fractional midi note: 51.8432 freq= 163.3278 PerJust79[53] = 2733 ' fractional midi note: 52.69 freq= 171.5152 PerJust79[54] = 2551 ' fractional midi note: 53.883 freq= 183.7512 PerJust79[55] = 2392 ' fractional midi note: 54.9972 freq= 195.966 PerJust79[56] = 2278 ' fractional midi note: 55.8426 freq= 205.773 PerJust79[57] = 2126 ' fractional midi note: 57.0381 freq= 220.4847 PerJust79[58] = 2050 ' fractional midi note: 57.6683 freq= 228.6586 PerJust79[59] = 1914 ' fractional midi note: 58.8567 freq= 244.9061 PerJust79[60] = 1794 ' fractional midi note: 59.9776 freq= 261.2873 PerJust79[61] = 1708 ' fractional midi note: 60.8281 freq= 274.444 PerJust79[62] = 1594 ' fractional midi note: 62.024 freq= 294.0721 PerJust79[63] = 1538 ' fractional midi note: 62.6431 freq= 304.7787 PerJust79[64] = 1435 ' fractional midi note: 63.8432 freq= 326.6556 PerJust79[65] = 1366 ' fractional midi note: 64.6963 freq= 343.1553 PerJust79[66] = 1276 ' fractional midi note: 65.8762 freq= 367.358 PerJust79[67] = 1196 ' fractional midi note: 66.9972 freq= 391.9321 PerJust79[68] = 1139 ' fractional midi note: 67.8426 freq= 411.5459 PerJust79[69] = 1063 ' fractional midi note: 69.0381 freq= 440.9695 PerJust79[70] = 1025 ' fractional midi note: 69.6683 freq= 457.3171 PerJust79[71] = 957 ' fractional midi note: 70.8567 freq= 489.8121 PerJust79[72] = 897 ' fractional midi note: 71.9776 freq= 522.5746 PerJust79[73] = 854 ' fractional midi note: 72.8281 freq= 548.8881 PerJust79[74] = 797 ' fractional midi note: 74.024 freq= 588.1444 PerJust79[75] = 769 ' fractional midi note: 74.6431 freq= 609.5573 PerJust79[76] = 718 ' fractional midi note: 75.8311 freq= 652.8547 PerJust79[77] = 683 ' fractional midi note: 76.6963 freq= 686.3106 PerJust79[78] = 638 ' fractional midi note: 77.8762 freq= 734.716 PerJust79[79] = 598 ' fractional midi note: 78.9972 freq= 783.8641 PerJust79[80] = 570 ' fractional midi note: 79.8274 freq= 822.3696 PerJust79[81] = 532 ' fractional midi note: 81.0218 freq= 881.1087 PerJust79[82] = 512 ' fractional midi note: 81.6852 freq= 915.528 PerJust79[83] = 478 ' fractional midi note: 82.8748 freq= 980.6492 PerJust79[84] = 448 ' fractional midi note: 83.9969 freq= 1046.3151 PerJust79[85] = 427 ' fractional midi note: 84.8281 freq= 1097.7762 PerJust79[86] = 398 ' fractional midi note: 86.0457 freq= 1177.764 PerJust79[87] = 384 ' fractional midi note: 86.6656 freq= 1220.7004 PerJust79[88] = 359 ' fractional midi note: 87.8311 freq= 1305.7095 PerJust79[89] = 342 ' fractional midi note: 88.671 freq= 1370.6168 PerJust79[90] = 319 ' fractional midi note: 89.8762 freq= 1469.432 PerJust79[91] = 299 ' fractional midi note: 90.9972 freq= 1567.7283 PerJust79[92] = 285 ' fractional midi note: 91.8274 freq= 1644.7393 PerJust79[93] = 266 ' fractional midi note: 93.0218 freq= 1762.2174 PerJust79[94] = 256 ' fractional midi note: 93.6852 freq= 1831.0559 PerJust79[95] = 239 ' fractional midi note: 94.8748 freq= 1961.2983 PerJust79[96] = 224 ' fractional midi note: 95.9969 freq= 2092.6301 PerJust79[97] = 214 ' fractional midi note: 96.7876 freq= 2190.4216 PerJust79[98] = 199 ' fractional midi note: 98.0457 freq= 2355.5281 PerJust79[99] = 192 ' fractional midi note: 98.6656 freq= 2441.4009 PerJust79[100] = 180 ' fractional midi note: 99.783 freq= 2604.1729 PerJust79[101] = 171 ' fractional midi note: 100.671 freq= 2741.2336 PerJust79[102] = 160 ' fractional midi note: 101.8221 freq= 2929.6946 PerJust79[103] = 150 ' fractional midi note: 102.9394 freq= 3125.0056 PerJust79[104] = 142 ' fractional midi note: 103.8882 freq= 3301.051 PerJust79[105] = 133 ' fractional midi note: 105.0218 freq= 3524.4348 PerJust79[106] = 128 ' fractional midi note: 105.6852 freq= 3662.1118 PerJust79[107] = 120 ' fractional midi note: 106.8025 freq= 3906.2483 PerJust79[108] = 112 ' fractional midi note: 107.9969 freq= 4185.2603 PerJust79[109] = 107 ' fractional midi note: 108.7876 freq= 4380.8433 PerJust79[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust79[111] = 96 ' fractional midi note: 110.6656 freq= 4882.8018 PerJust79[112] = 90 ' fractional midi note: 111.783 freq= 5208.3457 PerJust79[113] = 86 ' fractional midi note: 112.57 freq= 5450.5767 PerJust79[114] = 80 ' fractional midi note: 113.8221 freq= 5859.3892 PerJust79[115] = 75 ' fractional midi note: 114.9394 freq= 6250.0112 PerJust79[116] = 71 ' fractional midi note: 115.8882 freq= 6602.1021 PerJust79[117] = 66 ' fractional midi note: 117.1525 freq= 7102.2866 PerJust79[118] = 64 ' fractional midi note: 117.6852 freq= 7324.2236 PerJust79[119] = 60 ' fractional midi note: 118.8025 freq= 7812.4966 PerJust79[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust79[121] = 54 ' fractional midi note: 120.6265 freq= 8680.5361 PerJust79[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust79[123] = 48 ' fractional midi note: 122.6656 freq= 9765.6035 PerJust79[124] = 45 ' fractional midi note: 123.783 freq= 10416.6914 PerJust79[125] = 43 ' fractional midi note: 124.57 freq= 10901.1533 PerJust79[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust79[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 ' just intonation scale based on note 44 PerJust80[0] = 57792 ' fractional midi note: -.1378 freq= 8.111 PerJust80[1] = 54176 ' fractional midi note: .9808 freq= 8.6524 PerJust80[2] = 51600 ' fractional midi note: 1.8242 freq= 9.0843 PerJust80[3] = 48160 ' fractional midi note: 3.0186 freq= 9.7332 PerJust80[4] = 46432 ' fractional midi note: 3.6512 freq= 10.0954 PerJust80[5] = 43344 ' fractional midi note: 4.8427 freq= 10.8147 PerJust80[6] = 41280 ' fractional midi note: 5.6873 freq= 11.3554 PerJust80[7] = 38528 ' fractional midi note: 6.8818 freq= 12.1665 PerJust80[8] = 36120 ' fractional midi note: 7.9991 freq= 12.9776 PerJust80[9] = 34400 ' fractional midi note: 8.8437 freq= 13.6264 PerJust80[10] = 32104 ' fractional midi note: 10.0396 freq= 14.601 PerJust80[11] = 30960 ' fractional midi note: 10.6678 freq= 15.1405 PerJust80[12] = 28896 ' fractional midi note: 11.8622 freq= 16.222 PerJust80[13] = 27088 ' fractional midi note: 12.9808 freq= 17.3047 PerJust80[14] = 25800 ' fractional midi note: 13.8242 freq= 18.1686 PerJust80[15] = 24080 ' fractional midi note: 15.0186 freq= 19.4663 PerJust80[16] = 23216 ' fractional midi note: 15.6512 freq= 20.1908 PerJust80[17] = 21672 ' fractional midi note: 16.8427 freq= 21.6293 PerJust80[18] = 20640 ' fractional midi note: 17.6873 freq= 22.7107 PerJust80[19] = 19264 ' fractional midi note: 18.8818 freq= 24.333 PerJust80[20] = 18060 ' fractional midi note: 19.9991 freq= 25.9552 PerJust80[21] = 17200 ' fractional midi note: 20.8437 freq= 27.2528 PerJust80[22] = 16052 ' fractional midi note: 22.0396 freq= 29.202 PerJust80[23] = 15480 ' fractional midi note: 22.6678 freq= 30.281 PerJust80[24] = 14448 ' fractional midi note: 23.8622 freq= 32.4439 PerJust80[25] = 13544 ' fractional midi note: 24.9808 freq= 34.6094 PerJust80[26] = 12900 ' fractional midi note: 25.8242 freq= 36.3372 PerJust80[27] = 12040 ' fractional midi note: 27.0186 freq= 38.9327 PerJust80[28] = 11608 ' fractional midi note: 27.6512 freq= 40.3816 PerJust80[29] = 10836 ' fractional midi note: 28.8427 freq= 43.2587 PerJust80[30] = 10320 ' fractional midi note: 29.6873 freq= 45.4214 PerJust80[31] = 9632 ' fractional midi note: 30.8818 freq= 48.666 PerJust80[32] = 9030 ' fractional midi note: 31.9991 freq= 51.9104 PerJust80[33] = 8600 ' fractional midi note: 32.8437 freq= 54.5057 PerJust80[34] = 8026 ' fractional midi note: 34.0396 freq= 58.4039 PerJust80[35] = 7740 ' fractional midi note: 34.6678 freq= 60.5621 PerJust80[36] = 7224 ' fractional midi note: 35.8622 freq= 64.8879 PerJust80[37] = 6772 ' fractional midi note: 36.9808 freq= 69.2189 PerJust80[38] = 6450 ' fractional midi note: 37.8242 freq= 72.6745 PerJust80[39] = 6020 ' fractional midi note: 39.0186 freq= 77.8654 PerJust80[40] = 5804 ' fractional midi note: 39.6512 freq= 80.7632 PerJust80[41] = 5418 ' fractional midi note: 40.8427 freq= 86.5174 PerJust80[42] = 5160 ' fractional midi note: 41.6873 freq= 90.8429 PerJust80[43] = 4816 ' fractional midi note: 42.8818 freq= 97.3321 PerJust80[44] = 4515 ' fractional midi note: 43.9991 freq= 103.8208 PerJust80[45] = 4300 ' fractional midi note: 44.8437 freq= 109.0114 PerJust80[46] = 4013 ' fractional midi note: 46.0396 freq= 116.8078 PerJust80[47] = 3870 ' fractional midi note: 46.6678 freq= 121.1242 PerJust80[48] = 3612 ' fractional midi note: 47.8622 freq= 129.7757 PerJust80[49] = 3386 ' fractional midi note: 48.9808 freq= 138.4377 PerJust80[50] = 3225 ' fractional midi note: 49.8242 freq= 145.3489 PerJust80[51] = 3010 ' fractional midi note: 51.0186 freq= 155.7307 PerJust80[52] = 2902 ' fractional midi note: 51.6512 freq= 161.5264 PerJust80[53] = 2709 ' fractional midi note: 52.8427 freq= 173.0348 PerJust80[54] = 2580 ' fractional midi note: 53.6873 freq= 181.6858 PerJust80[55] = 2408 ' fractional midi note: 54.8818 freq= 194.6641 PerJust80[56] = 2258 ' fractional midi note: 55.9952 freq= 207.5948 PerJust80[57] = 2150 ' fractional midi note: 56.8437 freq= 218.0227 PerJust80[58] = 2006 ' fractional midi note: 58.0439 freq= 233.6737 PerJust80[59] = 1935 ' fractional midi note: 58.6678 freq= 242.2484 PerJust80[60] = 1806 ' fractional midi note: 59.8622 freq= 259.5514 PerJust80[61] = 1693 ' fractional midi note: 60.9808 freq= 276.8754 PerJust80[62] = 1612 ' fractional midi note: 61.8296 freq= 290.7885 PerJust80[63] = 1505 ' fractional midi note: 63.0186 freq= 311.4615 PerJust80[64] = 1451 ' fractional midi note: 63.6512 freq= 323.0529 PerJust80[65] = 1354 ' fractional midi note: 64.849 freq= 346.1955 PerJust80[66] = 1290 ' fractional midi note: 65.6873 freq= 363.3715 PerJust80[67] = 1204 ' fractional midi note: 66.8818 freq= 389.3282 PerJust80[68] = 1129 ' fractional midi note: 67.9952 freq= 415.1896 PerJust80[69] = 1075 ' fractional midi note: 68.8437 freq= 436.0454 PerJust80[70] = 1003 ' fractional midi note: 70.0439 freq= 467.3474 PerJust80[71] = 968 ' fractional midi note: 70.6588 freq= 484.2449 PerJust80[72] = 903 ' fractional midi note: 71.8622 freq= 519.1027 PerJust80[73] = 846 ' fractional midi note: 72.991 freq= 554.0771 PerJust80[74] = 806 ' fractional midi note: 73.8296 freq= 581.577 PerJust80[75] = 752 ' fractional midi note: 75.0301 freq= 623.3367 PerJust80[76] = 726 ' fractional midi note: 75.6393 freq= 645.6617 PerJust80[77] = 677 ' fractional midi note: 76.849 freq= 692.3909 PerJust80[78] = 645 ' fractional midi note: 77.6873 freq= 726.743 PerJust80[79] = 602 ' fractional midi note: 78.8818 freq= 778.6564 PerJust80[80] = 564 ' fractional midi note: 80.0106 freq= 831.118 PerJust80[81] = 538 ' fractional midi note: 80.8276 freq= 871.2802 PerJust80[82] = 502 ' fractional midi note: 82.0267 freq= 933.7667 PerJust80[83] = 484 ' fractional midi note: 82.6588 freq= 968.4897 PerJust80[84] = 452 ' fractional midi note: 83.843 freq= 1037.0549 PerJust80[85] = 423 ' fractional midi note: 84.991 freq= 1108.1542 PerJust80[86] = 403 ' fractional midi note: 85.8296 freq= 1163.1539 PerJust80[87] = 376 ' fractional midi note: 87.0301 freq= 1246.6735 PerJust80[88] = 363 ' fractional midi note: 87.6393 freq= 1291.3234 PerJust80[89] = 338 ' fractional midi note: 88.8746 freq= 1386.8314 PerJust80[90] = 322 ' fractional midi note: 89.7142 freq= 1455.7465 PerJust80[91] = 301 ' fractional midi note: 90.8818 freq= 1557.3127 PerJust80[92] = 282 ' fractional midi note: 92.0106 freq= 1662.2361 PerJust80[93] = 269 ' fractional midi note: 92.8276 freq= 1742.5604 PerJust80[94] = 251 ' fractional midi note: 94.0267 freq= 1867.5334 PerJust80[95] = 242 ' fractional midi note: 94.6588 freq= 1936.9795 PerJust80[96] = 226 ' fractional midi note: 95.843 freq= 2074.1099 PerJust80[97] = 212 ' fractional midi note: 96.9501 freq= 2211.0793 PerJust80[98] = 202 ' fractional midi note: 97.7867 freq= 2320.5503 PerJust80[99] = 188 ' fractional midi note: 99.0301 freq= 2493.3469 PerJust80[100] = 182 ' fractional midi note: 99.5917 freq= 2575.5554 PerJust80[101] = 169 ' fractional midi note: 100.8746 freq= 2773.6628 PerJust80[102] = 161 ' fractional midi note: 101.7142 freq= 2911.4929 PerJust80[103] = 150 ' fractional midi note: 102.9394 freq= 3125.0056 PerJust80[104] = 141 ' fractional midi note: 104.0106 freq= 3324.4722 PerJust80[105] = 134 ' fractional midi note: 104.8921 freq= 3498.1294 PerJust80[106] = 126 ' fractional midi note: 105.9578 freq= 3720.2312 PerJust80[107] = 121 ' fractional midi note: 106.6588 freq= 3873.959 PerJust80[108] = 113 ' fractional midi note: 107.843 freq= 4148.2197 PerJust80[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust80[110] = 101 ' fractional midi note: 109.7867 freq= 4641.1006 PerJust80[111] = 94 ' fractional midi note: 111.0301 freq= 4986.6938 PerJust80[112] = 91 ' fractional midi note: 111.5917 freq= 5151.1108 PerJust80[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust80[114] = 80 ' fractional midi note: 113.8221 freq= 5859.3892 PerJust80[115] = 75 ' fractional midi note: 114.9394 freq= 6250.0112 PerJust80[116] = 70 ' fractional midi note: 116.1338 freq= 6696.4287 PerJust80[117] = 67 ' fractional midi note: 116.8921 freq= 6996.2588 PerJust80[118] = 63 ' fractional midi note: 117.9578 freq= 7440.4624 PerJust80[119] = 60 ' fractional midi note: 118.8025 freq= 7812.4966 PerJust80[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust80[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust80[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust80[123] = 47 ' fractional midi note: 123.0301 freq= 9973.3877 PerJust80[124] = 46 ' fractional midi note: 123.4025 freq= 10190.2451 PerJust80[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust80[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust80[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 ' just intonation scale based on note 45 PerJust81[0] = 58448 ' fractional midi note: -.3332 freq= 8.0199 PerJust81[1] = 54544 ' fractional midi note: .8636 freq= 8.594 PerJust81[2] = 51136 ' fractional midi note: 1.9806 freq= 9.1667 PerJust81[3] = 48704 ' fractional midi note: 2.8242 freq= 9.6245 PerJust81[4] = 45456 ' fractional midi note: 4.019 freq= 10.3122 PerJust81[5] = 43824 ' fractional midi note: 4.652 freq= 10.6962 PerJust81[6] = 40912 ' fractional midi note: 5.8424 freq= 11.4575 PerJust81[7] = 38960 ' fractional midi note: 6.6887 freq= 12.0316 PerJust81[8] = 36368 ' fractional midi note: 7.8806 freq= 12.8891 PerJust81[9] = 34088 ' fractional midi note: 9.0015 freq= 13.7512 PerJust81[10] = 32464 ' fractional midi note: 9.8466 freq= 14.4391 PerJust81[11] = 30304 ' fractional midi note: 11.0385 freq= 15.4682 PerJust81[12] = 29224 ' fractional midi note: 11.6668 freq= 16.0399 PerJust81[13] = 27272 ' fractional midi note: 12.8636 freq= 17.188 PerJust81[14] = 25568 ' fractional midi note: 13.9806 freq= 18.3335 PerJust81[15] = 24352 ' fractional midi note: 14.8242 freq= 19.249 PerJust81[16] = 22728 ' fractional midi note: 16.019 freq= 20.6243 PerJust81[17] = 21912 ' fractional midi note: 16.652 freq= 21.3924 PerJust81[18] = 20456 ' fractional midi note: 17.8424 freq= 22.9151 PerJust81[19] = 19480 ' fractional midi note: 18.6887 freq= 24.0631 PerJust81[20] = 18184 ' fractional midi note: 19.8806 freq= 25.7781 PerJust81[21] = 17044 ' fractional midi note: 21.0015 freq= 27.5024 PerJust81[22] = 16232 ' fractional midi note: 21.8466 freq= 28.8782 PerJust81[23] = 15152 ' fractional midi note: 23.0385 freq= 30.9364 PerJust81[24] = 14612 ' fractional midi note: 23.6668 freq= 32.0798 PerJust81[25] = 13636 ' fractional midi note: 24.8636 freq= 34.3759 PerJust81[26] = 12784 ' fractional midi note: 25.9806 freq= 36.667 PerJust81[27] = 12176 ' fractional midi note: 26.8242 freq= 38.498 PerJust81[28] = 11364 ' fractional midi note: 28.019 freq= 41.2487 PerJust81[29] = 10956 ' fractional midi note: 28.652 freq= 42.7848 PerJust81[30] = 10228 ' fractional midi note: 29.8424 freq= 45.8302 PerJust81[31] = 9740 ' fractional midi note: 30.6887 freq= 48.1262 PerJust81[32] = 9092 ' fractional midi note: 31.8806 freq= 51.5563 PerJust81[33] = 8522 ' fractional midi note: 33.0015 freq= 55.0048 PerJust81[34] = 8116 ' fractional midi note: 33.8466 freq= 57.7564 PerJust81[35] = 7576 ' fractional midi note: 35.0385 freq= 61.8729 PerJust81[36] = 7306 ' fractional midi note: 35.6668 freq= 64.1596 PerJust81[37] = 6818 ' fractional midi note: 36.8636 freq= 68.7518 PerJust81[38] = 6392 ' fractional midi note: 37.9806 freq= 73.334 PerJust81[39] = 6088 ' fractional midi note: 38.8242 freq= 76.9959 PerJust81[40] = 5682 ' fractional midi note: 40.019 freq= 82.4974 PerJust81[41] = 5478 ' fractional midi note: 40.652 freq= 85.5696 PerJust81[42] = 5114 ' fractional midi note: 41.8424 freq= 91.6604 PerJust81[43] = 4870 ' fractional midi note: 42.6887 freq= 96.2525 PerJust81[44] = 4546 ' fractional midi note: 43.8806 freq= 103.1126 PerJust81[45] = 4261 ' fractional midi note: 45.0015 freq= 110.0095 PerJust81[46] = 4058 ' fractional midi note: 45.8466 freq= 115.5129 PerJust81[47] = 3788 ' fractional midi note: 47.0385 freq= 123.7457 PerJust81[48] = 3653 ' fractional midi note: 47.6668 freq= 128.3192 PerJust81[49] = 3409 ' fractional midi note: 48.8636 freq= 137.5037 PerJust81[50] = 3196 ' fractional midi note: 49.9806 freq= 146.6679 PerJust81[51] = 3044 ' fractional midi note: 50.8242 freq= 153.9918 PerJust81[52] = 2841 ' fractional midi note: 52.019 freq= 164.9948 PerJust81[53] = 2739 ' fractional midi note: 52.652 freq= 171.1392 PerJust81[54] = 2557 ' fractional midi note: 53.8424 freq= 183.3208 PerJust81[55] = 2435 ' fractional midi note: 54.6887 freq= 192.5049 PerJust81[56] = 2273 ' fractional midi note: 55.8806 freq= 206.2251 PerJust81[57] = 2130 ' fractional midi note: 57.0055 freq= 220.0699 PerJust81[58] = 2029 ' fractional midi note: 57.8466 freq= 231.0257 PerJust81[59] = 1894 ' fractional midi note: 59.0385 freq= 247.4915 PerJust81[60] = 1826 ' fractional midi note: 59.6715 freq= 256.7081 PerJust81[61] = 1704 ' fractional midi note: 60.8687 freq= 275.0883 PerJust81[62] = 1598 ' fractional midi note: 61.9806 freq= 293.3359 PerJust81[63] = 1522 ' fractional midi note: 62.8242 freq= 307.9836 PerJust81[64] = 1420 ' fractional midi note: 64.0251 freq= 330.1058 PerJust81[65] = 1370 ' fractional midi note: 64.6457 freq= 342.1538 PerJust81[66] = 1278 ' fractional midi note: 65.8491 freq= 366.7834 PerJust81[67] = 1218 ' fractional midi note: 66.6816 freq= 384.852 PerJust81[68] = 1136 ' fractional midi note: 67.8882 freq= 412.6314 PerJust81[69] = 1065 ' fractional midi note: 69.0055 freq= 440.1399 PerJust81[70] = 1014 ' fractional midi note: 69.8551 freq= 462.2785 PerJust81[71] = 947 ' fractional midi note: 71.0385 freq= 494.9828 PerJust81[72] = 913 ' fractional midi note: 71.6715 freq= 513.4161 PerJust81[73] = 852 ' fractional midi note: 72.8687 freq= 550.1767 PerJust81[74] = 799 ' fractional midi note: 73.9806 freq= 586.6718 PerJust81[75] = 761 ' fractional midi note: 74.8242 freq= 615.9673 PerJust81[76] = 710 ' fractional midi note: 76.0251 freq= 660.2117 PerJust81[77] = 685 ' fractional midi note: 76.6457 freq= 684.3077 PerJust81[78] = 639 ' fractional midi note: 77.8491 freq= 733.5668 PerJust81[79] = 609 ' fractional midi note: 78.6816 freq= 769.704 PerJust81[80] = 568 ' fractional midi note: 79.8882 freq= 825.2628 PerJust81[81] = 532 ' fractional midi note: 81.0218 freq= 881.1087 PerJust81[82] = 507 ' fractional midi note: 81.8551 freq= 924.5569 PerJust81[83] = 474 ' fractional midi note: 83.0203 freq= 988.9257 PerJust81[84] = 456 ' fractional midi note: 83.6905 freq= 1027.9597 PerJust81[85] = 426 ' fractional midi note: 84.8687 freq= 1100.3534 PerJust81[86] = 400 ' fractional midi note: 85.9589 freq= 1171.8738 PerJust81[87] = 380 ' fractional midi note: 86.8469 freq= 1233.5509 PerJust81[88] = 355 ' fractional midi note: 88.0251 freq= 1320.4233 PerJust81[89] = 342 ' fractional midi note: 88.671 freq= 1370.6168 PerJust81[90] = 320 ' fractional midi note: 89.8221 freq= 1464.8473 PerJust81[91] = 304 ' fractional midi note: 90.7101 freq= 1541.944 PerJust81[92] = 284 ' fractional midi note: 91.8882 freq= 1650.5255 PerJust81[93] = 266 ' fractional midi note: 93.0218 freq= 1762.2174 PerJust81[94] = 254 ' fractional midi note: 93.821 freq= 1845.4749 PerJust81[95] = 237 ' fractional midi note: 95.0203 freq= 1977.8513 PerJust81[96] = 228 ' fractional midi note: 95.6905 freq= 2055.9194 PerJust81[97] = 213 ' fractional midi note: 96.8687 freq= 2200.7068 PerJust81[98] = 200 ' fractional midi note: 97.9589 freq= 2343.7476 PerJust81[99] = 190 ' fractional midi note: 98.8469 freq= 2467.1018 PerJust81[100] = 178 ' fractional midi note: 99.9764 freq= 2633.4287 PerJust81[101] = 171 ' fractional midi note: 100.671 freq= 2741.2336 PerJust81[102] = 160 ' fractional midi note: 101.8221 freq= 2929.6946 PerJust81[103] = 152 ' fractional midi note: 102.7101 freq= 3083.8879 PerJust81[104] = 142 ' fractional midi note: 103.8882 freq= 3301.051 PerJust81[105] = 133 ' fractional midi note: 105.0218 freq= 3524.4348 PerJust81[106] = 127 ' fractional midi note: 105.821 freq= 3690.9497 PerJust81[107] = 118 ' fractional midi note: 107.0935 freq= 3972.4626 PerJust81[108] = 114 ' fractional midi note: 107.6905 freq= 4111.8389 PerJust81[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust81[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust81[111] = 95 ' fractional midi note: 110.8469 freq= 4934.2036 PerJust81[112] = 89 ' fractional midi note: 111.9764 freq= 5266.8574 PerJust81[113] = 86 ' fractional midi note: 112.57 freq= 5450.5767 PerJust81[114] = 80 ' fractional midi note: 113.8221 freq= 5859.3892 PerJust81[115] = 76 ' fractional midi note: 114.7101 freq= 6167.7759 PerJust81[116] = 71 ' fractional midi note: 115.8882 freq= 6602.1021 PerJust81[117] = 66 ' fractional midi note: 117.1525 freq= 7102.2866 PerJust81[118] = 64 ' fractional midi note: 117.6852 freq= 7324.2236 PerJust81[119] = 59 ' fractional midi note: 119.0935 freq= 7944.9253 PerJust81[120] = 57 ' fractional midi note: 119.6905 freq= 8223.6777 PerJust81[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust81[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust81[123] = 48 ' fractional midi note: 122.6656 freq= 9765.6035 PerJust81[124] = 44 ' fractional midi note: 124.172 freq= 10653.3994 PerJust81[125] = 43 ' fractional midi note: 124.57 freq= 10901.1533 PerJust81[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust81[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 ' just intonation scale based on note 46 PerJust82[0] = 57200 ' fractional midi note: .0405 freq= 8.1949 PerJust82[1] = 55168 ' fractional midi note: .6667 freq= 8.4968 PerJust82[2] = 51488 ' fractional midi note: 1.8618 freq= 9.1041 PerJust82[3] = 48272 ' fractional midi note: 2.9784 freq= 9.7106 PerJust82[4] = 45968 ' fractional midi note: 3.8251 freq= 10.1973 PerJust82[5] = 42896 ' fractional midi note: 5.0225 freq= 10.9276 PerJust82[6] = 41376 ' fractional midi note: 5.6471 freq= 11.329 PerJust82[7] = 38608 ' fractional midi note: 6.8458 freq= 12.1412 PerJust82[8] = 36768 ' fractional midi note: 7.6912 freq= 12.7488 PerJust82[9] = 34320 ' fractional midi note: 8.884 freq= 13.6582 PerJust82[10] = 32176 ' fractional midi note: 10.0008 freq= 14.5683 PerJust82[11] = 30648 ' fractional midi note: 10.8431 freq= 15.2946 PerJust82[12] = 28600 ' fractional midi note: 12.0405 freq= 16.3899 PerJust82[13] = 27584 ' fractional midi note: 12.6667 freq= 16.9936 PerJust82[14] = 25744 ' fractional midi note: 13.8618 freq= 18.2081 PerJust82[15] = 24136 ' fractional midi note: 14.9784 freq= 19.4212 PerJust82[16] = 22984 ' fractional midi note: 15.8251 freq= 20.3946 PerJust82[17] = 21448 ' fractional midi note: 17.0225 freq= 21.8552 PerJust82[18] = 20688 ' fractional midi note: 17.6471 freq= 22.658 PerJust82[19] = 19304 ' fractional midi note: 18.8458 freq= 24.2825 PerJust82[20] = 18384 ' fractional midi note: 19.6912 freq= 25.4977 PerJust82[21] = 17160 ' fractional midi note: 20.884 freq= 27.3164 PerJust82[22] = 16088 ' fractional midi note: 22.0008 freq= 29.1366 PerJust82[23] = 15324 ' fractional midi note: 22.8431 freq= 30.5892 PerJust82[24] = 14300 ' fractional midi note: 24.0405 freq= 32.7798 PerJust82[25] = 13792 ' fractional midi note: 24.6667 freq= 33.9872 PerJust82[26] = 12872 ' fractional midi note: 25.8618 freq= 36.4162 PerJust82[27] = 12068 ' fractional midi note: 26.9784 freq= 38.8424 PerJust82[28] = 11492 ' fractional midi note: 27.8251 freq= 40.7893 PerJust82[29] = 10724 ' fractional midi note: 29.0225 freq= 43.7103 PerJust82[30] = 10344 ' fractional midi note: 29.6471 freq= 45.3161 PerJust82[31] = 9652 ' fractional midi note: 30.8458 freq= 48.5649 PerJust82[32] = 9192 ' fractional midi note: 31.6912 freq= 50.9953 PerJust82[33] = 8580 ' fractional midi note: 32.884 freq= 54.6327 PerJust82[34] = 8044 ' fractional midi note: 34.0008 freq= 58.2732 PerJust82[35] = 7662 ' fractional midi note: 34.8431 freq= 61.1784 PerJust82[36] = 7150 ' fractional midi note: 36.0405 freq= 65.5596 PerJust82[37] = 6896 ' fractional midi note: 36.6667 freq= 67.9743 PerJust82[38] = 6436 ' fractional midi note: 37.8618 freq= 72.8325 PerJust82[39] = 6034 ' fractional midi note: 38.9784 freq= 77.6848 PerJust82[40] = 5746 ' fractional midi note: 39.8251 freq= 81.5786 PerJust82[41] = 5362 ' fractional midi note: 41.0225 freq= 87.4206 PerJust82[42] = 5172 ' fractional midi note: 41.6471 freq= 90.6322 PerJust82[43] = 4826 ' fractional midi note: 42.8458 freq= 97.1299 PerJust82[44] = 4596 ' fractional midi note: 43.6912 freq= 101.9907 PerJust82[45] = 4290 ' fractional midi note: 44.884 freq= 109.2654 PerJust82[46] = 4022 ' fractional midi note: 46.0008 freq= 116.5463 PerJust82[47] = 3831 ' fractional midi note: 46.8431 freq= 122.3569 PerJust82[48] = 3575 ' fractional midi note: 48.0405 freq= 131.1192 PerJust82[49] = 3448 ' fractional midi note: 48.6667 freq= 135.9487 PerJust82[50] = 3218 ' fractional midi note: 49.8618 freq= 145.6649 PerJust82[51] = 3017 ' fractional midi note: 50.9784 freq= 155.3695 PerJust82[52] = 2873 ' fractional midi note: 51.8251 freq= 163.1571 PerJust82[53] = 2681 ' fractional midi note: 53.0225 freq= 174.8412 PerJust82[54] = 2586 ' fractional midi note: 53.6471 freq= 181.2643 PerJust82[55] = 2413 ' fractional midi note: 54.8458 freq= 194.2597 PerJust82[56] = 2298 ' fractional midi note: 55.6912 freq= 203.9813 PerJust82[57] = 2145 ' fractional midi note: 56.884 freq= 218.5308 PerJust82[58] = 2011 ' fractional midi note: 58.0008 freq= 233.0927 PerJust82[59] = 1916 ' fractional midi note: 58.8386 freq= 244.6502 PerJust82[60] = 1788 ' fractional midi note: 60.0356 freq= 262.1641 PerJust82[61] = 1724 ' fractional midi note: 60.6667 freq= 271.8973 PerJust82[62] = 1609 ' fractional midi note: 61.8618 freq= 291.3299 PerJust82[63] = 1508 ' fractional midi note: 62.9841 freq= 310.8414 PerJust82[64] = 1436 ' fractional midi note: 63.8311 freq= 326.4274 PerJust82[65] = 1340 ' fractional midi note: 65.029 freq= 349.8137 PerJust82[66] = 1293 ' fractional midi note: 65.6471 freq= 362.5288 PerJust82[67] = 1206 ' fractional midi note: 66.853 freq= 388.681 PerJust82[68] = 1149 ' fractional midi note: 67.6912 freq= 407.9626 PerJust82[69] = 1072 ' fractional midi note: 68.8921 freq= 437.2662 PerJust82[70] = 1006 ' fractional midi note: 69.9922 freq= 465.9539 PerJust82[71] = 958 ' fractional midi note: 70.8386 freq= 489.3004 PerJust82[72] = 894 ' fractional midi note: 72.0356 freq= 524.3282 PerJust82[73] = 862 ' fractional midi note: 72.6667 freq= 543.7947 PerJust82[74] = 804 ' fractional midi note: 73.8726 freq= 583.0232 PerJust82[75] = 754 ' fractional midi note: 74.9841 freq= 621.6828 PerJust82[76] = 718 ' fractional midi note: 75.8311 freq= 652.8547 PerJust82[77] = 670 ' fractional midi note: 77.029 freq= 699.6274 PerJust82[78] = 646 ' fractional midi note: 77.6605 freq= 725.6188 PerJust82[79] = 603 ' fractional midi note: 78.853 freq= 777.3621 PerJust82[80] = 574 ' fractional midi note: 79.7063 freq= 816.6371 PerJust82[81] = 536 ' fractional midi note: 80.8921 freq= 874.5323 PerJust82[82] = 503 ' fractional midi note: 81.9922 freq= 931.9078 PerJust82[83] = 479 ' fractional midi note: 82.8386 freq= 978.6007 PerJust82[84] = 447 ' fractional midi note: 84.0356 freq= 1048.6564 PerJust82[85] = 431 ' fractional midi note: 84.6667 freq= 1087.5895 PerJust82[86] = 402 ' fractional midi note: 85.8726 freq= 1166.0464 PerJust82[87] = 377 ' fractional midi note: 86.9841 freq= 1243.3656 PerJust82[88] = 359 ' fractional midi note: 87.8311 freq= 1305.7095 PerJust82[89] = 335 ' fractional midi note: 89.029 freq= 1399.2549 PerJust82[90] = 323 ' fractional midi note: 89.6605 freq= 1451.2377 PerJust82[91] = 302 ' fractional midi note: 90.8243 freq= 1552.1494 PerJust82[92] = 287 ' fractional midi note: 91.7063 freq= 1633.2743 PerJust82[93] = 268 ' fractional midi note: 92.8921 freq= 1749.0647 PerJust82[94] = 252 ' fractional midi note: 93.9578 freq= 1860.1156 PerJust82[95] = 240 ' fractional midi note: 94.8025 freq= 1953.1241 PerJust82[96] = 224 ' fractional midi note: 95.9969 freq= 2092.6301 PerJust82[97] = 216 ' fractional midi note: 96.6265 freq= 2170.134 PerJust82[98] = 201 ' fractional midi note: 97.8726 freq= 2332.0928 PerJust82[99] = 188 ' fractional midi note: 99.0301 freq= 2493.3469 PerJust82[100] = 180 ' fractional midi note: 99.783 freq= 2604.1729 PerJust82[101] = 168 ' fractional midi note: 100.9774 freq= 2790.1816 PerJust82[102] = 162 ' fractional midi note: 101.607 freq= 2893.5203 PerJust82[103] = 151 ' fractional midi note: 102.8243 freq= 3104.2988 PerJust82[104] = 144 ' fractional midi note: 103.6461 freq= 3255.2102 PerJust82[105] = 134 ' fractional midi note: 104.8921 freq= 3498.1294 PerJust82[106] = 126 ' fractional midi note: 105.9578 freq= 3720.2312 PerJust82[107] = 120 ' fractional midi note: 106.8025 freq= 3906.2483 PerJust82[108] = 112 ' fractional midi note: 107.9969 freq= 4185.2603 PerJust82[109] = 108 ' fractional midi note: 108.6265 freq= 4340.2681 PerJust82[110] = 100 ' fractional midi note: 109.9589 freq= 4687.4951 PerJust82[111] = 94 ' fractional midi note: 111.0301 freq= 4986.6938 PerJust82[112] = 90 ' fractional midi note: 111.783 freq= 5208.3457 PerJust82[113] = 84 ' fractional midi note: 112.9774 freq= 5580.3633 PerJust82[114] = 81 ' fractional midi note: 113.607 freq= 5787.0405 PerJust82[115] = 76 ' fractional midi note: 114.7101 freq= 6167.7759 PerJust82[116] = 72 ' fractional midi note: 115.6461 freq= 6510.4204 PerJust82[117] = 67 ' fractional midi note: 116.8921 freq= 6996.2588 PerJust82[118] = 63 ' fractional midi note: 117.9578 freq= 7440.4624 PerJust82[119] = 60 ' fractional midi note: 118.8025 freq= 7812.4966 PerJust82[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust82[121] = 54 ' fractional midi note: 120.6265 freq= 8680.5361 PerJust82[122] = 50 ' fractional midi note: 121.9589 freq= 9374.9902 PerJust82[123] = 47 ' fractional midi note: 123.0301 freq= 9973.3877 PerJust82[124] = 45 ' fractional midi note: 123.783 freq= 10416.6914 PerJust82[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust82[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust82[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 ' just intonation scale based on note 47 PerJust83[0] = 57856 ' fractional midi note: -.157 freq= 8.102 PerJust83[1] = 54000 ' fractional midi note: 1.0371 freq= 8.6805 PerJust83[2] = 52064 ' fractional midi note: 1.6692 freq= 9.0033 PerJust83[3] = 48592 ' fractional midi note: 2.864 freq= 9.6466 PerJust83[4] = 45552 ' fractional midi note: 3.9825 freq= 10.2905 PerJust83[5] = 43392 ' fractional midi note: 4.8235 freq= 10.8027 PerJust83[6] = 40496 ' fractional midi note: 6.0193 freq= 11.5752 PerJust83[7] = 39056 ' fractional midi note: 6.6461 freq= 12.002 PerJust83[8] = 36448 ' fractional midi note: 7.8426 freq= 12.8608 PerJust83[9] = 34704 ' fractional midi note: 8.6914 freq= 13.5071 PerJust83[10] = 32400 ' fractional midi note: 9.8807 freq= 14.4676 PerJust83[11] = 30368 ' fractional midi note: 11.002 freq= 15.4356 PerJust83[12] = 28928 ' fractional midi note: 11.843 freq= 16.204 PerJust83[13] = 27000 ' fractional midi note: 13.0371 freq= 17.3611 PerJust83[14] = 26032 ' fractional midi note: 13.6692 freq= 18.0067 PerJust83[15] = 24296 ' fractional midi note: 14.864 freq= 19.2933 PerJust83[16] = 22776 ' fractional midi note: 15.9825 freq= 20.5809 PerJust83[17] = 21696 ' fractional midi note: 16.8235 freq= 21.6054 PerJust83[18] = 20248 ' fractional midi note: 18.0193 freq= 23.1504 PerJust83[19] = 19528 ' fractional midi note: 18.6461 freq= 24.004 PerJust83[20] = 18224 ' fractional midi note: 19.8426 freq= 25.7216 PerJust83[21] = 17352 ' fractional midi note: 20.6914 freq= 27.0141 PerJust83[22] = 16200 ' fractional midi note: 21.8807 freq= 28.9352 PerJust83[23] = 15184 ' fractional midi note: 23.002 freq= 30.8713 PerJust83[24] = 14464 ' fractional midi note: 23.843 freq= 32.408 PerJust83[25] = 13500 ' fractional midi note: 25.0371 freq= 34.7222 PerJust83[26] = 13016 ' fractional midi note: 25.6692 freq= 36.0133 PerJust83[27] = 12148 ' fractional midi note: 26.864 freq= 38.5866 PerJust83[28] = 11388 ' fractional midi note: 27.9825 freq= 41.1618 PerJust83[29] = 10848 ' fractional midi note: 28.8235 freq= 43.2107 PerJust83[30] = 10124 ' fractional midi note: 30.0193 freq= 46.3009 PerJust83[31] = 9764 ' fractional midi note: 30.6461 freq= 48.0079 PerJust83[32] = 9112 ' fractional midi note: 31.8426 freq= 51.4432 PerJust83[33] = 8676 ' fractional midi note: 32.6914 freq= 54.0283 PerJust83[34] = 8100 ' fractional midi note: 33.8807 freq= 57.8703 PerJust83[35] = 7592 ' fractional midi note: 35.002 freq= 61.7425 PerJust83[36] = 7232 ' fractional midi note: 35.843 freq= 64.8159 PerJust83[37] = 6750 ' fractional midi note: 37.0371 freq= 69.4443 PerJust83[38] = 6508 ' fractional midi note: 37.6692 freq= 72.0267 PerJust83[39] = 6074 ' fractional midi note: 38.864 freq= 77.1731 PerJust83[40] = 5694 ' fractional midi note: 39.9825 freq= 82.3236 PerJust83[41] = 5424 ' fractional midi note: 40.8235 freq= 86.4215 PerJust83[42] = 5062 ' fractional midi note: 42.0193 freq= 92.6018 PerJust83[43] = 4882 ' fractional midi note: 42.6461 freq= 96.0159 PerJust83[44] = 4556 ' fractional midi note: 43.8426 freq= 102.8865 PerJust83[45] = 4338 ' fractional midi note: 44.6914 freq= 108.0566 PerJust83[46] = 4050 ' fractional midi note: 45.8807 freq= 115.7406 PerJust83[47] = 3796 ' fractional midi note: 47.002 freq= 123.4851 PerJust83[48] = 3616 ' fractional midi note: 47.843 freq= 129.6318 PerJust83[49] = 3375 ' fractional midi note: 49.0371 freq= 138.8887 PerJust83[50] = 3254 ' fractional midi note: 49.6692 freq= 144.0534 PerJust83[51] = 3037 ' fractional midi note: 50.864 freq= 154.3462 PerJust83[52] = 2847 ' fractional midi note: 51.9825 freq= 164.6472 PerJust83[53] = 2712 ' fractional midi note: 52.8235 freq= 172.843 PerJust83[54] = 2531 ' fractional midi note: 54.0193 freq= 185.2036 PerJust83[55] = 2441 ' fractional midi note: 54.6461 freq= 192.0318 PerJust83[56] = 2278 ' fractional midi note: 55.8426 freq= 205.773 PerJust83[57] = 2169 ' fractional midi note: 56.6914 freq= 216.1131 PerJust83[58] = 2025 ' fractional midi note: 57.8807 freq= 231.4812 PerJust83[59] = 1898 ' fractional midi note: 59.002 freq= 246.9702 PerJust83[60] = 1808 ' fractional midi note: 59.843 freq= 259.2637 PerJust83[61] = 1688 ' fractional midi note: 61.032 freq= 277.6955 PerJust83[62] = 1627 ' fractional midi note: 61.6692 freq= 288.1068 PerJust83[63] = 1518 ' fractional midi note: 62.8697 freq= 308.7941 PerJust83[64] = 1424 ' fractional midi note: 63.9764 freq= 329.1785 PerJust83[65] = 1356 ' fractional midi note: 64.8235 freq= 345.686 PerJust83[66] = 1266 ' fractional midi note: 66.0125 freq= 370.2616 PerJust83[67] = 1220 ' fractional midi note: 66.6532 freq= 384.2211 PerJust83[68] = 1139 ' fractional midi note: 67.8426 freq= 411.5459 PerJust83[69] = 1084 ' fractional midi note: 68.6994 freq= 432.4261 PerJust83[70] = 1012 ' fractional midi note: 69.8893 freq= 463.1924 PerJust83[71] = 949 ' fractional midi note: 71.002 freq= 493.9404 PerJust83[72] = 904 ' fractional midi note: 71.843 freq= 518.5275 PerJust83[73] = 844 ' fractional midi note: 73.032 freq= 555.3909 PerJust83[74] = 814 ' fractional midi note: 73.6586 freq= 575.8608 PerJust83[75] = 759 ' fractional midi note: 74.8697 freq= 617.5881 PerJust83[76] = 712 ' fractional midi note: 75.9764 freq= 658.3572 PerJust83[77] = 678 ' fractional midi note: 76.8235 freq= 691.3719 PerJust83[78] = 633 ' fractional midi note: 78.0125 freq= 740.5233 PerJust83[79] = 610 ' fractional midi note: 78.6532 freq= 768.4422 PerJust83[80] = 570 ' fractional midi note: 79.8274 freq= 822.3696 PerJust83[81] = 542 ' fractional midi note: 80.6994 freq= 864.8523 PerJust83[82] = 506 ' fractional midi note: 81.8893 freq= 926.3849 PerJust83[83] = 474 ' fractional midi note: 83.0203 freq= 988.9257 PerJust83[84] = 452 ' fractional midi note: 83.843 freq= 1037.0549 PerJust83[85] = 422 ' fractional midi note: 85.032 freq= 1110.7817 PerJust83[86] = 407 ' fractional midi note: 85.6586 freq= 1151.7217 PerJust83[87] = 380 ' fractional midi note: 86.8469 freq= 1233.5509 PerJust83[88] = 356 ' fractional midi note: 87.9764 freq= 1316.7144 PerJust83[89] = 339 ' fractional midi note: 88.8235 freq= 1382.7439 PerJust83[90] = 316 ' fractional midi note: 90.0398 freq= 1483.3843 PerJust83[91] = 305 ' fractional midi note: 90.6532 freq= 1536.8844 PerJust83[92] = 285 ' fractional midi note: 91.8274 freq= 1644.7393 PerJust83[93] = 271 ' fractional midi note: 92.6994 freq= 1729.7046 PerJust83[94] = 253 ' fractional midi note: 93.8893 freq= 1852.7698 PerJust83[95] = 237 ' fractional midi note: 95.0203 freq= 1977.8513 PerJust83[96] = 226 ' fractional midi note: 95.843 freq= 2074.1099 PerJust83[97] = 211 ' fractional midi note: 97.032 freq= 2221.5635 PerJust83[98] = 204 ' fractional midi note: 97.6161 freq= 2297.7952 PerJust83[99] = 190 ' fractional midi note: 98.8469 freq= 2467.1018 PerJust83[100] = 178 ' fractional midi note: 99.9764 freq= 2633.4287 PerJust83[101] = 170 ' fractional midi note: 100.7725 freq= 2757.3525 PerJust83[102] = 158 ' fractional midi note: 102.0398 freq= 2966.7686 PerJust83[103] = 152 ' fractional midi note: 102.7101 freq= 3083.8879 PerJust83[104] = 142 ' fractional midi note: 103.8882 freq= 3301.051 PerJust83[105] = 136 ' fractional midi note: 104.6356 freq= 3446.6831 PerJust83[106] = 126 ' fractional midi note: 105.9578 freq= 3720.2312 PerJust83[107] = 118 ' fractional midi note: 107.0935 freq= 3972.4626 PerJust83[108] = 113 ' fractional midi note: 107.843 freq= 4148.2197 PerJust83[109] = 106 ' fractional midi note: 108.9501 freq= 4422.1587 PerJust83[110] = 102 ' fractional midi note: 109.6161 freq= 4595.5903 PerJust83[111] = 95 ' fractional midi note: 110.8469 freq= 4934.2036 PerJust83[112] = 89 ' fractional midi note: 111.9764 freq= 5266.8574 PerJust83[113] = 85 ' fractional midi note: 112.7725 freq= 5514.7051 PerJust83[114] = 79 ' fractional midi note: 114.0398 freq= 5933.5371 PerJust83[115] = 76 ' fractional midi note: 114.7101 freq= 6167.7759 PerJust83[116] = 71 ' fractional midi note: 115.8882 freq= 6602.1021 PerJust83[117] = 68 ' fractional midi note: 116.6356 freq= 6893.3662 PerJust83[118] = 63 ' fractional midi note: 117.9578 freq= 7440.4624 PerJust83[119] = 59 ' fractional midi note: 119.0935 freq= 7944.9253 PerJust83[120] = 56 ' fractional midi note: 119.9969 freq= 8370.5205 PerJust83[121] = 53 ' fractional midi note: 120.9501 freq= 8844.3174 PerJust83[122] = 51 ' fractional midi note: 121.6161 freq= 9191.1807 PerJust83[123] = 48 ' fractional midi note: 122.6656 freq= 9765.6035 PerJust83[124] = 44 ' fractional midi note: 124.172 freq= 10653.3994 PerJust83[125] = 42 ' fractional midi note: 124.9774 freq= 11160.7266 PerJust83[126] = 40 ' fractional midi note: 125.8221 freq= 11718.7783 PerJust83[127] = 38 ' fractional midi note: 126.7101 freq= 12335.5518 Return ' E.O.F. HUNT_SCALE_CALCULATOR 11-30-2020 Noise_scale: Nsc[0] = 0 Nsc[1] = 32 Nsc[2] = 31 Nsc[3] = 30 Nsc[4] = 29 Nsc[5] = 28 Nsc[6] = 27 Nsc[7] = 26 Nsc[8] = 25 Nsc[9] = 24 Nsc[10] = 23 Nsc[11] = 22 Nsc[12] = 21 Nsc[13] = 20 Nsc[14] = 19 Nsc[15] = 18 Nsc[16] = 17 Nsc[17] = 16 Nsc[18] = 15 Nsc[19] = 14 Nsc[20] = 13 Nsc[21] = 12 Nsc[22] = 11 Nsc[23] = 10 Nsc[24] = 9 Nsc[25] = 8 Nsc[26] = 7 Nsc[27] = 6 Nsc[28] = 5 Nsc[29] = 4 Nsc[30] = 3 Nsc[31] = 2 Return $endif $ifdef Ampli Proc GetSusprop () For i = 0 To 127 j = (i+ 1) / 128.0 ' so allways normalised 0.0078 - 1.0 Susprop[i] = Sqr(j) ' to make it smoother 0.0883 - 1.0 Next i EndProc $endif ' EOF