2018-12-11 23:15:05 +00:00
|
|
|
%import c64utils
|
2018-12-13 00:19:43 +00:00
|
|
|
%option enable_floats
|
2018-10-16 00:26:35 +00:00
|
|
|
|
2018-12-04 21:30:35 +00:00
|
|
|
~ main {
|
2018-11-11 17:19:08 +00:00
|
|
|
|
2018-12-17 14:52:37 +00:00
|
|
|
memory ubyte[40] screen = $0400
|
2018-12-17 00:59:04 +00:00
|
|
|
|
2018-12-17 14:52:37 +00:00
|
|
|
poke()
|
|
|
|
|
sub start() {
|
|
|
|
|
float t = 0.0
|
|
|
|
|
while(true) {
|
|
|
|
|
ubyte x = lsb(round(sin(t)*15.0))+20
|
|
|
|
|
ubyte y = lsb(round(cos(t)*10.0))+12
|
|
|
|
|
|
|
|
|
|
; vm_gfx_text(x, y, 1, "*")
|
|
|
|
|
;vm_gfx_pixel(x,y,1)
|
|
|
|
|
; c64scr.print_ubyte_decimal(x)
|
|
|
|
|
; c64.CHROUT(',')
|
|
|
|
|
; c64scr.print_ubyte_decimal(y)
|
|
|
|
|
; c64.CHROUT('\n')
|
|
|
|
|
screen[x] = '*'
|
|
|
|
|
t+=0.1
|
|
|
|
|
}
|
2018-12-04 21:30:35 +00:00
|
|
|
}
|
2018-10-16 20:49:19 +00:00
|
|
|
}
|
2018-12-12 00:13:13 +00:00
|
|
|
|
