Подскажите, пожалуйста, как можно оптимизировать данный фрагмент кода в плане его длины:
ИП1 П8
1 П0
4 П7
0 П9 1 ПA
ИП8 1 6 / [x] ПB 1 6 * ИП8 - /-/ С/П
ИПA * ИП9 + П9 ИПA 1 6 * ПA ИПB П8
ИП7 1 - П7 x=0 10
ИП0 x#0 52 0 П0 ИП9 П1 ИП2 П8 БП 04
ИП8 П2
Его смысл следующий: в регистрах Р1 и Р2 лежит число (Р1 - младшие разряды, Р2 - старшие). В ходе выполнения программы на экран выводится каждый 16-чный разряд этого числа, после вывода которого она принимает с клавиатуры такие же 16-чные значения. Из них составляется новое число, помещаемое в эти же регистры, т. е. осуществляется замена разрядов. В каждый регистр помещается по два байта числа (по четыре 16-чных разряда). Регистры с 3 по 6 заняты.