wasya, вот твой вариант. Выбросил лишнее.
code_32050.txt
(самый экономичный, из приведённых выше, по размеру кода. По скорости ~ одинаковы - разница в пределах 0-5%)