Comparison AVISynth script

function sub(clip c, int num, int ff, int lf)
{
   Subtitle(c,string(num),4,142,ff,ff+59, text_color=$00FF0000)
   Subtitle(string(num),4,142,ff+60,lf, text_color=$00FFFFFF)
}

function pause(clip c, int frame, int dur)
{
   b=BlankClip(c)

   x=Trim(c,0,frame)
   y=Trim(c,frame,frame)
   z=Trim(c,frame+1,0)
   y=Loop(y,dur)
   y=AudioDub(y,b)
   x++y++z
}

old=AVISource("old.avi")
new=AVISource("new.avi")

ee=blankclip(old, height=16, color=$00000000)


StackVertical(old,ee)
AudioDub(old)
Subtitle("OLD",2,142, text_color=$00FFFFFF)
ScriptClip("""Subtitle(string(current_frame), 60,142, text_color=$00FFFFFF)""")
pause(32,1)
pause(3780,41)
pause(6094,17)
pause(10080,12)
pause(12262,3)
pause(25603,1)
pause(27982,78)
pause(44221,2)
old=last

StackVertical(new,ee)
AudioDub(new)
Subtitle("NEW",120,142, text_color=$00FFFFFF)
ScriptClip("""Subtitle(string(current_frame), 60,142, text_color=$00FFFFFF)""")
pause(1601,1)
pause(8294,105)
pause(18259,126)
pause(19154,36)
pause(20315,12)
pause(20518,64)
pause(30240,134)
pause(32893,3)
pause(44747,78)
Subtitle("0",4,142,0,33, text_color=$00FFFFFF)
sub(-1,34,1602)
sub(0,1603,3821)
sub(-41,3822,6111)
sub(-58,6112,8399)
sub(47,8400,10092)
sub(35,10093,12265)
sub(32,12266,18385)
sub(158,18386,19190)
sub(194,19191,20327)
sub(206,20328,20582)
sub(270,20583,25604)
sub(269,25605,28060)
sub(191,28061,30374)
sub(325,30375,32896)
sub(328,32897,44223)
sub(326,44224,50000)
new=last

e=blankclip(old, width=4, color=$00000000)

c=StackHorizontal(old,e,new)

d=MergeChannels(ConvertToMono(old),ConvertToMono(new))
res=AudioDub(c,d)

ef=BlankClip(res,width=240,height=16, color=$00FFFFFF)
eg=BlankClip(res,width=60,height=16, color=$00000000)


a1=Trim(res,0,299)
a2=Trim(res,300,499)
a3=Trim(res,500,1099)
a4=Trim(res,1100,44223)
a5=Trim(res,44224,0)

a1=Overlay(a1,ef,40,0)
a3=Overlay(a3,ef,40,0)
a5=Overlay(a5,eg,60,144)
a5=Overlay(a5,eg,220,144)
a1++a2++a3++a4++a5
Subtitle("44068",60,142,44224,50000,text_color=$00FFFFFF)
Subtitle("43742",222,142,44224,50000,text_color=$00FFFFFF)

text="Super Mario Land TAS\n 12:13.08         Time         12:08.75  \nMUGG           Author           MUGG"
subtitle(text,-1,0,0,299, "Arial", 14, $FFFFFF, lsp=1, align=8)

text="VBA-rr v22        Emulator        VBA-rr v24\n v1.1         Game Version          v1.0\n35904         Rerecords         34834\n"
subtitle(text,-1,0,500,799, "Arial", 14, $FFFFFF, lsp=1, align=8)


text="This is a tool-assisted recording.\nFor more information,\nsee http://TASVideos.org/"
subtitle(text,-1,0,800,1099, "Arial", 14, $FFFFFF, lsp=1, align=8)

Trim(0,46499)