2018-08-16 21:10:28 +00:00
|
|
|
%output prg
|
|
|
|
|
%launcher basic
|
2018-09-15 22:59:12 +00:00
|
|
|
%option enable_floats
|
2018-08-16 21:10:28 +00:00
|
|
|
|
2018-09-15 22:59:12 +00:00
|
|
|
~ main {
|
2018-09-02 16:32:48 +00:00
|
|
|
|
2018-09-15 22:59:12 +00:00
|
|
|
sub start() -> () {
|
2018-09-11 22:51:48 +00:00
|
|
|
|
2018-09-15 22:59:12 +00:00
|
|
|
word tx = 0
|
|
|
|
|
word ty = 12 % 5
|
|
|
|
|
float time = 0.0
|
|
|
|
|
_vm_gfx_clearscr(0)
|
2018-09-15 16:43:23 +00:00
|
|
|
|
2018-09-15 22:59:12 +00:00
|
|
|
loop:
|
|
|
|
|
tx = round(sin(time*1.01)*150 + 160)
|
|
|
|
|
ty = round((cos(time)+sin(time/44.1))*60 + 128)
|
|
|
|
|
_vm_gfx_pixel(tx, ty, rnd() % 4 + 7)
|
|
|
|
|
time += 0.02
|
|
|
|
|
goto loop
|
2018-09-05 21:14:08 +00:00
|
|
|
}
|
2018-08-12 21:09:59 +00:00
|
|
|
}
|
