prog8/examples/hello.p8

30 lines
592 B
Plaintext
Raw Normal View History

2018-11-25 00:17:39 +00:00
%import c64lib
%import c64utils
~ main {
2018-12-18 14:12:56 +00:00
sub start() {
2018-11-25 00:17:39 +00:00
2018-12-18 14:12:56 +00:00
; 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 optimized routine to write text
c64scr.print("Hello!\n")
2018-12-18 14:12:56 +00:00
; use iteration to write text
str question = "How are you?\n"
for ubyte char in question
2018-12-18 14:12:56 +00:00
c64.CHROUT(char)
; use indexed loop to write characters
2018-12-18 14:12:56 +00:00
str bye = "Goodbye!\n"
for ubyte c in 0 to len(bye)
2018-12-18 14:12:56 +00:00
c64.CHROUT(bye[c])
2018-11-25 00:17:39 +00:00
}
2018-11-25 00:17:39 +00:00
}