I wasn't aware that the unit numbers in the ProDOS device list contain device type identifiers in the low nibble. So if we can't use the device list entries as-is we can as well present the high nibble as low nibble to the user thus providing more meaningful device numbers.

git-svn-id: svn://svn.cc65.org/cc65/trunk@5852 b7a2c559-68d2-44c3-8de9-860c34a00d81
2012-10-15 21:59:51 +00:00
parent 170c59e4c2
commit 272b8e7185
8 changed files with 125 additions and 112 deletions
--- a/libsrc/apple2/isdevice.s
+++ b/libsrc/apple2/isdevice.s
@@ -0,0 +1,22 @@
+;
+; Oliver Schmidt, 2012-10-15
+;
+
+        .export         isdevice
+
+        .include        "zeropage.inc"
+        .include        "mli.inc"
+
+isdevice:
+        ldy     DEVCNT
+:       lda     DEVLST,y
+        lsr
+        lsr
+        lsr
+        lsr
+        sta     tmp1
+        cpx     tmp1
+        beq     :+
+        dey
+        bpl     :-
+:       rts