fixed error messages in MEGA65 native mode
This commit is contained in:
1 parent
278c57f927
commit
0ed000de30
2 files changed
+6
-5
No files matched your search
@@ -7,7 +7,7 @@
|
|||||||
|
|
||||||
|
|
||||||
//
|
//
|
||||||
// Page 0 - reused LDTB1
|
// Page 0 - reused LDTB1 and USER
|
||||||
//
|
//
|
||||||
|
|
||||||
.label M65_TMP__K1 = $D9 // $D9 -- UNUSED -- temporary value for various Kernal routines
|
.label M65_TMP__K1 = $D9 // $D9 -- UNUSED -- temporary value for various Kernal routines
|
||||||
@@ -16,9 +16,10 @@
|
|||||||
.label M65_LPNT_SCR = $E2 // $E2-$E5 4-byte pointer for temporary usage within BASIC and screen editor
|
.label M65_LPNT_SCR = $E2 // $E2-$E5 4-byte pointer for temporary usage within BASIC and screen editor
|
||||||
// E6 reserved for BASIC error handling routines, also in native mode
|
// E6 reserved for BASIC error handling routines, also in native mode
|
||||||
.label M65_MAGICSTR = $E7 // $E7-$E9 if equals 'M65' it means we are in native mode
|
.label M65_MAGICSTR = $E7 // $E7-$E9 if equals 'M65' it means we are in native mode
|
||||||
.label M65_LPNT_IRQ = $EA // $EA-$ED 4-byte pointer for temporary usage within interrupts
|
// EA reserved for BASIC error handling routines, also in native mode
|
||||||
.label M65_LPNT_KERN = $EE // $EE-$F1 4-byte pointer for temporary usage by KERNAL
|
.label M65_LPNT_IRQ = $EB // $EB-$EE 4-byte pointer for temporary usage within interrupts
|
||||||
.label M65_TMP__K2 = $F2 // $F2 -- UNUSED -- temporary value for various Kernal routines
|
.label M65_LPNT_KERN = $EF // $EF-$F3 4-byte pointer for temporary usage by KERNAL
|
||||||
|
.label M65_TMP__K2 = $F4 // $F4 -- UNUSED -- temporary value for various Kernal routines
|
||||||
|
|
||||||
//
|
//
|
||||||
// Page 0 - other reused values
|
// Page 0 - other reused values
|
||||||
|
|||||||
@@ -163,7 +163,7 @@ do_error_fetch:
|
|||||||
// $E6 has even part
|
// $E6 has even part
|
||||||
asl
|
asl
|
||||||
ora $EA
|
ora $EA
|
||||||
and #$7f
|
and #$7F
|
||||||
tax
|
tax
|
||||||
|
|
||||||
// Restore $EA to correct value in case the NOP above is used
|
// Restore $EA to correct value in case the NOP above is used
|
||||||
|
|||||||
Reference in new issue
Block a user