Implement media change flag

[z180-stamp.git] / avr / z180-serv.c

diff --git a/avr/z180-serv.c b/avr/z180-serv.c
index a49c9f9752535a732fd7a7e258167926377ba355..d8e412f871dc4bc1db5a4d0a140399aa94e0a8ac 100644 (file)
--- a/avr/z180-serv.c
+++ b/avr/z180-serv.c
@@ -256,6 +256,13 @@ int drv_detach(uint8_t drv)
                        p->opt = 0;
                        p->flags &= ~DRV_FLG_DIRTY;
                        p->img_name = NULL;
+
+                       uint32_t scb = getenv_ulong(ENV_CPM3_SCB, 16, 0);
+                       if (scb && (z80_bus_cmd(Request) & ZST_ACQUIRED)) {
+                               z80_write(scb + 0xf0, 0xff);
+                               z80_write(p->dph + 11, 0xff);
+                               z80_bus_cmd(Release);
+                       }
                }
        }
        return 0;