andreyepro писал(а):в строчке:Код: Выделить всё
CLEAR0:
ST Z+,ZH - в этой
; CLR R22
; ST Z+,R22
DEC R21
BRNE CLEAR0
RET
Уже обсуждалось. Сделайте вот так, и все будет работать.
Код: Выделить всё
CLEAR0:
; ST Z+,ZH
CLR R22
ST Z+,R22
DEC R21
BRNE CLEAR0
RET