« first day (3646 days earlier)      last day (1136 days later) » 

08:22
Does anyone know how can I fill the invert region of this?
ListLinePlot[{{-1, 1}, {1, 1}, {10,
10}, {10, -10}, {1, -1}, {-1, -1}, {-10, -10}, {-10, 10}, {-1, 1}},
PlotStyle -> Directive[Red, Dashed, Thickness[0.008]],
Filling -> {1 -> Axis}, FillingStyle -> Lighter[Gray, 0.85]]

« first day (3646 days earlier)      last day (1136 days later) »