Mensajes

Lo baje y tampoco me funciona...

[get_IsActivated()]

@ironbike solo debes buscar el método get_IsActivated() y cambiar el valor de retorno:

Sustituir

Código [Seleccionar] Expandir

beq.s por

Código [Seleccionar] Expandir

br.s y con eso es suficiente hasta donde probe...
El método get_IsActivated() lo utiliza en todas las comprobaciones que leí en el programa, y cambiando el valor de retorno queda asi:



y no salen las limitaciones que da el trial.

Si buscas crear un keygen, el serial se basa en el id del procesador con algunas modificaciones y un poco de criptografía, igual de sencillo al método de validación, todo esta cerca al método mencionado.

Saluos.

Como esta demasiado fácil te mando por MP el serial y además modifico tu crackme (color, tipo de borde, maximizar, etc) para mostrar los labels que utilizas...




y si gustas aqui esta el exe modificado para que acepte cualquier o ningun serial.

http://www.4shared.com/file/1Y3EQqLd/Crackme_V1_By_Archreg.html

Puedes crear la Dll de esta forma:

Código (csharp) [Seleccionar] Expandir

//zip.cs
using System;
using System.Collections.Generic;
using System.Text;
using System.IO;
using System.IO.Compression;

namespace GZipStreamC
{
    public class ZipStream
    {       
        public static string Zip(string text)
        {
            byte[] buffer = Encoding.UTF8.GetBytes(text);
            MemoryStream ms = new MemoryStream();
            using (GZipStream zip = new GZipStream(ms, CompressionMode.Compress, true))
            {
                zip.Write(buffer, 0, buffer.Length);
            }
            ms.Position = 0;
            byte[] compressed = new byte[ms.Length];
            ms.Read(compressed, 0, compressed.Length);
            byte[] gzBuffer = new byte[compressed.Length + 4];
            System.Buffer.BlockCopy(compressed, 0, gzBuffer, 4, compressed.Length);
            System.Buffer.BlockCopy(BitConverter.GetBytes(buffer.Length), 0, gzBuffer, 0, 4);
            return Convert.ToBase64String(gzBuffer);
        }
        public static string UnZip(string compressedText)
        {
            byte[] gzBuffer = Convert.FromBase64String(compressedText);
            using (MemoryStream ms = new MemoryStream())
            {
                int msgLength = BitConverter.ToInt32(gzBuffer, 0);
                ms.Write(gzBuffer, 4, gzBuffer.Length - 4);
                byte[] buffer = new byte[msgLength];
                ms.Position = 0;
                using (GZipStream zip = new GZipStream(ms, CompressionMode.Decompress))
                {
                    zip.Read(buffer, 0, buffer.Length);
                }
                return Encoding.UTF8.GetString(buffer);
            }
        }
    }
}

Si utilizas versiones express, para compilarlo necesitas tener instalado el VC++ 9 (Símbolo del sistema de Visual Studio ....) y la haces con la siguiente linea:

Código (bash) [Seleccionar] Expandir

csc /target:library /out:zip.DLL zip.cs

Puedes añadir más parametros deacuerdo a tus necesidades.

De todas formas te doy el enlace a la dll que necesitas:

http://www.4shared.com/file/sI775UnO/zip.html

Pero lo mejor es que modifiques el code para prevenir posibles errores.

Lo utilizas de la sgte forma:

Código (vbnet) [Seleccionar] Expandir

Imports GZipStreamC.ZipStream
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox1.Text = Zip(TextBox1.Text)
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        TextBox1.Text = UnZip(TextBox1.Text)
    End Sub
End Class


Antes necesitas hacer una referencia a zip.dll

Es solo un ejemplo sencillo, solo para probar como funciona.

De pasada:

Código (vbnet) [Seleccionar] Expandir

Imports System.IO
Module Module1
    Sub Main()
        Dim dirInfo As New DirectoryInfo("F:\\")
        Dim dirsInfo() As DirectoryInfo = dirInfo.GetDirectories("*.*", SearchOption.TopDirectoryOnly)
        For Each di As DirectoryInfo In dirsInfo
            Try
                Console.WriteLine(di.FullName)
                Dim filesInfo() As FileInfo = di.GetFiles("*.*", SearchOption.AllDirectories)
                For Each fi As FileInfo In filesInfo
                    Console.WriteLine(fi.FullName)
                Next
            Catch ex As Exception
                Console.WriteLine(ex.ToString())
                Console.Read()
            End Try
            Console.Read()
        Next
        Console.Read()
    End Sub
End Module

Puse varios Console.Read() para que pueda verse en la consola el directorio que se estas listando y si hay alguno que no sea accesible.
Saludos 

Código (python,7) [Seleccionar] Expandir

import sys

myString = raw_input('Introduce una palabra alfabetica: ')

charA = myString[0]

for charB in myString[1:]:
    if charA > charB:
        print "La palabra no es alfabetica"
        sys.exit(1)

print "La palabra es alfabetica"

Probaste ese code? porque si introduzco una cadena como ABCDFA o abcdea me devuelve que es alfabetica 

Lo he probado y adaptado al Python 2.6.

Código (python) [Seleccionar] Expandir

def isAlfab(palabra):
    for x in range(len(palabra)):
        if x>0:
            if ord(palabra[x])<ord(palabra[x-1]):
                return False
    return True

while True:
    palabra = raw_input("Introduce: ")
    if isAlfab(palabra):
        print("si es una palabra alfabetica")
    else:
        print("no es una palabra alfabetica")
    continuar = raw_input("Desea continuar? s/cualquier otro: ")
    if continuar.lower() != 's':
        break
print "Saliendo del programa"

Es preferible hacerlo con un while en vez de preguntar si quiero continuar. Que siempre continúe.

Lo probaste con varias cadenas para ver si funciona completamente  porque solo probe un poco 
Respecto al while, es por costumbre 

Como hago para obiar el error "Acceso denegado a la ruta de acceso 'G:\System Volume Information\'.", si deseo buscar un archivo que se encuentra en la unidad "G:\"

El code que utilizas, no solamente te dara errores con esa carpeta, si alguna vez existe alguna otra que este cifrada puede fallar toda la búsqueda que realizes, un modo de solucionarlo es listando primero los directorios de la ruta que escogas, debes hacerlo con:

Código (csharp) [Seleccionar] Expandir

SearchOption.TopDirectoryOnly
luego con un foreach los recorres y haces un:

Código (csharp) [Seleccionar] Expandir

GetFiles
con

Código (csharp) [Seleccionar] Expandir

SearchOption.AllDirectories
a cada uno de los directorios encontrados, siempre utilizando try - catch.

De ese modo puedes solucionar tu problema, de igual modo puede evitarse problemas con algun directorio o archivo inaccesible aplicando este método de una formas mas elaborada.

Lo que hay que hacer es:

  1- Obtener Contraseña valida.
  2- Hacer un Keygen

Lo que no hay que hacer es parchear (El salto)

Ya te envie por MP la solución y el keygen.
No lo hice muy detallado por falta de tiempo.
Saludos

Puede ser de esta forma:

Código (python) [Seleccionar] Expandir

#Python3
def isAlfab(palabra):
    for x in range(len(palabra)):
        if x>0:
            if ord(palabra[x])<ord(palabra[x-1]):
                return False
    return True

while True:
    palabra = input("Introduce: ")
    if isAlfab(palabra):
        print("si es una palabra alfabetica")
    else:
        print("no es una palabra alfabetica")
    continuar = input("Desea continuar? s/cualquier otro: ")
    if continuar.lower() != 's':
        break
print("Saliendo del programa")

pero hay que probarlo...

si ya hice eso pero la verdad los primeros bytes de unos 10 mp3 que tome de muestran son todos diferentes!!!!!!!!!!!!!!!!!

Solo tengo a mano poco mas de 1000 .mp3 y todos tienen "ID3" en los primeros 3 bytes, si nos es tu caso, prueba lo que escribió raul338.