Initial Creativision Import

2013-12-05 11:40:44 +00:00
parent b5ed9a1eff
commit 11be575b6d
23 changed files with 956 additions and 0 deletions
--- a/libsrc/creativision/setcursor.s
+++ b/libsrc/creativision/setcursor.s
@@ -0,0 +1,36 @@
+;
+; Written by Groepaz/Hitmen <groepaz@gmx.net>
+; Cleanup by Ullrich von Bassewitz <uz@cc65.org>
+;
+; Set the cursor position
+
+        .export         setcursor
+
+        .include        "creativision.inc"
+
+;-----------------------------------------------------------------------------
+
+.proc   setcursor
+
+        tya
+        clc
+        adc     addrlo,x
+        sta     SCREEN_PTR
+
+        lda     addrhi,x
+        adc     #0
+        sta     SCREEN_PTR+1
+        rts
+
+.endproc
+
+;-----------------------------------------------------------------------------
+; Tables with screen addresses
+
+addrlo: .repeat SCREEN_ROWS,line
+        .byte <($1000+(line*SCREEN_COLS))
+        .endrepeat
+
+addrhi: .repeat SCREEN_ROWS,line
+        .byte >($1000+(line*SCREEN_COLS))
+        .endrepeat