Parsi Coders
Another IsVmware function - نسخه قابل چاپ

+- Parsi Coders (http://parsicoders.com)
+-- انجمن: Cracking / Anti Crack (http://parsicoders.com/forumdisplay.php?fid=75)
+--- انجمن: Anti Debug (http://parsicoders.com/forumdisplay.php?fid=76)
+---- انجمن: Delphi (http://parsicoders.com/forumdisplay.php?fid=81)
+---- موضوع: Another IsVmware function (/showthread.php?tid=1102)



Another IsVmware function - Amin_Mansouri - 10-17-2011

کد:
function IsVmWare:Boolean;
var
val:Byte;
buf:array [0..5] of byte;
begin
asm
   lea eax,buf
   sidt [eax]
   add eax,5
   mov al,byte ptr [eax]
   mov val,al
end;
Result:=(val = $E8) or (val = $FF);
end;