(princ "The track sample frequency must be minimum 44100Hz.") (let ((result (mult 2 (cut #'lowpass8 (hp sound 80) cutoff) (setf sound (funcall function sound frequency)))) otherwise the modulated carrier aliases. the difference between the carrier and *sound-srate*/2, because It must not be greater than carrier/2, but also not greater than The CUTOFF is the maximum allowed frequency in the modulator. We have two Nyquist frequencies, carrier/2 and *sound-srate*/2. I cannot find any aliasing or mirror frequencies with the Audacity “Analyse > Frequency Analysis” and everything looks pretty well. It works with a cheap 44.1kHz standard soundcard. I think I have a finally working Silent Subliminal plugin producing an SSB modulated carrier like the original Lowerey machine. Audacity_1.2.x > Mac OS X > Silent Subliminal Function.With some help of a professional hypnotist (in the medical sense, not in the humbug sense) and Steve’s code from: To download latest version (recommended):
0 Comments
Leave a Reply. |
Details
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |