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

Fixed and improved some pce comments.

Browse Source
This commit is contained in:
Greg King
2015-11-17 09:14:15 -05:00
committed by Oliver Schmidt
parent 2cc822b44e
commit 959eff34a3
15 changed files with 61 additions and 55 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
libsrc/pce/conio.s
View File

@@ -28,7 +28,7 @@ set_palette:
ldx #0
@lp:
ldy #16
ldy #16 ; size of a pallette
@lp1:
lda colors,x
sta VCE_DATA_LO
@@ -42,6 +42,8 @@ set_palette:
cpx #16 * 2
jne @lp
; Set background to black.
stz VCE_ADDR_LO
stz VCE_ADDR_HI
stz VCE_DATA_LO
@@ -49,13 +51,18 @@ set_palette:
rts
;----------------------------------------------------------------------------
; The character tiles use only two colors from each pallette. Color zero
; comes from pallette zero; color one is different in each pallette. The
; color of a character is set by choosing one of the 16 pallettes.
conio_init:
; Load font
st0 #VDC_MAWR
st1 #<$2000
st2 #>$2000
; ptr to font data
; pointer to font data
lda #<font
sta ptr1
lda #>font
@@ -76,7 +83,7 @@ conio_init:
sta tmp1
jsr copy
ldx #0
ldx #0 ; white on black
stx BGCOLOR
inx
stx CHARCOLOR
@@ -101,11 +108,11 @@ lineloop:
adc #$00
sta ptr1+1
dex
bne lineloop ; next bitplane 0 byte
ldx #$08 ; fill bitplane 2/3 with 0
bne lineloop ; next bitplane-0 byte
ldx #$08 ; fill bitplanes 2 and 3 with 0
fillloop:
st1 #$00
st2 #$00
st1 #<$0000
st2 #>$0000
dex
bne fillloop ; next byte
dey