another BASIC simplification
This commit is contained in:
1 parent
a92e0006b3
commit
039b863a18
6 files changed
+6
-17
No files matched your search
@@ -96,14 +96,10 @@ Clears the screen content.
|
||||
|
||||
Runs the garbage collector - disposes outdated strings.
|
||||
|
||||
### `NSYS` (MEGA65)
|
||||
### `GO SYS` (MEGA65)
|
||||
|
||||
A 'native' `SYS` - same as `SYS`, but does not switch to C64 compatibility mode.
|
||||
Same as `SYS`, but does not switch to C64 compatibility mode.
|
||||
|
||||
### `GO 64`, `GO 65` (MEGA65)
|
||||
|
||||
Switches machine to C64 compatibility mode or to MEGA65 native mode. Performs `CLR`
|
||||
|
||||
### `GO SYS` (MEGA65)
|
||||
|
||||
The same as `NSYS`, but does not need tokens unknown to C64 BASIC V2. Intended for usage in 'fat binaries' only.
|
||||
@@ -20,7 +20,7 @@ cmd_go_syntax_error:
|
||||
#else
|
||||
|
||||
cmp #$9E // 'SYS' keyword, for 'GO SYS'
|
||||
beq_16 cmd_nsys
|
||||
beq_16 cmd_gosys
|
||||
|
||||
dew TXTPTR // unconsume character
|
||||
|
||||
|
||||
@@ -5,7 +5,7 @@
|
||||
|
||||
#if ROM_LAYOUT_M65
|
||||
|
||||
cmd_nsys:
|
||||
cmd_gosys:
|
||||
|
||||
// NSYS requires an argument
|
||||
|
||||
|
||||
@@ -7,7 +7,7 @@
|
||||
|
||||
.const command_03_list = List().add(
|
||||
|
||||
cmd_nsys
|
||||
cmd_rem // XXX just for testing
|
||||
)
|
||||
|
||||
|
||||
|
||||
@@ -1,7 +0,0 @@
|
||||
// #LAYOUT# M65 BASIC_0 #TAKE
|
||||
// #LAYOUT# * * #IGNORE
|
||||
|
||||
|
||||
// PLACEHOLDER for completeness - jumptable contains direct address
|
||||
|
||||
// NSYS command is implemented together with SYS
|
||||
@@ -213,7 +213,7 @@ const StringEntryList GLOBAL_Keywords_03_M65 = { ListType::KEYWORDS, "keywords_
|
||||
{
|
||||
// STD M65 U64 X16
|
||||
|
||||
{ false, true, false, false, "K03_01", "NSYS", }, // Not present in CBM BASIC dialects, Open ROMs specific
|
||||
{ false, true, false, false, "K03_01", "TEST", }, // Not present in CBM BASIC dialects, Open ROMs specific
|
||||
|
||||
} };
|
||||
|
||||
|
||||
Reference in new issue
Block a user