1
0
mirror of https://github.com/KarolS/millfork.git synced 2024-07-04 16:29:52 +00:00
millfork/examples/c64/text_encodings.mfk

23 lines
432 B
Plaintext
Raw Normal View History

2017-12-27 21:26:13 +00:00
import stdio
array p = [
"this is an example" petscii, 13,
"of multiline petscii text" petscii
]
array s = [
"and this is an example " scr,
"of text done in screencodes" scr
]
array screen [1000] @$400
void main(){
byte i
putstr(p, p.length)
for i,0,paralleluntil,s.length {
screen[20 * 40 + i] = s[i]
c64_color_ram[20 * 40 + i] = light_blue
}
while(true){}
}