Vai al contenuto

APPLICAZIONI

Cerchi annidati

Cerchi annidati con raggio e colore decrescenti DIM=800 GraphicsWindow.Width =DIM GraphicsWindow.Height=DIM xc=DIM/2 yc=DIM/2 diametro=0.8*DIM For i=1 To 25 raggio=diametro/2 GraphicsWindow.BrushColor=”#2000000f” GraphicsWindow.FillEllipse(xc-raggio,yc-raggio,diametro,diametro) diametro=0.9*diametro Program.Delay(100) EndFor Se… Leggi tutto »Cerchi annidati

Cerchio

Un poligono di 50 lati, con passo 15, può essere confuso con un cerchio LATI =50 LUNGHEZZA=15 angolo =360/LATI Turtle.Speed=10 Turtle.Angle=3.6 ‘ Angolo iniziale per… Leggi tutto »Cerchio