/* PRVI DEL */


/* user code here */
       MOV R0, #0
       LOOP1:

          MOV R1, #0           
          LOOP2:
              ADD R0, R0, #1
              ADD R1, R1, #1
              LDR R2, CNST48K
              CMP R1, R2
              BLT LOOP2
          
          CMP R0, #500
          BLT LOOP1
             
/* constants */
LED:      .word   1
BUZZ:     .word   1
CNST48K:  .WORD   48000




/* DRUGI DEL */




/* constants */
LED:      .word   1
BUZZ:     .word   1    
CIPMS:     .WORD   192000

/* user code here */
 
             
       
       adr r3,LED
       adr r4,BUZZ

      b VECNA

DELAY:
      stmfd r13!, {r5-r7, r14}
      LDR R6, CIPMS 
      MUL R7, R5, R6
      MOV R5, R7           
      LOOP2:
          SUB R5, R5, #1 
          CMP R5, #0
          BGT LOOP2
      ldmfd r13!, {r5-r7, pc} 
       
VECNA: mov r2,#1         @ LED,BUZZ 1  
       str r2,[r3]
       str r2,[r4]
       bl  WRITEOUT                                                                 
       
@      delay half cycle
       mov R5, #500
       bl DELAY
       
       mov r2,#0         @ LED,BUZZ 0       
       str r2,[r3]
       str r2,[r4]
       bl  WRITEOUT
       
@      delay half cycle
       mov R5, #500
       bl DELAY

       b VECNA
 
/* end user code */