     $DEF8/57080:   Get side sector and buffer pointer

    Jump from $E258, $E43C:

    DEF8: 20 66 DF  JSR $DF66       ; is side-sector in buffer?
    DEFB: 30 0E     BMI $DF0B       ; no
    DEFD: 50 13     BVC $DF12       ; ok
    DEFF: A6 82     LDX $82         ; channel number
    DF01: B5 CD     LDA $CD,X       ; buffer number
    DF03: 20 1B DF  JSR $DF1B       ; read side-sector
    DF06: 20 66 DF  JSR $DF66       ; and check if in buffer
    DF09: 10 07     BPL $DF12       ; yes?

    Jump from $DEFB:

    DF0B: 20 CB E1  JSR $E1CB       ; get last side-sector
    DF0E: 2C CE FE  BIT $FECE       ; set V bit
    DF11: 60        RTS

    Jump from $DEFD, $DF09:

    DF12: A5 D6     LDA $D6         ; side-sector and pointer
    DF14: 20 E9 DE  JSR $DEE9       ; set pointer in side-sector
    DF17: 2C CD FE  BIT $FECD       ; erase V bit
    DF1A: 60        RTS

        Previous Page / Next Page