msbasic/cbm1_patches.s

52 lines
819 B
ArmAsm
Raw Permalink Normal View History

2008-10-13 08:07:53 +00:00
.segment "INIT"
PATCH1:
clc
jmp CONTROL_C_TYPED
PATCH2:
2008-10-19 06:51:22 +00:00
bit FAC+4
2008-10-13 08:07:53 +00:00
bpl LE1AA
cmp #$54
bne LE1AA
jmp LCE3B
LE1AA:
rts
PATCH3:
2008-10-19 06:51:22 +00:00
bit FAC+4
2008-10-13 08:07:53 +00:00
bmi LE1B2
jmp LCE90
LE1B2:
cmp #$54
beq LE1B9
jmp LCE82
LE1B9:
jmp LCE69
PATCH4:
sta CHARAC
inx
jmp LE1D9
PATCH5:
bpl LE1C9
2008-10-19 06:51:22 +00:00
lda Z8C
ldy Z8C+1
2008-10-13 08:07:53 +00:00
rts
LE1C9:
ldy #$FF
rts
PATCH6:
bne LE1D8
LE1CE:
2008-10-17 06:31:11 +00:00
inc POSX
2008-10-13 08:07:53 +00:00
bne LE1D8
lda $E2
2008-10-17 06:31:11 +00:00
sta POSX
2008-10-13 08:07:53 +00:00
bne LE1CE
LE1D8:
rts
LE1D9:
2008-10-19 06:51:22 +00:00
stx TXTPTR
2008-10-13 08:07:53 +00:00
pla
pla
tya
jmp L2B1C