Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. @echo off
  2. echo.
  3. echo ************************************************************
  4. echo * Descarga de torrents de la web elitetorrent.net
  5. echo * Descarga posterior de ficheros con uTorrent
  6. echo * Jay Kamble Govind http://sretupmoc.blogspot.com
  7. echo ************************************************************
  8.  
  9. if "%1"=="" goto msg
  10. if "%2"=="" goto msg
  11.  
  12. set id_inicial=%1
  13. set id_final=%2
  14. set cont=%id_inicial%
  15. set pelis=""
  16. set ruta_actual=%~dp0
  17.  
  18. if not exist "%ruta_actual%\Torrents\" mkdir %ruta_actual%\Torrents\
  19.  
  20. if not exist "%ruta_actual%\Descargas\" mkdir %ruta_actual%\Descargas\
  21.  
  22. :torrent
  23. if %cont% leq %id_final% (
  24.   echo Descargando archivo torrent %cont%... %time%
  25.   set /a segundos=%random:~0,2% %% 60
  26.   timeout /t %segundos% /NOBREAK > nul
  27.   wget --content-disposition http://www.elitetorrent.net/get-torrent/%cont% -N -a Torrent_%date:/=_%.log --directory-prefix=Torrents --waitretry=30
  28.   set /a cont=%cont%+1
  29.   goto torrent
  30. ) else (goto peliculas)
  31.  
  32. :peliculas
  33. for /f %%a in ('dir /b Torrents') do (
  34.  call :lista %%a
  35. )
  36. set pelis=%pelis:~2%
  37. echo Descargando peliculas... %time%
  38. start uTorrent.exe /noinstall /minimized /directory "%ruta_actual%Descargas\" %pelis%
  39. timeout /t 14400 /NOBREAK > nul
  40. echo Cierre de uTorrent... %time%
  41. goto end
  42.  
  43. :lista
  44. set pelis=%pelis%"%ruta_actual%Torrents\%1"
  45. goto :eof
  46.  
  47. :msg
  48. echo ERROR: Especifique el rango de IDs para descargar los torrents de elitetorrent
  49. echo e.j. %0 12345 12346
  50.  
  51. :end
  52. taskkill /f /im uTorrent.exe /t > nul
  53. del /q /f Torrents\*.torrent
  54. REM shutdown /s /t 0