23 lines
401 B
ArmAsm
23 lines
401 B
ArmAsm
// BASIC Cold start entry point
|
|
// Compute's Mapping the 64 p211
|
|
|
|
basic_cold_start:
|
|
|
|
// Before doing anything, check if we have a compatible BASIC/KERNAL pair
|
|
|
|
ldy #(__rom_revision_basic_end - rom_revision_basic - 1)
|
|
!:
|
|
lda rom_revision_basic, y
|
|
cmp rom_revision_kernal, y
|
|
beq !+
|
|
|
|
panic #P_ERR_ROM_MISMATCH
|
|
|
|
!:
|
|
dey
|
|
bpl !--
|
|
|
|
// Remaining part wouldn't fit here
|
|
|
|
jmp basic_cold_start_internal
|