diff --git a/c64/basic/basic_commands_CD/cmd_fast.s b/c64/basic/basic_commands_CD/cmd_fast.s
index d447de59..913ca187 100644
--- a/c64/basic/basic_commands_CD/cmd_fast.s
+++ b/c64/basic/basic_commands_CD/cmd_fast.s
@@ -9,7 +9,8 @@ cmd_fast:
 
 	// Command implementation for Mega65
 
-	// XXX provide better implementation
+	lda #$41
+	sta CPU_D6510
 
 	jmp execute_statements
 
diff --git a/c64/basic/basic_commands_CD/cmd_slow.s b/c64/basic/basic_commands_CD/cmd_slow.s
index 0a98f2c6..cae5e5d6 100644
--- a/c64/basic/basic_commands_CD/cmd_slow.s
+++ b/c64/basic/basic_commands_CD/cmd_slow.s
@@ -9,9 +9,10 @@ cmd_slow:
 
 	// Command implementation for Mega65
 
-	// XXX provide implementation
+	lda #$40
+	sta CPU_D6510
 
-	jmp do_NOT_IMPLEMENTED_error
+	jmp execute_statements
 
 #elif CONFIG_MB_ULTIMATE_64