Inviluppi – Unisci i punti…
Considera due strisce disposte a formare un angolo retto. Su ogni striscia ci sono 50 chiodini a distanza fissa. Unisci i punti con del filo…… Leggi tutto »Inviluppi – Unisci i punti…
Considera due strisce disposte a formare un angolo retto. Su ogni striscia ci sono 50 chiodini a distanza fissa. Unisci i punti con del filo…… Leggi tutto »Inviluppi – Unisci i punti…
Disegna dei tratti consecutivi con colore e spessore casuale
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
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) EndWhile |
Disegna dei tratti staccati
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
... While "true" x1=Math.GetRandomNumber(xm)+SPAZIO y1=Math.GetRandomNumber(ym)+SPAZIO x2=Math.GetRandomNumber(xm)+SPAZIO y2=Math.GetRandomNumber(ym)+SPAZIO Turtle.PenUp() Turtle.MoveTo(x1,y1) GraphicsWindow.PenColor=GraphicsWindow.GetRandomColor() GraphicsWindow.PenWidth=Math.GetRandomNumber(10) Turtle.PenDown() Turtle.MoveTo(x2,y2) Program.Delay(500) EndWhile |
Per disegnare triangoli sono necessari 3 punti 6 coordinate
1 2 3 4 5 6 7 8 9 10 11 12 |
... x1=Math.GetRandomNumber(xm)+SPAZIO y1=Math.GetRandomNumber(ym)+SPAZIO x2=Math.GetRandomNumber(xm)+SPAZIO y2=Math.GetRandomNumber(ym)+SPAZIO x3=Math.GetRandomNumber(xm)+SPAZIO y3=Math.GetRandomNumber(ym)+SPAZIO ... Turtle.MoveTo(x2,y2) Turtle.MoveTo(x3,y3) Turtle.MoveTo(x1,y1) ... |
Poligono regolare con 5 lati di lunghezza 150
1 2 3 4 |
For lato=1 To 5 Turtle.Move(150) Turtle.Turn(72) EndFor |
Continua…
1 2 3 4 5 6 7 8 9 10 11 12 |
GraphicsWindow.Height=GraphicsWindow.Width Turtle.Y=GraphicsWindow.Height/2 Turtle.Speed=10 QUANTI=15 ANGOLO=360/QUANTI For pentagono=1 To QUANTI For lato=1 To 5 Turtle.Move(150) Turtle.Turn(72) EndFor Turtle.Turn(ANGOLO) EndFor |
Disegna un triangolo (equilatero)
1 2 3 4 5 |
Turtle.Speed=10 For lato=1 To 3 Turtle.Move(150) Turtle.Turn(120) EndFor |
Disegna due triangoli
1 2 3 4 5 6 7 8 9 10 |
Turtle.Speed=10 For lato=1 To 3 Turtle.Move(150) Turtle.Turn(120) EndFor Turtle.Turn(180) For lato=1 To 3 Turtle.Move(150) Turtle.Turn(120) EndFor |
Disegna tre triangoli
1 2 3 4 5 6 7 8 9 10 |
Turtle.Speed=10 QUANTI=3 ANGOLO=360/QUANTI For triangolo=1 To QUANTI For lato=1 To 3 Turtle.Move(150) Turtle.Turn(120) EndFor Turtle.Turn(ANGOLO) EndFor |
Cambia il valore della variabile QUANTI per disegnare 4, 5, 6, …… Leggi tutto »Triangoli
La libreria Clock fornisce accesso, soltanto in lettura, all’orologio di sistema Consulta le funzionalità della libreria Clock Visualizza i dati forniti dalla libreria Clock Applicazioni Data e… Leggi tutto »Clock
Consulta i valori di default delle proprietà della tartaruga
1 2 3 4 5 |
Turtle.Show() TextWindow.WriteLine("Turtle.Angle = " + Turtle.Angle) TextWindow.WriteLine("Turtle.Speed = " + Turtle.Speed) TextWindow.WriteLine("Turtle.X = " + Turtle.X ) TextWindow.WriteLine("Turtle.Y = " + Turtle.Y ) |
La tartaruga si muove nella finestra grafica…
1 2 3 4 5 6 7 8 |
TextWindow.WriteLine("GraphicsWindow.BackgroundColor = " + GraphicsWindow.BackgroundColor) TextWindow.WriteLine("GraphicsWindow.CanResize = " + GraphicsWindow.CanResize ) TextWindow.WriteLine("GraphicsWindow.Height = " + GraphicsWindow.Height ) TextWindow.WriteLine("GraphicsWindow.PenColor = " + GraphicsWindow.PenColor ) TextWindow.WriteLine("GraphicsWindow.PenWidth = " + GraphicsWindow.PenWidth ) TextWindow.WriteLine("GraphicsWindow.Title = " + GraphicsWindow.Title ) TextWindow.WriteLine("GraphicsWindow.Width = " + GraphicsWindow.Width ) ... |
Consulta i valori di default della finestra grafica
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
GraphicsWindow.Show() TextWindow.WriteLine(GraphicsWindow.BackgroundColor) TextWindow.WriteLine(GraphicsWindow.BrushColor ) TextWindow.WriteLine(GraphicsWindow.CanResize ) TextWindow.WriteLine(GraphicsWindow.FontBold ) TextWindow.WriteLine(GraphicsWindow.FontItalic ) TextWindow.WriteLine(GraphicsWindow.FontName ) TextWindow.WriteLine(GraphicsWindow.FontSize ) TextWindow.WriteLine(GraphicsWindow.Height ) TextWindow.WriteLine(GraphicsWindow.Left ) TextWindow.WriteLine(GraphicsWindow.MouseX ) TextWindow.WriteLine(GraphicsWindow.MouseY ) TextWindow.WriteLine(GraphicsWindow.PenColor ) TextWindow.WriteLine(GraphicsWindow.PenWidth ) TextWindow.WriteLine(GraphicsWindow.Title ) TextWindow.WriteLine(GraphicsWindow.Top ) TextWindow.WriteLine(GraphicsWindow.Width ) |
Gestione degli eventi
1 2 |
TextWindow.WriteLine(GraphicsWindow.LastKey ) TextWindow.WriteLine(GraphicsWindow.LastText) |
Consulta i valori di default della finestra di testo
1 2 3 4 5 6 7 |
TextWindow.WriteLine(TextWindow.BackgroundColor) TextWindow.WriteLine(TextWindow.ForegroundColor) TextWindow.WriteLine(TextWindow.CursorLeft) ' Colonna del cursore TextWindow.WriteLine(TextWindow.CursorTop) ' Riga del cursore TextWindow.WriteLine(TextWindow.Left) ' Colonna della finestra TextWindow.WriteLine(TextWindow.Title) TextWindow.WriteLine(TextWindow.Top) ' Riga della finestra |
Seconda prova di Matematica – 2014 P.N.I. – Quesito 8 La zara è un gioco d’azzardo di origine araba che conobbe particolare fortuna in Italia in epoca medievale… Leggi tutto »La zara
Challenge 2012-09 – Basic Challenge 3 Create program to show 4 pictures downloaded from Flickr in a 2 by 2 grid on the GraphicsWindow. Le… Leggi tutto »Flickr 2×2