|
@@ -13,11 +13,11 @@
|
|
|
**********************************************************************}
|
|
|
|
|
|
function DetectVESA:Boolean;
|
|
|
-var Result:longint;
|
|
|
+var Result_:longint;
|
|
|
begin
|
|
|
- Result:=Global_dos_alloc($0200);
|
|
|
- Sel:=word(Result);
|
|
|
- Seg:=word(Result shr 16);
|
|
|
+ Result_:=Global_dos_alloc($0200);
|
|
|
+ Sel:=word(Result_);
|
|
|
+ Seg:=word(Result_ shr 16);
|
|
|
dregs.RealSP:=0; dregs.RealSS:=0;
|
|
|
dregs.RealES:=Seg; dregs.RealEDI:=0;
|
|
|
dregs.RealEAX:=$4F00; RealIntr($10,dregs);
|
|
@@ -30,11 +30,11 @@ begin
|
|
|
end;
|
|
|
|
|
|
function GetVESAInfo( Mode : WORD ):Boolean;
|
|
|
-var Result:longint;
|
|
|
+var Result_:longint;
|
|
|
begin
|
|
|
- Result:=Global_dos_alloc($0200);
|
|
|
- Sel:=word(Result);
|
|
|
- Seg:=word(Result shr 16);
|
|
|
+ Result_:=Global_dos_alloc($0200);
|
|
|
+ Sel:=word(Result_);
|
|
|
+ Seg:=word(Result_ shr 16);
|
|
|
dregs.RealECX:=mode;
|
|
|
dregs.RealSP:=0; dregs.RealSS:=0;
|
|
|
dregs.RealES:=Seg; dregs.RealEDI:=0;
|
|
@@ -166,8 +166,11 @@ end;
|
|
|
|
|
|
{
|
|
|
$Log$
|
|
|
- Revision 1.1 1998-03-25 11:18:42 root
|
|
|
- Initial revision
|
|
|
+ Revision 1.2 1998-10-09 10:26:36 peter
|
|
|
+ * rename result -> result_
|
|
|
+
|
|
|
+ Revision 1.1.1.1 1998/03/25 11:18:42 root
|
|
|
+ * Restored version
|
|
|
|
|
|
Revision 1.6 1998/01/26 11:58:09 michael
|
|
|
+ Added log at the end
|