Anonymous
public text v1 · immutable@Set VLC_Theora_Encoder=%0
@If [%1]==[/Encode] GoTo Encode
:Shift_Loop
@If [%1]==[] GoTo Done
@Call "%VLC_Theora_Encoder%" /Encode %1
@Shift
@GoTo Shift_loop
:Encode
@"C:\Program Files\VideoLAN\VLC\vlc.exe" -I dummy "%2" --sout=#transcode{vcodec=theo,vb=384,scale=1,acodec=vorb,ab=128,channels=2,soverlay}:duplicate{dst=std{access=file,mux=ogg,dst="%2.ogg"}}:sub-language=English vlc:quit
@GoTo End
:Done
@Echo Done
:End