]> cloudbase.mooo.com Git - z180-stamp-cpm3.git/blobdiff - cbios/mm.180
sdio errormessages
[z180-stamp-cpm3.git] / cbios / mm.180
index 8f63a2bf0d278137bd77af0f8a122e1e397f20c1..90d8144356df4532f12e7cb6297275d67d277f27 100644 (file)
@@ -55,7 +55,21 @@ bnk2log:
 
 
 bnk2phy:
-       call    bnk2log
+       push    bc
+       ld      c,a
+       ld      a,h
+       and     a,0f0h
+       cp      CA*16
+       ld      a,c
+       pop     bc
+
+       jr      c,b2p_banked
+       xor     a               ; address is in common
+       jr      b2b_cont        ;    base is 0
+b2p_banked:
+       call    bnk2log         ; get address base
+b2b_cont:
+
        ; fall thru
 
 ;--------------------------------------------------------------