Add basic conio buffer

2022-04-02 09:39:55 +03:00
parent 77b300682a
commit c31c7d2782
3 changed files with 520 additions and 0 deletions
--- a/libsrc/atari7800/clrscr.s
+++ b/libsrc/atari7800/clrscr.s
@@ -0,0 +1,31 @@
+
+        .include        "atari7800.inc"
+
+        .export _clrscr
+
+	.import	CURS_X
+	.import	CURS_Y
+	.import	_screen
+	.import	pushax, __bzero
+
+	.code
+
+	.proc _clrscr
+
+	lda	#0
+	sta	CURS_X
+	sta	CURS_Y
+	lda	#<(_screen)
+	ldx	#>(_screen)
+	jsr	pushax
+	ldx	#>(charsperline * screenrows)
+	lda	#<(charsperline * screenrows)
+	jmp	__bzero
+
+	.endproc
+
+;-------------------------------------------------------------------------------
+; force the init constructor to be imported
+
+                .import initconio
+conio_init      = initconio