Этюды: как бы написать поизящнее.

[moroz1999]

Если критичен размер, а не скорость, то 2 байта сэкономить можно, если заменить ld c,16 (32) на ротацию.

LD C,8
AND A
RET Z
RL C
DEC A
RET Z
RL C
RET

Добавлено через 1 минуту

;вход - A, выход - тоже A
CP 1
RLA
RLA
RLA
RLA

черт, как всё просто-то