Seite 1 von 2
Brauche hilfe bei Movies
Verfasst: 02.05.2007 21:14
von Mr. Spock
Also ich benutzte
und
um jeweils ein Lied beim "sterben" des balls abzuspielen...
da ich aber noch hintergrundmusik brauche würde ich gerne wissen wie man movies nacheinander abspielt und sie dann wiederholen kann....(ich habe bis jetzt zwei wav dateien und die will ich als hintergrundmusik nacheinander und dann wiederholend abspielen will....)
Verfasst: 02.05.2007 21:40
von Fluid Byte
Du lädst die Dateien und spielst sie ab. Wo ist das Problem?
Code: Alles auswählen
LoadMovie(0,"blah1.wav")
LoadMovie(1,"blah2.wav")
LoadMovie(2,"blah3.wav")
......
PlayMovie(0)
PlayMovie(1)
PlayMovie(2)
.........
Zum abspielen in einer Schleife einfach den flag bei PlayMovie() setzen.
Verfasst: 02.05.2007 21:43
von Mr. Spock
ja, wenn das so einfach wäre, habs so auch schon ausprobiert...
der spielt dann alles gleichzeitig ab...das hört sich dann an

Verfasst: 02.05.2007 21:44
von Fluid Byte
Mr. Spock hat geschrieben:ja, wenn das so einfach wäre, habs so auch schon ausprobiert...
der spielt dann alles gleichzeitig ab...das hört sich dann an

Du spielst sie natürlich event-basiert ab. Nicht alle auf einmal.
Verfasst: 02.05.2007 21:47
von Mr. Spock
ja wie denn?^^ wenn ich es so schreibe wie du dann spielt ja alles gleichzeitig ab...
Verfasst: 02.05.2007 21:51
von ts-soft
MovieStatus() könnte helfen
Verfasst: 02.05.2007 22:02
von Mr. Spock
ich denke mal das das helfen könnte, aber ich glaub wie ich das eingebaut hab ist das falsch:
Code: Alles auswählen
InitKeyboard()
InitSprite()
InitMovie()
OpenScreen(1280, 1024, 32, "Jumper")
;;;;;;;;;;;;;;;;;;;
;Laden von Sprites;
;;;;;;;;;;;;;;;;;;;
LoadSprite(1, "Jumper.bmp", 0)
LoadSprite(2, "Hintergrund.bmp", 0)
LoadSprite(3, "Kugel.bmp", 0)
LoadSprite(4, "Kugel.bmp", 0)
LoadSprite(5, "Kugel.bmp", 0)
LoadSprite(6, "Kugel.bmp", 0)
LoadSprite(7, "Kugel.bmp", 0)
LoadSprite(8, "Kugel.bmp", 0)
LoadSprite(9, "Kugel.bmp", 0)
LoadSprite(10, "Kugel.bmp", 0)
LoadSprite(11, "Kugel.bmp", 0)
LoadSprite(12, "Kugel.bmp", 0)
LoadSprite(13, "Kugel.bmp", 0)
LoadMovie(1 , "SpielVorbei.wav")
LoadMovie(2, "SpielMusik.wav")
LoadMovie(3, "SpielMusik2.wav")
JumperSchrift = LoadFont(100, "Arial", 60)
Bild_X = 640
Bild_Y = 512
Procedure SpielVorbei()
SpielSchrift = LoadFont(101, "Arial", 120)
StartDrawing(ScreenOutput())
Locate(100, 500)
DrawingMode(1)
FrontColor(200, 0, 0)
DrawingFont(SpielSchrift)
DrawText("SPIEL VORBEI")
StopDrawing()
FlipBuffers()
UseMovie(2) : StopMovie()
UseMovie(3) : StopMovie()
PlayMovie(1 , 0)
Delay(8800)
End
EndProcedure
PlayMovie(2, 0)
MovieStatus() >0
;;;;;;;;;;;;;;;;;;;;
;DAS SPIEL - JUMPER;
;;;;;;;;;;;;;;;;;;;;
Repeat
ExamineKeyboard()
ClearScreen(0,0,0)
If MovieStatus() = 0
PlayMovie(3, 0)
EndIf
.............
Verfasst: 02.05.2007 22:16
von Fluid Byte
Argh, jetzt seh Ich's erst du hast PB3.3...
Ok, Ich bin raus, "ts-soft übernemen sie!"
Verfasst: 02.05.2007 23:03
von ts-soft
Mit SCREEN_Zeugs hab ich nicht viel am Hut

, da gibts ja kein Eventloop
Der Source ist sowieso ein CPU-Fresser, wenn ich das überblicke
hier kommt UseMovie rein, wenn ein Movie zuende ist, um das nächste zu
starten, ausserdem wäre ein Delay angebracht, um nicht so viele CPUs
auzurauchen.
Ansonsten soll Dir mal lieber einer von den Screen-Proggern helfen, ist nicht
mein Ding
//EDIT
wo ist den die Hauptschleife? Da muß es rein.
Da fehlt wohl was, bzw, wenn Du einrücken würdest, würde ich mir den
Code evtl. genauer ansehen, aber so ist mir das zu anstengend, sorry
Verfasst: 03.05.2007 15:19
von Mr. Spock
hab ja erst vor vier tagen angefangen und arbeite noch nicht mal mit listen weil das mir zu kompliziert ist, würdest sowieso jahrelang immer das gleiche geschriebene sehen nur um immer einen ball runterfallen zu lassen
ok danke für die hilfe

mal gucken obs geht
Nachtrag:
is mir irgendwie alles viel zu kompliziert ich lass das lieber mit den movies und mit dem ton

muss erstma klein anfangen :/