BIOS debugging with ddtz: Set 3F to 81 to en fifo inits.

[z180-stamp-cpm3.git] / cbios / time.180

diff --git a/cbios/time.180 b/cbios/time.180
index 2eb81239d3cee1effdd4987d0395587edcadad03..24f92eff7bd8d31f051fb6ea2df5e0234eabdd2c 100644 (file)
--- a/cbios/time.180
+++ b/cbios/time.180
@@ -171,34 +171,36 @@ prt0ini:
 \r
 \r
        cseg    ;common!\r
-isvprt0:\r
-       push    af\r
-       in0     a,(tcr)                 ;reset TIF0 flag\r
-       in0     a,(tmdr0l)\r
-       in0     a,(tmdr0h)\r
+isvprt0:                       ;\r
+       push    af              ;                       11\r
+       in0     a,(tcr)         ;reset TIF0 flag        12\r
+       in0     a,(tmdr0l)      ;                       12\r
+       in0     a,(tmdr0h)      ;                       12\r
+                               ;\r
 \r
        push    hl                      ;11\r
        ld      hl,uptime               ; 9\r
-       inc     (hl)                    ;10\r
-       jr      nz,iprt_1               ;6/8    38\r
+       inc     (hl)            ;                       10      77\r
+       jr      nz,iprt_1       ;                       6/8             -2\r
        inc     hl                      ; 4\r
-       inc     (hl)                    ;10\r
-       jr      nz,iprt_1               ;6/8            58\r
+       inc     (hl)            ;                       10              14\r
+       jr      nz,iprt_1       ;                       6/8\r
        inc     hl                      ; 4\r
        inc     (hl)                    ;10\r
        jr      nz,iprt_1               ;6/8\r
        inc     hl                      ; 4\r
        inc     (hl)                    ;10\r
-iprt_1:\r
+iprt_1:                        ;                               85      138\r
        pop     hl                      ; 9\r
-       ld      a,(time_to)\r
-       sub     a,1\r
-       jr      c,iprt_0\r
-       ld      (time_to),a\r
-iprt_0:\r
-       pop     af\r
-       ei\r
-       ret\r
+       ld      a,(time_to)     ;                       12\r
+       sub     a,1             ;                        6      112\r
+       jr      c,iprt_0        ;                       6/8\r
+       ld      (time_to),a     ;                       13\r
+iprt_0:                                ;                               120     178\r
+       pop     af              ;                        9\r
+       ei                      ;                        3\r
+       ret                     ;                        9      141     199\r
+                               ;               +intack 18      159     217\r
 \r
 uptime:\r
        dw      0,0\r