mirror of
https://github.com/mist64/msbasic.git
synced 2024-06-05 23:29:27 +00:00
52 lines
808 B
ArmAsm
52 lines
808 B
ArmAsm
|
.segment "INIT"
|
||
|
|
|
||
|
|
PATCH1:
|
||
|
|
clc
|
||
|
|
jmp CONTROL_C_TYPED
|
||
|
|
PATCH2:
|
||
|
|
bit $B4
|
||
|
|
bpl LE1AA
|
||
|
|
cmp #$54
|
||
|
|
bne LE1AA
|
||
|
|
jmp LCE3B
|
||
|
|
LE1AA:
|
||
|
|
rts
|
||
|
|
PATCH3:
|
||
|
|
bit $B4
|
||
|
|
bmi LE1B2
|
||
|
|
jmp LCE90
|
||
|
|
LE1B2:
|
||
|
|
cmp #$54
|
||
|
|
beq LE1B9
|
||
|
|
jmp LCE82
|
||
|
|
LE1B9:
|
||
|
|
jmp LCE69
|
||
|
|
PATCH4:
|
||
|
|
sta CHARAC
|
||
|
|
inx
|
||
|
|
jmp LE1D9
|
||
|
|
PATCH5:
|
||
|
|
bpl LE1C9
|
||
|
|
lda $8E
|
||
|
|
ldy $8F
|
||
|
|
rts
|
||
|
|
LE1C9:
|
||
|
|
ldy #$FF
|
||
|
|
rts
|
||
|
|
PATCH6:
|
||
|
|
bne LE1D8
|
||
|
|
LE1CE:
|
||
|
|
inc $05
|
||
|
|
bne LE1D8
|
||
|
|
lda $E2
|
||
|
|
sta $05
|
||
|
|
bne LE1CE
|
||
|
|
LE1D8:
|
||
|
|
rts
|
||
|
|
LE1D9:
|
||
|
|
stx $C9
|
||
|
|
pla
|
||
|
|
pla
|
||
|
|
tya
|
||
|
|
jmp L2B1C
|