B GLAVNI

            ORG 18
INT     STMFD R13!, {R0, R1, R2, R3, R14}   ;KONTEKST
        LDR R3, RTC         ; R3 JE RTC
        LDR R2, GPIO        ; R2 JE GPIO
        MOV R0, #0
        STR R0, [R2, #8]    ; PREKID
        STR R0, [R2, #0C]   ; COUNTER
        MOV R0, #0D
        BL LCDWR            ; ISPRAZNI EKRAN
        LDR R1, INDEX
        LDRB R1, [R1]       ; RJ JE CHAR
        CMP R1, #0
        BEQ INTEND      ;AKO JE ZADNJI CHAR SKACEMO NA KRAJ SVEGA
        MOV R0, #3E         ; > * 3
        BL LCDWR
        BL LCDWR
        BL LCDWR
        MOV R0, R1          ; ZNAK KOJI TRAZIMO
        BL LCDWR
        MOV R0, #03C        ; < * 3
        BL LCDWR
        BL LCDWR
        BL LCDWR
        MOV R0, #0A
        BL LCDWR
        B INTRESET          ;AKO NIJE ZADNJI CHAR SKACEMO NA PONOVNU PRIPREMU
INTEND  MOV R1, #40<4
        STR R1, INDEX       ; RESET POINTER
        B INTSTOP
INTRESET    LDR R1, INDEX       ; PRIPREMA ZA DALJE
            ADD R1, R1, #1
            STR R1, INDEX
INTSTOP     LDMFD R13!, {R0, R1, R2, R3, R14}
            SUBS PC, LR, #4     ; POVRATAK
GLAVNI  MOV R13, #12<8      ; STOG
        MRS R1, CPSR        ; OMOGUCI PREKID
        BIC R1, R1, #80
        MSR CPSR_C, R1
        LDR R2, RTC         ; R2 JE RTC
        MOV R0, #1
        STR R0, [R2, #10]   ; RTC PREKID OMOGUCEN
        MOV R0, #1<8        ; R0 = 256(10) 256 HZ
        STR R0, [R2, #4]    ; MATCH REG.
        MOV R0, #0
        STR R0, [R2, #0C]   ; PUNJENJE COUNTERA
LOOP    B LOOP              ;BESKONACNA PETLJA
RTC     DW 0FFFFFE00        ; RTC ADRESA
GPIO    DW 0FFFFFF00        ; GPIO ADRESA
INDEX   DW 400              ;GDJE SU CHAROVI
LCDWR   STRB R0, [R2, #4]    ; PUNJENJE REGISTRA
        ORR R0, R0, #80     ; 7. BIT U 1
        STRB R0, [R2, #4]
        AND R0, R0, #7F     ;7. BIT U 0
        STRB R0, [R2, #4]
        MOV PC, LR
        ORG 400
PODATCI DB 49, 6E, 74, 65, 72, 6E, 61, 74, 69, 6F, 6E, 61, 6C, 69, 73, 61, 74, 69, 6F, 6E, 0