Вы правы Ровки. Поигрался макросами ,но решил пока не применять. Опыта немного. Схему доработал, сделал красивей, стек привевел до 40%. Может быть завтра выложу.