Первые результаты оптимизации

Развернул пару циклов, сделал процедуры сохранения/восстановления фона пословными. Ускорение налицо: