show cpu clock frequency at startup

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

diff --git a/cbios/misc.180 b/cbios/misc.180
index 796f319d15a50ae96b9714552c87bfdca2e36ace..5d683740d14bf8822dea1368b32a87d2ab48482a 100644 (file)
--- a/cbios/misc.180
+++ b/cbios/misc.180
@@ -31,15 +31,14 @@ add_hla:
        ret
 
 ;--------------------------------------------------------------------
-;      HLDE:   Divident (x)
-;      BC:     Divisor  (y)
+; Divide 32 bit by 16
 ;
-;       divide x/y
-;           x: hl
-;           y: de
-;         return:
-;           x/y: hl
-;           rem: de
+;    HLDE:     Divident (x)
+;    BC:       Divisor  (y)
+;
+;  return:
+;    HLDE:     Quotient
+;    BC:       Reminder
 
        cseg    ; common area
 div32_16:
@@ -60,6 +59,13 @@ div32_16:
        ex      de,hl           ;de = x, hl = r
        exx                     ;high
        ld      a,32            ;count
+;
+; divide x/y
+;     x: hl
+;     y: de
+;   result:
+;     x/y: hl
+;     rem: de
 div_lp:                                ;do
        exx                     ;    low
        ex      de,hl           ;    x
@@ -86,9 +92,8 @@ div_lp:                               ;do
        exx                     ;        high
        adc     hl,bc           ;
 
-div_no_restore:
-
-       dec     a
+div_no_restore:                        ;
+       dec     a               ;
        jr      nz,div_lp       ;while (--count)
 
        ex      de,hl           ; q