diff --git a/c64/basic/commands/cmd_print.s b/c64/basic/commands/cmd_print.s new file mode 100644 index 00000000..85bf7d96 --- /dev/null +++ b/c64/basic/commands/cmd_print.s @@ -0,0 +1,31 @@ +// #LAYOUT# STD * #TAKE +// #LAYOUT# * BASIC_0 #TAKE +// #LAYOUT# * * #IGNORE + + + +cmd_print: + + // XXX print an argument here + + + // Look for the next argument + + jsr end_of_statement_check + bcs cmd_print_new_line + + jsr fetch_character + cmp #$2C // comma + beq cmd_print + cmp #$3B // semicolon + beq cmd_print_done + +cmd_print_new_line: + + jsr print_return + + // FALLTROUGH + +cmd_print_done: + + jmp basic_main_loop diff --git a/c64/basic/commands/cmd_unimplemented.s b/c64/basic/commands/cmd_unimplemented.s index 7331765e..1280d692 100644 --- a/c64/basic/commands/cmd_unimplemented.s +++ b/c64/basic/commands/cmd_unimplemented.s @@ -45,8 +45,6 @@ cmd_poke: nop cmd_printhash: nop -cmd_print: - nop cmd_cont: nop cmd_cmd: