:   Sensacinal o script para filmes intrelaçados da página de optimal scripts do forum. Transforma para 24fps os filmes intrelaçadoscom uma qualidade ótima. É só não usar o forced film no dvd2avi , e o resto é tudo normal Para quem tá com preguiça aí vai uma cópia dele:
###############################################
subtitle="C:\xxxxxxx\VTS_01_0.sub"# Adicione um # no inicio desta linha se você não precisa de legendas
#
Mpeg2Source("C:\xxxxxx.d2v")
bob()
converttoyuy2().convert60ito24p(2,0).converttoyv12 ()
BicubicResize(336, 448, 0, 0.6, 0, 0, 720, 480)
STMedianFilter(3, 3, 0, 0 )
MergeChroma(blur(1.5))
ScriptClip(" nf = YDifferenceToNext()" +chr(13)+ "unfilter( -(fmin(round(nf)*2, 100)), -(fmin(round(nf)*2, 100)) ).TemporalSoften( fmin( round(2/nf), 6), round(1/nf) , round(3/nf) , 1, 1) ")
AddBorders(8, 16, 8, 16)
#
############### the function #############
#
function convert60ito24p (clip video, int mode, int offset)
{
work = assumefieldbased(video)
out = (mode==2) ? interleave(
\selectevery(
\layer(trim(work, 1, 0),
\layer(work, trim(work, 2, 0), "fast"),
\"fast"), 5, 0 + offset),
\selectevery(
\layer(work, trim(work, 1, 0), "fast"), 5, 3 + offset)) :
\ (mode==1) ? interleave(
\selectevery(trim(work, 1, 0), 5, 0 + offset),
\selectevery(layer(work, trim(work, 1, 0), "fast"), 5, 3 + offset)) :
\ (mode==0) ? selectevery(work, 5, 1 + offset, 4 + offset) : work
assumeframebased(out)
}
#################################
#
#
## Functions ###
function fmin( int f1, int f2) {
return ( f1<f2 ) ? f1 : f2
}
#Subtitles #
############
VobSub(subtitle) # Adicione um # no inicio desta linha se você não precisa de legendas
#
####
|
