.
american roulette algorithm cbol