1 ; setup default CONIO screen (20x24, Antic mode 6, BASIC mode 1)
3 ; 28-May-2014, Christian Groessler <chris@groessler.org>
5 .include "atari5200.inc"
7 SCREEN_BUF_SIZE = 20 * 24
8 SCREEN_BUF = $4000 - SCREEN_BUF_SIZE
11 .export screen_width, screen_height
20 ; initialize color registers, display list, and screen memory
29 ; initialize cursor position
35 ldy #<(SCREEN_BUF_SIZE-1)
36 ldx #>(SCREEN_BUF_SIZE-1)
37 clrscr: sta (SAVMSC),y
49 lda #GTIA_COLOR_LIGHTRED
51 lda #GTIA_COLOR_LIGHTGREEN
55 sta COLOR4 ; background
72 ; display list for 20x24 text mode
78 .byte DL_CHR20x8x2 | DL_LMS
90 .assert ((* >> 10) = (dlist >> 10)), error, "Display list crosses 1K boundary"