mirror of
https://github.com/irmen/prog8.git
synced 2024-10-18 01:24:51 +00:00
47 lines
892 B
Lua
47 lines
892 B
Lua
%import textio
|
|
%zeropage basicsafe
|
|
|
|
main {
|
|
ubyte @shared foo=99
|
|
sub thing(uword rr) {
|
|
ubyte @shared xx = rr[1] ; should still work as var initializer that will be rewritten
|
|
ubyte @shared yy
|
|
yy = rr[2]
|
|
uword @shared other
|
|
ubyte @shared zz = other[3]
|
|
}
|
|
sub start() {
|
|
ubyte @shared xx
|
|
repeat {
|
|
xx++
|
|
if xx==10
|
|
break
|
|
}
|
|
txt.print_ub(xx)
|
|
txt.nl()
|
|
|
|
while xx<50 {
|
|
xx++
|
|
if xx==40
|
|
break
|
|
}
|
|
txt.print_ub(xx)
|
|
txt.nl()
|
|
|
|
do {
|
|
xx++
|
|
if xx==80
|
|
break
|
|
} until xx>100
|
|
txt.print_ub(xx)
|
|
txt.nl()
|
|
|
|
for xx in 0 to 25 {
|
|
if xx==20
|
|
break
|
|
}
|
|
txt.print_ub(xx)
|
|
txt.nl()
|
|
}
|
|
}
|