hexagone.logo 237 B

123456789101112131415161718192021
  1. PROGRAM
  2. ROUTINE trace
  3. BEGIN
  4. FORWARD 70 ;
  5. ROTATE 60 ;
  6. END
  7. BEGIN
  8. FORWARD 100 ;
  9. ROTATE 90;
  10. FORWARD 100;
  11. ROTATE 270;
  12. PEN DOWN;
  13. CALL trace;
  14. CALL trace;
  15. CALL trace;
  16. CALL trace;
  17. CALL trace;
  18. CALL trace;
  19. END.