AviSynth and Subtitles

[james_2000]

Hi All,
I've spent a good few hours researching and trying code to do what I consider a simple task. I would like to have AviSynth read in an image sequence (which works fine). Then I would like it to display the last frame for 48 frames (2 seconds) whilst fading in some subtitles over the top where the fade in lasts for 24 frames. Then after the remaining 24 frames i would like a fade out for 24 frames of the whole scene. So a breakdown:
1. Display image sequence (48 frames)
2. Start display of last frame (48 frames) + start fadein of subtitles (24 frames)
3. no effect of scene for remaining 24 frames
4. Fadeout everything (24 frames)

Total clip length - 120 frames

As said, I can get the image sequence to play, this is fine. My trouble is trying to fadein the subtitles without causing the whole scene to go black and fadein. My code is below:

 
Clip1=ImageSource("Stick\Animation%04d.jpg", 1, 48, 24).AddBorders(1000,140,248,140)
Clip2=ImageSource("Stick\Animation0048.jpg", start = 48, end = 96, use_DevIL=true).AddBorders
(1000,140,248,140).Subtitle("Test text").FadeIn(22)
Clip3=ImageSource("Stick\Animation0048.jpg", start = 96, end = 116, use_DevIL=true).AddBorders
(1000,140,248,140).Subtitle("Test text").FadeOut(22)
Clip1+Clip2+Clip3

Many thanks,
James

[james_2000]

After another few hours of work, it's finally done! Happy days. I decided to go with the overlay option and used a sized transparent png as the 'frame' in which to place the text.

[Gavino]

You can more easily fade in a subtitle using Dissolve.

Clip1=ImageSource("Stick\Animation%04d.jpg", 1, 48, 24).AddBorders(1000,140,248,140)
Clip2=Clip1.Trim(47,0).Loop(24)
Clip3=Clip1.Trim(47,0).Loop(72).Subtitle("Test text").FadeOut0(24)
Clip1+Dissolve(Clip2, Clip3, 24)