]> cloudbase.mooo.com Git - z180-stamp-cpm3.git/blobdiff - cbios/utils.180
Minor bugfixes: clear multi sector count on drive change, ?pmsg
[z180-stamp-cpm3.git] / cbios / utils.180
index 8157abab67fa83073137b0b48d8d7e3514c54394..613cec09164e8d9b0547c101583bddbee5864c83 100644 (file)
@@ -99,7 +99,7 @@ add_hla:
 ;--------------------------------------------------------------------
 ; rounded div 32 by 16 bit
 ;
-;      HLDE:   Dividend (x)
+;      DEHL:   Dividend (x)
 ;      BC:     Divisor  (y)
 ;    return:
 ;      HLDE:   Rounded Quotient (q)
@@ -208,13 +208,13 @@ div_no_restore:                   ;
        push    de
 pmsg$loop:
        ld      a,(hl)
+       inc     hl
        or      a
        jr      z,pmsg$exit
        ld      c,a
        push    hl
        call    ?cono
        pop     hl
-       inc     hl
        jr      pmsg$loop
 pmsg$exit:
        pop     de