mirror of
https://github.com/irmen/prog8.git
synced 2024-11-28 10:51:14 +00:00
22 lines
511 B
Lua
22 lines
511 B
Lua
%import textio
|
|
%option no_sysinit
|
|
%zeropage basicsafe
|
|
%memtop $0840
|
|
|
|
main {
|
|
|
|
sub start() {
|
|
cx16.r0L=0
|
|
if cx16.r0L==0 {
|
|
uword[] addresses = [scores2, start]
|
|
uword[] @split scores1 = [10, 25, 50, 100] ; can never clear more than 4 lines at once
|
|
uword[] @split scores2 = [10, 25, 50, 100] ; can never clear more than 4 lines at once
|
|
|
|
cx16.r0 = &scores1
|
|
cx16.r1 = &scores2
|
|
cx16.r2 = &addresses
|
|
}
|
|
}
|
|
|
|
}
|