diff --git a/doc/Extended-BASIC-TODO.md b/doc/Extended-BASIC-TODO.md index 7f2ce4a7..7c683e6a 100644 --- a/doc/Extended-BASIC-TODO.md +++ b/doc/Extended-BASIC-TODO.md @@ -27,7 +27,7 @@ Ideas for the future, most of them suitable for Mega65 or other power machines o * `XOR` operator * `AUTO` - line auto numbering * `RENUMBER` for chanign the line numbers -* `IF ... THEN ... ELSE`, `BEGIN ... BEND` +* `IF ... THEN`, `BEGIN ... BEND`; `ELSE` not planned, as it would have slown down the execution * consider `BOOT` command * possibly some commands for creating menus and dialog boxes * more configurable `INPUT` diff --git a/src/basic/assets/startup_banner_m65.s b/src/basic/assets/startup_banner_m65.s index fc10ded0..c3c74cff 100644 --- a/src/basic/assets/startup_banner_m65.s +++ b/src/basic/assets/startup_banner_m65.s @@ -12,22 +12,26 @@ startup_banner: // Fancy Mega65 banner - from Retrofan, slightly tweaked - .byte $9A, $12, $20, $20, $7F, $A9, $20, $20, $1F, $20, $9A, $20, $20, $20, $20, $1F - .byte $20, $9A, $A9, $20, $20, $20, $92, $A1, $1F, $12, $20, $9A, $A9, $20, $20, $20 - .byte $7F, $1F, $20, $20, $9A, $A3, $A3, $A3, $A3, $A3, $A3, $A3, $1F + + // remove unneeded $1F's (blue) and $9A's (light blue) + + + .byte $9A, $12, $20, $20, $7F, $A9, $20, $20, $92, $20, $12, $20, $20, $20, $20, $92 + .byte $20, $12, $A9, $20, $20, $20, $92, $A1, $20, $12, $A9, $20, $20, $20, $7F, $92 + .byte $20, $20, $12, $A3, $A3, $A3, $A3, $A3, $A3, $A3 .byte $0D .byte $9A, $12, $20, $20, $20, $20, $20 - .byte $20, $1F, $20, $9A, $20, $20, $92, $A2, $bb, $1F, $12, $20, $9A, $20, $20, $92 - .byte $Ac, $A2, $A2, $1F, $12, $20, $9A, $20, $20, $1F, $20, $9A, $20, $20, $1F, $20 - .byte $20, $1e, $A3, $A3, $A3, $A3, $A3, $A3, $1F + .byte $20, $92, $20, $12, $20, $20, $92, $A2, $BB, $92, $20, $12, $20, $20, $92, $AC + .byte $A2, $A2, $20, $9A, $12, $20, $20, $92, $20, $12, $20, $20, $92, $20, $20, $12 + .byte $1E, $A3, $A3, $A3, $A3, $A3, $A3 .byte $0D - .byte $9A, $12, $20, $20, $92, $7F, $A9, $12, $20, $20, $1F, $20, $9A, $20, $20, $A2 - .byte $92, $be, $1F, $12, $20, $9A, $20, $20, $92, $bc, $12, $20, $20, $1F, $20, $9A - .byte $20, $20, $20, $20, $20, $1F, $20, $20, $9e, $A3, $A3, $A3, $A3, $A3, $1F + .byte $9A, $12, $20, $20, $92, $7F, $A9, $12, $20, $20, $92, $20, $12, $20, $20, $A2 + .byte $92, $BE, $92, $20, $12, $20, $20, $92, $BC, $12, $20, $20, $92, $20, $12, $20 + .byte $20, $20, $20, $20, $92, $20, $20, $12, $9E, $A3, $A3, $A3, $A3, $A3 .byte $0D - .byte $9A, $12, $20, $20, $1F, $20, $20, $9A, $20, $20, $1F, $20, $9A, $20, $20, $20 - .byte $20, $1F, $20, $9A, $20, $20, $20, $20, $20, $1F, $20, $9A, $20, $20, $1F, $20 - .byte $9A, $20, $20, $1F, $20, $20, $96, $A3, $A3, $A3, $A3, $1F, $92 + .byte $9A, $12, $20, $20, $92, $20, $20, $12, $20, $20, $92, $20, $12, $20, $20, $20 + .byte $20, $92, $20, $12, $20, $20, $20, $20, $20, $92, $20, $12, $20, $20, $92, $20 + .byte $12, $20, $20, $92, $20, $20, $12, $96, $A3, $A3, $A3, $A3, $1F, $92 .byte $0D, $0D, $05, $00 // Fancy Mega65 banner - from Retrofan diff --git a/src/basic/basic_commands/cmd_rem.s b/src/basic/basic_commands/cmd_rem.s index ea139303..71fa8057 100644 --- a/src/basic/basic_commands/cmd_rem.s +++ b/src/basic/basic_commands/cmd_rem.s @@ -7,6 +7,8 @@ cmd_rem: + inc $d021 + // XXX do we need these PHA's? pha