; Created in LibreOffice 4.1.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 x l n
 IF n = 0 [ STOP ]
 x l n-1
 LEFT 90
 y (l, n-1)
 FORWARD l
 END
 
 TO y l n
 IF n = 0 [ STOP ]
 FORWARD l
 x l n-1
 RIGHT 90
 y l n-1
 END
 
 TO dragon l n
 FORWARD l x l n
 END
 
 HIDETURTLE PENSIZE 1
 PICTURE “dragon_curve_animation.svg” [
     REPEAT 12 [
         HOME RIGHT 90
         dragon 5 REPCOUNT 
         SLEEP 500
     ]
 ]