1: .macro LOAD_OVERWRITE_START_ADDRESS 2: txa 3: bne :+ 4: lda zMEMUSS 5: sta zEAL 6: lda zMEMUSS + 1 7: sta zEAL + 1 8: : 9: 10: .endmacro 11: 12: .macro FILEIO_PATCH_CLOSE_TAPE 13: 14: jsr TapeWriteCompleteBuffer ; write out the tape buffer to tape 15: bcc FileIoPatch_NoError ; C = 0 -> no error -> branch 16: 17: pla ; get back index into table of open files 18: lda #$00 19: 20: .endmacro 21: