цикл на ассемблере

[Doink]

Нужно реализовать на МП КР580ВМ80А

На УВВ пришло 8 бит(канал А к примеру, адрес канала 00H), нужно эту информацию сохранить в ОЗУ и так 7 раз.
Я так понимаю это можно сделать через функцию декремента, пока при сравнении не выдаст 0. Вот как это будет программно реализовано ??

[p51x]

Я же вам давал ссылки на даташит, мануал по асму и описание команд...

Цикл организуетя легко, если не тупить:

mov b, count
loop:
  ....
  dec b
  jnz loop

[alexcoder]

lxi h,8000h ;адрес озу
mvi c,7
lp: in 00h
mov m,a
inx h
dcr c
jnz lp

[Grag]

А я все это вижу так... (Транслятор Xasm85)

DUNFIELD 8085 ASSEMBLER: asmprg                                       PAGE: 1

0000                         1  PPIPA	EQU	$00	;адрес порта А
0001                         2  PPIPB	EQU	PPIPA+1
0002                         3  PPIPC	EQU	PPIPB+1
0003                         4  PPIPW	EQU	PPIPC+1	;адрес регистра управляющего слова БИС
0091                         5  SWPPI	EQU	$91	;управляющее слово периферийной БИС
0007                         6  COUNT	EQU	$07	;значение счетчика байт
0000                         7  mass	DS $07		;массив байт в памяти
0007                         8  
0100                         9  	ORG 	$100
0100                        10  
0100  3E 91               11  start	MVI	A,SWPPI	;инициализация периферийной БИС
0102  D3 03               12      	OUT	PPIPW
0104  0E 07               13  	        MVI	C,COUNT	;инициализация счетика циклов
0106  21 00 00           14      	LXI	H,mass	;загрузка адреса массива
0109  DB 00               15  loop	IN	PPIPA	;чтение порта А
010B  77                   16       	MOV	M,A	;запись в массив
010C  23                   17  	        INX	H	;смещение к следующему байту
010D  0D                   18  	        DCR	C	;уменьшение счетчика байт
010E  C2 09 01          19       	JNZ	loop	;если не 0, продолжение
0111                        20  END.