prog8/compiler/examples/hello.p8

25 lines
386 B
Plaintext
Raw Normal View History

2018-11-25 00:17:39 +00:00
%import c64lib
%import c64utils
~ main {
sub start() {
; set screen colors and activate lowercase charset
c64.EXTCOL = 5
c64.BGCOL0 = 0
c64.COLOR = 1
c64.VMCSB |= 2
2018-11-25 00:17:39 +00:00
; use kernel routine to write text
c64.STROUT("Hello!\n")
2018-11-25 00:17:39 +00:00
str question = "How are you?\n"
for ubyte c in 0 to len(question) {
c64.CHROUT(question[c])
}
2018-11-25 00:17:39 +00:00
return
}
}