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: