View Single Post
Old 14th February 2019, 02:49   #1  |  Link
StainlessS
HeartlessS Usurer
 
StainlessS's Avatar
 
Join Date: Dec 2009
Location: Over the rainbow
Posts: 10,980
Scharfis_Brain - Exotic Interlacing (Exotisches Interlacing)

Hi guys,

Found Scharfis_Brain "Exotic Interlacing" on Archive.org,
home site now dead, posting here so as to ensure that it dont get lost.

Original German :- https://web.archive.org/web/20140411...esInterlacing/

Or as PDF here:- http://www.mediafire.com/file/qobn3e...s_Brain%29.pdf

Also English translation :- http://www.mediafire.com/file/kkw0j7...Brain.zip/file
Best I could do a coupla years back, is web page in zip file.

EDIT: PDF and English zip also available via MediaFire in my sig below this post [in DATA folder].

EDIT: Made Englsh translation into PDF and posted in my MediaFire DATA folder (too big for attachment ~500KB): http://www.mediafire.com/file/ndfhri...English%29.pdf


Additional links in the zip:-

The Lurkers Guide: https://lurkertech.com/lg/fields/

And two by Scharfis_Brain

Automated NTSC to PAL conversion for hybrid clips : https://forum.doom9.org/showthread.p...=converter.avs
Fighting against fieldblends (constant pattern): https://forum.doom9.org/showthread.p...threadid=66093

Scripts by Scharfis_Brain
Code:
function converter(clip input, int x, int y, bool TFF, int "combth", bool "speedup", bool "show")
{
    function kernelbob(clip a, int th)
        {
        f=a.
          \kerneldeint(order=0, sharp=true, twoway=true, threshold=th)
        e=a.separatefields.trim(1,0).weave.
          \kerneldeint(order=1, sharp=true, twoway=true, threshold=th)
        interleave(f,e)
        }

    function speeduphybrid(clip i, int width, int height, bool debug)
        {
        comb  = telecide(i,order=1,post=0).decimate(5)
        f     = framerate(comb)

        film  = comb.lanczosresize(width,height).assumefps(25,true)
        film  = (debug == false) ? film : film.subtitle("film -> IVTC -> speedup")

        video = i.kernelbob(5).lanczosresize(width,height).
            \convertfps(2*f).assumefps(50,true).separatefields.selectevery(4,0,3).weave
        video = (debug == false) ? video : video.subtitle("video -> blending -> speedup")

        conditionalfilter(comb,video,film,"iscombed(combthr)","=","true")
        }

    function speedupfilm(clip i, int width, int height, bool debug)
        {
        film  = i.assumefps(25,true).lanczosresize(width,height)
        film  = (debug == false) ? film : film.subtitle("film -> speedup")
        return film
        }

    function converthybrid(clip i, int width, int height, bool debug)
        {
        comb  = telecide(i,order=1,post=0).decimate(5)

        film  = comb.lanczosresize(width,height).
            \changefps(50).separatefields.selectevery(4,0,3).weave
        film  = (debug == false) ? film : film.subtitle("film -> IVTC -> convert")

        video = i.kernelbob(5).lanczosresize(width,height).
            \convertfps(50).separatefields.selectevery(4,0,3).weave
        video = (debug == false) ? video : video.subtitle("video -> blending")

        conditionalfilter(convertfps(comb,25),video,film,"iscombed(combthr)","=","true")
        }

    function convertfilm(clip i, int width, int height, bool debug)
        {
        film  = i.lanczosresize(width,height).
            \changefps(50).separatefields.selectevery(4,0,3).weave
        film  = (debug == false) ? film : film.subtitle("film -> convert")
        return film
        }

    combth = default(combth,20)
    global combthr=combth
    speed = default(speedup,true)
    debug = default(show ,false)

    input = (TFF == true) ? input.assumetff : input.assumebff

    speedupout = (framerate(input) < 26) ?
        \speedupfilm(input,x,y,debug) : speeduphybrid(input,x,y,debug)

    convertout = (framerate(input) < 26) ?
        \convertfilm(input,x,y,debug) : converthybrid(input,x,y,debug)

    final = (speed == true) ? speedupout : convertout

    final.resampleaudio(audiorate(input))
}
and another (Cropping seems a bit off in this one)
Code:
src=BlankClip(1,256,384,"RGB24",24)
rot=$FF0000
gruen=$00FF00
blau=$0000FF
gelb=$FFFF00
lila=$FF00FF
tuerkis=$00FFFF
gr=320
off=48
A=src.SubTitle("A",size=gr,text_color=rot)
B=src.SubTitle("B",x=off,size=gr,text_color=gruen)
C=src.SubTitle("C",size=gr,text_color=blau)
D=src.SubTitle("D",x=off,size=gr,text_color=gelb)
E=src.SubTitle("E",size=gr,text_color=lila)
F=src.SubTitle("F",x=off,size=gr,text_color=tuerkis)
G=src.SubTitle("G",size=gr,text_color=rot)
H=src.SubTitle("H",x=off,size=gr,text_color=gruen)
I=src.SubTitle("I",size=gr,text_color=blau)
J=src.SubTitle("J",x=off,size=gr,text_color=gelb)
K=src.SubTitle("K",size=gr,text_color=lila)
L=src.SubTitle("L",x=off,size=gr,text_color=tuerkis)
M=src.SubTitle("M",size=gr,text_color=rot)
N=src.SubTitle("N",x=off,size=gr,text_color=gruen)
O=src.SubTitle("O",size=gr,text_color=blau)
P=src.SubTitle("P",x=off,size=gr,text_color=gelb)
Q=src.SubTitle("Q",size=gr,text_color=lila)
R=src.SubTitle("R",x=off,size=gr,text_color=tuerkis)
S=src.SubTitle("S",size=gr,text_color=rot)
T=src.SubTitle("T",x=off,size=gr,text_color=gruen)
U=src.SubTitle("U",size=gr,text_color=blau)
V=src.SubTitle("V",x=off,size=gr,text_color=gelb)
W=src.SubTitle("W",size=gr,text_color=lila)
X=src.SubTitle("X",x=off,size=gr,text_color=tuerkis)
Y=src.SubTitle("Y",size=gr,text_color=rot)
Z=src.SubTitle("Z",x=off,size=gr,text_color=gruen)

res=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+r+s+t+u+v+w+x+y+z

res=res.crop(0,88,0,-40)

res+res+res+res+res
EDIT: You can find more D9 Threads started by Scharfis_Brain by visiting his profile/Statistics/Find all threads started by scharfis_brain/
Dont know if this link will expire after ~10 mins(threads by Scharfis_Brain - 3 Pages of links): LINK REMOVED.
EDIT: Above link HAS EXPIRED, so you have to do search yourslf.
__________________
I sometimes post sober.
StainlessS@MediaFire ::: AND/OR ::: StainlessS@SendSpace

"Some infinities are bigger than other infinities", but how many of them are infinitely bigger ???

Last edited by StainlessS; 27th February 2019 at 10:43.
StainlessS is offline   Reply With Quote