* slight accuracy improvement in crt.delay for i8086-msdos

git-svn-id: trunk@24749 -
2025-04-21 01:29:29 +02:00 · 2013-06-01 19:23:25 +00:00 · 2013-06-01 19:23:25 +00:00 · 40630a7cde
commit 40630a7cde
parent 4e427b9663
1 changed files with 2 additions and 2 deletions
--- a/rtl/msdos/crt.pp
+++ b/rtl/msdos/crt.pp
@ -454,16 +454,16 @@ label
 asm
        mov     ax, $40
        mov     es, ax
-        mov     di, $6c
+        xor     di, di

        mov     cx, MS
        test    cx, cx
        jz      LDelay2
        mov     si, [DelayCnt + 2]
+        mov     bx, es:[di]
 LDelay1:
        mov     ax, [DelayCnt]
        mov     dx, si
-        mov     bx, es:[di]
        call    DelayLoop
        loop    LDelay1
 LDelay2: