$ED84/60804:   Perform [V] - Validate command

ED84: 20 D1 C1  JSR $C1D1       ; find drive number in input line
ED87: 20 42 D0  JSR $D042       ; load BAM
ED8A: A9 40     LDA #$40
ED8C: 8D F9 02  STA $02F9
ED8F: 20 B7 EE  JSR $EEB7       ; create new BAM in buffer
ED92: A9 00     LDA #$00
ED94: 8D 92 02  STA $0292
ED97: 20 AC C5  JSR $C5AC       ; load directory, find 1st flag
ED9A: D0 3D     BNE $EDD9       ; found?

Jump from $EDD7:

ED9C: A9 00     LDA #$00
ED9E: 85 81     STA $81         ; sector 0
EDA0: AD 85 FE  LDA $FE85       ; 18
EDA3: 85 80     STA $80         ; track 18 for BAM
EDA5: 20 E5 ED  JSR $EDE5       ; mark directory blocks as allocated
EDA8: A9 00     LDA #$00
EDAA: 8D F9 02  STA $02F9
EDAD: 20 FF EE  JSR $EEFF       ; write BAM back to disk
EDB0: 4C 94 C1  JMP $C194       ; done, prepare disk status

    Previous Page / Next Page