mirror of
https://github.com/irmen/prog8.git
synced 2024-11-02 07:05:14 +00:00
35 lines
583 B
Lua
35 lines
583 B
Lua
%import c64utils
|
|
%zeropage basicsafe
|
|
|
|
; TODO fix compiler errors when compiling without optimization ( /= )
|
|
|
|
|
|
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
|
|
|
|
c64scr.print_ub(other.red)
|
|
c64.CHROUT(',')
|
|
c64scr.print_ub(other.green)
|
|
c64.CHROUT(',')
|
|
c64scr.print_ub(other.blue)
|
|
c64.CHROUT('\n')
|
|
}
|
|
}
|