$D48D/54413:   Write dir block

D48D: 20 3B DE  JSR $DE3B
D490: A9 01     LDA #$01
D492: 85 6F     STA $6F
D494: A5 69     LDA $69
D496: 48        PHA
D497: A9 03     LDA #$03
D499: 85 69     STA $69
D49B: 20 2D F1  JSR $F12D
D49E: 68        PLA
D49F: 85 69     STA $69
D4A1: A9 00     LDA #$00
D4A3: 20 C8 D4  JSR $D4C8
D4A6: A5 80     LDA $80
D4A8: 20 F1 CF  JSR $CFF1
D4AB: A5 81     LDA $81
D4AD: 20 F1 CF  JSR $CFF1
D4B0: 20 C7 D0  JSR $D0C7
D4B3: 20 99 D5  JSR $D599
D4B6: A9 00     LDA #$00
D4B8: 20 C8 D4  JSR $D4C8
D4BB: 20 F1 CF  JSR $CFF1
D4BE: D0 FB     BNE $D4BB
D4C0: 20 F1 CF  JSR $CFF1
D4C3: A9 FF     LDA #$FF
D4C5: 4C F1 CF  JMP $CFF1

    Previous Page / Next Page