-
Forum: Sonstige Fragen zu Delphi
Delphi
by dizzy,
26. Jul 2004
Oh mann... Es geht viel einfacher :wall:! Kommando zurück! Ich hab den ganzen Quark nochmal angehängt.
Es gibt jetzt nur noch 2 Arrays. ChL und ChR. 8 Bit Daten werden zunächst nach 16 Bit konvertiert, und bei Mono landet alles im linken Kanal (ChL) und Stereo in beiden.
Das Array ist nun DOCH wieder ein array of SmallInt, nicht Word, da man sich den Kram mit dem xor $8000 dann...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by dizzy,
25. Jul 2004
Ich weiss nicht in wie weit da Visualisierung unterstützt wird, aber das sollte man wenn möglich mit der bass.dll oder fmod machen. Ansonsten könnte das Synchonisieren von Anzeige und Sound seeeehhhhrrrrr schwer werden.
-
Forum: Sonstige Fragen zu Delphi
Delphi
by dizzy,
25. Jul 2004
Ich habs! Ich habs! :hello: :bounce1: :bouncing4:
In den Specs steht, dass bei 16 Bit Waves die Bytes vertauscht im Word stehen... Aber so ganz stimmte das scheinbar nicht, denn die Delphi-Funktion "Swap" macht den Rücktausch, und damit waren die Waves falsch behandelt!
Nach kurzer Betrachtung der gezeichneten Rohdaten fiel es mir wie Schuppen von den Augen!
Pack mal in die Unit2 folgende...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by dizzy,
25. Jul 2004
Hab zur Zeit Zeit. :) Und ich bin ein großer Freund von solchen "Spielereien", und zu dem lerne ich an solchen Kleinigkeiten immer am meisten. :thuimb:
Mööö! Warum denkst du das gleiche Zeugs wie ich? :lol:
Könnte ein Weg sein, müsste man prüfen. Ich fummel heut Abend auch noch etwas, jetzt muss ich erst kurz weg. Aber das will ich heute noch gelöst sehen :)
Naja, ein Integral ist...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by dizzy,
25. Jul 2004
Ja, das hatte ich gestern Nacht auch noch ausprobiert, und kam zum selben Ergebnis. (Auch logisch eigentlich, da es ja im wesentlichen Sinuskurven sind, und deren Integral über 2*Pi = 0 ist. Und es ist recht wahrscheinlich ein Intervall mit sehr niedrigem Integral zu erwischen...) Mit 8-Bit Waves gehts aber, da die Werte (0 bis 255) vorkommen, und nicht (-32786 bis 32785).
DIE Idee kam mir...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by dizzy,
24. Jul 2004
Das kann auch jetzt noch passieren. Nämlich dann, wenn zwar der Wave-Header soweit verstanden wird, aber der Typ der Daten nicht korrekt und bekannt ermittelt werden kann. Zum Beispiel die Wave-Files die zu dem Spiel Freelancer gehören kann mein Prog nicht lesen, da M$ einfach mal die Information über die Bits pro Sample null gesetzt hat. Das Spiel wird wohl wissen ob es 8 oder 16 Bit sind, aber...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by dizzy,
24. Jul 2004
Es kann sehr gut sein, dass Wavepad für einen X-Wert den Durchschnitt aller Samples die auf diesem X-Wert (Pixel) liegen anzeigt. Bei mir wird einfach nur das Sample genommen, dass an dieser Stelle im Wave ist.
Lässt sich aber leicht anpassen, du müsstest nur in der Zeichenroutine je Schritt den Durchschnitt von z.B. Ch16BitMono bis Ch16BitMono bilden, und das dann zeichnen. Bisher ists halt nur...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by dizzy,
24. Jul 2004
So, falls es noch von Interesse ist --- hab meinen Reader ausgebaut. Waren noch ein paar Bugs drin, und das Laden passiert jetzt in einem extra Thread. (Wegen Statusanzeige)
gruss,
dizzy
-
Forum: Sonstige Fragen zu Delphi
Delphi
by dizzy,
23. Jul 2004
@richard: Das ist aber mal extem quick'n'dirty...
Codeformatierung := nil;
Flexibilität := 0;
Du zeigst ja sogar sämtliche Header mit an... und was ist wenn das File auf einmal nicht 16 Bit stereo ist :?:. Oder gar > 64k? :zwinker:
Mein Proggie hat allerdings bei einigen Waves auch noch Probleme. Werd da nachher nochmal dran gehen, aber zumindest zeichnet es den RIFF-Header nicht ;)
...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by dizzy,
23. Jul 2004
Und damit du dich nicht verschulden musst, und die o.g. Sammlung sicherlich ganz gewaltiger Overkill nur für zum Zeichnen ist, hab ich mal fix was gebastelt :)
Liest und zeichnet unkomprimierte Standard-PCM-Waves. Also nur die gaaanz einfachen. Komprimierte Files müsstest du also zunächst nach PCM-Wave wandeln.
Weitere Infos in den Soßen (Unit2.pas). Unit2.pas enthält die eigentliche Klasse,...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by dizzy,
22. Jul 2004
Grund: Die Musik die man hört ist immer "linear" (wenn man das jetzt mal so sagen darf), aber das menschliche Gehör arbeitet logarithmisch. Willst du also die echten Daten anzeigen, dann nimm lineare Skalen, willst du aber anzeigen, wie man den Ton empfindet :!:, dann wird eine log. Skala interessant.
Das Problem der log. Skala ist allerdings, dass die Amplituden dann recht stark angehoben...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by dizzy,
21. Jul 2004
Eine Kompo kenne ich leider auch nicht. Aber gibt es evtl. eine Möglichkeit sich die reinen Audiodaten in einen Stream ausgeben zu lassen? Mit bass.dll oder fmod oder wie auch immer?
Dann könntest du diesen Stream byteweise (oder wortweise bei 16 Bit-Waves) durchgehen, und einfach zeichnen. Interessanter wird's bei stereo - da müsste man herausfinden, ob die ungeraden oder die geraden...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by dizzy,
20. Jul 2004
Ich glaube er will einfach nur die Waveform darstellen, oder? Noch keine Frequenzanalyse via FFT und Histogramme und den ganzen Kram. Einfach nur X-Achse = Zeit, Y-Achse = Amplitude -> fertig ;)
\\edit: Und die Skala für die Amplitude kann man wenn man will auch logarithmisch anlegen. Üblicher ist hier glaube ich linear. Log. sind idR. VU-Meter in Balkenform (zumindest ist's bei Steinberg...
