; Created in LibreOffice 4.2 with this LibreLogo program
 ; Usage: Put this code into an English language document in LibO Writer,
 ; and click on the Start icon of the View»Toolbars»Logo toolbar.
 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
 FILLCOLOR “BLUE” line 0 0 4 0 place 2 2 FILL
 FILLCOLOR “GREEN” line 0 4 2 4 place 1 3 FILL
 FILLCOLOR “PURPLE” line 2 4 4 4 place 4 2 FILL
 FILLCOLOR “LIME” line 3 1 2 2 place 3 3 FILL
 FILLCOLOR “FUCHSIA” line 2 4 1 3 place 2 2 place 3 3 FILL
 FILLCOLOR “YELLOW” line 3 1 3 3 place 4 2 place 4 0 FILL
 SLEEP 2000
 ]