RR MUSTERSKRIPT

/* VIDEOS LADEN */
platz1 = DirectShowSource("gewinner.mp4")
platz2 = DirectShowSource("loser1.mp4")
platz3 = DirectShowSource("loser2.mp4")
platz4 = AviSource("loser3_01.avi") +\
AviSource("loser3_02.avi")


/* GEWINNERVIDEO BEARBEITEN */
platz1 = platz1.ConvertToRGB()
platz1 = platz1.ChangeFPS(25) # oder 30
platz1 = platz1.ResampleAudio(44100) # oder 48000
platz1 = platz1.AddBorders(214, 0, 0, 0, $000000) # 3 weitere Videos untereinander, Auflösung ist 640x480 deswegen: 640/3=~214


/* VERLIERERVIDEOS BEARBEITEN */
platz2 = platz2.ConvertToRGB()
platz2 = platz2.BilinearResize(214,160)
platz2 = platz2.ChangeFPS(25) # oder 30
platz2 = platz2.ResampleAudio(44100) # oder 48000
platz2 = platz2.AmplifyDB(-1000)

platz3 = platz3.ConvertToRGB()
platz3 = platz3.BilinearResize(214,160)
platz3 = platz3.ChangeFPS(25) # oder 30
platz3 = platz3.ResampleAudio(44100) # oder 48000
platz3 = platz3.AmplifyDB(-1000)

platz4 = platz4.ConvertToRGB()
platz4 = platz4.BilinearResize(214,160)
platz4 = platz4.ChangeFPS(25) # oder 30
platz4 = platz4.ResampleAudio(44100) # oder 48000
platz4 = platz4.AmplifyDB(-1000)


/* VIDEOS ZUSAMMENBAUEN */
videos_komplett = platz1.Overlay(platz2, 0, 0)
videos_komplett = videos_komplett.Overlay(platz3, 0, 161)
videos_komplett = videos_komplett.Overlay(platz4, 0, 321)


/* TIMER HINZUFÜGEN */
videos_komplett = videos_komplett.ShowSMPTE(fps=25, x=220, y=470, font="Silkscreen", size=16, text_color=$FFFFFF, halo_color=$000000) # oder fps=30, font kann jeder im System installierter Font sein


/* NAMEN HINZUFÜGEN */
videos_komplett = videos_komplett.Subtitle("PLATZ 1", x=220, y=5, first_frame=0, last_frame=last.framecount-1, font="Silkscreen", size=16, text_color=$FFFFFF, halo_color=$000000, align=7) # font kann jeder im System installierter Font sein
videos_komplett = videos_komplett.Subtitle("PLATZ 2", x=5, y=5, first_frame=0, last_frame=last.framecount-1, font="Silkscreen", size=16, text_color=$FFFFFF, halo_color=$000000, align=7) # font kann jeder im System installierter Font sein
videos_komplett = videos_komplett.Subtitle("PLATZ 3", x=5, y=165, first_frame=0, last_frame=last.framecount-1, font="Silkscreen", size=16, text_color=$FFFFFF, halo_color=$000000, align=7) # font kann jeder im System installierter Font sein
videos_komplett = videos_komplett.Subtitle("PLATZ 4", x=5, y=325, first_frame=0, last_frame=last.framecount-1, font="Silkscreen", size=16, text_color=$FFFFFF, halo_color=$000000, align=7) # font kann jeder im System installierter Font sein


/* FARBRAUM KONVERTIEREN UND ENDVIDEO AUSGEBEN */
endvideo = videos_komplett.ConvertToYV12()
return endvideo