07.02.2015 Views

The Art of Reversing by Ap0x - Tutoriali.org

The Art of Reversing by Ap0x - Tutoriali.org

The Art of Reversing by Ap0x - Tutoriali.org

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Naravno dovoljno je da analiziramo samo jedan prolaz, to jest jedno slovo<br />

imena da bismo zakljucili kako se generise serijski broj. Ovo proistice iz<br />

cinjenice da su svi prolazi isti jer se serijski broj racuna u istom loopu.<br />

Analizirajmo sta se ovde desava:<br />

32066 - Izdvaja se prvo slovo unetog imena<br />

32080 - ASCII vrednost prvog slova se mnozi sa 8<br />

32084 - Dobijena vrednost na 32080 se deli sa 10<br />

32086 - Dobijena vrednost sa 32084 se zaokruzuje<br />

32091 - Da li je zaokruzena vrednost sa 32086 veca od 65<br />

32092 - Da li je zaokruzena vrednost sa 32086 manja od 90<br />

32096 - Ako je bilo koji od ova dva uslova ispunjen pretvori 32086 u ASCII<br />

- Inace samo dodaj ovaj broj kao string na AoC-03B-<br />

Posto se sve ovo ponavlja za svako slovo nema potrebe ispisivati ceo loop.<br />

Ove informacije koje imamo su nam dovoljne da napisemo keygenerator za<br />

ovu metu. Evo kako bi on izgledao u VBu:<br />

serial = "AoC-03B-"<br />

For i = 1 To Len(Text1.Text)<br />

tmp = Asc(Mid$(Text1.Text, i, 1))<br />

tmp = tmp * 8<br />

tmp = Round(tmp / 10)<br />

If tmp >= 65 And tmp = 65) And (tmp

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!