浏览代码

tosunits: add VM_INQUIRE constant for xbios_vsetmode()

Karoly Balogh 1 年之前
父节点
当前提交
d748124996
共有 1 个文件被更改,包括 2 次插入1 次删除
  1. 2 1
      packages/tosunits/src/xbios.pas

+ 2 - 1
packages/tosunits/src/xbios.pas

@@ -296,6 +296,8 @@ const
 
 
     NUMCOLS     = 7;
     NUMCOLS     = 7;
 
 
+    VM_INQUIRE  = -1;
+
 {* Values returned by VgetMonitor() *}
 {* Values returned by VgetMonitor() *}
     MON_MONO        = 0;
     MON_MONO        = 0;
     MON_COLOR       = 1;
     MON_COLOR       = 1;
@@ -303,7 +305,6 @@ const
     MON_TV          = 3;
     MON_TV          = 3;
 
 
 {* VsetSync flags - 0=internal, 1=external *}
 {* VsetSync flags - 0=internal, 1=external *}
-
     VID_CLOCK   = 1;
     VID_CLOCK   = 1;
     VID_VSYNC   = 2;
     VID_VSYNC   = 2;
     VID_HSYNC   = 4;
     VID_HSYNC   = 4;