1 .text
   2 .arm
   3 .global _start
   4 _start:
   5         b reset
   6         b loop
   7         b loop
   8         b loop
   9         b loop
  10         nop
  11         b loop
  12         b loop
  13 
  14 /* ==============================
  15 *  TEST CODE
  16 *  ==============================
  17 */
  18 reset:
  19         mov r2,#VECT
  20 	mov r3,#CLAVE
  21 	mov r1,r3
  22 	
  23 	@ lee un byte del vector 	
  24 otro:
  25 	ldrb r4,[r2]
  26 	cmp r4,#0
  27 	beq salir
  28 	
  29 	@ lee un byte de la clave 
  30 otra_clave:
  31 	ldrb r5,[r1],#1
  32 	cmp r5,#0
  33 	moveq r1,r3     @ si el byte leido es 0, comienza nuevamente a leer 
  34 	beq otra_clave  @ el primer byte
  35 
  36 	@ suma los dos valores y guarda el resultado en el vector
  37 	add r4,r4,r5    
  38 	strb r4,[r2]
  39 	add r2,r2,#1
  40 	b otro
  41 			
  42 salir:
  43 loop:   b loop
  44 
  45 /* ==============================
  46 *  CONTANTES
  47 *  ==============================
  48 */
  49 VECT:	.asciz "cadena a encriptar"
  50 CLAVE:  .asciz "afg2"
  51 
  52         .balign 4
  53 
  54         .end