cerberus_reset_lfos   xtlang


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

Implementation

(bind-func cerberus_reset_lfos
  (lambda (lfos:|4,|8,[SAMPLE,i64,i64]*||* idx:i64 frequency:SAMPLE onecycleinhz:SAMPLE phases:|4,SAMPLE|* mod_options:|4,i32|*)
    (let ((obj (aref-ptr lfos idx))
          (sine (cref (cast (aref obj 0) [void]*) osc [void]*))
          (saw (cref (cast (aref obj 1) [void]*) osc [void]*))
          (pulse (cref (cast (aref obj 2) [void]*) osc [void]*))
          (tri (cref (cast (aref obj 3) [void]*) osc [void]*))
          (opts (aref mod_options idx))
          (notedur_value (if (> (& opts LFO_OPT_NOTEDUR) 0) onecycleinhz 1.0))
          (amod_value (if (> (& opts LFO_OPT_FRQ_TO_AMP) 0) frequency 1.0))
          (fmod_value (if (> (& opts LFO_OPT_FRQ_TO_FRQ) 0) frequency 1.0)))
      ;; only the above need a phases
      (sine.phase (aref phases idx))
      (saw.mod (aref phases idx))
      (saw.pulse (aref phases idx))
      (saw.tri (aref phases idx))
      ;; also set amod + fmod
      (cset! (cast (aref obj 0) [void]*) amod amod_value float)
      (cset! (cast (aref obj 0) [void]*) fmod fmod_value float)
      (cset! (cast (aref obj 1) [void]*) amod amod_value float)
      (cset! (cast (aref obj 1) [void]*) fmod fmod_value float)
      (cset! (cast (aref obj 2) [void]*) amod amod_value float)
      (cset! (cast (aref obj 2) [void]*) fmod fmod_value float)
      (cset! (cast (aref obj 3) [void]*) amod amod_value float)
      (cset! (cast (aref obj 3) [void]*) fmod fmod_value float)


Back to Index

Similar Entries

  • analogue-load-preset    scheme
  • analogue-reset    scheme
  • analogue-save-preset    scheme
  • analogue_reset    xtlang
  • cerberus-load-preset    scheme
  • cerberus-load-state    scheme
  • cerberus-reset    scheme
  • cerberus-save-preset    scheme
  • cerberus_amp_pitch_env_cc    xtlang
  • cerberus_cc    xtlang
  • cerberus_create_lfos    xtlang
  • cerberus_delay_cc    xtlang
  • cerberus_extras_cc    xtlang
  • cerberus_filter_cc    xtlang
  • cerberus_filter_env_cc    xtlang
  • cerberus_flanger_cc    xtlang
  • cerberus_frq_from_val    xtlang
  • cerberus_fx    xtlang
  • cerberus_get_filtertype    xtlang
  • cerberus_get_lfo_waveform    xtlang
  • cerberus_get_mod_matrix    xtlang
  • cerberus_get_noisetype    xtlang
  • cerberus_get_waveform    xtlang
  • cerberus_get_wt_expr    scheme
  • cerberus_lfo1_cc    xtlang
  • cerberus_lfo2_cc    xtlang
  • cerberus_lfo3_cc    xtlang
  • cerberus_lfo4_cc    xtlang
  • cerberus_logRamp    xtlang
  • cerberus_main_cc    xtlang
  • cerberus_matrix_cc    xtlang
  • cerberus_moog_ladder_inlined    xtlang
  • cerberus_note    xtlang
  • cerberus_octave_from_val    xtlang
  • cerberus_osc1_cc    xtlang
  • cerberus_osc2_cc    xtlang
  • cerberus_osc3_cc    xtlang
  • cerberus_osc4_cc    xtlang
  • cerberus_remove_file    xtlang
  • cerberus_reset    xtlang
  • cerberus_reverb_cc    xtlang
  • cerberus_set_mod_matrix    xtlang
  • cerberus_sub_noise_cc    xtlang
  • gui_reset    xtlang
  • impc:compiler:reset-jit-compilation-queue    scheme
  • impc:ti:reset-builtin-cache    scheme
  • impc:ti:reset-closure-cache    scheme
  • impc:ti:reset-genericfunc-cache    scheme
  • impc:ti:reset-generictype-cache    scheme
  • impc:ti:reset-globalvar-cache    scheme
  • impc:ti:reset-namedtype-cache    scheme
  • impc:ti:reset-nativefunc-cache    scheme
  • impc:ti:reset-polyfunc-cache    scheme
  • impc:ti:reset-polytype-cache    scheme
  • impc:ti:reset-typealias-cache    scheme
  • impc:ti:reset-xtmacro-cache    scheme
  • reset-zone    xtlang
  • reset_view_matrix    xtlang
  • reset_zone    xtlang
  • world_reset    xtlang
  • xtm_vg_reset_matrices    xtlang
  • xtmtest-reset-results    scheme
  • xtmtest-reset-results    scheme