[BATCH] Edición archivo SRT

[ovichan]

Hola de nuevo, el caso es que necesito editar 291 archivos del tipo srt, que en base es practicamente es lo mismo que un txt, con extension diferente.

Bueno he leido este hilo para poder hacer sustitucion de palabras http://foro.elhacker.net/scripting/acciones_sobre_archivos_de_texto_batch-t242748.0.html. Sin embargo este codigo me da error y no me funciona:

Intento cambiar en el texto los puntos suspensivo con espacios por puntos suspensivos sin espacios.

Código (dos) [Seleccionar] Expandir

@echo off
setlocal enabledelayedexpansion
for /f "tokens=* delims=" %%x in ('type C:\Users\Isra\Desktop\Cap 01 B.srt') do (
set linea=%%x
set linea=!linea:. . .=...!
call :show !linea!
)
goto:eof
:show
echo %* >> "C:\Users\Isra\Desktop\Cap 01 B mod.srt"
goto:eof

Alguna idea de que está pasando??



Elektro H@cker: No tienes que usar el botón "insertar cita" sinó el de "insertar código".

[leogtz]

Cuando estés trabajando con archivos que tengan espacios en su nombre, es preferible agregar comillas dobles, así:

Código [Seleccionar] Expandir

for /f "tokens=* delims=" %%x in ('type "C:\Users\Isra\Desktop\Cap 01 B.srt"') do (

Prueba si así te funciona.

[Eleкtro]

Hola,

Desde luego el fallo en el code salta a la vista y con la corrección del compañero Leo es suficiente.

Pero aparte, Los archivos de subtitulos suelen contener caracteres especiales como el signo de exclamación, El cual lo "destruyes" por completo al habilitar la expansión, Y otros archivos caracteres que debes escapar (>) y/o reemplazar (¡¿ áéíóú ÁÉÍÓÚ ñ).

Ejemplo:
Juego de tronos.srt

Código [Seleccionar] Expandir

00:24:44,884 --> 00:24:46,927
Los hombres cordero
son buenos esclavos!

Así que yo lo dejaría (como mínimo) así, Y ya tu haces los siguientes reemplazamientos necesarios de los caracteres:

Código (DOS) [Seleccionar] Expandir

@echo off
for /f "tokens=*" %%X in ('type "%userprofile%\Desktop\Cap 01 B.srt"') do (
set "linea=%%X"
Call :Replace
Call Echo %%Linea_final%% >> "%userprofile%\Desktop\Cap 01 B mod.srt"
)
Exit

:Replace
set "linea=%linea:. . .=...%"
set "linea=%linea:>=^>%"
set "linea=%linea:)=^)%"
Set "Linea_final=%LINEA%"
Goto:EOF

Saludos.

[ovichan]

Gracias, lo voy a probar y os cuento, desconocía que pudiera insertar doble comilla dentro de otras comillas, no tengo tanto nivel ^^'.

Con respecto a lo del codigo en vez de quote, me ha kedao claro  . No volverá a pasar.

[ovichan]

@Leo Gutiérrez

Está probado y asi realiza su función aunque como dice EleKtro H@cker, se come ciertos caracteres

@EleKtro H@cker

El código que has puesto funciona pero se come el espacio antes de los numeros de la línea por lo que al editar el srt resultante en aegisub, me inserta todos los subtitulos en una sola linea.

Por cierto, mis srt están codificados en Unicode, podría automatizar el cambio a UTF-8??

Gracias de nuevo.

[Eleкtro]

El código que has puesto funciona pero se come el espacio antes de los numeros de la línea

El problema es que "For" no procesa las lineas en blanco de un archivo, Pero bueno por suerte, Como son solo números, Con esto queda arreglado:

Código (dos) [Seleccionar] Expandir

@echo off
for /f "tokens=*" %%X in ('type "%userprofile%\Desktop\1.srt"') do (
set /A "linea=%%X" 2>NUL && Echo+ >>"%userprofile%\Desktop\Cap 01 B mod.srt"|| (set "linea=%%X")
Call :Replace
Call Echo %%Linea_final%% >> "%userprofile%\Desktop\Cap 01 B mod.srt"
)
pause
Exit


:Replace
set "linea=%linea:. . .=...%"
set "linea=%linea:>=^>%"
set "linea=%linea:)=^)%"
Set "Linea_final=%LINEA%"
Goto:EOF

mis srt están codificados en Unicode, podría automatizar el cambio a UTF-8??

No.
Aunque puedes usar el comando type:

Código (dos) [Seleccionar] Expandir

Type archivo.srt > archivoNUEVO.srt
El cual automáticamente codifica en formato ANSI, Pero para convertirlo a UTF-8 no hay manera de hacerlo en Batch.
EDITO: Bueno en realidad, Batch por defecto guarda todo lo redireccionado en codificación ANSI...

¿Porque quieres que estén en formato utf-8? (UTF También es Unicode)

Bueno, Necesitas usar alguna herramienta de terceros por linea de comandos (Alguna hay, pero no recuerdo el nombre).
O adaptar este VBS para llamarlo desde Batch usando argumentos:

Código (vb) [Seleccionar] Expandir

Option Explicit

Sub Save2File (sText, sFile)
   Dim oStream
   Set oStream = CreateObject("ADODB.Stream")
   With oStream
       .Open
       .CharSet = "utf-8"
       .WriteText sText
       .SaveToFile sFile, 2
   End With
   Set oStream = Nothing
End Sub

' Example usage: '
Save2File "The data I want in utf-8", "test.txt"

Salu2

[ovichan]

Vamos a probar, aunque no entiendo muy bien la linea

Código [Seleccionar] Expandir

set /A "linea=%%X" 2>NUL && Echo+ >>"%userprofile%\Desktop\Cap 01 B mod.srt"|| (set "linea=%%X")

Estableces como variable aritmetica LINEA, pero 2>NUL no se que es ( en C sería 2 mayor que vacio). Lo siguiente seria insertarle la linea con el echo, redireccionar al archivo srt, pero la parte "|| (set "linea=%%X")"; tampoco le pillo.

En cuanto a codificacion del archivo es por aegisub pues al abrirlo me arroja el error: "Parsing Srt: Incomplete file". Si lo paso a UTF8 con notepad no hay problema al abrirlo.

Gracias

[Eleкtro]

no entiendo muy bien la linea

Código [Seleccionar] Expandir

set /A "linea=%%X" 2>NUL && Echo+ >>"%userprofile%\Desktop\Cap 01 B mod.srt"|| (set "linea=%%X")
Estableces como variable aritmetica LINEA, pero 2>NUL no se que es ( en C sería 2 mayor que vacio). Lo siguiente seria insertarle la linea con el echo, redireccionar al archivo srt, pero la parte "|| (set "linea=%%X")"; tampoco le pillo.

Exacto, Establezco la variable, Si el string no es númerico entonces el comando SET manda un código de error, Con "2>NUL" redireccionamos la salida del mensaje de error simplemente para que no aparezca en la consola y no moleste.

El "||" es el operador lógico de excepción (Lo que en C equivaldria a throw o catch, creo, No se "C"), Es decir, Que si el comando SET manda un código de error pues se procesa lo que está a la derecha  de las pipes, Y si no manda código de error, Se procesa solamente lo que está a la derecha del operador "&&".

Salu2

[ovichan]

En C es try...catch. Mas o menos lo he pillado, es como los asserts. Bueno luego lo pruebo que estoy de bbk. Gracias

[ovichan]

Todo bien excepto que el primer numero de linea, lo cambia de 1 a 0. Siendo el primer numero de linea el 0 y el siguiente que le sigue es el 2.

Edito: creo que debe interpretar el 1 como operando logico y lo transforma, o algo raro.