prnnm: LD A,число
LD HL,.dectb
LD DE,адрес_на_экране
LD B,3
.loop1: LD C,"0"-1
.loop2: INC C
SUB (HL)
JR NC,.loop2
ADD A,(HL)
ex af,af' ;PUSH AF
LD A,C
CALL prnNUM ;вывод числа
ex af,af' ;POP AF
INC E
INC HL
DJNZ .loop1
RET
но это так чуть чуть... что-то вроде 12 тактов на итерацию
к тому же prNUM можно зацигачить инлайном - ещё 20 тактов на итерацию.
да ещё к тому же можно push hl,de,bc и поп hl,de,bc заменить на exx - ещё 52 такта на итерацию




Ответить с цитированием