Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - SuperDraco

#1711
Para salir realmente de dudas, pienso que debes seguir estos pasos:

1º - Sabiendo la velocidad que has contratado con tu compañia de internet, pues haces un test de velocidad en algún servicio de este tipo ONLIne, como por ejemplo:

http://www.test-velocidad-internet.com/

http://www.testdevelocidad.ws/

http://speedtest.edpnet.be/speedtest4.php

(Había una página web que recopilaba decenas de test diferentes, pero no la recuerdo ahora)


2º - Si has quedado insatisfecho con los resultados del primer paso, que puede ser? yo tampoco lo sé xD pero es posible que tengan un problema con el "nodo" de tu zona, y si no se comunica, como que no lo arreglan... Así que llamales y esplicale tu problema igual que lo has echo con nosotros, quizas sea culpa de ellos y no tuya!


Saludos!
#1712
MmM Tienes razón Zero, aunq no se me ocurre ahora como, tengo q pensarlo xD malditos FOR


PD: He solucionado la duda número 1, bastaba con copiar el codec a la carpeta "syswow64" -.- Windows de mier... -.- ...Uf, menos mal que lo he solucionado, porque sino mi script no me habría servido para nada...

PD2: Si alguien quiere todo lo necesario para correr el script, que lo pida, que con la clave de registro que le he echo mola muchisimo, pinchas en una carpeta, o dentro del directorio, y todos los .AIF .FLAC .M4A .MP3 .OGG .WAV .WMA mayores de 160 kbps los recomprime a mp3 160 kbps! (Y sin Idtag)

Seguiré testeandolo...

Saludos!
#1713
Hola, ya he acabado mi script, le faltarían 2 cosas que me gustaría añadirle que ahora comentaré, pero eso solo son "florituras" xD, así que lo doy por terminado...

Sin la ayuda de Leo y otros que me han ayudado con sus respuestas no habría podido terminarlo, aunque no es gran cosa seguro que más de uno lo habría acabado en un solo día xD, pero bueno, yo voy aprendiendo de los mejores :P.

Me gustaría si alguien tiene tiempo se mirase de rehojo mi script, para ver si encuentran algún error, o si se pudiera mejorar (Eliminar variables inservibles, , hacerlo más simple, añadirle algo más, etc... o que se yo xD) Incluso aunque sea cambiarle el nombre xD, Cualquier cosa se agradece!


La verdad es que me ha quedado bastante bien, más o menos como a mi me gusta:



Se que no tiene mérito, porque el DbPowerAmp no lo he echo yo, pero esto me va a ahorrar años de trabajo manual con el PC... xD

Como ya he dicho, aún le faltan las "florituras", cosas que sigo notanco imperfectas en el script,algunas más importantes que otras, así que de paso,para no tener que hacer 70 posts más, os hago algunas pregunas a ver si alguien me contesta... (No hace falta ni decir que ya he buscado información acerca de todo esto, pero...)



1. - ¿Como ejecuto mi script correctamente desde el registro? Si, lo que quiero decir es que, me gustaría usarlo pinchando click derecho en una carpeta por ejemplo, con una opcion agregada al registro... de echo YA LO TENGO CONFIGURADO ASÍ, pero, el programa creo que me muestra información en ANSI y no me funciona correctamente por que por ejemplo me busca el archivo "mp3 (lame).dll" pero todo separado, asi: " M P 3  ( L A M E ) " y con renombrar el codec no me ha servido, porque hay un espacio entre las comillas... :(            (Uso Windows 7)



2. - ¿Que puedo hacer mediante el CMD, para saber la longitud de letras que tiene el nombre de un archivo? Pues eso, ese dato me serviria mucho porque hay casos en que el nombre del archivo es demasiado largo y entonces "no entra" en la ventana de mi script, entonces, me gustaría recortar SOLO los nombres que tengan mayor longitud de 70 caracteres, por ejemplo.



3. - ¿Existe alguna barra de progresso que pueda usar con mi script? Es que no me gusta nada que salga el titulo del "dbpoweramp" y su barra de progreso no me gusta tampoco, el programa se puede usar en modo silencioso con el comando "-silent" (Por si sirve de algo...) Tampoco me gusta que me de información sobre el archivo de destino... eso no se podrá ocultar de algún modo, verdad?



GRACIAS A TODOS LOS QUE HAYAN LEIDO HASTA AQUI :P





El Script:


Código (dos) [Seleccionar]
@echo off
Title=Audio Bitrate Changer
Mode con cols=20 lines=3
Color 7

Set Centrar=Nircmd win center ititle "Audio Bitrate Changer"
Set Lista=%Temp%\Lista.txt
Set Num=0
Set Rate=0










:START
If exist %lista% (
Del /q %Lista% >nul 2>&1
)
echo+ & %centrar%
Colous cursoroff
Colous writesec "[7] Buscando audios" & sleep 1 & cls & echo+
Colous writesec "[7] Buscando audios." & sleep 1 & cls & echo+
Colous writesec "[7] Buscando audios.." & sleep 1 & cls & echo+
Colous writesec "[7] Buscando audios..." & sleep 1











:VERIFY

dir /B *.aif >nul 2>&1
IF %ERRORLEVEL% EQU 0 (
call :FIND_AIF
)

dir /B *.flac >nul 2>&1
IF %ERRORLEVEL% EQU 0 (
call :FIND_FLAC
)

dir /B *.m4a >nul 2>&1
IF %ERRORLEVEL% EQU 0 (
call :FIND_M4A
)

dir /B *.ogg >nul 2>&1
IF %ERRORLEVEL% EQU 0 (
call :FIND_OGG
)

dir /B *.wav >nul 2>&1
IF %ERRORLEVEL% EQU 0 (
call :FIND_WAV
)

dir /B *.wma >nul 2>&1
IF %ERRORLEVEL% EQU 0 (
call :FIND_WMA
)


dir /B *.mp3 >nul 2>&1
IF %ERRORLEVEL% EQU 0 (
goto:FIND_MP3
)

goto :END










:SEARCH

:FIND_AIF
for /f "tokens=*" %%a in ('dir /B *.aif') do (
cls
set nombre=%%a
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%BitRate/String%%"') do set "Rate=%%~%%"
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%FileSize/String%%"') do set "Size=%%~%%"
call :Sizer
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%Duration/String%%"') do set "Time=%%~%%"
mediainfo "%%a" "--Inform=General;%%BitRate%%" | findstr "161... 162... 163... 164... 165... 166... 167... 168... 169... 17.... 18.... 19.... 2..... 3..... 4..... 5..... 6....." >nul
call :AIF
)
goto:eof


:FIND_FLAC
for /f "tokens=*" %%a in ('dir /B *.flac') do (
cls
set nombre=%%a
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%BitRate/String%%"') do set "Rate=%%~%%"
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%FileSize/String%%"') do set "Size=%%~%%"
call :Sizer
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%Duration/String%%"') do set "Time=%%~%%"
mediainfo "%%a" "--Inform=General;%%BitRate%%" | findstr "2..... 3..... 4..... 5..... 6..... 7..... 8..... 9..... 1...... 2......" >nul
call :FLAC
)
goto:eof


:FIND_M4A
for /f "tokens=*" %%a in ('dir /B *.m4a') do (
cls
set nombre=%%a
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%BitRate/String%%"') do set "Rate=%%~%%"
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%FileSize/String%%"') do set "Size=%%~%%"
call :Sizer
Call :SIZER_SMALL
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%Duration/String%%"') do set "Time=%%~%%"
mediainfo "%%a" "--Inform=General;%%BitRate%%" | findstr "161... 162... 163... 164... 165... 166... 167... 168... 169... 17.... 18.... 19.... 2..... 3..... 4..... 5..... 6..... 7..... 8..... 9....." >nul
call :M4A
)
goto:eof


:FIND_OGG
for /f "tokens=*" %%a in ('dir /B *.ogg') do (
cls
set nombre=%%a
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%BitRate/String%%"') do set "Rate=%%~%%"
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%FileSize/String%%"') do set "Size=%%~%%"
call :Sizer
Call :SIZER_SMALL
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%Duration/String%%"') do set "Time=%%~%%"
mediainfo "%%a" "--Inform=General;%%BitRate%%" | findstr "161... 162... 163... 164... 165... 166... 167... 168... 169... 17.... 18.... 19.... 2..... 3..... 4..... 5..... 6..... 7..... 8..... 9....." >nul
call :OGG
)
goto:eof


:FIND_WAV
for /f "tokens=*" %%a in ('dir /B *.wav') do (
cls
set nombre=%%a
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%BitRate/String%%"') do set "Rate=%%~%%"
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%FileSize/String%%"') do set "Size=%%~%%"
call :Sizer
call :sizer_WAVE
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%Duration/String%%"') do set "Time=%%~%%"
mediainfo "%%a" "--Inform=General;%%BitRate%%" | findstr "161... 162... 163... 164... 165... 166... 167... 168... 169... 17.... 18.... 19.... 2..... 3..... 4..... 5..... 6..... 7..... 8..... 9..... 1...... 2......" >nul
call :WAV
)
goto:eof


:FIND_WMA
for /f "tokens=*" %%a in ('dir /B *.wma') do (
cls
set nombre=%%a
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%BitRate/String%%"') do set "Rate=%%~%%"
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%FileSize/String%%"') do set "Size=%%~%%"
call :Sizer
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%Duration/String%%"') do set "Time=%%~%%"
mediainfo "%%a" "--Inform=General;%%BitRate%%" | findstr "161... 162... 163... 164... 165... 166... 167... 168... 169... 17.... 18.... 19.... 2..... 3..... 4..... 5..... 6..... 7....." >nul
call :WMA
)
goto:eof


:FIND_MP3
for /f "tokens=*" %%a in ('dir /B *.mp3') do (
cls
set nombre=%%a
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%BitRate/String%%"') do set "Rate=%%~%%"
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%FileSize/String%%"') do set "Size=%%~%%"
call :Sizer
Call :SIZER_SMALL
for /f "tokens=*" %%%% in ('mediainfo "%%a" "--Inform=General;%%Duration/String%%"') do set "Time=%%~%%"
mediainfo "%%a" "--Inform=General;%%BitRate%%" | findstr "161... 162... 163... 164... 165... 166... 167... 168... 169... 17.... 18.... 19.... 2..... 3....." >nul
call :MP3
)
Goto :END










:CONVERT

:AIF
IF %ERRORLEVEL% GEQ 1 goto:eof
IF %ERRORLEVEL% EQU 0 (
title="Convirtiendo: %nombre%"
Mode con cols=70 lines=28 & Nircmd win center ititle "Convirtiendo: %nombre%"
cls
set /a num+=1
echo+ "%nombre%">> %lista% & echo+
Colous writesec "[7]Convirtiendo el audio:" & echo+
Colous writesec "[8] %nombre%" & echo+
Colous writesec "[7] Bitrate :[12] %RATE%"
Colous writesec "[7] Tamano  :[14] %Size:~0,-4%[7] MB"
Colous writesec "[7] Duracion: %Time%"
Colous writesec "[8]=================================="
Colous writesec "[7] Nuevo Bitrate: [2]160 [7]Kbps"
Colous writesec "[7] Nuevo Formato: [2]MP3"
Colous writesec "[7] Nuevo Tamano : [2]%NEWSIZE%.0 [7]MB (Aprox.)"
Colous writesec "[7] Preset:[2] Highest quality [7](Slow)"
Colous writesec "[8]__________________________________________________________________"
coreconverter.exe -infile="%nombre:~0,-4%.aif" -outfile="%nombre:~0,-4%.mp3" -convert_to="mp3 (Lame)" -b 160 --cbr -encoding="SLOW" -q 0 -noidtag -priority="low" -errorfile="%temp%\%nombre%.txt"
Title=Audio Bitrate Changer
find /v "error" "%temp%\%nombre%.txt" >nul
Call :Error
del /q "%temp%\%nombre%.txt"
del /q "%nombre%"
sleep 2
goto:eof
)



:FLAC
IF %ERRORLEVEL% GEQ 1 goto:eof
IF %ERRORLEVEL% EQU 0 (
title="Convirtiendo: %nombre%"
Mode con cols=70 lines=28 & Nircmd win center ititle "Convirtiendo: %nombre%"
cls
set /a num+=1
echo+ "%nombre%">> %lista% & echo+
Colous writesec "[7]Convirtiendo el audio:" & echo+
Colous writesec "[8] %nombre%" & echo+
Colous writesec "[7] Bitrate :[12] %RATE%"
Colous writesec "[7] Tamano  :[14] %Size:~0,-4%[7] MB"
Colous writesec "[7] Duracion: %Time%"
Colous writesec "[8]=================================="
Colous writesec "[7] Nuevo Bitrate: [2]160 [7]Kbps"
Colous writesec "[7] Nuevo Formato: [2]MP3"
Colous writesec "[7] Nuevo Tamano : [2]%NEWSIZE%.0 [7]MB (Aprox.)"
Colous writesec "[7] Preset:[2] Highest quality [7](Slow)"
Colous writesec "[8]__________________________________________________________________"
coreconverter.exe -infile="%nombre:~0,-5%.flac" -outfile="%nombre:~0,-5%.mp3" -convert_to="mp3 (Lame)" -b 160 --cbr -encoding="SLOW" -q 0 -noidtag -priority="low" -errorfile="%temp%\%nombre%.txt"
Title=Audio Bitrate Changer
find /v "error" "%temp%\%nombre%.txt" >nul
Call :Error
del /q "%temp%\%nombre%.txt"
del /q "%nombre%"
sleep 2
goto:eof
)

:M4A
IF %ERRORLEVEL% GEQ 1 goto:eof
IF %ERRORLEVEL% EQU 0 (
title="Convirtiendo: %nombre%"
Mode con cols=70 lines=28 & Nircmd win center ititle "Convirtiendo: %nombre%"
cls
set /a num+=1
echo+ "%nombre%">> %lista% & echo+
Colous writesec "[7]Convirtiendo el audio:" & echo+
Colous writesec "[8] %nombre%" & echo+
IF %RATE:~0,-5% GEQ 193 (
Colous writesec "[7] Bitrate :[12] %RATE:~0,-5%[7] Kbps"
) ELSE (
Colous writesec "[7] Bitrate :[14] %RATE:~0,-5%[7] Kbps"
)
Colous writesec "[7] Tamano  :[14] %Size:~0,-4%[7] MB"
Colous writesec "[7] Duracion: %Time%"
Colous writesec "[8]=================================="
Colous writesec "[7] Nuevo Bitrate: [2]160 [7]Kbps"
Colous writesec "[7] Nuevo Formato: [2]MP3"
IF %RATE:~0,-5% LEQ 192 (
Colous writesec "[7] Nuevo Tamano : [2]%NEWSIZE2%.0 [7]MB (Aprox.)"
) ELSE (
Colous writesec "[7] Nuevo Tamano : [2]%NEWSIZE%.0 [7]MB (Aprox.)"
)
Colous writesec "[7] Preset:[2] Highest quality [7](Slow)"
Colous writesec "[8]__________________________________________________________________"
coreconverter.exe -infile="%nombre:~0,-4%.m4a" -outfile="%nombre:~0,-4%.mp3" -convert_to="mp3 (Lame)" -b 160 --cbr -encoding="SLOW" -q 0 -noidtag -priority="low" -errorfile="%temp%\%nombre%.txt"
Title=Audio Bitrate Changer
find /v "error" "%temp%\%nombre%.txt" >nul
Call :Error
del /q "%temp%\%nombre%.txt"
del /q "%nombre%"
sleep 2
goto:eof
)

:MP3

IF %ERRORLEVEL% GEQ 1 goto:eof
IF %ERRORLEVEL% EQU 0 (
title="Convirtiendo: %nombre%"
Mode con cols=70 lines=28 & Nircmd win center ititle "Convirtiendo: %nombre%"
cls
set /a num+=1
echo+ "%nombre%">> %lista% & echo+
Colous writesec "[7]Convirtiendo el audio:" & echo+
Colous writesec "[8] %nombre%" & echo+
IF %RATE:~0,-5% GEQ 193 (
Colous writesec "[7] Bitrate :[12] %RATE:~0,-5%[7] Kbps"
) ELSE (
Colous writesec "[7] Bitrate :[14] %RATE:~0,-5%[7] Kbps"
)
Colous writesec "[7] Tamano  :[14] %Size:~0,-4%[7] MB"
Colous writesec "[7] Duracion: %Time%"
Colous writesec "[8]=================================="
Colous writesec "[7] Nuevo Bitrate: [2]160 [7]Kbps"
Colous writesec "[7] Nuevo Formato: [2]N/A"
IF %RATE:~0,-5% LEQ 192 (
Colous writesec "[7] Nuevo Tamano : [2]%NEWSIZE2%.0 [7]MB (Aprox.)"
) ELSE (
Colous writesec "[7] Nuevo Tamano : [2]%NEWSIZE%.0 [7]MB (Aprox.)"
)
Colous writesec "[7] Preset:[2] Highest quality [7](Slow)"
Colous writesec "[8]______________________________________________________________________"
coreconverter.exe -infile="%nombre%" -outfile="%nombre%" -convert_to="mp3 (Lame)" -b 160 --cbr -encoding="SLOW" -q 0 -noidtag -priority="low" -errorfile="%temp%\%nombre%.txt"
Title=Audio Bitrate Changer
find /v "error" "%temp%\%nombre%.txt" >nul
Call :Error
del /q "%temp%\%nombre%.txt"
sleep 2
goto:eof
)

:OGG
IF %ERRORLEVEL% GEQ 1 goto:eof
IF %ERRORLEVEL% EQU 0 (
title="Convirtiendo: %nombre%"
Mode con cols=70 lines=28 & Nircmd win center ititle "Convirtiendo: %nombre%"
cls
set /a num+=1
echo+ "%nombre%">> %lista% & echo+
Colous writesec "[7]Convirtiendo el audio:" & echo+
Colous writesec "[8] %nombre%" & echo+
IF %RATE:~0,-5% GEQ 193 (
Colous writesec "[7] Bitrate :[12] %RATE:~0,-5%[7] Kbps"
) ELSE (
Colous writesec "[7] Bitrate :[14] %RATE:~0,-5%[7] Kbps"
)
Colous writesec "[7] Tamano  :[14] %Size:~0,-4%[7] MB"
Colous writesec "[7] Duracion: %Time%"
Colous writesec "[8]=================================="
Colous writesec "[7] Nuevo Bitrate: [2]160 [7]Kbps"
Colous writesec "[7] Nuevo Formato: [2]MP3"
IF %RATE:~0,-5% LEQ 192 (
Colous writesec "[7] Nuevo Tamano : [2]%NEWSIZE2%.0 [7]MB (Aprox.)"
) ELSE (
Colous writesec "[7] Nuevo Tamano : [2]%NEWSIZE%.0 [7]MB (Aprox.)"
)
Colous writesec "[7] Preset:[2] Highest quality [7](Slow)"
Colous writesec "[8]__________________________________________________________________"
coreconverter.exe -infile="%nombre:~0,-4%.ogg" -outfile="%nombre:~0,-4%.mp3" -convert_to="mp3 (Lame)" -b 160 --cbr -encoding="SLOW" -q 0 -noidtag -priority="low" -errorfile="%temp%\%nombre%.txt"
Title=Audio Bitrate Changer
find /v "error" "%temp%\%nombre%.txt" >nul
Call :Error
del /q "%temp%\%nombre%.txt"
del /q "%nombre%"
sleep 2
goto:eof
)

:WAV
IF %ERRORLEVEL% GEQ 1 goto:eof
IF %ERRORLEVEL% EQU 0 (
title="Convirtiendo: %nombre%"
Mode con cols=70 lines=28 & Nircmd win center ititle "Convirtiendo: %nombre%"
cls
set /a num+=1
echo+ "%nombre%">> %lista% & echo+
Colous writesec "[7]Convirtiendo el audio:" & echo+
Colous writesec "[8] %nombre%" & echo+
Colous writesec "[7] Bitrate :[12] %RATE%"
Colous writesec "[7] Tamano  :[14] %Size:~0,-4%[7] MB"
Colous writesec "[7] Duracion: %Time%"
Colous writesec "[8]=================================="
Colous writesec "[7] Nuevo Bitrate: [2]160 [7]Kbps"
Colous writesec "[7] Nuevo Formato: [2]MP3"
Colous writesec "[7] Nuevo Tamano : [2]%NEWSIZE%.0 [7]MB (Aprox.)"
Colous writesec "[7] Preset:[2] Highest quality [7](Slow)"
Colous writesec "[8]__________________________________________________________________"
coreconverter.exe -infile="%nombre:~0,-4%.wav" -outfile="%nombre:~0,-4%.mp3" -convert_to="mp3 (Lame)" -b 160 --cbr -encoding="SLOW" -q 0 -noidtag -priority="low" -errorfile="%temp%\%nombre%.txt"
Title=Audio Bitrate Changer
find /v "error" "%temp%\%nombre%.txt" >nul
Call :Error
del /q "%temp%\%nombre%.txt"
del /q "%nombre%"
sleep 2
goto:eof
)

:WMA
IF %ERRORLEVEL% GEQ 1 goto:eof
IF %ERRORLEVEL% EQU 0 (
title="Convirtiendo: %nombre%"
Mode con cols=70 lines=28 & Nircmd win center ititle "Convirtiendo: %nombre%"
cls
set /a num+=1
echo+ "%nombre%">> %lista% & echo+
Colous writesec "[7]Convirtiendo el audio:" & echo+
Colous writesec "[8] %nombre%" & echo+
Colous writesec "[7] Bitrate :[12] %RATE%"
Colous writesec "[7] Tamano  :[14] %Size:~0,-4%[7] MB"
Colous writesec "[7] Duracion: %Time%"
Colous writesec "[8]=================================="
Colous writesec "[7] Nuevo Bitrate: [2]160 [7]Kbps"
Colous writesec "[7] Nuevo Formato: [2]MP3"
Colous writesec "[7] Nuevo Tamano : [2]%NEWSIZE%.0 [7]MB (Aprox.)"
Colous writesec "[7] Preset:[2] Highest quality [7](Slow)"
Colous writesec "[8]__________________________________________________________________"
coreconverter.exe -infile="%nombre:~0,-4%.wma" -outfile="%nombre:~0,-4%.mp3" -convert_to="mp3 (Lame)" -b 160 --cbr -encoding="SLOW" -q 0 -noidtag -priority="low" -errorfile="%temp%\%nombre%.txt"
Title=Audio Bitrate Changer
find /v "error" "%temp%\%nombre%.txt" >nul
Call :Error
del /q "%temp%\%nombre%.txt"
del /q "%nombre%"
sleep 2
goto:eof
)










:SIZER
SET NEWSIZE=%Size:~0,-4%
SET /A NEWSIZE/=2
goto:eof

:SIZER_WAVE
SET NEWSIZE=%Size:~0,-4%
SET /A NEWSIZE/=10
goto:eof

:SIZER_SMALL
SET NEWSIZE2=%Size:~0,-4%
SET /A NEWSIZE2-=2
goto:eof










:ERROR
IF %ERRORLEVEL% GEQ 1 goto:eof
IF %ERRORLEVEL% EQU 0 (
·
cls
mode con cols=58 lines=8 & %Centrar%
color 4 & echo+
Colous writesec "[7] No se ha podido convertir el siguiente audio..." & echo+
Colous writesec "[12] %nombre%" & echo+
tec.exe "%temp%\%nombre%.txt" -de:33
type "%temp%\%nombre%.txt"
del /q "%temp%\%nombre%.txt"
sleep 1

:WARNING
Color 0e
colous 15 0 2,02 "No se ha podido convertir el siguiente audio..." & echo+
colous 12 0 2,04 "%nombre%" & echo+
colous cursoroff
sleep 1

Color 0c
colous 15 0 2,02 "No se ha podido convertir el siguiente audio..." & echo+
colous 12 0 2,04 "%nombre%" & echo+
colous cursoroff
sleep 1
goto :WARNING
)










:END
set Num2=%num%
Set /a Num2+=4

If exist %lista% (
cls
mode con lines=%num2% & %Centrar%
color 2 & echo+
Colous writesec "[7] Se han convertido correctamente [2]%num%[7] audios..." & echo+
FART.exe -q %lista% \" --remove
type %lista%
del /q %lista%
pause >nul
exit
)

If not exist %lista% (
mode con lines=3 cols=65 & %centrar% & echo+
Colous writesec "[7] No se ha encontrado ningun audio superior a +160 kbps."           & sleep 1 & cls & echo+
Colous writesec "[7] No se ha encontrado ningun audio superior a +160 kbps.  [8]3..." & sleep 1 & cls & echo+
Colous writesec "[7] No se ha encontrado ningun audio superior a +160 kbps.  [8]2.." & sleep 1 & cls & echo+
Colous writesec "[7] No se ha encontrado ningun audio superior a +160 kbps.  [8]1." & sleep 1 & cls & echo+
Colous writesec "[7] Bye.                                                    [8]0" & sleep 1
exit
)
#1714
Gracias a los 2, parece que ya lo he solucionado.
#1715
Ya he solucionado lo del archivo de texto.

Con un programa que se llama "Text encoder converter", tiene funcionalidades para msdos...

Pero el grandisimo problema es el de " L A M E " todo con espacios, ahi no puedo hacer nada porque se trata del mismo programa quien lo genera asi... es normal?
#1716
Buf, lo he intentado TODO, un millón de supuestos convertidores... que cuando los uso, me crean un archivo con aún más espacios :S

El caso es que si abro el archivo en el bloc de notas, y lo guardo sin hacer cambios, entonces si que se me muestra bien con "Type"

Entonces mi pregunta es, con algún comando de windows se puede abrir y guardar el archivo.txt?

He probado a hacer un "type 1.txt > 2.txt" pero no, no me sirve... tengo que borrar la última linea DENTRO del archivo de texto y guardarlo...

Y si hago "type 1.txt >> 2.txt" (Con 2 >>) Se copia todo el texto con muchos espacios...
#1717
Eso significa que no te ha gustado mi foto :(

xD

Hace tanto que no uso XP... que ya no me acuerdo como iba el tema:

http://es.scribd.com/doc/4678599/Crack-windowsXP-WGA

(No he probado el link)

Saludos...
#1718
Cita de: $@|\|TY_03 en 19 Marzo 2011, 15:55 PM
si guardas fotos, documentos, etc. y despues formateas ¿que malware quedas si

formateas? una foto o un word no va a contener un virus.

saludos

En una imagen creo que no, pero los archivos de word se pueden infectar de virus, guardarlos adentro de un .doc o .excel.

Saludos.
#1719
Hola... se que soy un pesado xDDD pero ya me gustaría saber tanto como vosotros, así no molestaría :P, en fin, como siempre vuelvo a necesitar ayuda con mis cosas...

Hace dos dias empezé a buscar "progress bar" para el cmd, y la que más me agustado ha sido esta:

http://sigg3.net/blogger/progbar_sub.rar



El caso es que me gustaría meterla en mi script, en el espacio grande que queda en esta ventanita, miren:



Ahora viene lo malo... NO SE COMO HACERLO XD... Bueno, más o menos he conseguido algo, la barra de progreso dice el autor que hay que llamarla con un "Call", así que yo hago eso... pero al ejecutarse el "call", la barra de progreso TAPA todo lo que hay en la imagen de mi script, osea, sale arriba, no abajo.

He intentado modificar el script del autor, poniendole muchos "echo+" a ver si así aparecía un poco más abajo en mi script, pero no ha dado resultados... Así que a ver si alguien sabe la solución :/

Esta es la parte de mi script en donde quiero meter la barra:


Código (dos) [Seleccionar]
:MP3
IF %ERRORLEVEL% GEQ 1 goto:eof
IF %ERRORLEVEL% EQU 0 (
cls
set /a num+=1
echo+ "%nombre%">> %lista% & echo+
Colous writesec "[7]Convirtiendo el archivo:" & echo+
Colous writesec "[8] %nombre%" & echo+
Colous writesec "[7] Bitrate :[14] %RATE:~0,-5% [7]Kbps"
Colous writesec "[7] Tamano  : %Size:~0,-4% MB"
Colous writesec "[7] Duracion: %Time%"
Colous writesec "[8]================================="
Colous writesec "[7] Nuevo Bitrate: [2]CBR 160 Kbps    [8]|"
Colous writesec "[7] Nuevo Formato: [2]MP3             [8]|"
Colous writesec "[7] Preset:[2] Highest quality (Slow) [8]|"
Colous writesec "[8]__________________________________________________________"
Call :Barloop
(AQUI IRIA LA BARRA DE PROGRESO PARA USARSE CON ESTE COMANDO >> ) coreconverter.exe -silent -infile="%nombre%" -outfile="%nombre%" -convert_to="mp3 (Lame)" -b 160 --cbr -encoding="SLOW" -q 0 -noidtag -priority="low" -errorfile="%temp%\%nombre%.txt"
find /v "error" "%temp%\%nombre%.txt" >nul
Call :Error
del /q "%temp%\%nombre%.txt"
sleep 2
goto:eof
)



Y aquí el script de la barra (Bueno, uno de varios que hay en el link que puse más arriba):
Código (dos) [Seleccionar]

:barloop
set "_cooline=Current progress:"
If not defined _pr set _pr=0
If [%2] EQU [] goto :barloop_chk_defpr
set /a _pr=_pr+%2
:barloop_chk_defpr
If [%3] EQU [] goto :barloop_progbar
set _pr=%3
:barloop_progbar
cls&echo %_cooline%&echo.
IF %_pr% EQU 0 (echo [                              ]  0%%
) ELSE (
IF %_pr% EQU 1 (echo [==^>                           ] 10%%
) ELSE (
IF %_pr% EQU 2 (echo [=====^>                        ] 20%%
) ELSE (
IF %_pr% EQU 3 (echo [========^>                     ] 30%%
) ELSE (
IF %_pr% EQU 4 (echo [===========^>                  ] 40%%
) ELSE (
IF %_pr% EQU 5 (echo [==============^>               ] 50%%
) ELSE (
IF %_pr% EQU 6 (echo [=================^>            ] 60%%
) ELSE (
IF %_pr% EQU 7 (echo [====================^>         ] 70%%
) ELSE (
IF %_pr% EQU 8 (echo [=======================^>      ] 80%%
) ELSE (
IF %_pr% EQU 9 (echo [==========================^>   ] 90%%
) ELSE (
echo [==============================] 100%%
)
)
)
)
)
)
)
)
)
)
)
echo.&set /a _pr=_pr+1
goto %1
echo ERROR: _returnto param wrong or undefined!&PAUSE
REM ## End of THE PROGRESS BAR SUBROUTINE ##
#1720
Pues no tengo "ANSI.sys" en Windows 7 :/, eso significa que no podré usar el batch de la manera que yo deseo?