11 lines
173 B
Text
11 lines
173 B
Text
ang = 45
|
|
on animate
|
|
gclear
|
|
gcircle 50 50 1
|
|
x = 50 + 40 * sin ang
|
|
y = 50 + 40 * cos ang
|
|
gline 50 50 x y
|
|
gcircle x y 6
|
|
vel += sin ang / 5
|
|
ang += vel
|
|
.
|