KULLANICI ADI : ŞİFRE Şifremi Unuttum*

Anasayfa İLLEG4L BANK KREDİ SATIN AL İLLEG4LİZM RAP Sub Domain Bulucu Arama Yap Yeni Konular Bugünki Konular

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
İşlemcinin Markasını Öğrenmek
Konu : İşlemcinin Markasını Öğrenmek - 18.09.2016, 13:02
Mesaj: #1
Kod:
function GetVendorString: string;
   var
     aVendor: array[0..2] of DWord;
     iI, iJ : Integer;
   begin
     asm
       push  ebx
       xor   eax, eax
       dw    $A20F // CPUID instruction
       mov   DWord ptr aVendor, ebx
       mov   DWord ptr aVendor[+4], edx
       mov   DWord ptr aVendor[+8], ecx
       pop   ebx
     end;
     for iI := 0 to 2 do
       for iJ := 0 to 3 do
         Result := Result + Chr((aVendor[iI] and ($000000FF shl (iJ * 8))) shr (iJ * 8));
   end;
Codess, üyesi illegalizm | Private illegal Topluluk - Hack forum,Warez Scriptler forumlarına 02.03.2015 tarihinde katılmıştır.

WWW Alıntı ile Cevapla


Hızlı Menü:


Konuyu Okuyanlar: 1 Ziyaretçi
antalya escort türk ifşa porno izle türk ifşa porno samsun escort izmir escort türk ifşa hd porno