flanger_cc   xtlang


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/libs/core/instruments/analogue_midi.xtm

Implementation

(bind-func flanger_cc
  (lambda ()
    (let ((val 0.0:f)
          (delay_fine 10.0)
          (range_fine 0.0)
          (delay_course 300.0)
          (range_course 0.0))
      (lambda (inst offset:i32 cc:i32 value:i32)
        (set! val (/ (i32tof value) 127.0))
        (cond ((= cc (+ offset 0)) ;; flanger mix
               (set_flanger_mix inst val))
              ((= cc (+ offset 1)) ;; low mark in ms
               (set! delay_fine (* 10.0 val))
               (set_flanger_low inst (+ delay_course delay_fine)))
              ((= cc (+ offset 2)) ;; delay range
               (set! delay_course (* val 100.0))
               (set_flanger_low inst (+ delay_course delay_fine)))
              ((= cc (+ offset 3)) ;; high mark in ms
               (set! range_fine (* 20.0 val))
               (set_flanger_high inst (+ range_course range_fine)))
              ((= cc (+ offset 4)) ;; range range
               (set! range_course (* val 200.0))
               (set_flanger_high inst (+ range_course range_fine)))
              ((= cc (+ offset 5)) ;; flanger rate
               (set_flanger_rate inst (* 0.25 val)))
              ((= cc (+ offset 6)) ;; flanger feedback
               (set_flanger_fb inst (* 0.999 val))))))))


Back to Index

Similar Entries

  • Cconj    xtlang
  • Ccos    xtlang
  • Ccosh    xtlang
  • Ccot    xtlang
  • Ccoth    xtlang
  • Ccsc    xtlang
  • Ccsch    xtlang
  • MCC    xtlang
  • PARAM_FLANGER_FB    scheme
  • PARAM_FLANGER_HIGH    scheme
  • PARAM_FLANGER_LOW    scheme
  • PARAM_FLANGER_RATE    scheme
  • PmEvent_cc_p    xtlang
  • amp_pitch_env_cc    xtlang
  • analogue_cc    xtlang
  • call/cc    scheme
  • cc0    scheme
  • cc1    scheme
  • cc2    scheme
  • cc3    scheme
  • cc4    scheme
  • cerberus_amp_pitch_env_cc    xtlang
  • cerberus_cc    xtlang
  • cerberus_delay_cc    xtlang
  • cerberus_extras_cc    xtlang
  • cerberus_filter_cc    xtlang
  • cerberus_filter_env_cc    xtlang
  • cerberus_flanger_cc    xtlang
  • cerberus_lfo1_cc    xtlang
  • cerberus_lfo2_cc    xtlang
  • cerberus_lfo3_cc    xtlang
  • cerberus_lfo4_cc    xtlang
  • cerberus_main_cc    xtlang
  • cerberus_matrix_cc    xtlang
  • cerberus_osc1_cc    xtlang
  • cerberus_osc2_cc    xtlang
  • cerberus_osc3_cc    xtlang
  • cerberus_osc4_cc    xtlang
  • cerberus_reverb_cc    xtlang
  • cerberus_sub_noise_cc    xtlang
  • delay_cc    xtlang
  • extras_cc    xtlang
  • filter_cc    xtlang
  • filter_env_cc    xtlang
  • get_analogue_synth_cc_name    xtlang
  • lfo1_cc    xtlang
  • lfo2_cc    xtlang
  • lfo3_cc    xtlang
  • lfo4_cc    xtlang
  • main_cc    xtlang
  • matrix_cc    xtlang
  • mcc    macro
  • midi-cc    scheme
  • midi_cc    xtlang
  • midi_cc    xtlang
  • midi_cc    xtlang
  • midi_cc    xtlang
  • osc1_cc    xtlang
  • osc2_cc    xtlang
  • osc3_cc    xtlang
  • osc4_cc    xtlang
  • reverb_cc    xtlang
  • rtmidi_default_callback:RtMidiCCallback    xtlang
  • send-midi-cc    scheme
  • set_flanger    xtlang
  • sub_noise_cc    xtlang
  • succ    scheme