Durée et arrêt de la musique en Flac/Ogg

Vous avez une idée pour améliorer ou modifier PureBasic ? N'hésitez pas à la proposer.
Vlad
Messages : 14
Inscription : jeu. 03/juil./2008 18:47

Durée et arrêt de la musique en Flac/Ogg

Message par Vlad »

Concernant les fichiers Flac et Ogg :
** si Loadsound ne se fait pas avec l'option #PB_Sound_Streaming, une fois la musique lancée par Play Sound, elle s'arrête au bout de quelques minutes. Est-ce normal ? sinon comment remédier à ce problème.
** existe-t-il une solution pour connaitre la duréee du fichier chargé ?
Merci de vos réponses éventuelles.
Mesa
Messages : 1093
Inscription : mer. 14/sept./2011 16:59

Re: Durée et arrêt de la musique en Flac/Ogg

Message par Mesa »

Merci de poster un code avec un lien vers un flac stp.

M.
Vlad
Messages : 14
Inscription : jeu. 03/juil./2008 18:47

Re: Durée et arrêt de la musique en Flac/Ogg

Message par Vlad »

En réponse à : "Merci de poster un code avec un lien vers un flac stp."
Il faut un fichier exemple en flac d’au moins 6mn30s soit environ 30 Mo pour constater l’arrêt de la musique.
En effet l’arrêt de la musique se produit exactement au bout de 6 mn 03s
Difficile de trouver du Flac gratuit sur Internet de cette taille, et en fichier joint c’est trop volumineux.
La meilleure solution pour avoir facilement un fichier flac : le fabriquer soit même. Dix minutes suffisent.
L’adresse http://flacfrontend.sourceforge.net/ permet de télécharger un encoder flac ultra léger(900k une fois installé) du nom de Flacfrontend.

Une fois le logiciel installé l’ouvrir puis ... il est en anglais ...
Cliquez sur «Add files» ( le bouton en haut à droite) pour choisir le fichier à encoder en Flac.
Cliquez sur «Encode» (bouton en bas à gauche) pour lancer l’encodage.
Cliquez sur «Exit» (bouton en bas à droite) une fois l’encodage terminé pour Quitter.
Le nouveau fichier audio en flac sera situé dans le même répertoire que le fichier avant encodage.

Voici le code qui aboutit à un arrêt de la lecture des fichiers Flac de durée supérieure à 6mn 3s ==>

Code : Tout sélectionner

; Programme minimaliste de lecture de fichier audio *.flac
; Il met en évidence un BUG : au bout de 6mn 03 sec soit 363 secondes,
; le morceau s'arrête quand l'option #PB_Sound_Streaming
; de LoadSound() n'est pas utilisée.
;- --- INITIALISATION -------------------------------------
OpenConsole("Jouer du *.flac")
If InitSound() <> 0
   PrintN("Initialisation du son OK") 
   UseFLACSoundDecoder() : Gosub ChoixFlac
EndIf  
;- --- B O U C L E ----------------------------------------
Repeat
  Etat = SoundStatus(NumMus) 
  If Etat = #PB_Sound_Stopped 
              HeureFin$ = FormatDate("%hh:%ii:%ss", Date())
              PrintN(" Heure de Fin du morceau   : " + HeureFin$)
              Fin = 1
  EndIf
Until Fin = 1
Delay(30000) ; Pour lire les heures affichés sur l’écran console avant disparition
End
;- --- G O S U B ------------------------------------------
ChoixFlac: ; Choix du Fichier *.flac
ChoixFic$ = OpenFileRequester("Choix du morceau *.flac", "", "Musiques (Flac) |*.Flac",0)
If ChoixFic$ <> ""
   NumMus = LoadSound(#PB_Any, ChoixFic$);, #PB_Sound_Streaming)
   PlaySound(NumMus)
   HeureDeb$ = FormatDate("%hh:%ii:%ss", Date())
   PrintN(" Heure de Debut du morceau : " + HeureDeb$)
EndIf  
Return
Merci pour votre réponse
Vladimir
TazNormand a écrit :J'ai edité ton topic pour mettre ton code entre les balises [ code] [ /code]
Mesa
Messages : 1093
Inscription : mer. 14/sept./2011 16:59

Re: Durée et arrêt de la musique en Flac/Ogg

Message par Mesa »

Je confirme le problème à 6m03s, ce doit être un bug. (Win Xp 32bits)
Tu peux en informer Fred.

M.
Avatar de l’utilisateur
venom
Messages : 3071
Inscription : jeu. 29/juil./2004 16:33
Localisation : Klyntar
Contact :

Re: Durée et arrêt de la musique en Flac/Ogg

Message par venom »

Idem chez moi







@++
Windows 10 x64, PureBasic 5.73 x86 & x64
GPU : radeon HD6370M, CPU : p6200 2.13Ghz
Vlad
Messages : 14
Inscription : jeu. 03/juil./2008 18:47

Re: Durée et arrêt de la musique en Flac/Ogg

Message par Vlad »

Mesa et Venon,

Merci de votre aide.
J'ai transmis mon courrier concernant le bug à Fred.
Je lui ai préçisé que deux autres membres du forum confirmaient le bug après test de vérification.
Merci encore

L'auteur du message initial : Vladimir
Répondre