Logo Programming Source
TO FK :B HT # hide the turtle IF :B>15 [STOP] REPEAT 4 [FD :B RT 90] FK :B+1 # draw a bigger square to fill END TO QP :Y IF :Y>4 [STOP] REPEAT 4 [FK 15 FD 15 FK 1 FD 15] RT 90 FD 30 RT 90 REPEAT 4 [FK 15 FD 15 FK 1 FD 15] RT 180 QP :Y+1 END QP 1
FK draws a solid square by recursively drawing a smaller square in it. The Chessboard is then drawn by recursively drawing interleaving squares.
If you like this idea and update...
Support him and his work as a witness by
Some of his contributions: SteemIt Tools, Bots, APIs and Tutorial Thank you!