As a fan I have to contribute to this.
It is a rather simple soltution, but gets the job done.
\documentclass{standalone}
\usepackage{tikz}
\usetikzlibrary{plotmarks}
\begin{document}
\definecolor{skin}{RGB}{251,206,177}
\begin{tikzpicture}
\pgfsetplotmarksize{3.3ex}
%\foreach \x in {0,1,2,...,12}
%\foreach \y in {0,1,2,...,18}
%\draw (\x,\y) rectangle (1,1);
%red trouseres
\node[red] at (2.5,3.5) {\pgfuseplotmark{square*}};
\node[red] at (3.5,3.5) {\pgfuseplotmark{square*}};
\node[red] at (4.5,3.5) {\pgfuseplotmark{square*}};
\node[red] at (7.5,3.5) {\pgfuseplotmark{square*}};
\node[red] at (8.5,3.5) {\pgfuseplotmark{square*}};
\node[red] at (9.5,3.5) {\pgfuseplotmark{square*}};
\node[red] at (2.5,4.5) {\pgfuseplotmark{square*}};
\node[red] at (3.5,4.5) {\pgfuseplotmark{square*}};
\node[red] at (4.5,4.5) {\pgfuseplotmark{square*}};
\node[red] at (5.5,4.5) {\pgfuseplotmark{square*}};
\node[red] at (6.5,4.5) {\pgfuseplotmark{square*}};
\node[red] at (7.5,4.5) {\pgfuseplotmark{square*}};
\node[red] at (8.5,4.5) {\pgfuseplotmark{square*}};
\node[red] at (9.5,4.5) {\pgfuseplotmark{square*}};
\node[red] at (3.5,5.5) {\pgfuseplotmark{square*}};
\node[red] at (4.5,5.5) {\pgfuseplotmark{square*}};
\node[red] at (5.5,5.5) {\pgfuseplotmark{square*}};
\node[red] at (6.5,5.5) {\pgfuseplotmark{square*}};
\node[red] at (7.5,5.5) {\pgfuseplotmark{square*}};
\node[red] at (8.5,5.5) {\pgfuseplotmark{square*}};
\node[red] at (3.5,6.5) {\pgfuseplotmark{square*}};
\node[red] at (5.5,6.5) {\pgfuseplotmark{square*}};
\node[red] at (6.5,6.5) {\pgfuseplotmark{square*}};
\node[red] at (8.5,6.5) {\pgfuseplotmark{square*}};
\node[red] at (4.5,7.5) {\pgfuseplotmark{square*}};
\node[red] at (5.5,7.5) {\pgfuseplotmark{square*}};
\node[red] at (6.5,7.5) {\pgfuseplotmark{square*}};
\node[red] at (7.5,7.5) {\pgfuseplotmark{square*}};
\node[red] at (4.5,8.5) {\pgfuseplotmark{square*}};
\node[red] at (7.5,8.5) {\pgfuseplotmark{square*}};
\node[red] at (4.5,9.5) {\pgfuseplotmark{square*}};
%\node[red] at (7.5,9.5) {\pgfuseplotmark{square*}};
%red cap
\node[red] at (2.5,15.5) {\pgfuseplotmark{square*}};
\node[red] at (3.5,15.5) {\pgfuseplotmark{square*}};
\node[red] at (4.5,15.5) {\pgfuseplotmark{square*}};
\node[red] at (5.5,15.5) {\pgfuseplotmark{square*}};
\node[red] at (6.5,15.5) {\pgfuseplotmark{square*}};
\node[red] at (7.5,15.5) {\pgfuseplotmark{square*}};
\node[red] at (8.5,15.5) {\pgfuseplotmark{square*}};
\node[red] at (9.5,15.5) {\pgfuseplotmark{square*}};
\node[red] at (3.5,16.5) {\pgfuseplotmark{square*}};
\node[red] at (4.5,16.5) {\pgfuseplotmark{square*}};
\node[red] at (5.5,16.5) {\pgfuseplotmark{square*}};
\node[red] at (6.5,16.5) {\pgfuseplotmark{square*}};
%olive shirt
\node[olive] at (2.5,6.5) {\pgfuseplotmark{square*}};
\node[olive] at (.5,7.5) {\pgfuseplotmark{square*}};
\node[olive] at (1.5,7.5) {\pgfuseplotmark{square*}};
\node[olive] at (2.5,7.5) {\pgfuseplotmark{square*}};
\node[olive] at (3.5,7.5) {\pgfuseplotmark{square*}};
\node[olive] at (1.5,8.5) {\pgfuseplotmark{square*}};
\node[olive] at (2.5,8.5) {\pgfuseplotmark{square*}};
\node[olive] at (3.5,8.5) {\pgfuseplotmark{square*}};
\node[olive] at (2.5,9.5) {\pgfuseplotmark{square*}};
\node[olive] at (3.5,9.5) {\pgfuseplotmark{square*}};
\node[olive] at (5.5,8.5) {\pgfuseplotmark{square*}};
\node[olive] at (6.5,8.5) {\pgfuseplotmark{square*}};
\node[olive] at (5.5,9.5) {\pgfuseplotmark{square*}};
\node[olive] at (6.5,9.5) {\pgfuseplotmark{square*}};
\node[olive] at (9.5,6.5) {\pgfuseplotmark{square*}};
\node[olive] at (8.5,7.5) {\pgfuseplotmark{square*}};
\node[olive] at (9.5,7.5) {\pgfuseplotmark{square*}};
\node[olive] at (10.5,7.5) {\pgfuseplotmark{square*}};
\node[olive] at (11.5,7.5) {\pgfuseplotmark{square*}};
\node[olive] at (8.5,8.5) {\pgfuseplotmark{square*}};
\node[olive] at (9.5,8.5) {\pgfuseplotmark{square*}};
\node[olive] at (10.5,8.5) {\pgfuseplotmark{square*}};
%\node[olive] at (8.5,9.5) {\pgfuseplotmark{square*}};
%\node[olive] at (9.5,9.5) {\pgfuseplotmark{square*}};
\node[olive] at (7.5,9.5) {\pgfuseplotmark{square*}};
%olive feet
\node[olive] at (.5,1.5) {\pgfuseplotmark{square*}};
\node[olive] at (1.5,1.5) {\pgfuseplotmark{square*}};
\node[olive] at (2.5,1.5) {\pgfuseplotmark{square*}};
\node[olive] at (3.5,1.5) {\pgfuseplotmark{square*}};
\node[olive] at (8.5,1.5) {\pgfuseplotmark{square*}};
\node[olive] at (9.5,1.5) {\pgfuseplotmark{square*}};
\node[olive] at (10.5,1.5) {\pgfuseplotmark{square*}};
\node[olive] at (11.5,1.5) {\pgfuseplotmark{square*}};
\node[olive] at (1.5,2.5) {\pgfuseplotmark{square*}};
\node[olive] at (2.5,2.5) {\pgfuseplotmark{square*}};
\node[olive] at (3.5,2.5) {\pgfuseplotmark{square*}};
\node[olive] at (8.5,2.5) {\pgfuseplotmark{square*}};
\node[olive] at (9.5,2.5) {\pgfuseplotmark{square*}};
\node[olive] at (10.5,2.5) {\pgfuseplotmark{square*}};
%skin knots
\node[skin] at (4.5,6.5) {\pgfuseplotmark{square*}};
\node[skin] at (7.5,6.5) {\pgfuseplotmark{square*}};
%skin face
\node[skin] at (3.5,10.5) {\pgfuseplotmark{square*}};
\node[skin] at (4.5,10.5) {\pgfuseplotmark{square*}};
\node[skin] at (5.5,10.5) {\pgfuseplotmark{square*}};
\node[skin] at (6.5,10.5) {\pgfuseplotmark{square*}};
\node[skin] at (7.5,10.5) {\pgfuseplotmark{square*}};
\node[skin] at (8.5,10.5) {\pgfuseplotmark{square*}};
\node[skin] at (9.5,10.5) {\pgfuseplotmark{square*}};
\node[skin] at (3.5,11.5) {\pgfuseplotmark{square*}};
\node[skin] at (4.5,11.5) {\pgfuseplotmark{square*}};
\node[skin] at (5.5,11.5) {\pgfuseplotmark{square*}};
\node[skin] at (6.5,11.5) {\pgfuseplotmark{square*}};
\node[skin] at (5.5,14.5) {\pgfuseplotmark{square*}};
\node[skin] at (6.5,14.5) {\pgfuseplotmark{square*}};
\node[skin] at (2.5,13.5) {\pgfuseplotmark{square*}};
\node[skin] at (2.5,12.5) {\pgfuseplotmark{square*}};
\node[skin] at (4.5,13.5) {\pgfuseplotmark{square*}};
\node[skin] at (5.5,13.5) {\pgfuseplotmark{square*}};
\node[skin] at (6.5,13.5) {\pgfuseplotmark{square*}};
\node[skin] at (2.5,12.5) {\pgfuseplotmark{square*}};
\node[skin] at (5.5,12.5) {\pgfuseplotmark{square*}};
\node[skin] at (6.5,12.5) {\pgfuseplotmark{square*}};
\node[skin] at (7.5,12.5) {\pgfuseplotmark{square*}};
\node[skin] at (8.5,14.5) {\pgfuseplotmark{square*}};
\node[skin] at (8.5,13.5) {\pgfuseplotmark{square*}};
\node[skin] at (9.5,13.5) {\pgfuseplotmark{square*}};
\node[skin] at (10.5,13.5) {\pgfuseplotmark{square*}};
\node[skin] at (9.5,12.5) {\pgfuseplotmark{square*}};
\node[skin] at (10.5,12.5) {\pgfuseplotmark{square*}};
\node[skin] at (11.5,12.5) {\pgfuseplotmark{square*}};
%skin hands
\node[skin] at (0.5,4.5) {\pgfuseplotmark{square*}};
\node[skin] at (0.5,5.5) {\pgfuseplotmark{square*}};
\node[skin] at (0.5,6.5) {\pgfuseplotmark{square*}};
\node[skin] at (1.5,4.5) {\pgfuseplotmark{square*}};
\node[skin] at (1.5,5.5) {\pgfuseplotmark{square*}};
\node[skin] at (1.5,6.5) {\pgfuseplotmark{square*}};
\node[skin] at (2.5,5.5) {\pgfuseplotmark{square*}};
\node[skin] at (10.5,4.5) {\pgfuseplotmark{square*}};
\node[skin] at (10.5,5.5) {\pgfuseplotmark{square*}};
\node[skin] at (10.5,6.5) {\pgfuseplotmark{square*}};
\node[skin] at (9.5,5.5) {\pgfuseplotmark{square*}};
\node[skin] at (11.5,4.5) {\pgfuseplotmark{square*}};
\node[skin] at (11.5,5.5) {\pgfuseplotmark{square*}};
\node[skin] at (11.5,6.5) {\pgfuseplotmark{square*}};
%olive face and beard
\node[olive] at (7.5,11.5) {\pgfuseplotmark{square*}};
\node[olive] at (8.5,11.5) {\pgfuseplotmark{square*}};
\node[olive] at (9.5,11.5) {\pgfuseplotmark{square*}};
\node[olive] at (10.5,11.5) {\pgfuseplotmark{square*}};
\node[olive] at (8.5,12.5) {\pgfuseplotmark{square*}};
\node[olive] at (7.5,13.5) {\pgfuseplotmark{square*}};
\node[olive] at (7.5,14.5) {\pgfuseplotmark{square*}};
\node[olive] at (2.5,11.5) {\pgfuseplotmark{square*}};
\node[olive] at (1.5,11.5) {\pgfuseplotmark{square*}};
\node[olive] at (1.5,12.5) {\pgfuseplotmark{square*}};
\node[olive] at (1.5,13.5) {\pgfuseplotmark{square*}};
\node[olive] at (2.5,14.5) {\pgfuseplotmark{square*}};
\node[olive] at (3.5,14.5) {\pgfuseplotmark{square*}};
\node[olive] at (4.5,14.5) {\pgfuseplotmark{square*}};
\node[olive] at (3.5,13.5) {\pgfuseplotmark{square*}};
\node[olive] at (3.5,12.5) {\pgfuseplotmark{square*}};
\node[olive] at (4.5,12.5) {\pgfuseplotmark{square*}};
\end{tikzpicture}
\end{document}