X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=libsrc%2Fatari5200%2Fconioscreen.s;h=30c0e0788febf883cf323e98b333565db8965c24;hb=9c7cccf3e5214ebbb3ac031168e349a5f27fb5ae;hp=ba47866ce906d0f7c33f723b3f9a1166726bd6df;hpb=0f2f19ef5b2c4773176442d4efb4c9e92fb34707;p=cc65

diff --git a/libsrc/atari5200/conioscreen.s b/libsrc/atari5200/conioscreen.s
index ba47866ce..30c0e0788 100644
--- a/libsrc/atari5200/conioscreen.s
+++ b/libsrc/atari5200/conioscreen.s
@@ -1,12 +1,16 @@
+; setup default CONIO screen (20x24, Antic mode 6, BASIC mode 1)
+;
+; 28-May-2014, Christian Groessler <chris@groessler.org>
 
                 .include "atari5200.inc"
 
 SCREEN_BUF_SIZE =       20 * 24
 SCREEN_BUF      =       $4000 - SCREEN_BUF_SIZE
 
-                .code
                 .export screen_setup_20x24
 
+                .segment "ONCE"
+
 screen_setup_20x24:
 
                 ; initialize SAVMSC
@@ -54,7 +58,7 @@ clrscr:         sta     (SAVMSC),y
                 rts
 
 
-                .segment "RODATA"
+                .segment "DLIST"
 
 ; display list for 20x24 text mode
 
@@ -76,5 +80,4 @@ dlist:          .repeat 3
 
 .assert ((* >> 10) = (dlist >> 10)), error, "Display list crosses 1K boundary"
 
-
                 .end