prog8/examples/test.p8

22 lines
338 B
Plaintext
Raw Normal View History

2023-05-15 21:01:43 +00:00
%import textio
%zeropage basicsafe
main {
2023-05-07 21:49:02 +00:00
2023-05-07 23:03:54 +00:00
sub start() {
2023-05-14 14:48:48 +00:00
uword table = memory("table", 100, 0)
ubyte pos
for pos in 0 to 7 {
pokew(table + 64 + pos*2, ($000a-pos)*200)
}
for pos in 0 to 7 {
txt.print_uw(peekw(table+64+pos*2))
txt.nl()
}
2023-03-18 23:24:05 +00:00
}
}