the10thwiz/cc65
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

initial commit of soft80 implementation

Browse Source
This commit is contained in:
mrdudz
2015-09-27 18:12:25 +02:00
parent 067956b808
commit 9e08c53b01
13 changed files with 1351 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

101
libsrc/c64/soft80_kplot.s Normal file
View File

@@ -0,0 +1,101 @@
.export soft80_kplot
.export soft80_plotinit
.include "c64.inc"
.include "soft80.inc"
soft80_kplot:
bcs @getpos
; calc pointer to bitmap
lda _bitmaplo,x
clc
adc _bitmapxlo,y
sta SCREEN_PTR
lda _bitmaphi,x
adc _bitmapxhi,y
sta SCREEN_PTR+1
; calc pointer to vram
tya
lsr a
clc
adc _vramlo,x
sta CRAM_PTR
lda #0
adc _vramhi,x
sta CRAM_PTR+1
@getpos:
ldx CURS_Y
ldy CURS_X
rts
; FIXME: perhaps just include the respective tables directly?
soft80_plotinit:
; create screen-rows base tables (bitmap)
lda #<soft80_bitmap
sta SCREEN_PTR
lda #>soft80_bitmap
sta SCREEN_PTR+1
ldx #$00
l1:
lda SCREEN_PTR
sta _bitmaplo,x
clc
adc #<(40*8)
sta SCREEN_PTR
lda SCREEN_PTR+1
sta _bitmaphi,x
adc #>(40*8)
sta SCREEN_PTR+1
inx
cpx #25
bne l1
; create screen-rows base tables (colorram)
lda #<soft80_vram
sta CRAM_PTR
lda #>soft80_vram
sta CRAM_PTR+1
ldx #$00
l1b:
lda CRAM_PTR
sta _vramlo,x
clc
adc #<(40)
sta CRAM_PTR
lda CRAM_PTR+1
sta _vramhi,x
adc #>(40)
sta CRAM_PTR+1
inx
cpx #25
bne l1b
rts
_bitmapxlo:
.repeat 80,col1
.byte <((col1/2)*8)
.endrepeat
_bitmapxhi:
.repeat 80,col
.byte >((col/2)*8)
.endrepeat
.bss
_vramlo:
.res 25
_vramhi:
.res 25
_bitmaplo:
.res 25
_bitmaphi:
.res 25