erreur dans getvolume

Sujet: erreur dans getvolume Jeu 16 Jan 2020 - 5:45

bjr
dans mon code une erreur se plante
avec la fonction bass_getvolume

Code:: Level_Volume:
  TTrack=62
  Gosub PositionTrack
  Position%=(65535*Position(62))/100

  DroitVol%=Position%
   If DroitVol%<0 Then DroitVol%=0
   If DroitVol%>65535 Then DroitVol%=65535
  GaucheVol%=Position%
   Volume%=bin_or(GaucheVol%,DroitVol%)
  CallDLL=dll_call1("Bass_SetVolume",DroitVol%)
  Return

  Sub Volume_Ini()
  Flag$="BASS_DEVICE_DEFAULT"
  CallDLL=dll_call5("BASS_Init",1,44100,Adr(Flag$),0,0)
   GaucheVol% = bin_and(volume%,hex("0000FFFF"))
   DroitVol% = bin_and(volume%,hex("FFFF0000"))/65535
  Volume%=dll_call0("Bass_GetVolume")
  End_Sub

ou faut il utiliser les fonctions "wasapi"

parce que certain site des développeurs les utilises
merci et bonne journée

Sujet: Re: erreur dans getvolume Jeu 16 Jan 2020 - 13:21

Je pense qu'il y a une coquille dans cette ligne:

Code:: CallDLL=dll_call1("Bass_SetVolume",DroitVol%)

Ne serait ce pas ça plutôt:

Code:: CallDLL=dll_call1("Bass_SetVolume",Volume%)

Sinon, l'erreur est dans cette ligne:

Code:: CallDLL=dll_call5("BASS_Init",1,44100,Adr(Flag$),0,0)

Ce n'est pas Adr(Flag$) qu'il faut passer en paramètre, mais une constante:

Code:: BASS_DEVICE_SPEAKERS% =hex("800")
CallDLL=dll_call5(bassdll%,"BASS_Init",-1,44100,BASS_DEVICE_CPSPEAKERS%,0,0)

De plus je te recommande le paramètre -1, car cela permet à la dll de sortir le son sur le périphérique par défaut, alors que 1 sors le son sur un périphérique sonore, mais pas celui par défaut.

Par contre, je ne connais pas les fonctions "wasapi".

NB: Je viens de mettre à jour une démo de l'utilisation de la dll bass sur mon webdav Wink

Sujet: Re: erreur dans getvolume Jeu 16 Jan 2020 - 15:00

merci silverman de ton aide
j"essaye ça

» Erreur dans la documentation (MID$)
» petite erreur dans un de vos jeux...
» Erreur dans la documentation
» Erreur bénigne dans le manuel
» Petite erreur dans la doc en ligne