Autor Beitrag
Hansi@OMG
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 304

Vista
Delphi 2006 Prof., Lazarus
BeitragVerfasst: Sa 09.09.06 09:07 
Vielleicht kennt ihr Tobit Clipinc www.clipinc.de/ , eine der wenigen legalen Möglichkeiten um an MP3s zu gelangen. Dieses Programm zeichnet Internetradioprogramme auf und schneidet diese nach einer Datenbank in qualitativ relativ gute MP3s.

Mein Problem war, dass manche Aufnahmen stumm waren und trotzdem die nötige Dateigröße z.B. 3MB hatten.
Ich hatte nun einen Ordner mit 3500 legalen MP3s und hatte keine Lust mir die stummen MP3s mit der Hand rauszuziehen.

Das hat mich auf die Idee gebracht dieses Tool zu schreiben.
Es verwendet die BASS-DLL und funktioniert folgendermaßen:
Man wählt einen Ordner mit MP3s aus.
Dann klickt man auf Filtern (Funktion geht davon aus, dass in der Mitte eines korrekten Files kein stummer Anteil ist).
Die Liste die übrig bleibt, ist eine Liste der stummen MP3s, die man anschließend gleich löschen kann.

Vielleicht könnt ihr das auch gebrauchen.
Einloggen, um Attachments anzusehen!
_________________
Who doesn't know the Micrsoft developer "Mahatma Fatal Error"?


Zuletzt bearbeitet von Hansi@OMG am Sa 09.09.06 21:20, insgesamt 1-mal bearbeitet
F34r0fTh3D4rk
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 5284
Erhaltene Danke: 27

Win Vista (32), Win 7 (64)
Eclipse, SciTE, Lazarus
BeitragVerfasst: Sa 09.09.06 09:15 
nimm doch mehr referenzpunkte als nur die mitte, dann wirds damit auch nicht mehr so das problem haben ;) am besten zufällig gewählte :D
Gausi
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8554
Erhaltene Danke: 480

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: Sa 09.09.06 09:29 
Hey, das sieht ja schon ganz gut aus.

Aber eines solltest du unbedingt noch ändern: Das rumfummeln an der Lautstärke. Ich mag es nicht, wenn ein Programm ungefragt die wav-Lautstärke systemweit auf 0 stellt :x

Das mit den mehreren Referenzpunkten finde ich auch wichtig, da z.B. bei einigen Alben der letzte Track sehr lang mit einer langen Pause in der Mitte ist. ;-)

Aber bei den drei Test-Tracks, sich ich mir mal zusammengebastelt habe, weil mich das auch interessierte (habs aber nicht auf die Schnelle hinbekommen), werden korrekt gefiltert.

_________________
We are, we were and will not be.
Hansi@OMG Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 304

Vista
Delphi 2006 Prof., Lazarus
BeitragVerfasst: Sa 09.09.06 09:50 
Das mit dem auf 0 stellen tut mir Leid, aber ich muss die MP3 100ms anspielen, sonst schluckt die BASS-DLL nicht, dass da ein ein Output kommt und das hört sich sonst schrecklich auf deinen Boxen an.

_________________
Who doesn't know the Micrsoft developer "Mahatma Fatal Error"?
Gausi
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8554
Erhaltene Danke: 480

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: Sa 09.09.06 09:54 
Das mag ja sein, aber es gibt Möglichkeiten, nur den Channel auf stumm zu schalten, nicht die ganze Karte ;-) Probier mal BASS_ChannelSetAttributes(chan, -1,0,-101);

_________________
We are, we were and will not be.
Hansi@OMG Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 304

Vista
Delphi 2006 Prof., Lazarus
BeitragVerfasst: Sa 09.09.06 13:14 
Hier die korrigierte Version:
- Es wird an einer zufälligen Stelle in der MP3 überprüft
- Vorschlag von Gausi wurde übernommen
Einloggen, um Attachments anzusehen!
_________________
Who doesn't know the Micrsoft developer "Mahatma Fatal Error"?


Zuletzt bearbeitet von Hansi@OMG am Sa 09.09.06 21:21, insgesamt 1-mal bearbeitet
F34r0fTh3D4rk
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 5284
Erhaltene Danke: 27

Win Vista (32), Win 7 (64)
Eclipse, SciTE, Lazarus
BeitragVerfasst: Sa 09.09.06 14:38 
user profile iconHansi@OMG hat folgendes geschrieben:
Hier die korrigierte Version:
- Es wird an einer zufälligen Stelle in der MP3 überprüft
- Vorschlag von Gausi wurde übernommen


mach 2 oder 3 draus ;) dann ist es soweit schon gut
Hansi@OMG Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 304

Vista
Delphi 2006 Prof., Lazarus
BeitragVerfasst: Sa 09.09.06 20:41 
Ok, jetzt wird erst an 1 Stelle überprüft, wenn kein Peak vorhanden, wird noch an einer 2. Stelle überprüft.
Einloggen, um Attachments anzusehen!
_________________
Who doesn't know the Micrsoft developer "Mahatma Fatal Error"?
Gausi
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8554
Erhaltene Danke: 480

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: Sa 09.09.06 20:56 
Hallo, bitte änder doch immer den ersten Beitrag so ab, dass man auch dort immer die aktuelle Fassung runterladen kann. Dann muss man erstens nicht den ganzen Thread lesen, um die neueste Fassung zu finden, und zweitens entspricht das dann unseren Richtlinien ;-)

Und: Warum versteifst du dich auf ein oder zwei Stellen? Wie wäre es mit 10 oder 20 gleichverteilten Stellen (oder sogar mit einer USereingabe für die Anzahl der Testpunkte)? Das wäre deutlich sicherer, und nicht viel mehr Aufwand...

_________________
We are, we were and will not be.