get CPU id (很全的)[12]

                       genuineintel.l1dcache:=0;
                       genuineintel.l1icache:=0;
                       genuineintel.l2cache:=0;
                      end;
                     end;
end;
function tcpudata.cyrixinstead:tcpurec;
var family,model,stepping:byte;
    efamily,emodel,estepping:byte;
begin
getfms(family,model,stepping);
if family=4 then begin
                   cyrixinstead.name:='via cyrix 4x86';
                   cyrixinstead.vendor:=getvendorstring;
                   cyrixinstead.frequency:=0;
                   cyrixinstead.family:=family;
                   cyrixinstead.model:=model;
                   cyrixinstead.stepping:=stepping;
                   cyrixinstead.l1dcache:=8;
                   cyrixinstead.l1icache:=8;
                   cyrixinstead.l2cache:=0;
                  end
else
if family=5 then begin
                   cyrixinstead.name:='via cyrix 5x86';
                   cyrixinstead.vendor:=getvendorstring;
                   cyrixinstead.frequency:=getcpufrequency;
                   cyrixinstead.family:=family;
                   cyrixinstead.model:=model;
                   cyrixinstead.stepping:=stepping;
                   cyrixinstead.l1dcache:=8;
                   cyrixinstead.l1icache:=8;
                   cyrixinstead.l2cache:=0;
                  end
else begin
       if getmaxextendedfunctions>0 then
           begin
            cyrixinstead.name:=getextendedcpuname;
            cyrixinstead.vendor:=getvendorstring;
            cyrixinstead.frequency:=getcpufrequency;
            getextendedfms(efamily,emodel,estepping);
            cyrixinstead.family:=efamily;
            cyrixinstead.model:=emodel;
            cyrixinstead.stepping:=estepping;
            cyrixinstead.l1dcache:=getextendedl1dcache;