mirror of
https://github.com/irmen/prog8.git
synced 2024-07-22 08:29:01 +00:00
33 lines
665 B
Lua
33 lines
665 B
Lua
%import syslib
|
|
; %import graphics
|
|
%import textio
|
|
%zeropage basicsafe
|
|
|
|
|
|
main {
|
|
|
|
sub start() {
|
|
|
|
decisionOver2 += 2*yy+1 ; TODO why is the +1 not converted to decisionOver2++ separately?
|
|
|
|
; 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++
|
|
}
|
|
}
|
|
}
|
|
}
|