Using original data points not fitted polynomial

Improved the output, this code is the best one so far; still not
subtracting areas and I need to look at cell 24 and see what is
happening there!