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/chrget.s
+++ b/trunk/workspace/AVR-Computer/msbasic/chrget.s
@@ -0,0 +1,23 @@
+.segment "CHRGET"
+RAMSTART1:
+GENERIC_CHRGET:
+        inc     TXTPTR
+        bne     GENERIC_CHRGOT
+        inc     TXTPTR+1
+GENERIC_CHRGOT:
+GENERIC_TXTPTR = GENERIC_CHRGOT + 1
+        lda     $EA60
+.ifdef KBD
+        jsr     LF430
+.endif
+        cmp     #$3A
+        bcs     L4058
+GENERIC_CHRGOT2:
+        cmp     #$20
+        beq     GENERIC_CHRGET
+        sec
+        sbc     #$30
+        sec
+        sbc     #$D0
+L4058:
+        rts