Divergence indicator for Stochastic

Did any one has implemented divergence in stochastic ? Any code or sudo code could be really helpful. We should be able to validate this calculation.

Here it's explained

http://stockcharts.com/school/doku.php?id=chart_school:technical_indicators:stochastic_oscillator_fast_slow_and_full