Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- LoadCPlugin("C:\Program Files (x86)\AviSynth 2.5\plugins\ffms2.dll")
- Import("C:\Program Files (x86)\AviSynth 2.5\plugins\ffms2.avsi")
- # videos fur das LP laden, sprich, hier die Dateinamen der ShadowPlay Files eintragen
- v1="Europa Universalis IV 04.17.2015 - 14.09.42.02.mp4"
- v2="Europa Universalis IV 04.17.2015 - 14.09.42.02_1.mp4"
- # Video eins (hier muss nichts geandert werden)
- FFIndex("Europa Universalis IV 04.17.2015 - 14.09.42.02.mp4")
- Video1=Audiodub(FFvideosource(v1), FFaudiosource(v1))
- # Video zwei (hier muss nichts geandert werden)
- FFIndex("Europa Universalis IV 04.17.2015 - 14.09.42.02_1.mp4")
- Video2=Audiodub(FFvideosource(v2), FFaudiosource(v2))
- Video=dissolve(video1,video2,25)
- #Variablendefinition, hier stellt ihr alles ein. Im unteren Teil mit den Befehlen muss eigentlich nichts gedndert werden.
- textanzahl=2 ## 1 oder 2 (Umschalter f?r 1 oder 2 Texte, die nacheinander eingeblendet werden)
- text="Skeith spielt: Europa Universalis IV - El Dorado"## erster Text
- text2="Sunset Invasion - Scouting the west coast" ## zweiter Text (wird nach dem ersten eingeblendet)
- Transparenzgrad = 0.7 ## zwischen 0 und 1 (0=unsichtbar)
- res_x = video.width ## Videobreite einlesen
- res_y = video.height ## Videohoehe einlesen
- fontsize= 28 ## Schriftgroesze
- fontwidth = 10 ## Schriftbreite
- schriftart = "Arial" ## Schriftart
- bb_hoehe = 42 ## Hoehe der Bauchbinde
- bb_abstand = 32 ## Abstand der Bauchbinde vom unteren Rand des Videos
- bb_text_x = 180 ## horizontale Einr?ckung Bauchbindentext
- bb_text_y = 30 ## vertikale Einr?ckung Bauchbindentext
- schatten = 2 ## Schatten des Bauchbindentextes; Versatz in Pixeln
- wz_x = res_x-(res_x-0) ## x-Versatz des Waszerzeichens (bei 0 --> ganz links)
- wz_y = 80 ## y-Versatz des Waszerzeichens (bei 0 --> ganz unten)
- fade = 5 ## Ein-/Ausblenden der Bauchbinde (Zahl der Frames)
- anzeigedauer = 100 ## so lange wird die Bauchbinde angezeigt (Zahl der Frames)
- hintergrundfarbe = $1f1f1f ## Farbe der Bauchbinde
- textfarbe = $FF6633 ## Farbe der Bauchbindenschrift
- startframe = 25 ## Beginn der Bauchbinden-Animation (Zahl der Frames)
- duration = 25 ## Dauer der Bauchbinden-Animation (Zahl der Frames)
- # Leeren Clip mit der Farbe "Hintergrundfarbe" und der Ldnge "Anzeigedauer", Breite ist die der Auflfsung des Videos und die Hfhe
- wird selbst bestimmt
- clip=Blankclip(length=anzeigedauer, width=res_x, height=bb_hoehe, color=hintergrundfarbe)
- # Die Ein- und Auslaufanimation wird erstellt. Fragt nicht wie das geht, am besten alles so lassen!
- rein=Animate(video, startframe, startframe+duration, "Overlay", clip, res_x*(-1), (res_y - bb_abstand - bb_hoehe), clip, 0,(res_y -
- bb_abstand - bb_hoehe))
- raus=Animate(video, startframe+duration+textanzahl*anzeigedauer+1, startframe+2*duration+textanzahl*anzeigedauer, "Overlay", clip,
- 0, (res_y - bb_abstand - bb_hoehe), clip, res_x,(res_y - bb_abstand - bb_hoehe))
- rein_getrimmt=rein.Trim(0,startframe+duration)
- raus_getrimmt=raus.Trim(startframe+duration+textanzahl*anzeigedauer+2, 0)
- # Bauchbinde erstellen, am besten alles so lassen
- bauchbinde=clip.Trim(0,fade)
- #erster Text wird erstellt
- bauchbinde_text=clip.Trim(0,anzeigedauer).Subtitle(text,font=Schriftart, x=(bb_text_x+schatten),y=(bb_text_y+schatten),
- size=fontsize, font_width=fontwidth, \
- text_color=$000000, halo_color=$ff000000, align=4).Subtitle(text,font=Schriftart, x=bb_text_x,y=bb_text_y, size=fontsize,
- font_width=fontwidth, text_color=textfarbe, \
- halo_color=$ff000000, align=4)
- # zweiter Text wird erstellt
- bauchbinde_text2=clip.Trim(0,anzeigedauer).Subtitle(text2,font=Schriftart, x=(bb_text_x+schatten),y=(bb_text_y+schatten),
- size=fontsize, font_width=fontwidth, \
- text_color=$000000, halo_color=$ff000000, align=4).Subtitle(text2,font=Schriftart, x=bb_text_x,y=bb_text_y, size=fontsize,
- font_width=fontwidth, text_color=textfarbe, \
- halo_color=$ff000000, align=4)
- # ?bergdnge zwischen Bauchbinde und Texten einf?gen. ?bergangszeit wir mit "fade" festgelegt.
- content_bauchbinde=Dissolve(bauchbinde,bauchbinde_text,bauchbinde_text2,bauchbinde,fade)
- # Waszerzeichenaufbereitung
- wasserzeichen = "logo.png" ## Wasserzeichenpfad
- logo = ImageSource(wasserzeichen,pixel_type="rgb32") ## Wasserzeichen laden
- logo_scaled = LanczosResize(logo, (logo.width), (logo.height)) ## Wasserzeichengrf?e dndern, wenn man mag
- alpha = logo_scaled.ShowAlpha(pixel_type="rgb32") ## Transparenz-Alpha-Map erstellen
- # zusammenf?gen von Bauchbinde und Text und anschlie?end dem Logo
- complete = Overlay(video.Trim(startframe+duration+1,startframe+duration+anzeigedauer*textanzahl+1),content_bauchbinde,0,(res_y-
- bb_abstand - bb_hoehe)) ##Bauchbinde und Text auf Video legen
- complete2= overlay(complete, logo_scaled, x=wz_x,y=(res_y - wz_y),mask=alpha) ##Logo einf?gen, x und Y sind Koordinaten f?r Logo
- # Rein- und Rausscrollanimation wird angehdngt
- Band=rein_getrimmt++complete2++raus_getrimmt
- # Transparenz wird hinzugef?gt
- video=video.overlay(band,mode="blend", opacity=Transparenzgrad)
- #Ausgabe
- video.ConvertToYV12()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement