Преглед изворни кода

* Crt.CursorOff: use CX=bash200, instead of CX= for making the cursor invisible; this is the correct value, according to the BIOS documentation I've found and it is also the value used by the go32v2 video unit

git-svn-id: trunk@25483 -
nickysn пре 12 година
родитељ
комит
e60c3ee740
3 измењених фајлова са 3 додато и 3 уклоњено
  1. 1 1
      rtl/go32v2/crt.pp
  2. 1 1
      rtl/msdos/crt.pp
  3. 1 1
      rtl/watcom/crt.pp

+ 1 - 1
rtl/go32v2/crt.pp

@@ -534,7 +534,7 @@ var
   regs : trealregs;
 begin
   regs.realeax:=$0100;
-  regs.realecx:=$ffff;
+  regs.realecx:=$0200;
   realintr($10,regs);
 end;
 

+ 1 - 1
rtl/msdos/crt.pp

@@ -564,7 +564,7 @@ var
   regs : registers;
 begin
   regs.ax:=$0100;
-  regs.cx:=$ffff;
+  regs.cx:=$0200;
   intr($10,regs);
 end;
 

+ 1 - 1
rtl/watcom/crt.pp

@@ -523,7 +523,7 @@ var
   regs : trealregs;
 begin
   regs.realeax:=$0100;
-  regs.realecx:=$ffff;
+  regs.realecx:=$0200;
   realintr($10,regs);
 end;