#nathan jahnke <njahnke@gmail.com>
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("p:\dx\dx.d2v"),"p:\dx\dx T01 2_0ch 256Kbps DELAY 64ms.ac3")
global pal = (last.height==576) ? true : false
global d = false ? ((pal==true) ? 704 : 640) : ((pal==true) ? 352 : 320)
global f1 = (pal==true) ? 50 : 59.94

delayaudio(0.064)
#nate_vhs_head_change_erase
(pal==true ? d==704 : d==640) ? mvbob : separatefields
#nate_1_pixel_bob_fix
#nate_2d_sonic
#nate_retard_bob_2
#nate_nes
#trim(REPLACEME,REPLACEME)
bilinearresize(d,last.height)
#changefps(f1/2)
run=converttorgb32

statid = (pal==true ? d==704 : d==640) ? nate_statid_d1 : nate_statid_d4
false ? statid++run++statid : run

ConvertToYV12()
#nate_flv


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

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

function nate_2d_sonic(last) {
croppy=10
Crop(0,0,0,last.height-croppy).AddBorders(0,0,0,croppy)
Crop(0,2,0,0).AddBorders(0,2,0,0)
}

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(d,last.height)
field2=SelectOdd.PointResize(last.width,last.height*4).crop(0,0,0,-1).addborders(0,1,0,0).bilinearresize(d,last.height)
interleave(field1,field2)
sharpen(0.31)
}

function nate_nes(last) {
converttomono
mergechannels(last,last)
converttorgb32
crop(4,0,0,0)
addborders(4,0,0,0)
}

function nate_statid_d4(run) {
ImageSource("D:\Documents and Settings\JBG.V5\Desktop\statid\ntsc_d4.PNG",end=4,fps=1)
(pal==true) ? addborders(16,0,16,48) : addborders(0,0,0,0)
Subtitle("VERIFICATION ‘COPY’ ONLY",font="Verdana",size=20,text_color=$FFFFFF,align=5,y=120)
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"))
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()
}