powered by Tobias Fuchs

Nicht angemeldet. · Kennwort vergessen · Registrieren
Forum: FAQ Allgemeine FAQ RSS
Silent Subliminals mit Audacity
edgar-rft (Moderator) #1
Mitglied seit 11/2004 · 3649 Beiträge · Wohnort: Karlsruhe
Gruppenmitgliedschaften: Benutzer, FAQ Verfasser, Globale Moderatoren
Profil anzeigen · Link auf diesen Beitrag
Betreff: Silent Subliminals mit Audacity
Wikipedia: Subliminal (Psychologie)  Karl J. Wargan: Was sind Subliminals?

Nachdem ich schon mehrere dutzend mal erklärt habe dass mein Ultraschall Plugin im hörbaren Audiofrequenzbereich nur unbrauchbaren Müll, aber keine subliminalen Botschaften erzeugt, hat carlo_muenchen tatsächlich eine brauchbare Lösung gefunden.

Originalidee siehe:


Ich habe daraus ein Plugin gebastelt, mit dem Mono und Stereo-Tonspuren bearbeitet werden können:

;nyquist plug-in
;version 1
;type process
;name "Subliminal..."
;action "Subliminal..."
;control carrier "Carrier" real "Hz" 17500 14000 20000

(setf *nyquist-srate* (/ *sound-srate* 2.0))

(setf carrier (max 14000 (min carrier (- *nyquist-srate* 3000))))

;; We have two Nyquist frequencies, carrier/2 and *sound-srate*/2.
;; The CUTOFF is the maximum allowed frequency in the modulator.
;; It must not be greater than carrier/2, but also not greater than
;; the difference between the carrier and *sound-srate*/2, because
;; otherwise the modulated carrier aliases.

(setf cutoff (min (/ carrier 2.0) (- *nyquist-srate* carrier)))

(defun cut (function sound frequency)
  (dotimes (ignore 10 sound)
    (setf sound (funcall function sound frequency))))

(defun subliminal (sound)
  (let ((result (mult 2 (cut #'lowpass8 (hp sound 80) cutoff)
                        (hzosc carrier))))
    (cut #'highpass8 result carrier)))

(if (< *sound-srate* 44100)
    ;; (princ "The track sample frequency must be minimum 44100Hz.")
    (princ "Die Samplefrequenz der Tonspur muss mindestens 44100Hz sein.")
    (multichan-expand #'subliminal s))

Anleitung für Gäste: Text aus dem Kasten in einen Texteditor kopieren (Text mit der Maus markieren, Strg+c drücken, Texteditor aufmachen - Windows Notepad o.ä. - und mit Strg+v einfügen). Textdatei dann in Audacity/Plug-Ins als "subliminal.ny" speichern, wichtig: Dateiendung muss ".ny" sein, sonst erkennt Audacity den Text nicht als Plugin.

Anleitung für Forumsmitglieder: Die "subliminal.ny" Datei von hier unten mit "Rechtsklick > Speichern unter" im Audacity "Plug-Ins" Ordner speichern.

Beim nächsten Start von Audacity erscheint dann ein "Subliminal" Plugin in der unteren Hälfte des "Effekt" Menüs.
Im Effekt-Fenster kann dann auch nochmal die Trägerfrequenz ("Carrier") eingestellt werden, Voreinstellung ist 17500Hz.

Die beste Sprachübertragung ist bei einer "Carrier" Frequenz von "Tonspur-Samplefrequenz geteilt durch 2, geteilt durch Wurzel-aus-zwei".
Das bedeutet bei 44100Hz zum Beispiel "44100Hz / 2 / 1.414... = 15592Hz".

P.S.: Es gibt im internationalen Audacity Forum eine englische Diskussion zum gleichen Plugin unter: Silent Subliminals [solved?]
Deutsche Handbücher und Onlinehilfe findet ihr unter "Bitte zuerst lesen", "Informationen und Fragen zur Webseite" und "Allgemeine FAQ"
Der Autor hat eine Datei an diesen Beitrag angehängt:
subliminal.ny 1.137 Bytes
Du hast keine Berechtigung, diese Datei zu öffnen.
Dieser Beitrag wurde 12 mal verändert, zuletzt am 22.09.2011, 09:40 von edgar-rft.
Schließen Kleiner – Größer + Auf diesen Beitrag antworten:
Prüfcode: VeriCode Gib bitte das Wort aus dem Bild ins folgende Textfeld ein. (Nur die Buchstaben eingeben, Kleinschreibung ist in Ordnung.)
Smileys: :-) ;-) :-D :-p :blush: :cool: :rolleyes: :huh: :-/ <_< :-( :'( :#: :scared: 8-( :nuts: :-O
Weitere Zeichen:
Gehe zu Forum
This board is powered by the Unclassified NewsBoard software, 20120620-dev, © 2003-2011 by Yves Goergen
Aktuelle Zeit: 27.02.2017, 14:35:06 (UTC +01:00)