Lemniscata Inviluppo di circonferenze con centro sull’iperbole e passanti per il centro dell’iperbole Prima stesura… DIM =800 DIM2=DIM/2 RAGGIO1 =DIM/8 RAGGIO12=RAGGIO1*RAGGIO1 QUANTI=50 DELTA =2*RAGGIO1/QUANTI GraphicsWindow.Width… Leggi tutto »I – Circonferenze – 2
Strisce colorate con un estremo al centro Con colore semitrasparente Con nero semitrasparente Con colore dal blu al magenta
Salto a 2/3 con scelta dei punti La regola è +0+1+3+4+5 La regola è +1 +3 +5 +7 … rand=Math.GetRandomNumber(4) If(rand=1) Then incr=1 ElseIf(rand=2) Then… Leggi tutto »Chaos game – 4
Con la regola del salto a metà distanza, si introduce una novità: la scelta del nuovo punto non è pienamente casuale. Il salto può essere… Leggi tutto »Chaos game – 3
Disegna dei tratti consecutivi con colore e spessore casuale GraphicsWindow.Height=GraphicsWindow.Width Turtle.Speed=10 SPAZIO =25 SPAZIO2=2*spazio xm=GraphicsWindow.Width -SPAZIO2 ym=GraphicsWindow.Height-SPAZIO2 While “true” x=Math.GetRandomNumber(xm)+SPAZIO y=Math.GetRandomNumber(ym)+SPAZIO GraphicsWindow.PenColor=GraphicsWindow.GetRandomColor() GraphicsWindow.PenWidth=Math.GetRandomNumber(10) Turtle.MoveTo(x,y) Program.Delay(500)… Leggi tutto »Figure casuali