I am surprised that this is not easy to find. But How do I download Wolfram Demonstrations into my Home Edition of Mathematica?
You can use the button called "Source" found below the demo