global pal = false

global d1 = (pal==true) ? 704 : 640
global d4 = (pal==true) ? 352 : 320
global f1 = (pal==true) ? 50 : 59.94
LoadPlugin("D:\Program Files\AviSynth 2.5\plugins\mpasource.dll")
LoadPlugin("D:\Program Files\AviSynth 2.5\plugins\DGDecode.dll")
LoadPlugin("D:\Program Files\AviSynth 2.5\plugins\ac3source.dll")

AC3source(MPEG2source("C:\dx\dx.d2v"),"C:\dx\dx T01 2_0ch 256Kbps DELAY 64ms.ac3")
delayaudio(0.064)
#nate_mono
#nate_vhs_head_change_erase
#mvbob
separatefields
#nate_1_pixel_bob_fix
#nate_retard_bob_2
#trim(REPLACEME,REPLACEME)
bilinearresize(d4,last.height)
#changefps(f1/2)
run=converttorgb32

statid=nate_statid_d4
#statid=nate_statid_d1

#statid++run
run

ConvertToYV12()
#nate_flv


function nate_mono(last) {
converttomono
mergechannels(last,last)
}

function nate_vhs_head_change_erase(last) {
Crop(0,0,0,last.height-10).AddBorders(0,0,0,10)
}

function nate_1_pixel_bob_fix(last) {
converttorgb32
clip1=SelectEven.Crop(0,0,0,240).AddBorders(0,0,0,0)
clip2=SelectOdd.Crop(0,0,0,last.height-1).AddBorders(0,1,0,0)
Interleave(clip1,clip2)
}

function nate_retard_bob_2(last) {
converttorgb32
field1=SelectEven.PointResize(last.width,last.height*4).crop(0,1,0,0).addborders(0,0,0,1).bilinearresize(d4,last.height)
field2=SelectOdd.PointResize(last.width,last.height*4).crop(0,0,0,-1).addborders(0,1,0,0).bilinearresize(d4,last.height)
interleave(field1,field2)
sharpen(0.31)
}

function nate_statid_d4(run) {
ImageSource("D:\Documents and Settings\JBG.V5\Desktop\statid\ntsc_d4.PNG",end=4,fps=1)
Subtitle("VERIFICATION COPY ONLY",font="Verdana",size=20,text_color=$FFFFFF,align=5)
Subtitle("NOT FOR REDISTRIBUTION",font="Verdana",size=20,text_color=$FFFFFF,align=2,y=160)
Subtitle("",font="Verdana",size=20,text_color=$FFFFFF,align=2,y=180)
converttorgb32
changefps(run)
audiodub(wavsource("D:\Documents and Settings\JBG.V5\Desktop\statid\silence_stereo_48000.wav"))
(pal==true) ? addborders(16,0,16,48) : addborders(0,0,0,0)
return ResampleAudio(run.audiorate)
}

function nate_statid_d1(run) {
ImageSource("D:\Documents and Settings\JBG.V5\Desktop\statid\ntsc_d1.PNG",end=4,fps=1)
Subtitle("REPLACEME",font="Verdana",size=36,text_color=$FFFFFF,align=5)
Subtitle("REPLACEME",font="Verdana",size=36,text_color=$FFFFFF,align=2,y=360)
Subtitle("REPLACEME",font="Verdana",size=36,text_color=$FFFFFF,align=2,y=400)
converttorgb32
changefps(run)
audiodub(wavsource("D:\Documents and Settings\JBG.V5\Desktop\statid\silence_stereo_48000.wav"))
(pal==true) ? addborders(32,0,32,96) : addborders(0,0,0,0)
return ResampleAudio(run.audiorate)
}

function nate_flv(last) {
ssrc(44100)
convertaudioto16bit()
bilinearresize(320,240)
flipvertical()
}