.text
.org 0x20

tabela: .hword  1, 100, -255, 24, -88, 31, 56, 192, 155, -224, 0, 101, -199, 47

.align

@ r0 - adr
@ r1 - index
@ r2 - tmp
@ r3 - zero

.global _start
_start:

  adr     r0, tabela

  mov     r1, #0
  mov     r3, #0

loop:
  ldrsh   r2, [r0, r1]

  cmp     r2, #-100
  strgeh  r3, [r0, r1]
  blt     step

  cmp     r2, #100
  strlth  r3, [r0, r1]
  blt     step

step:
  cmp     r1, #24
  add     r1, #2
  bls     loop

_end:
  b       _end