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
@@ -94,6 +94,10 @@ list_not_quote:
|
||||
cmp #$02
|
||||
beq list_display_token_02
|
||||
#endif
|
||||
#if ROM_LAYOUT_M65
|
||||
cmp #$03
|
||||
beq list_display_token_03
|
||||
#endif
|
||||
|
||||
// Check for literals
|
||||
cmp #$7F
|
||||
@@ -228,6 +232,24 @@ list_display_token_02:
|
||||
|
||||
#endif
|
||||
|
||||
#if ROM_LAYOUT_M65
|
||||
|
||||
list_display_token_03:
|
||||
|
||||
// Display a 2-byte token - for extended BASIC
|
||||
jsr list_fetch_subtoken
|
||||
|
||||
// Check if token is known
|
||||
cpx #TK__MAXTOKEN_keywords_03
|
||||
bcs list_is_unknown
|
||||
|
||||
// Now ask for it to be printed
|
||||
phy_trash_a
|
||||
jsr print_packed_keyword_03
|
||||
jmp_8 list_display_token_ext_done
|
||||
|
||||
#endif
|
||||
|
||||
list_fetch_subtoken:
|
||||
|
||||
// Fetch the sub-token
|
||||
|
||||
@@ -55,6 +55,16 @@ print_packed_keyword_02: // .X - token number
|
||||
|
||||
#endif
|
||||
|
||||
#if ROM_LAYOUT_M65
|
||||
|
||||
print_packed_keyword_03: // .X - token number
|
||||
|
||||
lda #<packed_freq_keywords_03
|
||||
ldy #>packed_freq_keywords_03
|
||||
bne print_freq_packed_string // branch always
|
||||
|
||||
#endif
|
||||
|
||||
print_packed_keyword_V2: // .X - token number
|
||||
|
||||
lda #<packed_freq_keywords_V2
|
||||
|
||||
Reference in new issue
Block a user