daily_automated

2023-03-13 08:36:51 +00:00
parent 5347889cd2
commit f29dcc4188
5439 changed files with 1065799 additions and 0 deletions
--- a/trunk/workspace/AVR-Computer/msbasic/message.s
+++ b/trunk/workspace/AVR-Computer/msbasic/message.s
@@ -0,0 +1,59 @@
+; global messages: "error", "in", "ready", "break"
+
+.segment "CODE"
+
+QT_ERROR:
+.ifdef KBD
+        .byte   " err"
+.else
+  .ifdef APPLE
+        .byte   " ERR"
+		.byte	$07,$07
+  .else
+        .byte   " ERROR"
+  .endif
+.endif
+        .byte   0
+
+.ifndef KBD
+QT_IN:
+        .byte   " IN "
+        .byte   $00
+.endif
+
+.ifdef KBD
+		.byte	$54,$D2 ; ???
+OKPRT:
+		jsr     PRIMM
+        .byte   CR,CR,">>",CR,LF
+		.byte	0
+        rts
+        nop
+.else
+QT_OK:
+  .ifdef CONFIG_CBM_ALL
+		.byte   CR,LF,"READY.",CR,LF
+  .else
+    .ifdef APPLE
+		; binary patch!
+        .byte   CR,0,0,"K",CR,LF
+    .else
+		.byte   CR,LF,"OK",CR,LF
+    .endif
+  .endif
+		.byte	0
+.endif
+
+QT_BREAK:
+
+.ifdef KBD
+		.byte	CR,LF," Brk"
+        .byte   0
+        .byte   $54,$D0 ; ???
+.elseif .def(MICROTAN)
+		.byte CR,LF," BREAK"
+        .byte   0
+.else
+		.byte CR,LF,"BREAK"
+        .byte   0
+.endif