mirror of
https://github.com/irmen/prog8.git
synced 2024-11-20 03:32:05 +00:00
34 lines
558 B
Lua
34 lines
558 B
Lua
%import textio
|
|
%import diskio
|
|
%import string
|
|
%zeropage basicsafe
|
|
%option no_sysinit
|
|
|
|
main {
|
|
|
|
|
|
sub start() {
|
|
ubyte[] sarray = [11,22,33]
|
|
ubyte[] tarray = [0,0,0]
|
|
|
|
uword target = &tarray
|
|
uword source = &sarray
|
|
ubyte bb
|
|
@(target) = @(source)
|
|
target++
|
|
source++
|
|
@(target) = @(source)
|
|
target++
|
|
source++
|
|
@(target) = @(source)
|
|
target++
|
|
source++
|
|
|
|
for bb in tarray {
|
|
txt.print_ub(bb)
|
|
txt.chrout('\n')
|
|
}
|
|
}
|
|
|
|
}
|