CT_DC       `EQU        FFFF0000
CT_CR       `EQU        FFFF0004
CT_BISTABIL `EQU        FFFF0008
CT_END      `EQU        FFFF000C

DMA_ADR_SRC `EQU        FFFF1000
DMA_ADR_DEST    `EQU        FFFF1004
DMA_COUNT   `EQU        FFFF1008
DMA_CR      `EQU        FFFF100C
DMA_START   `EQU        FFFF1010
DMA_ACK     `EQU        FFFF1014

BJV         `EQU        FFFFFFFC

            `ORG 0
            MOVE %D 10, R6      ; R6- BROJAC
            MOVE 1F0, R5        ; R5- ADRESA

            MOVE %D 1000, R0
            STORE R0, (CT_DC)   ; BROJI 1000 TAKTOVA
            MOVE %B 10, R0
            STORE R0, (CT_CR)   ; NE POSTAVLJAJ PREKID I BROJI


PETLJA      LOAD R0, (CT_CR)
            OR R0, R0, R0
            JR_Z PETLJA         ;CEKAJ DA CT POSTANE SPREMAN

            STORE R0, (CT_BISTABIL)
            STORE R0, (CT_END)

            MOVE %B 0110, R0
            STORE R0, (DMA_CR)  ; UPRAVLJACKA RIJEC
            MOVE 0FFFFFFFC, R0
            STORE R0, (DMA_ADR_SRC) ; ADRESA IZVORA BVJ
            MOVE %D 10, R0
            STORE R0, (DMA_COUNT)   ; 10 PODATAKA PRENESI

            STORE R5, (DMA_ADR_DEST)    ; ODREDISTE
            MOVE 1, R0
            STORE R0, (DMA_START)   ; KRENI

CEKAJ_DMA       LOAD R0, (DMA_CR)
            OR R0, R0, R0
            JR_Z CEKAJ_DMA

            STORE R0, (DMA_ACK)     ; KRAJ DMA PRIJENOSA

            ADD R5, %D 40, R5       ; POMAKNI ADRESU ZA 4*10
            SUB R6, 1, R6           ; SMANJI BROJAC
            JR_NZ PETLJA

            HALT