Cykloide.
En cykloide er den kurve, der beskrives af et fast punkt på en cirkel, når den ruller hen ad en linje. Her har vi en cirkel med radius 1, som kan rulle på x-aksen. Du kan starte rulningen ved at trykke på “PLAY”.
Figure figure = Position [0,0] Size[x,y] Origin[x/4,y*2/3] Unit x/12 Color "white";
Axes axes = Color "black";
Grid grid = Color "blue";
//Units units = Color "black";
Timer tid = From 0 To 2*pi Step pi/180 Tick 10;
RadioButton playbutton = Text [ "Play"; "Stop" ] Action [ start tid; stop tid ]
Position [20,20] Size [80,25];
PushButton resetbutton = Text "Rewind" Action reset tid, reset playbutton Position [20,60] Size [80,25];
Circle wheel = Center [tid,1] Radius 1 Size 1.5 Color "blue";
Point center = [tid,1] Size 2.5 Color "blue";
Point tracer = [tid,1] - [sin(tid),cos(tid)] Size 2.5 Color "red";
Line spoke = Start center Dir tracer - center Size 1.5 Color "blue";
ParametricCurve cykloid = [t,1] - [sin(t),cos(t)] From 0 To tid Size 1.5 Color "red";