Warum will der sound ned abgespielt werden?

Übersicht BlitzBasic Beginners-Corner

Neue Antwort erstellen

 

Flameskull

Betreff: Warum will der sound ned abgespielt werden?

 BeitragMi, Mai 14, 2008 15:28
Antworten mit Zitat
Benutzer-Profile anzeigen
ich verstehs nicht.. 0o
Code: [AUSKLAPPEN]


a = LoadSound("titelmusik.wav")
channel = PlaySound(a)


der sound wird aber nicht abgespielt.. is da was falsch dran?

ich hab zwar die demo version, aber wav dateien sollte sie doch abspielen können.

außerdem läuft das programm, es kommt keine fehlermeldung..

Starwar

 BeitragMi, Mai 14, 2008 16:15
Antworten mit Zitat
Benutzer-Profile anzeigen
Ich denke nicht das man in diesem Codeschnipsel den Fehler finden kann. Bitte poste den kompletten Code.
MFG

Blackside

 BeitragMi, Mai 14, 2008 16:17
Antworten mit Zitat
Benutzer-Profile anzeigen
Welche Version hat deine Demo?
Hier sollte eigentlich eine Signatur stehen!
 

Flameskull

 BeitragMi, Mai 14, 2008 16:25
Antworten mit Zitat
Benutzer-Profile anzeigen
also hier ist der ganze code

ich weiß, dass der ein bisschen eigenartig geschrieben ist, bin aber noch neu in bb Razz

Code: [AUSKLAPPEN]


Graphics 1024, 768, 32, 0
SetBuffer BackBuffer()
fontvariable = LoadFont("comic sans ms", 50)
SetFont fontvariable

background = LoadImage("bg.bmp")
start = LoadImage("starten.bmp")
options = LoadImage("options.bmp")
options_t = LoadImage("options_t.bmp")
kreis = LoadImage("kreis.bmp")
sound = LoadImage("sound.bmp")
aufloesung = LoadImage("aufloesung.bmp")
aufloesung_t = LoadImage("aufloesung_t.bmp")
zurück = LoadImage("zurück.bmp")
beenden = LoadImage("beenden.bmp")
normal = LoadImage("normal.bmp")
vollbild= LoadImage("vollbild.bmp")
sound = LoadSound("titelmusik.wav")

MaskImage start,255,255,255
MaskImage options,255,255,255
MaskImage options_t,255,255,255
MaskImage kreis,255,255,255
MaskImage aufloesung,255,255,255
MaskImage sound,255,255,255
MaskImage zurück,255,255,255
MaskImage beenden,255,255,255
MaskImage aufloesung_t, 255,255,255
MaskImage normal,255,255,255
MaskImage vollbild,255,255,255
HidePointer

;MENU

menu = 1

Repeat
    
   TileBlock background
   DrawImage start,460,100
   DrawImage options,460,300
   DrawImage beenden,830,700
   DrawImage kreis,MouseX(),MouseY()
   canal = PlaySound(sound)


   optionen = 0
   auflsng = 0
         
         
         If ImagesOverlap(kreis, MouseX(),MouseY() , start, 450, 100) And MouseDown(1) Then Text 300,300, "Hier wird das spiel rein kommen"
         
         If ImagesOverlap(kreis, MouseX(),MouseY() , beenden, 830, 700) And MouseDown(1) Then End

         If ImagesOverlap(kreis, MouseX(),MouseY() , options, 450, 300) And MouseDown(1)
            Repeat
               TileBlock background         
                  
                  TileBlock background
                  DrawImage options_t, 410,100
                  DrawImage aufloesung, 440, 254
                  DrawImage sound,480,387
                  DrawImage zurück, 480, 500
                  DrawImage beenden, 830,700
                  DrawImage kreis, MouseX(),MouseY()
                  
                  If ImagesOverlap(kreis, MouseX(),MouseY() , beenden, 830, 700) And MouseDown(1) Then End
                  If ImagesOverlap(kreis, MouseX(),MouseY() , aufloesung, 440, 254) And MouseDown(1)
                           
                        Repeat
                           TileBlock background
                           DrawImage aufloesung_t, 390,100
                           DrawImage normal, 470, 254
                           DrawImage vollbild, 476, 387
                           DrawImage zurück, 480,500
                           DrawImage beenden, 830,700
                           DrawImage kreis, MouseX(),MouseY()
                           If ImagesOverlap(kreis, MouseX(),MouseY() , beenden, 830, 700) And MouseDown(1) Then End
                           If ImagesOverlap(kreis, MouseX(),MouseY() , normal, 450, 254) And MouseDown(1)
                              
                              Graphics 1024, 768, 32, 0
                              SetBuffer BackBuffer()
                              fontvariable = LoadFont("comic sans ms", 50)
                              SetFont fontvariable


                              background = LoadImage("bg.bmp")
                              start = LoadImage("starten.bmp")
                              options = LoadImage("options.bmp")
                              options_t = LoadImage("options_t.bmp")
                              kreis = LoadImage("kreis.bmp")
                              sound = LoadImage("sound.bmp")
                              aufloesung = LoadImage("aufloesung.bmp")
                              aufloesung_t = LoadImage("aufloesung_t.bmp")
                              zurück = LoadImage("zurück.bmp")
                              beenden = LoadImage("beenden.bmp")
                              normal = LoadImage("normal.bmp")
                              vollbild= LoadImage("vollbild.bmp")

                              MaskImage start,255,255,255
                              MaskImage options,255,255,255
                              MaskImage options_t,255,255,255
                              MaskImage kreis,255,255,255
                              MaskImage aufloesung,255,255,255
                              MaskImage sound,255,255,255
                              MaskImage zurück,255,255,255
                              MaskImage beenden,255,255,255
                              MaskImage aufloesung_t, 255,255,255
                              MaskImage normal,255,255,255
                              MaskImage vollbild,255,255,255

                                    
                              
                                 
                           EndIf    
                                 
                           If ImagesOverlap(kreis, MouseX(),MouseY() , vollbild, 430, 387) And MouseDown(1)
                        
                              Graphics 1024, 768, 32, 1
                              SetBuffer BackBuffer()
                              fontvariable = LoadFont("comic sans ms", 50)
                              SetFont fontvariable


                              background = LoadImage("bg.bmp")
                              start = LoadImage("starten.bmp")
                              options = LoadImage("options.bmp")
                              options_t = LoadImage("options_t.bmp")
                              kreis = LoadImage("kreis.bmp")
                              sound = LoadImage("sound.bmp")
                              aufloesung = LoadImage("aufloesung.bmp")
                              aufloesung_t = LoadImage("aufloesung_t.bmp")
                              zurück = LoadImage("zurück.bmp")
                              beenden = LoadImage("beenden.bmp")
                              normal = LoadImage("normal.bmp")
                              vollbild= LoadImage("vollbild.bmp")

                              MaskImage start,255,255,255
                              MaskImage options,255,255,255
                              MaskImage options_t,255,255,255
                              MaskImage kreis,255,255,255
                              MaskImage aufloesung,255,255,255
                              MaskImage sound,255,255,255
                              MaskImage zurück,255,255,255
                              MaskImage beenden,255,255,255
                              MaskImage aufloesung_t, 255,255,255
                              MaskImage normal,255,255,255
                              MaskImage vollbild,255,255,255
                                                      

                              
                           EndIf    
                           

                           
                           If ImagesOverlap(kreis, MouseX(),MouseY() , zurück, 480, 500) And MouseDown(1)
                              auflsng = 1
                           EndIf                                                                                                 
                           
                           Flip
                           Cls
                        Until auflsng = 1
                        auflsng = 0
                  EndIf
                  
                  
                  If ImagesOverlap(kreis, MouseX(),MouseY() , sound, 480, 387) And MouseDown(1)
                     Text 100,100, "hier kommt noch was"
                  EndIf    
                                 
                  
                  If ImagesOverlap(kreis, MouseX(),MouseY() , zurück, 480, 500) And MouseDown(1)
                     optionen = 1
                  EndIf
                  
               Flip   
               Cls                  
            Until optionen = 1   
         EndIf
         



   Flip
   Cls

Until menu = 0


ach und die version.. glaub das is 1.6

Blackside

 BeitragMi, Mai 14, 2008 16:40
Antworten mit Zitat
Benutzer-Profile anzeigen
Soweit ich das sehe ist das Playsound in der Hauptschleife und wird immer wieder ausgeführt, aber es darf nur einmal ausgeführt werden denn sonst stopt es beim nächsten mal abspielen sofort wieder.
Hier sollte eigentlich eine Signatur stehen!
 

Flameskull

 BeitragMi, Mai 14, 2008 16:45
Antworten mit Zitat
Benutzer-Profile anzeigen
habs jez vor die schleife gepackt, kommt trotdzdem kein sound.
das komische is, dassda keine fehlermeldung kommt.. hm..
 

Flameskull

 BeitragMi, Mai 14, 2008 17:25
Antworten mit Zitat
Benutzer-Profile anzeigen
sorry für die doppelpost.. aber jetzt startet der sound doch 0o
aber erst nach ca 10 sekunden.. hab aber kein delayoder ähnliches drin.. kann man das nicht schneller starten lassen?

Blackside

 BeitragMi, Mai 14, 2008 17:32
Antworten mit Zitat
Benutzer-Profile anzeigen
Es müssen wahrscheinlich erstma alle daten geladen werden...
Mach einfach nen Loading screen oder so.
Hier sollte eigentlich eine Signatur stehen!

WüstLing

 BeitragMi, Mai 14, 2008 17:33
Antworten mit Zitat
Benutzer-Profile anzeigen
warum benutzt du denn nicht edit??
 

Flameskull

 BeitragMi, Mai 14, 2008 17:34
Antworten mit Zitat
Benutzer-Profile anzeigen
alles klar.. ich bin einfach zu dumm.. ich hab vergessen dass der song erst bei 0:30 anfängt... *schäm*
alles geht jetzt... Smile

Neue Antwort erstellen


Übersicht BlitzBasic Beginners-Corner

Nach Oben

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group