; Micro-SCI Floppy Drive Controller info disassembly

PRINTVEC	:= $08
PRBL2		:= $F94A
HOME		:= $FC58
COUT		:= $FDED

.MACPACK apple2
.org $c600

        ldx     #$20	; controller signature
        ldy     #$00
        ldx     #$03
        stx     $3C

        jsr     HOME	; clear display, home cursor
        tsx
        lda     $0100,x	; current address (#$c6 for slot 6)
        sta     PRINTVEC+1
        lda     #0
        sta     PRINTVEC
        ldy     #<info	; offset of data begin
LC617:	lda     (PRINTVEC),y
LC619:	bmi     doit
        tax
        jsr     PRBL2
        beq     loop1
doit:	jsr     COUT
loop1:	iny
        bne     LC617
LC627:	beq     LC627

info:	scrcode $0d, "<--KEYBOARD"

.ifdef MICROSCI
; ROM checksum 5ddcbbf1
;	<--KEYBOARD        U-SCI        REAR-->
;
;               ---------JUMPER--------
;              !           !           !
;              V           V           V
;
;             ### ! !   ! ### !   ! ! ### 
;             ### ! !   ! ### !   ! ! ### 
;             ### ! !   ! ### !   ! ! ### 
;             ### ! !   ! ### !   ! ! ### 
;             XXXXXXX   XXXXXXX   XXXXXXX
;               3.2      INFO    3.3&PASCAL

	.byte $08
    scrcode "U-SCI"
    .byte $08
    scrcode "REAR-->", $0d, $0d
    .byte $08
    scrcode "---------JUMPER--------"
.else
; ROM checksum 5dfc32ca
;	<--KEYBOARD      ACE 1000      REAR-->
;
;                 ------JUMPER------
;              !           !           !
;              V           V           V
;
;             ### ! !   ! ### !   ! ! ### 
;             ### ! !   ! ### !   ! ! ### 
;             ### ! !   ! ### !   ! ! ### 
;             ### ! !   ! ### !   ! ! ### 
;             XXXXXXX   XXXXXXX   XXXXXXX
;               3.2      INFO    3.3&PASCAL

    .byte $06
    scrcode "ACE 1000"
    .byte $06
    scrcode "REAR-->", $0d, $0d
    .byte $07
    scrcode " "
    .byte $02
    scrcode "------JUMPER------"
.endif
    scrcode $0d
    .byte $07
    scrcode "!"
    .byte $0b
    scrcode "!"
    .byte $0b
    scrcode "!"
    scrcode $0d
    .byte $07
    scrcode "V"
    .byte $0b
    scrcode "V"
    .byte $0b
    scrcode "V", $0d, $0d
    .byte $06
    scrcode "### ! !"
    .byte $03
    scrcode "! ### !"
    .byte $03
    scrcode "! ! ###", $0d

    .byte $06
    scrcode "### ! !"
    .byte $03
    scrcode "! ### !"
    .byte $03
    scrcode "! ! ###", $0d

    .byte $06
    scrcode "### ! !"
    .byte $03
    scrcode "! ### !"
    .byte $03
    scrcode "! ! ###", $0d

    .byte $06
    scrcode "### ! !"
    .byte $03
    scrcode "! ### !"
    .byte $03
    scrcode "! ! ###", $0d

    .byte $06
    scrcode "XXXXXXX"
    .byte $03
    scrcode "XXXXXXX"
    .byte $03
    scrcode "XXXXXXX", $0d
    .byte $08
    scrcode "3.2"
    .byte $06
    scrcode "INFO"
    .byte $04
    scrcode "3.3&PASCAL", $0d, $0d