Atari XL

Advanced Graphics
169
520 IF ASC(A$(Z,Z»<>O THEN
A$(Z,Z)=CHR$(ASC(A$(Z,Z»-32)
530 NEXT Z
549 REM POKE INTO DISPLAY MEMORY
550 FOR Z=l TO LEN(A$)
560 POKE DM+MEM+(Z-l),ASC(A$(Z,Z»
570 NEXT Z
580 RETURN
The program will create a display comprising:
2 lines of mode 2 text +
1 line of mode 0 text +
many lines of mode 8 graphics
looking like this:
2 LINES OF MODE 2 TEXT
1 LINE OF
MODE aTEXT
TH E
MODE 8 DISPLAY
The Mixed Mode Display