lecture ogg

[jmg49]

Bonjour,

sauriez vous pourquoi ce code compile et s'exécute sans erreur et ........sans son !!

=> oui j'ai bien le son activé

Code : Tout sélectionner

InitSound()
UseOGGSoundDecoder()

sound$="wewe.ogg"


result= LoadSound(0, sound$)

SoundVolume(0,100)

PlaySound(0)

edit : fonctionne ainsi mais acces memoire invalide ...

Code : Tout sélectionner

InitSound()
UseOGGSoundDecoder()



L1=?IB2-?IB1
CatchSound(0,?IB1,L1)


;result= LoadSound(0, sound$)

SoundVolume(0,100)

PlaySound(0,0)


IB1:
IncludeBinary "wewe.ogg"
IB2: 

[Fred]

Je pense que ton programme quitte immediatement donc le son n'a pas le temps d'etre joué. Mets un MessageRequester() à la fin et ca devrait marcher. Dans le second cas, tu inclues un binaire dans le code principal, ce qui est fortement deconseillé car il va etre executé comme du code normal. Il faut le mettre dans une DataSection/EndDataSection.

[jmg49]

Merci Fred je regarde ça de suite ,

edit:


effectivement , c'est ok avec un messagerequester pour le premier et en plus un petit end pour le second

modif avec DataSection :

Code : Tout sélectionner

InitSound()
UseOGGSoundDecoder()



Endsnd=?endsnd-?snd
CatchSound(0,?snd,endsnd)



PlaySound(0,0)

MessageRequester("Lecture snd  ","play ! ")

End



DataSection
  
  snd: 
  IncludeBinary "wewe.ogg"
  endsnd:
  
  
EndDataSection