Zufällige Datei aus einem Ordner wählen

  • GM 8

  • Zufällige Datei aus einem Ordner wählen

    Ich will dem Spieler die Möglichkeit geben, seine Musik in einen vordefinierten Ordner zu speichern, aus der zufällig eine Musikdatei (MP3 oder OGG) gewählt und abgespielt wird. Leider habe ich absolut keinen Ansatz, wie man aus einem Ordner zufällig eine nicht bekannte Datei aussucht. Hat das hier schon jemand gemacht?

  • Schwierig, ich kenne keine Funktion mit der man alle Dateien in einem Ordner herausfindet.
    Wenn ich mich vertue und es gibt so eine Funktion, dann würde ich mit dieser eine Array erstellen.
    Darin könnte man dann die einzelnen Dateinamen speichern.

    GML-Quellcode

    1. musik[0]=sound_add("musik/Sound00.mp3", 1, 1); //Der Pfad sollte vorher durch eine Variable die mit einer dafür gedachte Funktion die sämtliche Dateinamen im Ordner entnimmt ersetzt werden. Wenn es keine von GM gibt, kannst du evt. auf eine dll zurückgreifen wenn es eine gibt.
    2. musik[1]=sound_add("musik/Sound01.mp3", 1, 1);
    3. musik[2]=sound_add("musik/Sound02.mp3", 1, 1);
    4. ...


    Im Create Event erstellst du eine Variable die später eine Zufallszahl zugewiesen bekommt.
    In dem Teil des Codes wo du abfragst ob bereits ein Lied abgespielt wird (ich gehe mal davon aus, dass du weißt
    wie man Musik abspielt und dementsprechend wie man herausfindet ob eines abgespielt wird) lässt du durch eine GM Funktion
    eine Zufallszahl generieren die eine Reichweite je nach Anzahl der Musik hat. Danach kann der Sound abgespielt werden.

    Beispiel:

    GML-Quellcode

    1. abzuspielendeMusik=round(random(AnzahlDerMusik)); //Anzahl der Musik ist die Maximale Zufallszahl. round wird benutzt um die zufällige Zahl auf eine ganze Zahl zu runden.
    2. sound_play(musik[abzuspielendeMusik]); //Im Index des Arrays wird die zufällige Zahl verwendet also wird eine Zufällige Musik abgespielt.


    Ich hoffe als Ansatz hilft es dir. Ich habe es ebend schnell geschrieben und kann dir nicht versichern, dass der Code fehlerlos ist, vor allem, weil ich nicht mehr mit dem Game Maker arbeite :p

    Wegen des Problems, wie man herausfindet welche Dateien sich im Ordner befinden, kann ich dir leider nicht helfen, aber sicher der Rest der Community. Ich kann mir auch gut vorstellen, dass das das Hauptproblem war und mein Beitrag völlig überflüssig ist, aber was solls :thumbsup:


    MfG

  • Das ganze lässt sich mit den file_find_... Funktionen umsetzten:

    Hier ein Script den ich geschrieben habe:
    Ich hoffe er ist gut genug kommentiert.

    GML-Quellcode

    1. //---------------------------------------
    2. //Sucht eine .mp3 Datei aus .\musik\
    3. //---------------------------------------
    4. //return: Der Pfad zur Datei, wenn keine gefunden wurde nur ein leeren String
    5. //---------------------------------------
    6. var str,files,f,pos,musik;
    7. f = 0;
    9. //Starte die Suche
    10. str=file_find_first(working_directory+"\musik\*.mp3",fa_archive);
    11. if (str == "") str = file_find_next();
    12. //Alle passenden Dateien speichern
    13. do {
    14. f = f + 1;
    15. files[f] = str;
    16. str = file_find_next();
    17. } until(str == "")
    18. //Suche Beenden
    19. file_find_close();
    21. //datei aussuchen
    22. if(f>0) {
    23. pos = irandom_range(1,f);
    24. return files[pos];
    25. }
    26. return "";
    Alles anzeigen


    Das kann man da z.B. so nutzen:

    GML-Quellcode

    1. mus = suche_musik()
    3. if(mus!="") {
    4. show_message("Starte: "+mus)
    5. sound = sound_add(working_directory+"\musik\"+mus,1,true);
    6. sound_play(sound)
    7. }


    Ich hoffe das hilft dir.

    FG
    andre111

  • Super, andre, es funktioniert perfekt. Jetzt habe ich das Ding noch erweitert, so dass auch ogg und wav eingelesen werden kann. Ich habe es so gemacht:

    GML-Quellcode

    1. var str,files,f,pos,musik;
    2. f = 0;
    4. //Starte die Suche
    5. str=file_find_first(working_directory+"\DATA\Music\*.mp3",fa_archive);
    6. if (str == "") str = file_find_next();
    8. //Alle passenden Dateien speichern
    9. do {
    10. f = f + 1;
    11. files[f] = str;
    12. str = file_find_next();
    13. } until(str == "")
    14. //Suche Beenden
    15. file_find_close();
    17. str=file_find_first(working_directory+"\DATA\Music\*.ogg",fa_archive);
    18. if (str == "") str = file_find_next();
    20. //Alle passenden Dateien speichern
    21. do {
    22. f = f + 1;
    23. files[f] = str;
    24. str = file_find_next();
    25. } until(str == "")
    26. //Suche Beenden
    27. file_find_close();
    29. str=file_find_first(working_directory+"\DATA\Music\*.wav",fa_archive);
    30. if (str == "") str = file_find_next();
    32. //Alle passenden Dateien speichern
    33. do {
    34. f = f + 1;
    35. files[f] = str;
    36. str = file_find_next();
    37. } until(str == "")
    38. //Suche Beenden
    39. file_find_close();
    41. //datei aussuchen
    42. if(f>0) {
    43. pos = irandom_range(1,f);
    44. return files[pos];
    45. }
    46. return "";
    Alles anzeigen


    Funktioniert bisher perfekt.

  • Anscheinend ist es so, dass er, wenn er eine bestimmte Dateiendung nicht findet, einfach ein "nichts" als Datei weiter gibt, welches zufällig ausgewählt werden kann. Ich habe es jetzt mal so gemacht, dass ich nicht nach mp3 suche sondern nach allen Dateien. Die Schwierigkeit die ich sehe ist, dass die Soundengine (BASS) keine WMA-Files kann. Wenn sich diese im Ordner befinden und er dies auswählt, kommt einfach keine Musik. Ich brauche also irgend einen Filter. Die Soundengine kann folgende Formate abspielen: *.mp3;*.mp2;*.mp1;*.ogg;*.wav;*.mo3;*.it;*.xm;*.s3m;*.mtm;*.mod;*.umx

  • So ich habe mir das nochmal angeschaut und wie -$Marvin$- bereits gesagt hat, waren die do until Schleifen eine eher ungünstige Whl, da sie immer einmal ausgeführt werden.

    Hier die verbesserte Version:

    GML-Quellcode

    1. var str,files,f,pos,musik;
    2. f = 0;
    4. //Starte die Suche
    5. str=file_find_first(working_directory+"\DATA\Music\*.mp3",fa_archive);
    6. if (str == "") str = file_find_next();
    8. //Alle passenden Dateien speichern
    9. while(str != "") {
    10. f = f + 1;
    11. files[f] = str;
    12. str = file_find_next();
    13. }
    14. //Suche Beenden
    15. file_find_close();
    17. str=file_find_first(working_directory+"\DATA\Music\*.ogg",fa_archive);
    18. if (str == "") str = file_find_next();
    20. //Alle passenden Dateien speichern
    21. while(str != "") {
    22. f = f + 1;
    23. files[f] = str;
    24. str = file_find_next();
    25. }
    26. //Suche Beenden
    27. file_find_close();
    29. str=file_find_first(working_directory+"\DATA\Music\*.wav",fa_archive);
    30. if (str == "") str = file_find_next();
    32. //Alle passenden Dateien speichern
    33. while(str != "") {
    34. f = f + 1;
    35. files[f] = str;
    36. str = file_find_next();
    37. }
    38. //Suche Beenden
    39. file_find_close();
    41. //datei aussuchen
    42. if(f>0) {
    43. pos = irandom_range(1,f);
    44. return files[pos];
    45. }
    46. return "";
    Alles anzeigen

  • Benutzer online 1

    1 Besucher