more work towards Mega65 native mode, added NSYS command
This commit is contained in:
1 parent
ffdc67d5ca
commit
83cdf37c0d
23 files changed
+266
-21
No files matched your search
@@ -46,7 +46,11 @@ execute_statements:
|
||||
|
||||
#else
|
||||
|
||||
#if ROM_LAYOUT_M65
|
||||
cpx #$04
|
||||
#else
|
||||
cpx #$03
|
||||
#endif
|
||||
bcc execute_statements_extended
|
||||
|
||||
#endif
|
||||
@@ -93,6 +97,13 @@ execute_statements_extended:
|
||||
cpx #$02
|
||||
beq execute_statements_02
|
||||
|
||||
#if ROM_LAYOUT_M65
|
||||
|
||||
cpx #$03
|
||||
beq execute_statements_03
|
||||
|
||||
#endif
|
||||
|
||||
jmp do_SYNTAX_error
|
||||
|
||||
#endif
|
||||
@@ -171,6 +182,27 @@ execute_statements_02:
|
||||
|
||||
#endif // !HAS_SMALL_BASIC
|
||||
|
||||
#if ROM_LAYOUT_M65
|
||||
|
||||
execute_statements_03:
|
||||
|
||||
// Get the sub-token, check that it is valid
|
||||
|
||||
jsr fetch_character
|
||||
cmp #$00
|
||||
beq_16 do_SYNTAX_error
|
||||
|
||||
cmp #(TK__MAXTOKEN_keywords_03+1)
|
||||
bcs_16 do_SYNTAX_error
|
||||
|
||||
// Use jumptable to go to the command routine
|
||||
|
||||
asl
|
||||
tax
|
||||
jmp (command_03_jumptable - 2, x)
|
||||
|
||||
#endif // ROM_LAYOUT_M65
|
||||
|
||||
execute_statements_end_of_line:
|
||||
|
||||
// First check, if we are in direct mode - if so,
|
||||
|
||||
Reference in new issue
Block a user