mirror of
https://github.com/irmen/prog8.git
synced 2024-11-03 13:07:54 +00:00
32 lines
503 B
Lua
32 lines
503 B
Lua
%import c64textio
|
|
%zeropage basicsafe
|
|
|
|
main {
|
|
|
|
struct Color {
|
|
ubyte red
|
|
ubyte green
|
|
ubyte blue
|
|
}
|
|
|
|
sub start() {
|
|
|
|
Color purple = [255, 0, 255]
|
|
|
|
Color other
|
|
|
|
other = purple
|
|
|
|
other.red /= 2
|
|
other.green = 10 + other.green / 2
|
|
other.blue = 99
|
|
|
|
txt.print_ub(other.red)
|
|
c64.CHROUT(',')
|
|
txt.print_ub(other.green)
|
|
c64.CHROUT(',')
|
|
txt.print_ub(other.blue)
|
|
c64.CHROUT('\n')
|
|
}
|
|
}
|