Un pallino colorato a ogni clic del mouse GraphicsWindow.BackgroundColor=”Black” GraphicsWindow.MouseDown=PALLINO r=5 d=2*r Sub PALLINO x=GraphicsWindow.MouseX y=GraphicsWindow.MouseY c=GraphicsWindow.GetRandomColor() GraphicsWindow.BrushColor=c GraphicsWindow.FillEllipse(x-r, y-r, d, d) Endsub Una linea… Leggi tutto »Linee e pallini 2
500 linee 500 pallini 250 linee e pallini DIMX=800 DIMY=450 spazio=25 spazio2=2*spazio spazioX=DIMX-spazio2 spazioY=DIMY-spazio2 w2=DIMX/2 h2=DIMy/2 GraphicsWindow.Width =DIMX GraphicsWindow.Height=DIMY For i=1 To 500 x=Math.GetRandomNumber(spazioX)+spazio y=Math.GetRandomNumber(spazioY)+spazio… Leggi tutto »Linee e pallini
Trenta cerchi concentrici Con colore casuale NUM =30 ‘ NUMERO DI FIGURE RITARDO =100 ‘ Per l’animazione diametro=10 ‘ DIMENSIONE INIZIALE passo =10 ‘… Leggi tutto »Quadrati e cerchi
Tante… stelle con posizione e dimensione casuale Il colore giusto aiuta…
Per 4 volte avanza di 100 pixel e gira a destra di 90° Turtle.Move(175) Turtle.TurnRight() Turtle.Move(175) Turtle.TurnRight() Turtle.Move(175) Turtle.TurnRight() Turtle.Move(175) Turtle.TurnRight() For … To …… Leggi tutto »Disegnare un quadrato