SCREEN_BUF_SIZE = 20 * 24
SCREEN_BUF = $4000 - SCREEN_BUF_SIZE
- .export screen_setup
+ .export initconio
.export screen_width, screen_height
.export conio_color
.segment "ONCE"
-screen_setup:
+; initialize color registers, display list, and screen memory
+initconio:
; initialize SAVMSC
lda #<SCREEN_BUF
; set default colors
- lda #40
+ lda #GTIA_COLOR_WHITE
sta COLOR0
- lda #202
+ lda #GTIA_COLOR_LIGHTRED
sta COLOR1
- lda #148
+ lda #GTIA_COLOR_LIGHTGREEN
sta COLOR2
- lda #70
+ lda #GTIA_COLOR_BLACK
sta COLOR3
- lda #0
- sta COLOR4
+ sta COLOR4 ; background
; set display list
rts
- .data
+ .bss
-conio_color: .byte 0
+conio_color: .res 1
.segment "DLIST"