prog8/compiler/examples/hello.p8

%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

        ; use kernel routine to write text
        c64.STROUT("Hello!\n")

        str question = "How are you?\n"

        ; use iteration to write text
        for ubyte char in question {
            c64.CHROUT(char)
        }

        ; use loop to write characters
        str bye = "Goodbye!\n"
        for ubyte c in 0 to len(bye) {
            c64.CHROUT(bye[c])
        }

    }

}