Shapes+WM

Square: repeat 4 move 100 turn 90

Triangle: repeat 3 move 100 turn 120

Pentagon: repeat 5 move 100 turn 72

Hexagon: repeat 6 move 100 turn 60

[]