Nothing fancy - the data is available on Robert Shiller's website[0] and I implemented the rule in Excel.

[0] http://www.econ.yale.edu/~shiller/data.htm