|
AAA Color Picker v1.0 |
|
amois |
|
Program Tipi: * |
|
Araηlar:
SoftIce |
|
|
|
|
"Bu taraftar seninle gurur duyuyor !"
|
Yazı |
Sallama serial olarak 6
ve 0
-> [bpx hmemcpy] -> [F12]
-> [F10] ->
00402C5F CALL 00404C60
<- ?
00402C64 TEST EAX,EAX
00402C66 JZ 00402CE5
<- kotu cocuk
...
00402CE5 PUSH 00
00402CE7 PUSH 30
00402CE9 PUSH 004352C8
00402CEE CALL 004237F3
<- Hata
[bpx 402C5F] ->
00404C80 CMP DWORD PTR [ECX-08],0C <- 12 digit mi ?
00404C84 JZ 00404C9B
<- iyi cocuk
Sallama serial olarak 6 tane 60 yazalim -> 606060606060
->
00404C9B PUSH EAX
00404C9C LEA ECX,[ESP+10]
00404CA0 CALL 0041CE9D
00404CA5 MOV ECX,[ESP+0C]
<- 606060606060
00404CA9 MOV ESI,0000001A
<- esi = 1A
00404CAE MOV DL,[ECX]
<- 6 <- 1. digit
00404CB0 MOV BL,[ECX+02]
<- 6 <- 3. digit
00404CB3 MOVSX EAX,BYTE PTR [ECX+03] <- 0 <- 4. digit
00404CB7 MOV [ESP+09],DL
<- 6 <- 1. digit
00404CBB MOVSX EDX,BL
<- 6
00404CBE IMUL EAX,EDX
<- 30 * 36 = A20
00404CC1 CDQ
00404CC2 IDIV ESI
<- A20 / 1A -> eax = 63, edx = 12
00404CC4 MOV AL,[ESP+09]
<- 6 <- 1. digit
00404CC8 ADD DL,41
<- 12 + 41 = 53 = S
00404CCB CMP AL,DL
<- 6 ile S esit mi ?
00404CCD JZ 00404CF5
<- iyi cocuk
Sallama serial S06060606060 -> [F10] ->
00404CF5 MOV AL,[ECX+01]
<- 0 <- 2. digit
00404CF8 MOV ESI,00000009
<- esi = 9
00404CFD MOV [ESP+20],AL
<- 0 <- 2. digit
00404D01 MOVSX EAX,BYTE PTR [ECX+09] <- 0 <- 10. digit
00404D05 MOVSX EDX,BL
<- 6 <- 3. digit
00404D08 IMUL EAX,EDX
<- 30 * 36 = A20
00404D0B CDQ
00404D0C IDIV ESI
<- A20 / 9 -> eax = 120, edx = 0
00404D0E MOV AL,[ESP+20]
<- 0 <- 2. digit
00404D12 ADD DL,31
<- 0 + 31 = 31 = 1
00404D15 CMP AL,DL
<- 0 ile 1 esit mi ?
00404D17 JZ 00404D3F
<- iyi cocuk
Sallama serial S16060606060 -> [F10] ->
00404D3F MOV DL,[ECX+05]
<- 0 <- 6. digit
00404D42 MOV ESI,00000009
<- esi = 9
00404D47 MOVSX EAX,BYTE PTR [ECX+07] <- 0 <- 8. digit
00404D4B MOVSX EDX,DL
<- 30
00404D4E IMUL EAX,EDX
<- 30 * 30 = 900
00404D51 CDQ
00404D52 IDIV ESI
<- 900 / 9 -> eax = 100, edx = 0
00404D54 MOV BL,[ECX+04]
<- 6 <- 5. digit
00404D57 MOV [ESP+0A],BL
<- 6
00404D5B ADD DL,31
<- 0 + 31 = 31 = 1
00404D5E CMP BL,DL
<- 6 ile 1 esit mi ?
00404D60 JZ 00404D88
<- iyi cocuk
Sallama serial S16010606060 -> [F10] ->
00404D88 MOVSX EAX,BYTE PTR [ECX+05] <- 0 <- 6. digit
00404D8C MOVSX EDX,BYTE PTR [ECX+03] <- 0 <- 4. digit
00404D90 IMUL EAX,EDX
<- 30 * 30 = 900
00404D93 MOVSX EDX,BYTE PTR [ECX+07] <- 0 <- 8. digit
00404D97 ADD EAX,EDX
<- 900 + 30 = 930
00404D99 MOV ESI,0000001A
<- esi = 1A
00404D9E CDQ
00404D9F IDIV ESI
<- 930 / 1A -> eax = 5A, edx = C
00404DA1 MOV BL,[ECX+06]
<- 6 <- 7. digit
00404DA4 ADD DL,41
<- C + 41 = 4D = M
00404DA7 CMP BL,DL
<- 6 ile M esit mi ?
00404DA9 JZ 00404DD1
<- iyi cocuk
Sallama serial S16010M06060 -> [F10] ->
00404DD1 MOV AL,[ECX+0B]
<- 0 <- 12. digit
00404DD4 PUSH EDI
00404DD5 MOVSX ESI,BYTE PTR [ESP+0E] <- 1 <- 2. digit
00404DDA MOVSX EDI,BYTE PTR [ESP+0D] <- S <- 1. digit
00404DDF MOV [ESP+0F],AL
<- 0
00404DE3 MOV DL,[ECX+08]
<- 6 <- 9. digit
00404DE6 MOVSX EAX,BL
<- M <- 7. digit
00404DE9 IMUL EAX,ESI
<- 4D * 31 = EBD
00404DEC MOVSX ESI,BYTE PTR [ESP+24] <- 1 <- 2. digit
00404DF1 MOV CL,[ECX+0A]
<- 6 <- 11. digit
00404DF4 IMUL ESI,EDI
<- 31 * 53 = FE3
00404DF7 MOVSX ECX,CL
<- 36
00404DFA ADD EAX,ESI
<- EBD + FE3 = 1EA0
00404DFC POP EDI
00404DFD MOVSX EDX,DL
<- 36
00404E00 ADD EAX,ECX
<- 1EA0 + 36 = 1ED6
00404E02 MOV ECX,00000009
<- ecx = 9
00404E07 ADD EAX,EDX
<- 1ED6 + 36 = 1F0C
00404E09 MOV DWORD PTR [ESP+18],FFFFFFFF
00404E11 CDQ
00404E12 IDIV ECX
<- 1F0C / 9 -> eax = 373, edx = 1
00404E14 MOV AL,[ESP+0B]
<- 0 <- 12. digit
00404E18 LEA ECX,[ESP+0C]
00404E1C ADD DL,31
<- 1 + 31 = 32
00404E1F CMP AL,DL
<- 0 ile ? esit mi ?
00404E21 JZ 00404E3D
<- iyi cocuk
Sallama serial S16010M0606?
oldu. KeyGen kodunu VB'de veriyorum.
Dim sallama(7), serial(5)
; 7 random digit, 5 hesaplanacak digit
siralama = "110010100001"
; 1 -> hesaplananlar, 0 -> random olanlar
For i = 1 To 7
Randomize
a = (Int((97 * Rnd) + 1)) + 25 ; sadece
buyuk harf bul -> 98~122 arasi
sallama(i) = Asc(a)
Next i
serial(1) = ((sallama(1) * sallama(2)) Mod &H1A) + &H41
serial(2) = ((sallama(6) * sallama(1)) Mod 9) + &H31
serial(3) = ((sallama(3) * sallama(4)) Mod 9) + &H31
serial(4) = (((sallama(2) * sallama(3)) + sallama(4)) Mod &H1A) + &H41
serial(5) = ((serial(3) * serial(4) + serial(1) * serial(2) + sallama(7) +
sallama(5)) Mod 9) + &H31
sayac_1 = 1: sayac_2 = 1
; sonucu yazmak icin kullanacagiz
For j = 1 To 12
; sonuc 12 digit olacak
sira = Mid(siralama, j, 1)
If sira = "1" Then
; hesaplanan digit mi ?
sonuc = sonuc + Chr(serial(sayac_1))
sayac_1 = sayac_1 + 1
Else
; random digit o zaman
sonuc = sonuc + Chr(sallama(sayac_2))
sayac_2 = sayac_2 + 1
End If
Next j
|
|
Bir programı kullanarak para kazanıyorsanız, programı satın alın.