module: Phi
Name: Pakwing man

Final design "Bug"

bug = {{35,5},{34.5,8.5},{27,7},{24.5,3.5},{23,8},{22,8},{21,8},{19.5,3.5},{17,7},{9.5,8.5},{9,5},{4,0},{4,6},{6,10},{5.2,17},{12,12.5},{10,18},{6,23},{5,20},{0,19.5},{3,22},{5,27},{10,22},{10,22},{10,28},{8.5,32},{9,39},{2.5,34},{4,40},{8,44},{9,42},{14,41.5},{12,38},{13,33},{18,34.5},{19,40},{20,37},{22,37},{24,37},{25,40},{26,34.5},{31,33},{32,38},{30,41.5}};


extraline= { {39,27},{41,22},{44,19.5}} ;


moveh[fg_]:= fg+{30,-22};
Moveh[opzij_]:= moveh /@ opzij;

horizontaal[fg_] :=fg+{60,0};
({{Horizontaal[fg_]:= horizontaal /@ fg;}, {
}})
verticaal[fg_] := fg+{0,-44};
Verticaal[fg_] := verticaal /@ fg;

verticaal1[fg_] := fg+{0,-22};
Verticaal1[fg_] := verticaal /@ fg;


bug1 := Table[Line[Nest[Horizontaal, Nest[Verticaal,bug,j], i]],{i,0,8}, {j,0,5}];
bug2 :=  Table[Line[Nest[Horizontaal, Nest[Verticaal,Moveh[bug],j], i]],{i,0,8}, {j,0,5}];
bug3:=  Table[Line[Nest[Horizontaal, Nest[Verticaal,extraline,j], i]],{i,0,8}, {j,0,5}];
bug4 :=  Table[Line[Nest[Horizontaal, Nest[Verticaal1,Moveh[extraline],j], i]],{i,0,8}, {j,0,5}];
Graphics[{bug1,bug2,bug3 , bug4}]

Previous attempt "Turtle"

turtle = {{0,0},{7,6},{13,8},{13,6},{17.5,0},{17.5,6},{16,10},{16.5,17},{10,12},{11,17},{15,19},{18,25},{22,23},{19,16.5},{20,12},{24,15},{22.5,17},{25,20.5},{29,22}};
Graphics[{Black,Line[box]}]

translatevhx= 29;
translatevhy=-22;
translatevhxj = 58;
translatevhyj=0;

trnsh[{x_,y_}]:={x,y}+{translatex,0};
Trnsh[fg_]:=trnsh /@ fg;

trnsvh[{x_,y_}]:={x,y}+{translatevhx,translatevhy};
Trnsvh[fg_]:=trnsvh /@ fg;

trnsvhj[{x_,y_}]:={x,y}+{translatevhxj,translatevhyj};
Trnsvh2[fg_]:=trnsvhj /@ fg;

TrnsMrr[gf_]:=Trnsvh[Mirrh[gf]];
TrnsMrr2[gf_]:=Trnsvh2[Mirrh[gf]];


WW:=Table[Line[Nest[Trnsvh,Nest[Trnsh,Nest[TrnsMrr2,Nest[TrnsMrr,turtle,j],k],l],m]],{j,0,1},{k,0,0},{l,0,8},{m,0,8}];


Graphics[{Red,WW}]