@echo off
Set START=%Time%
FOR /L %%X IN (1,1,1000000) DO (Echo %%X)
Set FINISH=%Time%
Echo %START% ^| %FINISH%
pause

@echo off
:anteinicio
set /p t=cuantos primos quieres?=
if %t% lss 3 (echo su numero tiene que ser mayor que 2) else (goto seguir)
pause
exit
:seguir
set ee=%random%
if %ee:~-1%==2 goto seguir
if %ee:~-1%==4 goto seguir
if %ee:~-1%==6 goto seguir
if %ee:~-1%==8 goto seguir
if %ee:~-1%==0 goto seguir
echo %ee% 
set /a t=t-1
if %t%== 0 (pause) else (goto seguir)

@Echo off
Title Prime Number Generator
Setlocal enabledelayedexpansion
 
:: By Elektro H@cker
::
:: Generador de números primos.
::
Set MinRange=2
Set MaxRange=1000
:: :: :: :: ::
 
:Calc
Set /A MinRange+=1
Set /A Matches=0
 
FOR /L %%# IN (2,1,!MinRange!) DO (
	FOR /L %%X IN (2,1,!MinRange!) DO (
		Set /A Result=%%#*%%X
		If !Result! EQU !MinRange! (Goto :Calc)
	)
)
 
If !MinRange! GTR !MaxRange! (Pause>nul) ELSE (<Nul Set /P=%MinRange%,)
Goto :Calc

@Echo OFF
Title Prime Number Generator
REM   Versión NOOB XD
 
:: By Elektro H@cker
::
:: Obtiene una lista de números primos desde el número 2 hasta el número 10.000
:: Nota: Es necesario WGET para usarlo.
 
wget -help >NUL || Exit /B 1
 
Setlocal enabledelayedexpansion
WGET -q "http://www.addedbytes.com/blog/prime-numbers/" -O "%TEMP%\Primes.html"
 
 
For /F "Tokens=*" %%a in ('Type "%TEMP%\Primes.html" ^| Find "<li"') do (
	Set "Numbers=%%a"
	Set "Numbers=!Numbers:</li>>=!"
	Set "Numbers=!Numbers:</li><li>=, !"
	Set "Numbers=!Numbers:<ul><li>=!"
	Set "Numbers=!Numbers:</li></ul>=!"
	Echo "!NUMBERS!" | FINDSTR ",.[0-9]" 2>NUL
)
Pause
Exit

@Echo OFF
If exist "D:" (Set "Drive=D:") ELSE (Set "Drive=%Homedrive%")
SET "FECHA=%date% %time%"
SET "FECHA=%FECHA:/=%" & SET "FECHA=%FECHA::=%" & SET "FECHA=%FECHA:,=%"
mysqldump --opt -u  -p rss_siat > "%DRIVE%\Backup-%FECHA%-siat.sql"
Exit
 

@Echo off
 
Set "Url=http://cheat.retrogames.com/"
Set "UrlFile=cheat....zip"
Set "TempFile=%TEMP%\temp.html"
 
WGET -q "%URL%" -O "%TempFile%"
 
For /F "Tokens=*" %%a in ('Type "%TempFile%" ^| Findstr "%URLFILE%"') DO (Echo %%a)
:: Eso muestra la linea (SIN FILTRAR) que contiene el enlace directo al archivo (O eso debería).
:: Como no dijiste ni que url es, ni el nombre del archivo, Tengo datos insuficientes, el resto te toca hacerlo a tí.
:: Dáme más datos y hago las comprobaciones que faltan.
pause
Exit
 
REM Para descargar el archivo:
:: WGET "Enlace al archivo.exe"
 

@Echo OFF
Setlocal enabledelayedexpansion
 
:: By Elektro H@cker
::
:: Copy the Newest file in a folder greater than X bytes to a destination directory.
:: You maybe want to modify these variables:
::
Set "Source=%CD%"
Set "Destination=C:\Test\"
Set "Size=1024"
:: :: :: :: :: :: :: :: ::
 
for /F "tokens=1-4 delims=;" %%a in ('forfiles /P "%SOURCE%" /C "cmd /c echo @fdate;@ftime;@fsize;@path"') do (
	If %%c GTR %SIZE% (
		Set "DAY=%%a"  && Set "DAY=!DAY:/=!"
		Set "HOUR=%%b" && Set "HOUR=!HOUR::=!"
		Echo !DAY!!HOUR!;%%d >> "NewestFile.txt"
	)
)
 
for /F "tokens=2 delims=;" %%# in ('Type "%TEMP%\NewestFile.txt" ^| Sort /R') do (
	Copy /Y %%# "%DESTINATION%" 1>NUL
	Del /Q "%TEMP%\NewestFile.txt"
	Exit
)

@Echo OFF
 
:: By Elektro H@cker
::
Set "Origen=%CD%"
:: :: :: :: :: :: :: :: ::
 
PUSHD "%ORIGEN%"
 
:: Lista los archivos por últime fecha de modificación.
(For /R %%@ in (*) do (Echo %%~t@ %%~z@ %%@))>"%TEMP%\Fecha.txt"
 
:: Ordena los archivos por última fecha de modificación (El más reciente primero).
Type "%TEMP%\Fecha.txt" | Sort /R
Pause & Exit

@Echo OFF
 
:: By Elektro H@cker
::
Set "Origen=%CD%"
:: :: :: :: :: :: :: :: ::
PUSHD "%ORIGEN%"
 
:: Lista los archivos por tamaño.
(For /R %%@ in (*) do (Echo %%~z@ %%@))>"%TEMP%\tama¤o.txt"
 
:: Muestra la lista.
Type "%TEMP%\tama¤o.txt"
Pause & Exit

FOR /F "tokens=7* delims= " %%i IN ("wmic logicaldisk where "DeviceID='C:'" get FreeSpace") DO echo %%i de Espacio libre

Echo: Espacio libre: & wmic logicaldisk where "DeviceID='C:'" get FreeSpace | FINDSTR "[0-9]"

FOR /F "Tokens=2 delims=," %%X IN ('wmic LogicalDisk Where "DeviceID='C:'" Get Name^,FreeSpace /Format:csv ^| FINDSTR [0-9]') DO (Echo %%X De espacio libre.)