initial import, completely untested, does not compile yet

2014-11-29 14:18:48 +01:00
parent fed3179d3b
commit faccc5a3d6
23 changed files with 1974 additions and 0 deletions
--- a/libsrc/pcengine/kplot.s
+++ b/libsrc/pcengine/kplot.s
@@ -0,0 +1,41 @@
+
+	.export PLOT
+
+	.include	"pcengine.inc"
+
+PLOT:
+
+	bcs @getpos
+
+	tya
+	clc
+	adc _plotlo,x
+	sta	SCREEN_PTR
+
+	lda _plothi,x
+	adc #0
+	sta	SCREEN_PTR+1
+
+	;clc
+	;adc _colplot,x
+	;sta CRAM_PTR
+
+	;lda #$23
+	;sta CRAM_PTR+1
+
+@getpos:
+	ldx CURS_Y
+	ldy CURS_X
+	rts
+
+_plotlo:
+	.repeat screenrows,line
+	.byte <($0000+(line*$80))
+	.endrepeat
+
+_plothi:
+	.repeat screenrows,line
+	.byte >($0000+(line*$80))
+	.endrepeat
+
+