2018-10-16 00:26:35 +00:00
|
|
|
%import c64utils
|
2018-10-16 23:01:01 +00:00
|
|
|
%import mathlib
|
2018-10-16 20:49:19 +00:00
|
|
|
|
|
|
|
~ 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
|
|
|
|
2018-10-16 20:49:19 +00:00
|
|
|
}
|