Huawei Unlocker Source Code - VB6

[zouna]

hi,
Did you try to use same method to get unlock code for Motorola?

thank you

[alcapo]

yes good idea test for moto

[fingusio]

in php someone have source?

br,
fingusio

[sergeymkl]

Originally Posted by fingusio

in php someone have source?

br,
fingusio

Here is 2 PHP sources, one by me and one by frozenice
http://forum.gsmhosting.com/vbb/f83/...uawei-1070125/

Demo: http://www.bb5.at/huawei.php?imei=353144032055161

[apollo88]

Is there anyone can unlock the new firmware of Huawei E1750 11.126.11.01.439 ?
Your method used to get the unlock code is not worked with this version

[TestBox2]

Originally Posted by apollo88

Is there anyone can unlock the new firmware of Huawei E1750 11.126.11.01.439 ?
Your method used to get the unlock code is not worked with this version

E1752 Viettel latest FW unlock done by SmartFlasher Done!


Only, Successfully Unlocked / Flashed Modems By MKey - GSM-Forum

[abd5alla]

Nice guys i hope to calculate any NCK
none stop go ahead

B.R
HASSAN ELHADDAD

[rozaxbro]

how about nokia master code ?
do you have sourcecode to unlocker ?

[McManiek]

For all Copy-Pasters Perhaps the most flexible one, in Delphi ;-)
What you think guys

//huawei datacard unlocker for command line interface
program hwe620dccli;

{$APPTYPE CONSOLE}

uses
  MD5, SysUtils;

function Hex2Int ( HexString : String ) : Integer;
 begin
   Hex2Int := StrToInt('$'+HexString)
 end;

function Hash2Str(hash: TMD5Digest): String;
  var i: byte;
    begin
    Result:='';
    for i:=Low(Hash.v) to High(Hash.v) do
      Result:=Result+IntToHex(Hash.v[i], 2);
    end;

    const
        UNLOCK_SALT : String = '5e8dd316726b0335';
        FLASH_SALT : String = '97b7bc6be525ab44';

    var
        IMEI: String;
        Unlock, Flash : String;
        U_Hash, F_Hash : TMD5Digest;

        U_Result: Array[0..3] of String[2];
        F_Result: Array[0..3] of String[2];

        U_Code: LongWord;
        F_Code: LongWord;

        i: byte;

begin
Writeln('HWE Unlock Tool / McManiek');

  Write('Enter Device IMEI :');
  Readln(IMEI);

    //simple check that user is a twat...

      if Length(IMEI)<>15 then
        begin
          Writeln('Calculation Result : Looks like You`re a TWAT!');
        end
            else

                //lets calculate codes ;-)
                begin
                  Unlock:=IMEI+UNLOCK_SALT;
                  Flash:=IMEI+FLASH_SALT;

                  U_HASH:=MD5String(Unlock);
                  F_HASH:=MD5String(Flash);

                for i:=Low(U_Result) to High(U_Result) do
                  begin
                  U_Result[i] := IntToHex(U_HASH.V[i] xor U_HASH.V[i+4] xor U_HASH.V[i+8] xor U_HASH.V[i+12], 2);
                  F_Result[i] := IntToHex(F_HASH.V[i] xor F_HASH.V[i+4] xor F_HASH.V[i+8] xor F_HASH.V[i+12], 2);
                  end;

                  U_Code:=Hex2Int(U_Result[0]+U_Result[1]+U_Result[2]+U_Result[3]) AND $1FFFFFF OR $2000000;
                  F_Code:=Hex2Int(F_Result[0]+F_Result[1]+F_Result[2]+F_Result[3]) AND $1FFFFFF OR $2000000;

                  Writeln('Calculation Result :');
                  Writeln('Unlock : '+IntToStr(U_Code));
                  Writeln('Flash  : '+IntToStr(F_Code));

                end;

Readln;
end.

To compile it, you just need Delphi and this unit :
http://download.4programmers.net/md5.zip

[xcachorrox]

and here for all lazy
src huawei code.rar

pic
http://img198.imageshack.us/img198/528/11252699.bmp

[odilonse]

update...

Do you have C# source code for Huawei v1,v2, v3 calculator ?

thank you

[odilonse]

(reposted) sorry, delete

[hacxx2023]

Detected as a trojan. Will post a clean version online later.