I singoli fotogrammi dell’animazione
Animazione finale
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 |
TO place x y POSITION [200+x*40, 400-y*40] END TO line x y x2 y2 PENUP place x y PENDOWN place x2 y2 END TO grid x y x2 y2 REPEAT y2-y+1 [ line x y+REPCOUNT-1 x2 y+REPCOUNT-1 ] REPEAT x2-x+1 [ line x+REPCOUNT-1 y x+REPCOUNT-1 y2 ] END PICTURE “drawtangram.svg” [ PENSIZE 2 HIDETURTLE PENCAP “ROUND” PENCOLOR “SILVER” grid 0 0 4 4 SLEEP 1000 PENCOLOR “BLACK” line 0 4 4 0 SLEEP 1000 line 2 4 4 2 SLEEP 1000 line 1 3 2 4 SLEEP 1000 line 0 0 3 3 SLEEP 1000 line 3 3 3 1 SLEEP 1000 FILLCOLOR “RED” line 0 0 0 4 place 2 2 FILL SLEEP 1000 FILLCOLOR “BLUE” line 0 0 4 0 place 2 2 FILL SLEEP 1000 FILLCOLOR “GREEN” line 0 4 2 4 place 1 3 FILL SLEEP 1000 FILLCOLOR “PURPLE” line 2 4 4 4 place 4 2 FILL SLEEP 1000 FILLCOLOR “LIME” line 3 1 2 2 place 3 3 FILL SLEEP 1000 FILLCOLOR “FUCHSIA” line 2 4 1 3 place 2 2 place 3 3 FILL SLEEP 1000 FILLCOLOR “YELLOW” line 3 1 3 3 place 4 2 place 4 0 FILL SLEEP 2000 ] |
Vedi