Clock
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
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
La lancetta viene aggiornata ogni secondo
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
Turtle.Speed=10 xc=GraphicsWindow.Width/2 yc=GraphicsWindow.Height/2 r =yc*0.8 s =Clock.Second While "true" sn=Clock.Second If(s <> sn) Then s=sn Turtle.Angle=6*s GraphicsWindow.PenColor=GraphicsWindow.GetRandomColor() Turtle.X=xc Turtle.Y=yc Turtle.PenDown() Turtle.Move(r) Turtle.PenUp() EndIf EndWhile |
Secondi in analogico e digitale…
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
Turtle.Speed=10 xc=GraphicsWindow.Width/2+80 yc=GraphicsWindow.Height/2 r =yc*0.8 s =Clock.Second While "true" sn=Clock.Second If(s <> sn) Then s=sn Turtle.Angle=6*s c=GraphicsWindow.GetRandomColor() GraphicsWindow.PenColor =c GraphicsWindow.BrushColor=c GraphicsWindow.DrawText(10+16*Math.Remainder(s,10),10+16*Math.Floor(s/10),s) Turtle.X=xc Turtle.Y=yc Turtle.PenDown() Turtle.Move(r) Turtle.PenUp() EndIf EndWhile |
2013-02: Graphical Create a visually fun clock. Soluzione La lancetta ruota con il passare del tempo…
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
xc=GraphicsWindow.Width /2 yc=GraphicsWindow.Height/2 Pi2 =Math.Pi/2 DELTA =2*Math.Pi/60 RAGGIO=yc*0.8 GraphicsWindow.PenColor ="Red" GraphicsWindow.BrushColor="Red" GraphicsWindow.PenWidth =5 While "true" tempo =Clock.Second angolo=-DELTA*tempo+Pi2 x=xc+RAGGIO*Math.Cos(angolo) y=yc-RAGGIO*Math.Sin(angolo) GraphicsWindow.Clear() GraphicsWindow.FillEllipse(xc-5,yc-5,10,10) GraphicsWindow.DrawLine(xc,yc,x,y) Program.Delay(500) EndWhile |
Lancette delle ore, minuti e secondi disegnate più volte… Leggi tutto »Orologio analogico
Tramite la libreria Timer è possibile ripetere 4 volte al secondo la visualizzazione dei secondi attuali.
1 2 3 4 5 |
Timer.Interval=250 Timer.Tick =VISUALIZZA1 Sub VISUALIZZA1 TextWindow.Write(Clock.Second + " ") EndSub |
Potrebbe essere utile sapere quanti secondi sono passati dall’inizio dell’esecuzione… Leggi tutto »Secondi
Visualizzare tutte le informazioni su data e orario rese disponibili dalla libreria Clock
1 2 3 4 5 6 7 8 9 10 11 |
TextWindow.WriteLine("Date " + Clock.Date ) TextWindow.WriteLine("Year " + Clock.Year ) TextWindow.WriteLine("Month " + Clock.Month ) TextWindow.WriteLine("Day " + Clock.Day ) TextWindow.WriteLine("WeekDay " + Clock.WeekDay ) TextWindow.WriteLine("Time " + Clock.Time ) TextWindow.WriteLine("Hour " + Clock.Hour ) TextWindow.WriteLine("Minute " + Clock.Minute ) TextWindow.WriteLine("Second " + Clock.Second ) TextWindow.WriteLine("Millisecond " + Clock.Millisecond ) TextWindow.WriteLine("Elapsed... " + Clock.ElapsedMilliseconds) |
2012-01: Easy 1 Write a program to write out the current date and time in this format (date format may vary if you are in… Leggi tutto »Data e ora
La libreria Clock fornisce accesso, soltanto in lettura, all’orologio di sistema. Strumento Argomenti Risultato Descrizione Date “data” Data Day numero Giorno del mese ElapsedMilliseconds numero Numero di… Leggi tutto »Clock