Reminds me of a slightly less-functional version of this (source available): http://www.falstad.com/circuit/