acá pongo el code del botón y de tres funciones más que usa: 1)arr 2)rear 3)sum
para los que conocen ya con esto es más fácil hallar los seriales! por supuesto no es mi caso.

private void button1_Click(object sender, EventArgs e)
{
	string text = this.textBox1.Text;
	int[] array = new int[11];
	int i = 0;
	this.rear(array);
	if (text.Length > 6 && text.Length < 12)
	{
		while (i < text.Length)
		{
			array[i] = this.Asc(text[i].ToString());
			i++;
		}
		this.arr(ref array, array.Length);
		int num = this.sum(array, 10);
		if (num > 1245 & num < 1250)
		{
			if (array[0] + array[1] > 125 && array[0] + array[1] < 150)
			{
				if (array[3] == array[5])
				{
					this.label2.ForeColor = Color.Green;
					this.label2.Text = "CORRECTO :)";
				}
				else
				{
					this.label2.ForeColor = Color.Red;
					this.label2.Text = "INCORRECTO";
				}
			}
			else
			{
				this.label2.ForeColor = Color.Red;
				this.label2.Text = "INCORRECTO";
			}
		}
		else
		{
			this.label2.ForeColor = Color.Red;
			this.label2.Text = "INCORRECTO";
		}
	}
	else
	{
		this.label2.ForeColor = Color.Red;
		this.label2.Text = "INCORRECTO";
 
	}
}
 
public int sum(int[] v, int cant)
{
	int result;
	if (cant > -1)
	{
		result = v[cant] + this.sum(v, cant - 1);
	}
	else
	{
		result = 0;
	}
	return result;
}
 
public void rear(int[] clav)
{
	for (int i = 0; i < clav.Length; i++)
	{
		clav[i] = 0;
	}
}
 
public void arr(ref int[] clav, int cant)
{
	if (cant > 1)
	{
		for (int i = 0; i < cant - 1; i++)
		{
			if (clav[i] > clav[i + 1])
			{
				int num = clav[i];
				clav[i] = clav[i + 1];
				clav[i + 1] = num;
			}
		}
		this.arr(ref clav, cant - 1);
	}
}
 

MOD EDIT: Usar etiquetas GeSHi para colocar código.

---

Me olvidé! acá está el archivo limpio por si lo quieren revisar!
http://www.mediafire.com/download/57ciujbh35y3ra8/Go__II.rar

el pass es: a

MOD EDIT: No hacer doble post.

OK! Gracias! siempre paso por alto los bruteforce, pero evidentemente dan sus resultados! Me gusta por que este es externo en vez de usar el mismo soft.

RDGMax:
              ¿por qué no subes aunque sea un minitute? así los que no sabemos podemos aprender!

bueno, partamos de la base que no has perfeccionado tu sistema, sino que has usado un packer de terceros, en este caso themida, hay que ver cuando esté limpio.

No anda el link

pues las mejores herramientas para analizar comportamientos y posibilidades de un archivo(que no tenemos el código fuente) son ollydbg e ida. Sino como hacen los creadores de antivirus ¿piden el código al creador?

me parece que hay que tener cuidado con los antivirus también, ya que muchas veces detectan arrays hexa como posibles virus y dan falsos positivos. Estaría bueno para probar los soft usar ambientes controlados.

muchas veces he tenido que hacer aplicaciones como facturas y lo que siempre queda bien o piden es que el número se pase a letras, una funcíon vieja que hace eso, estoy seguro que Elektro lo hace más fácil pero igual acá va:

 Public Function NunAText(ByVal value As Double) As String
        Select Case value
            Case 0 : NunAText = "CERO"
            Case 1 : NunAText = "UN"
            Case 2 : NunAText = "DOS"
            Case 3 : NunAText = "TRES"
            Case 4 : NunAText = "CUATRO"
            Case 5 : NunAText = "CINCO"
            Case 6 : NunAText = "SEIS"
            Case 7 : NunAText = "SIETE"
            Case 8 : NunAText = "OCHO"
            Case 9 : NunAText = "NUEVE"
            Case 10 : NunAText = "DIEZ"
            Case 11 : NunAText = "ONCE"
            Case 12 : NunAText = "DOCE"
            Case 13 : NunAText = "TRECE"
            Case 14 : NunAText = "CATORCE"
            Case 15 : NunAText = "QUINCE"
            Case Is < 20 : NunAText = "DIECI" & NunAText(value - 10)
            Case 20 : NunAText = "VEINTE"
            Case Is < 30 : NunAText = "VEINTI" & NunAText(value - 20)
            Case 30 : NunAText = "TREINTA"
            Case 40 : NunAText = "CUARENTA"
            Case 50 : NunAText = "CINCUENTA"
            Case 60 : NunAText = "SESENTA"
            Case 70 : NunAText = "SETENTA"
            Case 80 : NunAText = "OCHENTA"
            Case 90 : NunAText = "NOVENTA"
            Case Is < 100 : NunAText = NunAText(Int(value \ 10) * 10) & " Y " & NunAText(value Mod 10)
            Case 100 : NunAText = "CIEN"
            Case Is < 200 : NunAText = "CIENTO " & NunAText(value - 100)
            Case 200, 300, 400, 600, 800 : NunAText = NunAText(Int(value \ 100)) & "CIENTOS"
            Case 500 : NunAText = "QUINIENTOS"
            Case 700 : NunAText = "SETECIENTOS"
            Case 900 : NunAText = "NOVECIENTOS"
            Case Is < 1000 : NunAText = NunAText(Int(value \ 100) * 100) & " " & NunAText(value Mod 100)
            Case 1000 : NunAText = "MIL"
            Case Is < 2000 : NunAText = "MIL " & NunAText(value Mod 1000)
            Case Is < 1000000 : NunAText = NunAText(Int(value \ 1000)) & " MIL"
                If value Mod 1000 Then NunAText = NunAText & " " & NunAText(value Mod 1000)
            Case 1000000 : NunAText = "UN MILLON"
            Case Is < 2000000 : NunAText = "UN MILLON " & NunAText(value Mod 1000000)
            Case Is < 1000000000000.0# : NunAText = NunAText(Int(value / 1000000)) & " MILLONES "
                If (value - Int(value / 1000000) * 1000000) Then NunAText = NunAText & " " & NunAText(value - Int(value / 1000000) * 1000000)
                'Case 1000000000000.0# : NunAText = "UN BILLON"
                'Case Is < 2000000000000.0# : NunAText = "UN BILLON " & NunAText(value - Int(value / 1000000000000.0#) * 1000000000000.0#)
                'Case Else : NunAText = NunAText(Int(value / 1000000000000.0#)) & " BILLONES"
                '   If (value - Int(value / 1000000000000.0#) * 1000000000000.0#) Then NunAText = NunAText & " " & NunAText(value - Int(value / 1000000000000.0#) * 1000000000000.0#)
        End Select
 
 
    End Function

uso: NumAText(1897432)

x64core:
            sin lugar a dudas el joven eres tú, primero: pues no espero nada, pero hay que remarcar e intentar respaldar las normas de educación, cualquiera pide (sin vergüenza ni descaros), sin el menor esfuerzo por resolver el problema y sin la educación de agradecer, esperar todo servido y no agradecer a quien sea es un síntoma de lo bajo que están los valores sociales.
segundo: no exijo nada de los que entran, ahora si descargan cualquier cosa para probar sin tener conocimientos ¿de quién es la culpa? Pero con el post anterior te pusiste de Robin Hood (defensor de pobres y ausentes) gratuitamente. ¿acaso analizaste la herramienta y encontraste efectos secundarios dañinos? como dice mcksys tu encono personal contra rdg es evidente.
ahhh al próposito ¿eres el autor del debugger de 64 bits? por que si es así no veo el código en ningún lado y ¿cómo se que no es malware? no estoy obligado a saber usar ni tener VM.

mcksys: efectivamente este post es sobre todo por bloquear el acceso a la respuesta en el post mencionado.

lei el post en el que RDG sube una aplicación para detectar malware y se le acusa de cosas que no sé ni me importa si son reales o no, es entre él y los moredadores, pero.. supongo que las reglas de públicación del code está, aunque no he visto ni un code de nada. citando a x64core "¿es en serio?" y bla bla bla mejores. supongo que cada uno es libre de considerar que cada soft y su publicación es en serio y sobre lo que es mejor siempre depende de cada uno y no por eso está bueno menospreciar cualquier otra aplicación. "Se arriesga a que le haga..." está es la sección de análisis y diseño de malware, supongo que quien entra debería tener conocimientos mínimos sobre el tema, como para poder probar soft en entornos controlados, por lo tanto cada cual sabe a lo que se arriesga con cualquier soft(las grandes empresas usan spyware y no hablo de malware porque desconozco todo el soft que circula), de última si no tienen idea no lo bajen y listo!.
La censura de algo que no es una agresión directa,(bah todas las censuras) me parece muy tiránico, pero eso es lo bueno que da el poder, cada cual cree y hace lo que quiere.
Además me parece indignante no poder contestar en el mismo post.
Si van a censurar, haganlo con los que piden solución a problemas que no tienen la menor idea y cuando reciben la respuesta no aparecen ni para agradecer. ahhhh menos mal que no soy moderador, por que no los censuraría, los elimino del sitio.  

Mod: Tema movido, este post no es sobre malware, sino sobre el foro