;Przenoszenie zawartosci pamieci wewnetrznej z jednego pola do drugiego
;Autor : Michal Kania

        LJMP start             
        ORG 100h
start:     MOV A,#1h         ;A=1h   - dana poczatkowa
           MOV R0,#10h       ;R0=10h - licznik
           MOV R1,#30h       ;R1=30h - adres danych

petla1:    MOV @R1,A      ;wpisanie zawartości akumulatora do komórki
                          ;pamieci wskazywanej przez R1  
           INC A          ;zwiekszenie akumulatora o 1
           INC R1         ;zwiększenie R1 o 1
           DJNZ R0,petla1 ;zmniejszenie licznika o 1 + petla 
           SJMP $
        END
