prog8/compiler/examples/test.p8

38 lines
391 B
Plaintext
Raw Normal View History

2018-10-16 00:26:35 +00:00
%import c64utils
2018-10-16 23:01:01 +00:00
%import mathlib
~ main {
sub start() {
const ubyte screen_color = 9
const ubyte border_color = 2
const ubyte cursor_color = 7
2018-10-16 23:01:01 +00:00
ubyte ubb
uword uww
byte color
byte color2
AX=XY
uww=XY
AY=uww
A++
X++
2018-10-17 16:11:36 +00:00
AY++
2018-10-16 23:01:01 +00:00
A = ~X
A = not Y
ubb = ~ubb
uww = ~uww
color2 = ~color
uww = not uww
2018-10-16 00:26:35 +00:00
return
2018-10-16 23:01:01 +00:00
2018-10-13 14:09:10 +00:00
}
2018-10-16 00:26:35 +00:00
}