w = 
      Table[{(2/3)*Cos[(2  Pi*j)/5] + 
            1.5, (2/3)*Sin[(2  Pi*j)/5] + 7.5}, {j, 1, 
          5}]; 
w2  = 
      Table[{(1/5)*Cos[(2  Pi*j)/5] - 
            1.5, (1/5)*Sin[(2  Pi*j)/5] + 2}, {j, 1, 
          5}]; 
w3  = 
      Table[{(1/5)*Cos[(2  Pi*j)/5] - 
            1, (1/5)*Sin[(2  Pi*j)/5] + 3.5}, {j, 1, 
          5}]; 
w4  = 
      Table[{(1/5)*Cos[(2  Pi*j)/5] - 
            0.5, (1/5)*Sin[(2  Pi*j)/5] + 5}, {j, 1, 
          5}]; 
w5  = 
      Table[{(1/5)*Cos[(2  Pi*j)/5], (1/5)*Sin[(2  Pi*j)/5] + 
            6.5}, {j, 1, 5}]; 
w6  = 
      Table[{(1/5)*Cos[(2  Pi*j)/5] + 
            3, (1/5)*Sin[(2  Pi*j)/5] + 6.5}, {j, 1, 
          5}]; 
w7  = 
      Table[{(1/5)*Cos[(2  Pi*j)/5] + 
            3.5, (1/5)*Sin[(2  Pi*j)/5] + 5}, {j, 1, 
          5}]; 
w8  = 
      Table[{(1/5)*Cos[(2  Pi*j)/5] + 
            4, (1/5)*Sin[(2  Pi*j)/5] + 3.5}, {j, 1, 
          5}]; 
w9  = 
      Table[{(1/5)*Cos[(2  Pi*j)/5] + 
            4.5, (1/5)*Sin[(2  Pi*j)/5] + 2}, {j, 1, 
          5}]; 
Show[
Graphics[{RGBColor[0.5, 0.3, 0.2], 
          Polygon[{{1, 0}, {2, 0}, {1.8, 1}, {1.2, 1}}], RGBColor[0, 0.7, 0], 
          Polygon[{{-2, 1}, {5, 1}, {3.5, 2.5}, {4.5, 2.5}, {3, 4}, {4, 
                4}, {2.5, 5.5}, {3.5, 5.5}, {1.5, 7.5}, {-0.5, 
                5.5}, {0.5, 5.5}, {-1, 4}, {0, 4}, {-1.5, 
                2.5}, {-0.5, 2.5}, {-2, 1}}], RGBColor[1, 0, 0], 
          Disk[{0, 2}, 0.15], Disk[{2, 4}, 0.15], Disk[{1, 6}, 0.15], 
          RGBColor[1, 1, 0], Disk[{2.5, 2.5}, 0.15], Disk[{1, 3.5}, 0.15], 
          RGBColor[1, 0, 1],  Disk[{0.5, 4.5}, 0.15], Disk[{1.5, 2}, 0.15], 
          RGBColor[1, 1, 0], 
          Polygon[{w[[1]], w[[3]], 
              w[[5]], w[[2]], w[[4]], 
              w[[1]]}], RGBColor[1, 1, 0], Thickness[0.02], 
          Line[{{-1.5, 1.5}, {-1.5, 2}}], RGBColor[1, 0, 0], 
          Polygon[{w2[[1]], w2[[3]], 
              w2[[5]], w2[[2]], w2[[4]], 
              w2[[1]]}], RGBColor[1, 1, 0], Thickness[0.02], 
          Line[{{-1, 3}, {-1, 3.5}}], RGBColor[1, 0, 0], 
          Polygon[{w3[[1]], w3[[3]], 
              w3[[5]], w3[[2]], w3[[4]], 
              w3[[1]]}], RGBColor[1, 1, 0], Thickness[0.02], 
          Line[{{-0.5, 4.5}, {-0.5, 5}}], RGBColor[1, 0, 0], 
          Polygon[{w4[[1]], w4[[3]], 
              w4[[5]], w4[[2]], w4[[4]], 
              w4[[1]]}], RGBColor[1, 1, 0], Thickness[0.02], 
          Line[{{0, 6}, {0, 6.5}}], RGBColor[1, 0, 0], 
          Polygon[{w5[[1]], w5[[3]], 
              w5[[5]], w5[[2]], w5[[4]], 
              w5[[1]]}], RGBColor[1, 1, 0], Thickness[0.02], 
          Line[{{3, 6}, {3, 6.5}}], RGBColor[1, 0, 0], 
          Polygon[{w6[[1]], w6[[3]], 
              w6[[5]], w6[[2]], w6[[4]], 
              w6[[1]]}], RGBColor[1, 1, 0], Thickness[0.02], 
          Line[{{3.5, 4.5}, {3.5, 5}}], RGBColor[1, 0, 0], 
          Polygon[{w7[[1]], w7[[3]], 
              w7[[5]], w7[[2]], w7[[4]], 
              w7[[1]]}], RGBColor[1, 1, 0], Thickness[0.02], 
          Line[{{4, 3}, {4, 3.5}}], RGBColor[1, 0, 0], 
          Polygon[{w8[[1]], w8[[3]], 
              w8[[5]], w8[[2]], w8[[4]], 
              w8[[1]]}], RGBColor[1, 1, 0], Thickness[0.02], 
          Line[{{4.5, 1.5}, {4.5, 2}}], RGBColor[1, 0, 0], 
          Polygon[{w9[[1]], w9[[3]], 
              w9[[5]], w9[[2]], w9[[4]], 
              w9[[1]]}]}, 
        AspectRatio -> 
          Automatic]
]