musique

[neptune62]

bonjour je ne voie pas comment faire pour  mettre la musique dans le scripte de la table abba  pouvez vous m aider svp 

[xenonph]

26 minutes ago, neptune62 said:

bonjour je ne voie pas comment faire pour  mettre la musique dans le scripte de la table abba  pouvez vous m aider svp 

 

Le script musical commence à la ligne 425.

Vous ne devriez avoir qu'à modifier le nombre aléatoire pour qu'il corresponde au nombre de chansons que vous ajoutez sur la ligne 434.

 

                                                            v

   SongNumber  = INT(RND * 4) + 1

                                                            ^

 

 

Nommez vos chansons "ABBA-song" et ajoutez un numéro à la fin pour qu'elles ressemblent à ceci...

 

ABBA-song1.mp3

ABBA-song2.mp3

ABBA-song3.mp3

ABBA-song4.mp3

 

Après avoir renommé vos mp3, placez-les dans votre dossier de musique.

[neptune62]

merci pour votre réponse mes je men sort pas merci encore 

[neptune62]

bonjour je me permet de vouloir insister mes sa me domine j a dort cette table   

je n'arrive pas avec les musique comme vous me lavais dit dans le dossier musique de vpx jais mis mes chansons renommer ainsi

ABBA-song1.mp3

ABBA-song2.mp3

ABBA-song3.mp3

ABBA-song4.mp3

et modifier le script comme cela

End Sub
'********************
' Music as mp3 sounds
'********************
Dim SongNumber: SongNumber = 0

PlayRandomSong

Sub PlayRandomSong

   ABBA-song1.mp3   ABBA-song2.mp3 ABBA-song3.mp3 ABBA-song4.mp3
   PlayMusic "ABBA-song" & SongNumber & ".mp3"

End Sub

Sub table1_MusicDone

   PlayRandomSong

End Sub

mais ca ne fonction pas pouvez vous m aider svp merci d avance 

 

[xenonph]

24 minutes ago, neptune62 said:

bonjour je me permet de vouloir insister mes sa me domine j a dort cette table   

je n'arrive pas avec les musique comme vous me lavais dit dans le dossier musique de vpx jais mis mes chansons renommer ainsi

ABBA-song1.mp3

ABBA-song2.mp3

ABBA-song3.mp3

ABBA-song4.mp3

et modifier le script comme cela

End Sub
'********************
' Music as mp3 sounds
'********************
Dim SongNumber: SongNumber = 0

PlayRandomSong

Sub PlayRandomSong

   ABBA-song1.mp3   ABBA-song2.mp3 ABBA-song3.mp3 ABBA-song4.mp3
   PlayMusic "ABBA-song" & SongNumber & ".mp3"

End Sub

Sub table1_MusicDone

   PlayRandomSong

End Sub

mais ca ne fonction pas pouvez vous m aider svp merci d avance 

 

 

Vous avez nommé correctement les MP3.

Placez-les dans votre dossier Musique.

Vous ne devriez pas avoir à modifier le script, sauf si vous ajoutez d'autres chansons.

 

Essayez de démarrer la table sans aucune modification de script, avec vos MP3 dans le dossier Musique.

[neptune62]

quand je lance la table Jai ce message 

Compile error
-------------
Line: 434
Fin d'instruction attendue

[xenonph]

5 minutes ago, neptune62 said:

quand je lance la table Jai ce message 

Compile error
-------------
Line: 434
Fin d'instruction attendue

Téléchargez à nouveau le tableau.

NE modifiez PAS le script.

Cela devrait fonctionner avec vos MP3 dans votre dossier Musique.

[neptune62]

ok je vous remercie je vais faire ca bonne journée es encore merci pour tout