sd drive login: return 0 (== no disk), if login function detects error

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

diff --git a/cbios/sdio.180 b/cbios/sdio.180
index c706aa6572e193cc868297cacc8f6abf8ecb49cb..0d296450717046bf6b1f654a1ad6b4745553d6eb 100644 (file)
--- a/cbios/sdio.180
+++ b/cbios/sdio.180
@@ -10,6 +10,7 @@
 \r
     ; Variables containing parameters passed by BDOS\r
 \r
+       extrn @xdph\r
        extrn @adrv,@rdrv\r
        extrn @trk,@sect,@cnt\r
        extrn @dma,@dbnk\r
@@ -145,6 +146,9 @@ sd$init7:
 ; be logged into for the purpose of density determination.\r
 ; It may adjust the parameters contained in the disk\r
 ; parameter header pointed at by <DE>\r
+;\r
+;     absolute drive number in @adrv (8 bits)  +0\r
+;     relative drive number in @rdrv (8 bits)  +1\r
 \r
 sd$login:\r
        xor     a\r
@@ -176,8 +180,11 @@ sd$login:
        ld      b,recv_msg_len  ; max receive message len\r
        call    msg.recv\r
 \r
-;      ld      a,(recv_msg_rc)\r
-;      or      a\r
+       ld      a,(recv_msg_rc)\r
+       or      a\r
+       ret     z\r
+       ld      hl,0\r
+       ld      (@xdph),hl\r
        ret                     ;\r
 \r
 \r