SelectObject ( hdc, GetStockObject ( WHITE_BRUSH) );
       Polygon ( hdc, apt, 4);

       SelectObject ( hdc, GetStockObject ( BLACK_PEN) );

       Polyline ( hdc, apt, 4);

       MoveToEx( hdc, apt [ 0].x, apt [ 0 ].y, NULL);
       LineTo ( hdc, apt [ 3 ].x, apt [ 3 ].y);


       SelectObject ( hdc, GetStockObject ( BLACK_BRUSH) );

       apt [ 0 ].x  = p0->Position.x * 100 + 25;
       apt [ 0 ].y  = p0->Position.y * 100 + 25;

       apt [ 1 ].x  = p0->Position.x * 100 + 75;
       apt [ 1 ].y  = p0->Position.y * 100 + 25;

       apt [ 2 ].x  = p0->Position.x * 100 + 75;
       apt [ 2 ].y  = p0->Position.y * 100 + 75;

       apt [ 3 ].x  = p0->Position.x * 100 + 25;
       apt [ 3 ].y  = p0->Position.y * 100 + 75;

       Polygon ( hdc, apt, 4);


      p0 = p0->Next;