Level 2 Cache

[Muetze1]

Zitat von Razor:

now it will detect even my cpu's cache

Nice, but who has your CPU? Why do you not do the whole job? Egoist...

Here the complete updated sub statement:

Delphi-Quellcode:

 Function CacheInfo(CacheID : Byte): Word; 
    Begin
      Case CacheID Of
        $39, $3B,
        $41, $79 : Result := 128;

        $3A      : result := 192;

        $3C, $42,
        $7A, $82 : Result := 256;

        $3d      : result := 384;

        $3E, $43, 
        $7B, $7f,
        $83, $86 : Result := 512;

        $44, $78,
        $7C,
        $84, $87 : Result := 1024;

        $85, $45,
        $7d      : Result := 2048;

        $49      : Result := 4096;

        $4e      : result := 6144;
      Else
        Result := 0;
      End;
    End;