cc65/isdevice.s at 4dda5d2173928271dd3d8b506b493e55088819c0 - cc65 - Applefritter: Git

6502/cc65

mirror of https://github.com/cc65/cc65.git synced 2024-11-06 15:06:07 +00:00

ol.sc 272b8e7185 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

23 lines

352 B

ArmAsm

Raw Blame History

 ;
 ; 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