clear() setBackgroundH(purple, white) setSpeed(fast) write("Square") forward(100) right() forward(100) right() forward(100) right() forward(100) right() invisible()