
;  test inc/dec in loop

.code 0
  mvi #5
  mvr r2
:loop
  mva r2
  trap #1   ; print AC
  dec r2    ; affects F
  jf loop   ; F now is like zero flag
  trap #0
.end
