1 files changed, 12 insertions, 0 deletions
diff --git a/programs/pos-check.s b/programs/pos-check.s
new file mode 100644
index 0000000..315147b
--- /dev/null
+++ b/programs/pos-check.s
@@ -0,0 +1,12 @@
+cmd_clr:
+	lda scr_row
+	cmp #23
+	beq cmd_vwrap
+	inc scr_row
+	jmp cmd_clr_end
+cmd_vwrap:
+	jsl rset_row
+cmd_clr_end:
+	jsl update_pos
+	lda #0
+	rtl