mirror of
https://github.com/irmen/prog8.git
synced 2024-10-18 01:24:51 +00:00
36 lines
641 B
Lua
36 lines
641 B
Lua
%import textio
|
|
%import diskio
|
|
%import floats
|
|
%import graphics
|
|
%import test_stack
|
|
%zeropage basicsafe
|
|
%option no_sysinit
|
|
|
|
main {
|
|
|
|
; TODO the R0 is loaded as a WORD even though its type is specified as a BYTE...:
|
|
asmsub set_8_pixels_from_bits(ubyte bits @R0, ubyte oncolor @A, ubyte offcolor @Y) {
|
|
|
|
}
|
|
|
|
|
|
|
|
asmsub derp(ubyte value @A, uword address @R0) {
|
|
%asm {{
|
|
rts
|
|
}}
|
|
}
|
|
|
|
sub start () {
|
|
uword bank = 1
|
|
uword address = 1000
|
|
ubyte value = 123
|
|
bank++
|
|
|
|
derp(value, address)
|
|
cx16.vpoke(lsb(bank), address, value)
|
|
|
|
test_stack.test()
|
|
}
|
|
}
|