Garder format d'origine : ajouter des bandes noires , probleme: les bandes noires de ripp-it AM sont trop petites Options

[iPod]

Je possede un film que je desirerais mettre sur l'ipod, le probleme est que lors de sa convertion (mp4, 320*240, son AAC 128kb/s) l'image est legerement coupé, meme apres avoir coché l'option " Compenser le plein écran (Add Borders)" que l'on trouve dans "prévisualisation".
La vidéo d'origine est de 720*384, donc apres un petite calcul (dites moi si je me trompe)
720 = 320
384 = 170,67
il faudrait donc que le format soit 320 * 170,67 .
Il faudrait par conséquent modifier le script pour redimentionner en 320*170 et ajouter deux bordures noires de 35 pixels en haut et en bas.Le probleme est que je ne sais pas quoi modifier
Le probleme est que je ne sais spas quoi modifier.Voici le script (si c'est bien celui là) que j'obtient apres avoir cocher l'option " Compenser le plein écran (Add Borders)":
________________________________________________________________________________________
# **** Ripp-it & AVIsynth 2.5x script **** pass 2+

LoadPlugin("C:\PROGRA~1\RIPP-I~1\dlls\undot.dll")
LoadPlugin("C:\PROGRA~1\RIPP-I~1\dlls\DirectShowSource.dll")

Source="C:\Encodage\SawII.avi"
Largeur=320
Hauteur=176
ratio =1.818182
vratio =1.818182
Crop_g=0
Crop_d=0
Crop_h=0
Crop_b=0
Indice=0.620739

Video=DirectShowSource( Source, fps=25.000000)
function MonoToStereo( clip C )
{
Assert( C.AudioChannels == 1, "This clip must have 1 audio channel" )
A1=GetChannel( C, 1 )
A=MergeChannels( A1, A1 )
Return( C.HasVideo ? AudioDub( C, A ) : A )
}
# ====================================================================
function DownMix( clip A )
{
A1=GetChannel( A, 1 )
A2=GetChannel( A, 2 )
A3=GetChannel( A, 3 )
A4=GetChannel( A, 4 )
A5=GetChannel( A, 5 )
A6=GetChannel( A, 2 )
A1=MixAudio( MixAudio( A1, A5, 0.2698, 0.2698 ), MixAudio( A3, A4, 0.1907, 0.2698 ) )
A2=MixAudio( MixAudio( A2, A6, 0.2698, 0.2698 ), MixAudio( A3, A4, 0.1907, 0.2698 ) )
A=MergeChannels( A1, A2 )
Return ( A )
}
# ====================================================================
Video=Video.AudioChannels == 6 ? DownMix( Video ) : Video
Video=Video.AudioChannels == 1 ? MonoToStereo( Video ) : Video
Video=ConvertToYV12(Video)
Video=BilinearResize(Video, Largeur, Hauteur)
Video=AddBorders(Video, 0, 32, 0, 32)

Return(Video)
________________________________________________________________________________________

Merci de votre aide.

Ce message a été modifié par iPod - 27/01/2007 19:23.

[underground78]

Tu mets Hauteur=170 et Video=AddBorders(Video, 0, 35, 0, 35) dans le script et tu essaies ...

[iPod]

Tres bien, j'essayerais cela ce soir car mon processeur bat des reccords de lenteurs (AMD Athlon 1.33 ghz seulement...)
Merci beaucoup de vote aide, je vous tiendrais au courrant.