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.
|
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)
|
### `GO 64`, `GO 65` (MEGA65)
|
||||||
|
|
||||||
Switches machine to C64 compatibility mode or to MEGA65 native mode. Performs `CLR`
|
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
|
#else
|
||||||
|
|
||||||
cmp #$9E // 'SYS' keyword, for 'GO SYS'
|
cmp #$9E // 'SYS' keyword, for 'GO SYS'
|
||||||
beq_16 cmd_nsys
|
beq_16 cmd_gosys
|
||||||
|
|
||||||
dew TXTPTR // unconsume character
|
dew TXTPTR // unconsume character
|
||||||
|
|
||||||
|
|||||||
@@ -5,7 +5,7 @@
|
|||||||
|
|
||||||
#if ROM_LAYOUT_M65
|
#if ROM_LAYOUT_M65
|
||||||
|
|
||||||
cmd_nsys:
|
cmd_gosys:
|
||||||
|
|
||||||
// NSYS requires an argument
|
// NSYS requires an argument
|
||||||
|
|
||||||
|
|||||||
@@ -7,7 +7,7 @@
|
|||||||
|
|
||||||
.const command_03_list = List().add(
|
.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
|
// 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