mirror of
https://github.com/irmen/prog8.git
synced 2024-11-23 07:32:10 +00:00
31 lines
562 B
Lua
31 lines
562 B
Lua
%import syslib
|
|
; %import graphics
|
|
%import textio
|
|
%zeropage basicsafe
|
|
|
|
|
|
main {
|
|
|
|
sub start() {
|
|
|
|
; cx16.screen_set_mode(128)
|
|
|
|
ubyte width = txt.width()
|
|
ubyte height = txt.height()
|
|
|
|
ubyte x
|
|
|
|
repeat 999 {
|
|
ubyte xpos = rnd() % (width-1)
|
|
txt.setcc(xpos, 0, 81, 6)
|
|
ubyte ypos = rnd() % (height-1)+1
|
|
txt.setcc(width-1, ypos, 81, 2)
|
|
txt.scroll_left(true)
|
|
txt.scroll_down(true)
|
|
repeat 2000 {
|
|
x++
|
|
}
|
|
}
|
|
}
|
|
}
|