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 - Eleкtro

#11871
a mito me refiero precisamente a posts como este, siguen preguntando sobre esas actualizaciones, y siguen respondiendo que son dañinasy que no se deben instalar si tienes windows "craqueado", pero todo eso ya es incierto, además tu lo has comprobado tan bien como yo! :P

Si, soy pitoloko xD

Si te refieres al nombre real del servicio, es este: sppsvc

Y puedes hacer la prueba tú mismo, deshabilita el servicio de "protección de software", espera 1 horita, o 2, o 3, no se exactamente cuantas hacen falta, luego abre el notepad por ejemplo y te saldrá la ventanita de que windows no es original... y todo ese rollo en todos los sitios que mires, luego vuelve a habilitar en servicio de proteccion de software y... wuala!  :silbar:

De echo, como hay gente que configura los servicios de windows a su antojo, yo siempre utilizo este script ligado al loader de DAZ por si acaso:

Código (dos) [Seleccionar]
@echo off
sc config sppsvc start= delayed-auto >nul 2>&1
sc start sppsvc >nul 2>&1
Start /B WindowsLoader.exe >nul 2>&1
exit


Un saludo
#11872
Perfecto!

Si tienes ganas podrías postear el comando de la taréa programada que hiciste para ayudar a los que se hayen en una situación parecida.

un saludo
#11873
Pues ya que estamos para los que se quieran ahorrar tutoriales, Esto lo hice hace 1 o 2 años y ya lo posteé:

EDITO: Bueno he actualizado y mejorado los scripts, despues de un par de años xD, además los que posteé antes usaban el programa "sleep.exe", no me di cuenta, muchos nolo tendrán, así que sorry :P, estos de abajo ya están bien.

Obtener privilegios para esta carpeta

Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\Directory\shell\Obtener privilegios para esta carpeta]
"NoWorkingDirectory"=""
"position"="bottom"
"icon"="c:\\Program Files\\PiToLoKo Software\\iconos\\key3.ico"

[HKEY_CLASSES_ROOT\Directory\shell\Obtener privilegios para esta carpeta\command]
@="CMD.exe /C @Echo OFF & Title Obtener privilegios para: %%UserName%% & Mode con cols=100 lines=20 && Color 0F & Cls & Echo+ & Echo. Procesando todos los archivos y subdirectorios de... & Ping -n 2 LocalHost >Nul & Echo+ & Dir /B /S /AD \"%1\" && Echo+ & takeown /f \"%1\" /R /D S >nul && Icacls \"%1\" /Grant %%UserName%%:(F) /T | find /i \"correctamente\" && Echo+ & Echo. Privilegio de \"Acceso total\" (F) Concedido para el usuario \"%%UserName%%\"   Ok! && Ping -n 10 LocalHost >Nul && Exit"



Obtener privilegios para este archivo

Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\*\shell\Obtener privilegios para este archivo]
@="Obtener privilegios para este archivo"
"icon"="c:\\Program Files\\PiToLoKo Software\\iconos\\key3.ico"
"position"="bottom"

[HKEY_CLASSES_ROOT\*\shell\Obtener privilegios para este archivo\command]
@="CMD.exe /C @Echo OFF & Title Obtener privilegios para: %%UserName%% && Mode Con Cols=100 Lines=5 && Color 0F & Takeown /F \"%1\" >Nul && Icacls \"%1\" /Grant %%username%%:(F) >nul && Echo+ & Echo. %1 & Echo+ & Echo. Privilegio de \"Acceso total\" (F) Concedido para el usuario \"%%UserName%%\"   Ok! && Ping -n 5 LocalHost >Nul && Exit"


PD: Cambiar la ruta del icono a gusto del usuario :P

   

   
#11874
Cita de: d3xf4ult en  8 Enero 2012, 15:56 PM

Aclaro como anecdota:
Que una vez instalara Windows 7 Ultimate x64 lo activara con by DAZ y sin querer... instalé TODAS pero TODAS la actualizaciones disponibles hasta el momento, es decir, que instalé esa dos actualizaciones KB que permitian detectar la licencia del sistema operativo y decir si es una copia legal o no, obiamente era ilegal y comoy dije, activado con by DAZ. Pues estuve así como cerca de 1 año con esas actualizaciones instaladas y nunca me paso nada... ni nunca me llegaron mensajes de Microsoft ni nada raro por el estilo. Para probar, lo mismo hice en otro PC de un amigo situado en otro lugar de mi ciudad, y tampoco le pasó nada, creo que de hecho el sigue así con la misma versión de OS y con las actualizaciones dichas instaladas. Hoy en día (a estás añturas de la publicacón de Windows 7) nosé si Microsoft se pasa un poco por el "forro" lo de las actualizaciones para verificar la legalidad del sistema cuando se trata de entornos particulares. No estoy 100% seguro si pasa con todos los equipo, pero por lo que pude comprobar... me parece eso.

No me he leido todos los comentarios, pero falta que hace, hay muchas cosas que no son del todo ciertas...

A ver si empezamos a desmentir este mito, esto ya pasó de ser algo real a un mito, si hay gente que le siga pasando, es por una de dos:

1º - O está usando una versión antigua del loader de Daz.

2º - O no tiene activado el servicios de "protección de software". (Si, Dije ACTIVADO, en automático).

Se pueden instalar todas las actualizaciones que uno quiera, hasta las del mito xD, De echo antes aparecia una notita en el Readme.txt del loader sobre esas actualizaciones, pero con las nuevas actualizaciones dle programa ya no sale información al respecto (Porque eso no pasa, es un miiiiiiiiito).  Un saludo.
     
#11875
Cita de: caramel0rar0 en  9 Enero 2012, 09:25 AM
WTF: No me deja poner la contraseña. "S i n e n c r i p t a r" todo junto, separado el sin del cifrar.

XDDDDDDD

No te ralles, Es un plugin-filtro del foro, Aunque a mi también me parece un What The Fuck! Pero creo que lo usan también para filtrar insultos y palabras mal sonantes...

un saludo

#11876
Cita de: xman6 en  8 Enero 2012, 21:41 PM
necesito el codigo para abrir la caja de pandora  AES256 y saber en donde se encuentra dicha nave y poder seguir disfrutando de estas cervecillas que saben a gloria vendita.

Doy fé, La rebelión marciana lleva planeando un ataque desde la extinción de los dinosaurios.

Por otro lado, Si lo consigues descifrar, Serás el salvador de la humanidad, Nuestro héroe!!

PD: Corred, Marcianos!!, Corred, Temed a los terrícolas! Y no volvais hasta que lluevan sapos en Júpiter, Muahahahaha.
#11877
@xman6

Bueno no se si te interesa xD pero El problema con la maldita hora CORREJIDO! (Para evitarlo hago que el script espere 60 segundos antes de empezar a hacer nada...)

Puede resultar incomodo tambien pero era hacer eso o la otra opcion que sería por ejemplo si el minuto fuese "30" pues setearlo en una variable con un valor de -1 (29), para retrasarlo y que no diera error la comprobación de hora, pero claro, volveriamos al problema del "00" y el "60", despues del 60 va el 00... así que...no me como más el coco. Pero ahora está mejor que antes, Ahora no resetea los minutos de la hora de windows  :-[

He editado el script del comentario de arriba, ya está correjido, ahora si que parece casi perfecto muahahaha xD.

EDITO: Y un pequeño despiste al "pausar" el proceso por segunda vez, (Set Timer-=0) correjido, y de nuevo he vuelto a editar el script de arriba...  Ya se acabarón las ediciones.
#11878
Cita de: xman6 en  8 Enero 2012, 15:11 PM
el archivo txt es de 4.600 gb ,he intentado abrirlo pero es demasiado grande para lograrlo
4,6 Terabytes?  :rolleyes: Debe ser un Pentium de última generación xDDD  :P

Cita de: xman6 en  8 Enero 2012, 15:11 PM
;voy a ver si preparo otro pc mas potente para ir hasta el final ;quizas fi pudieramos tambien agregarle algo para que cada 500 megas generados en txt (o menos) pudiese empezar con otro archivo txt
Es precisamente lo que te iba a comentar, aunque no estoy deacuerdo con el tamaño, lo dejaré en 50 Mb (Y eso quizás ya te va a costar bastante abrirlo).

Entonces...

1º Modifico el script para que se pause 10 minutos cada hora
2º tambien para generar pequeños archivos de texto
3º y de regalo una opcion que te permita unir todos los archivos si kieres xD
4º y una pequeña config para ajustar el tiempo de espera, el tamaño de los textos, y para agregar/eliminar los caracteres que se quieren usar...si fuese necesario :S (por la sensibilidad de las minusculas, o algo...)

Un Saludo.


PD: Hay una complicación, si la hora es 23:00, la siguiente sería 00:00, osea, no es lineal... hmmm de momento no se me ocurre como arreglar eso, pero bueno, ahí te hice el resto xD.
Bueno ya lo he correjido más o menos, en vez de usar las horas uso los minutos, el problema de esto es que... se cambia la hora de windows, si no te importa... xD a ver si consigo arreglar eso mejor... Aunque si lo vas a usar en un pentium...no creo que te importe la hora del relojs, asi que lo dejo así, que funciona :P


EDITO:



Hasta donde yo he probado no he encontrado ningún error, ni en la "espera", ni al comprobar el tamaño de los archivos, ni al unir archivos, ni nada. (Simplemente la pequeña molestia de la hora de windows.)
Pero si encuentras algún error al usarlo, comenta, e intentaría arreglarlo.
Un placer ayudar  ;D


Código (dos) [Seleccionar]
@Echo OFF
title Generar Diccionario Brute Force
REM Por geormarsch

REM Modificado por ElEkTrO H@cKeR
REM Visita Foro.ElHacker.Net
REM Un gran foro!





:Configuracion:
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
REM Seteamos los caracteres que queremos usar...
Set Caracteres=A B C D E F G H I J K L M N O P Q R S T U V W X Y Z 1 2 3 4 5 6 7 8 9 0

REM Seteamos el tiempo de espera para Pentiums xD, En segundos (Bueno, son segundos mas o menos...)
Set Timer=600

REM Seteamos el tamaño de los archivos de texto, El numero es en Bytes.
Set Size=52428800

REM Seteamos el nombre del archivo.
Set File=Diccionario.txt
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::





:Start:
:::::::

Color 07
Set FileCount=1
Set Hora=%time:~3,2%
Set Tiempo=%Timer%

Echo+
Echo. El proceso se iniciar... en 60 segundos para evitar errores.
Echo. Porfavor espere...
Ping -n 69 LocalHost >Nul
Call :Generador %Caracteres%
Goto :FIN:





:SubRutinas:
::::::::::::

:Generador
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
FOR %%d IN (%*) DO (
FOR %%e IN (%*) DO (
FOR %%f IN (%*) DO (
FOR %%g IN (%*) DO (
FOR %%h IN (%*) DO (
FOR %%i IN (%*) DO (
FOR %%j IN (%*) DO (
FOR %%k IN (%*) DO (
FOR %%l IN (%*) DO (
FOR %%m IN (%*) DO (
FOR %%n IN (%*) DO (
FOR %%o IN (%*) DO (
FOR %%p IN (%*) DO (

REM Borra esta linea de abajo si quieres, el proceso puede tardar el doble, pero al menos te lo va mostrando y asi sabes por que combinación va para echar cálculos xD...
echo %%a%%b%%c%%d-%%e%%f%%g%%h-%%i%%j%%k%%l-%%m%%n%%o%%p

echo %%a%%b%%c%%d-%%e%%f%%g%%h-%%i%%j%%k%%l-%%m%%n%%o%%p>>"%File%"
Call :Tamaño "%file%"
Call :Pausar
))))))))))))))))
Goto :EOF


:Pausar
If %time:~3,2% Equ %Hora% (
Call :CountDown
Goto :EOF
) ELSE (
Goto :EOF
)


:CountDown
Cls
Echo+
Echo. Pausando el proceso durante %Timer% segundos...
Ping -n 2 LocalHost >Nul
Set /A Timer-=1
If %Timer% EQU 1 (Set Timer=%Tiempo% && Goto :EOF)
Goto :CountDown


:Tamaño
If %~z1 GTR %Size% (
Set /a FileCount+=1
Ren "%File%" "%File:~0,-4% %Filecount%%~x1"
Goto :EOF
)
Goto :EOF


:Unir
Copy /Y "%~n1*" "TODO %~n1.txt" >Nul
Del /Q "%~n1*" >Nul
Goto :EOF





:FIN:
:::::

Echo+
Echo. El proceso ha finalizado.
Echo+
Choice /M "¨Quieres combinar los archivos de texto?"
If %Errorlevel% EQU 1 (
Call :Unir "%File%"
Cls
Echo+
Echo. Archivos combinados.
Echo+
Echo. Pulse una tecla para salir...
Pause >nul
Exit
) Else (
Echo. Pulse una tecla para salir...
Pause >nul
Exit
)
#11879
jajaja casi me quedo ciego, que paranoia de script xD, está muy bueno!

un saludo
#11880
Se ve muy bien! No se si lo hiciste tú o lo copiaste... Solo lo digo por los créditos xD

Pues ya que dices que te mandan mps sobre el tema, supongo que hay gente interesada, así que con tu permiso me he animado a hacer unos cambios importantes y una pequeña GUI para tener un generador de codes definitivo... O casi xD

-Se puede usar de dos formas este script, Uno es automáticamente (Sin menú, Como el script de geormarsch) configurando unas intuitivas variables, ahi donde pone "Configuración predeterminada" en el script.

EJEMPLO: Para realizar la misma función que el script de seriales de geormarsch, habria que editarlas Así:
Longitud=16
Serial=SI
UsarDefault=SI

O por otro lado, se puede ejecutar el script para que salga el menú (Poniendo UsarDefault=NO)...
Todo depende de ese parámetro "Set UsarDefault=" (NO/SI).

-Se pueden crear todo tipo de códigos con un máximo de 16 caracteres (No quise hacer más largo el script, ya tiene demasiados FOR xD)

-El modo "serial" sirve para hacer lo que hace el script de geormarsch (Osea esto: xxxx-xxxx-xxxx-xxxx), Para eso hay que elegir longitud 16 en el menú, o como ya dije antes, configurar la "configuración predeterminada" editando el script.


Quise hacer más complejo el modo serial, añadirle una opcion para elegir bloques (Por ejemplo xxxx-xxxx-xxxx o xxxxxxx-xxxxxxx-xxxxxxx), pero bueno sinceramente eso no lo iba a usar mucho yo y no quiero comerme la cabeza con tanto FOR, así que lo he dejado a medias por si alguien quiere seguir mejorando el script...

Sin más que añadir, unas imagenes, el script, y un saludo!










Código (dos) [Seleccionar]
@Echo OFF
Title Generar Diccionario Brute Force o Serial v2.0
REM Code original by geormarsch

REM MOD By EleKTrO H@cKeR
REM Visita Foro.ElHacker.Net



: Instrucciones :
:###############:
:# Color       #: Color de fondo de la consola de comandos.
:# Archivo     #: Archivo de destino donde se guardarán los codigos generados.                                                      
:# Caracteres  #: Los caracteres que se deben incluir en el código.                        
:# Longitud    #: El número de columnas del código. (Máximo 16)                            
:# Serial      #: Activa el modo serial (El uso del guión).                    
:# UsarDefault #: Activar/Desactivar el uso de la configuración por defecto. Sirve para activar el modo silencioso, Sin menú ni nada                
:##########################################################################################:



:Configuración predeterminada
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
Set Color=07
Set Archivo="%~pd0Nuevo Diccionario %DATE:/=-%.txt"
Set Caracteres=A B C D E F G H I J K L M N O P Q R S T U V W X Y Z 0 1 2 3 4 5 6 7 8 9
Set Longitud=3
Set Serial=NO

Set UsarDefault=no
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::



:Menu
:::::
Mode con cols=85 lines=30
Color %Color%
Set HoraInicio=%Date% - %TIME%

If /I "%UsarDefault%" EQU "SI" (Goto :Empezar)

:SubMenuColor
CLS
Echo.
Echo. Elija un color para el fondo y las letras.   (Ejemplo: 07^)
Echo.
Color /? | find "="
Echo.
Echo. O puede usar el color por defecto pulsando "Enter".
Echo.
Set /P Color=^>^>^>
Color %Color%

:SubMenuArchivo
CLS
Echo.
Echo. Color=%COLOR%
Echo ____________________________________________________________________________________
Echo.
Echo. Elija un nombre para el archivo de destino...   (Ejemeplo: Diccionario.txt^)
Echo.
Echo. O puede usar el nombre por defecto pulsando "Enter".
Echo.
Set /P Archivo=^>^>^>

:SubMenuCaracteres
CLS
Echo.
Echo. Color=%COLOR%
Echo. Archivo=%Archivo%
Echo ____________________________________________________________________________________
Echo.
Echo. Elija los caracteres, Debe separarlos con espacios...   (Ejemeplo: A B C 1 2 3^)
Echo.
Echo. O puede usar los caracteres por defecto pulsando "Enter".
Echo.
Set /P Caracteres=^>^>^>

:SubMenuLongitud
Set Longitud=
CLS
Echo.
Echo. Color=%COLOR%
Echo. Archivo=%Archivo%
Echo. Caracteres=%Caracteres%
Echo ____________________________________________________________________________________
Echo.
Echo. Elija la longitud de caracteres del c¢digo... (Máximo 16)   (Ejemeplo: 8^)
Echo.
Set /P Longitud=^>^>^>
If NOT Defined Longitud (Goto :SubMenuLongitud)
If %Longitud% EQU 16 (Goto :SubMenuSerial) ELSE (Goto :SubMenuFinal)

:SubMenuSerial
CLS
Echo.
Echo. Color=%COLOR%
Echo. Archivo=%Archivo%
Echo. Caracteres=%Caracteres%
Echo. Longitud=%Longitud%
Echo ____________________________________________________________________________________
Echo.
Choice /M "¨Quiere usar el modo serial?"
If %Errorlevel% EQU 1 (Set Serial=SI && Call :ChequearLongitud) ELSE (Set Serial=NO && Goto :SubMenuFinal)

:ChequearLongitud
If %Longitud% LSS 16 (
Echo.
Echo. Lo siento, En esta version el modo Serial solo se puede usar con longitud de 16 caracteres...
Ping -n 4 localhost >Nul
Set Serial=NO
) Else (Set Bloques=4)

rem :SubMenuBloques
rem CLS
rem Echo.
rem Echo. Color=%COLOR%
rem Echo. Archivo=%Archivo%
rem Echo. Caracteres=%Caracteres%
rem Echo. Longitud=%Longitud%
rem Echo. Serial=%Serial%
rem Echo ____________________________________________________________________________________
rem Echo.
rem Echo. Elija la longitud de los bloques del serial...  (Ejemeplo: 4^) (xxxx-xxxx^)
rem Echo.
rem Set /P Bloques=^>^>^>
rem If NOT Defined Bloques (Goto :SubMenuBloques)
rem If %Bloques% GTR %Longitud% (
rem Echo.+
rem Echo. ERROR. El numero no puede ser mayor que la longitud!
rem Ping -n 4 localhost >Nul
rem Set Bloques=
rem Goto :SubMenuBloques)

:SubMenuFinal
CLS
Echo.
Echo. Color=%COLOR%
Echo. Archivo=%Archivo%
Echo. Caracteres=%Caracteres%
Echo. Longitud=%Longitud%
Echo. Serial=%Serial%
If Defined Bloques (Echo. Bloques=%Bloques%)
Echo ____________________________________________________________________________________
Echo.
Choice /M "¨Todo OK?"
If %Errorlevel% EQU 2 (Goto :MENU)
CLS



:Empezar
::::::::

If /I %Serial% EQU SI (Call :Generador_Serial_%Longitud%_Bloques_%Bloques% %Caracteres%) ELSE (Call :Generador%Longitud% %Caracteres%)

:Fin
::::
Echo.
Echo. El proceso de generaci¢n ha terminado!!
Echo.
Echo. Inicio: %HoraInicio%
Echo. Fin:    %Date% - %TIME%
Echo.
Echo. Pulse una tecla para salir...
Pause >Nul
Exit



:Generadores
::::::::::::

:Generador1
FOR %%a IN (%*) DO (
Echo. %%a
Echo. %%a>>%Archivo%
)
Goto :EOF

:Generador2
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
Echo. %%a%%b
Echo. %%a%%b>>%Archivo%
))
Goto :EOF

:Generador3
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
Echo. %%a%%b%%c
Echo. %%a%%b%%c>>%Archivo%
)))
Goto :EOF

:Generador4
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
FOR %%d IN (%*) DO (
Echo. %%a%%b%%c%%d
Echo. %%a%%b%%c%%d>>%Archivo%
))))
Goto :EOF

:Generador5
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
FOR %%d IN (%*) DO (
FOR %%e IN (%*) DO (
Echo. %%a%%b%%c%%d%%e
Echo. %%a%%b%%c%%d%%e>>%Archivo%
)))))
Goto :EOF

:Generador6
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
FOR %%d IN (%*) DO (
FOR %%e IN (%*) DO (
FOR %%f IN (%*) DO (
Echo. %%a%%b%%c%%d%%e%%f
Echo. %%a%%b%%c%%d%%e%%f>>%Archivo%
))))))
Goto :EOF

:Generador7
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
FOR %%d IN (%*) DO (
FOR %%e IN (%*) DO (
FOR %%f IN (%*) DO (
FOR %%g IN (%*) DO (
Echo. %%a%%b%%c%%d%%e%%f%%g
Echo. %%a%%b%%c%%d%%e%%f%%g>>%Archivo%
)))))))
Goto :EOF


:Generador8
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
FOR %%d IN (%*) DO (
FOR %%e IN (%*) DO (
FOR %%f IN (%*) DO (
FOR %%g IN (%*) DO (
FOR %%h IN (%*) DO (
Echo. %%a%%b%%c%%d%%e%%f%%g%%h
Echo. %%a%%b%%c%%d%%e%%f%%g%%h>>%Archivo%
))))))))
Goto :EOF


:Generador9
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
FOR %%d IN (%*) DO (
FOR %%e IN (%*) DO (
FOR %%f IN (%*) DO (
FOR %%g IN (%*) DO (
FOR %%h IN (%*) DO (
FOR %%i IN (%*) DO (
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i>>%Archivo%
)))))))))
Goto :EOF

:Generador10
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
FOR %%d IN (%*) DO (
FOR %%e IN (%*) DO (
FOR %%f IN (%*) DO (
FOR %%g IN (%*) DO (
FOR %%h IN (%*) DO (
FOR %%i IN (%*) DO (
FOR %%j IN (%*) DO (
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i%%j
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i%%j>>%Archivo%
))))))))))
Goto :EOF

:Generador11
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
FOR %%d IN (%*) DO (
FOR %%e IN (%*) DO (
FOR %%f IN (%*) DO (
FOR %%g IN (%*) DO (
FOR %%h IN (%*) DO (
FOR %%i IN (%*) DO (
FOR %%j IN (%*) DO (
FOR %%k IN (%*) DO (
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i%%j%%k
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i%%j%%k>>%Archivo%
)))))))))))
Goto :EOF

:Generador12
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
FOR %%d IN (%*) DO (
FOR %%e IN (%*) DO (
FOR %%f IN (%*) DO (
FOR %%g IN (%*) DO (
FOR %%h IN (%*) DO (
FOR %%i IN (%*) DO (
FOR %%j IN (%*) DO (
FOR %%k IN (%*) DO (
FOR %%l IN (%*) DO (
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i%%j%%k%%l
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i%%j%%k%%l>>%Archivo%
))))))))))))
Goto :EOF

:Generador13
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
FOR %%d IN (%*) DO (
FOR %%e IN (%*) DO (
FOR %%f IN (%*) DO (
FOR %%g IN (%*) DO (
FOR %%h IN (%*) DO (
FOR %%i IN (%*) DO (
FOR %%j IN (%*) DO (
FOR %%k IN (%*) DO (
FOR %%l IN (%*) DO (
FOR %%m IN (%*) DO (
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i%%j%%k%%l%%m
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i%%j%%k%%l%%m>>%Archivo%
)))))))))))))
Goto :EOF

:Generador14
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
FOR %%d IN (%*) DO (
FOR %%e IN (%*) DO (
FOR %%f IN (%*) DO (
FOR %%g IN (%*) DO (
FOR %%h IN (%*) DO (
FOR %%i IN (%*) DO (
FOR %%j IN (%*) DO (
FOR %%k IN (%*) DO (
FOR %%l IN (%*) DO (
FOR %%m IN (%*) DO (
FOR %%n IN (%*) DO (
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i%%j%%k%%l%%m%%n
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i%%j%%k%%l%%m%%n>>%Archivo%
))))))))))))))
Goto :EOF

:Generador15
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
FOR %%d IN (%*) DO (
FOR %%e IN (%*) DO (
FOR %%f IN (%*) DO (
FOR %%g IN (%*) DO (
FOR %%h IN (%*) DO (
FOR %%i IN (%*) DO (
FOR %%j IN (%*) DO (
FOR %%k IN (%*) DO (
FOR %%l IN (%*) DO (
FOR %%m IN (%*) DO (
FOR %%n IN (%*) DO (
FOR %%o IN (%*) DO (
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i%%j%%k%%l%%m%%n%%o
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i%%j%%k%%l%%m%%n%%o>>%Archivo%
)))))))))))))))
Goto :EOF

:Generador16
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
FOR %%d IN (%*) DO (
FOR %%e IN (%*) DO (
FOR %%f IN (%*) DO (
FOR %%g IN (%*) DO (
FOR %%h IN (%*) DO (
FOR %%i IN (%*) DO (
FOR %%j IN (%*) DO (
FOR %%k IN (%*) DO (
FOR %%l IN (%*) DO (
FOR %%m IN (%*) DO (
FOR %%n IN (%*) DO (
FOR %%o IN (%*) DO (
FOR %%p IN (%*) DO (
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i%%j%%k%%l%%m%%n%%o%%p
Echo. %%a%%b%%c%%d%%e%%f%%g%%h%%i%%j%%k%%l%%m%%n%%o%%p>>%Archivo%
))))))))))))))))
Goto :EOF


:Generador_Serial_16_Bloques_4
FOR %%a IN (%*) DO (
FOR %%b IN (%*) DO (
FOR %%c IN (%*) DO (
FOR %%d IN (%*) DO (
FOR %%e IN (%*) DO (
FOR %%f IN (%*) DO (
FOR %%g IN (%*) DO (
FOR %%h IN (%*) DO (
FOR %%i IN (%*) DO (
FOR %%j IN (%*) DO (
FOR %%k IN (%*) DO (
FOR %%l IN (%*) DO (
FOR %%m IN (%*) DO (
FOR %%n IN (%*) DO (
FOR %%o IN (%*) DO (
FOR %%p IN (%*) DO (
Echo. %%a%%b%%c%%d-%%e%%f%%g%%h-%%i%%j%%k%%l-%%m%%n%%o%%p
Echo. %%a%%b%%c%%d-%%e%%f%%g%%h-%%i%%j%%k%%l-%%m%%n%%o%%p>>%Archivo%
))))))))))))))))
Goto :EOF